~ chicken-core (chicken-5) 7a35d64c30c36ef50aefbf9ce81d5ae0e1e0cba4
commit 7a35d64c30c36ef50aefbf9ce81d5ae0e1e0cba4
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Tue Mar 9 14:56:14 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Tue Mar 9 14:56:14 2010 +0100
removed bootstrap files; added script to generate bootstrapping chicken
diff --git a/Makefile b/Makefile
index 724b3fcb..b8b66870 100644
--- a/Makefile
+++ b/Makefile
@@ -35,7 +35,7 @@ endif
STANDARD_TARGETS \
= all clean distclean spotless install uninstall confclean check \
- fullcheck dist libs bootstrap
+ fullcheck dist libs
SRCDIR = .
@@ -82,6 +82,4 @@ dist:
csi -s scripts/makedist.scm
libs:
$(MAKE) -f $(SRCDIR)/Makefile.$(PLATFORM) CONFIG=$(CONFIG) libs
-bootstrap:
- $(MAKE) -f $(SRCDIR)/Makefile.$(PLATFORM) CONFIG=$(CONFIG) bootstrap
endif
diff --git a/Makefile.mingw b/Makefile.mingw
index 547d75d0..e7e1b7fc 100644
--- a/Makefile.mingw
+++ b/Makefile.mingw
@@ -69,7 +69,7 @@ endif
C_COMPILER_SHARED_OPTIONS = -DPIC
LINKER_LINK_SHARED_LIBRARY_OPTIONS = -shared
LIBRARIES = -lm -lws2_32
-LINKER_OPTIONS = -Wl,--enable-auto-import
+LINKER_OPTIONS += -Wl,--enable-auto-import
LIBCHICKEN_SO_LINKER_OPTIONS = -Wl,--out-implib,libchicken.dll.a
LIBUCHICKEN_SO_LINKER_OPTIONS = -Wl,--out-implib,libuchicken.dll.a
LIBCHICKEN_SO_LIBRARIES = -lm -lws2_32
diff --git a/Makefile.mingw-msys b/Makefile.mingw-msys
index 5e1e957b..8f9a3d3a 100644
--- a/Makefile.mingw-msys
+++ b/Makefile.mingw-msys
@@ -61,7 +61,7 @@ C_COMPILER_OPTIMIZATION_OPTIONS ?= -Os
endif
endif
C_COMPILER_SHARED_OPTIONS = -DPIC
-LINKER_OPTIONS = -Wl,--enable-auto-import
+LINKER_OPTIONS += -Wl,--enable-auto-import
LINKER_LINK_SHARED_LIBRARY_OPTIONS = -shared
LIBRARIES = -lm -lws2_32
LIBCHICKEN_SO_LINKER_OPTIONS = -Wl,--out-implib,libchicken.dll.a
diff --git a/bootstrap/batch-driver.c b/bootstrap/batch-driver.c
deleted file mode 100644
index 0c54079b..00000000
--- a/bootstrap/batch-driver.c
+++ /dev/null
@@ -1,9296 +0,0 @@
-/* Generated from batch-driver.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:38
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: batch-driver.scm -optimize-level 2 -include-path . -include-path ./ -inline -no-lambda-info -local -no-trace -extend private-namespace.scm -no-trace -output-file batch-driver.c
- unit: driver
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[409];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_driver_toplevel)
-C_externexport void C_ccall C_driver_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1508)
-static void C_ccall f_1508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1511)
-static void C_ccall f_1511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1516)
-static void C_ccall f_1516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1520)
-static void C_ccall f_1520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1524)
-static void C_ccall f_1524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1528)
-static void C_ccall f_1528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1532)
-static void C_ccall f_1532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1534)
-static void C_ccall f_1534(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1534)
-static void C_ccall f_1534r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1570)
-static void C_ccall f_1570(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4848)
-static void C_ccall f_4848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4833)
-static void C_ccall f_4833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4829)
-static void C_ccall f_4829(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4818)
-static void C_ccall f_4818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4789)
-static void C_fcall f_4789(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4793)
-static void C_ccall f_4793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1586)
-static void C_ccall f_1586(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4785)
-static void C_ccall f_4785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4746)
-static void C_ccall f_4746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4748)
-static void C_fcall f_4748(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4777)
-static void C_ccall f_4777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1589)
-static void C_ccall f_1589(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1595)
-static void C_fcall f_1595(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4727)
-static void C_ccall f_4727(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4723)
-static void C_ccall f_4723(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4719)
-static void C_ccall f_4719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2061)
-static void C_fcall f_2061(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2064)
-static void C_fcall f_2064(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2067)
-static void C_ccall f_2067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4704)
-static void C_ccall f_4704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4648)
-static void C_ccall f_4648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4656)
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4658)
-static void C_fcall f_4658(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4696)
-static void C_ccall f_4696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2071)
-static void C_ccall f_2071(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4598)
-static void C_ccall f_4598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4600)
-static void C_fcall f_4600(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4635)
-static void C_ccall f_4635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4639)
-static void C_ccall f_4639(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2079)
-static void C_ccall f_2079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2082)
-static void C_fcall f_2082(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2085)
-static void C_fcall f_2085(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2088)
-static void C_fcall f_2088(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2091)
-static void C_ccall f_2091(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2094)
-static void C_fcall f_2094(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2097)
-static void C_ccall f_2097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2100)
-static void C_fcall f_2100(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2103)
-static void C_fcall f_2103(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2106)
-static void C_fcall f_2106(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2109)
-static void C_fcall f_2109(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2112)
-static void C_fcall f_2112(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4501)
-static void C_ccall f_4501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4503)
-static void C_fcall f_4503(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4532)
-static void C_ccall f_4532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2116)
-static void C_ccall f_2116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4496)
-static void C_ccall f_4496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2119)
-static void C_fcall f_2119(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2122)
-static void C_fcall f_2122(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2125)
-static void C_fcall f_2125(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2128)
-static void C_fcall f_2128(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2131)
-static void C_fcall f_2131(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2134)
-static void C_fcall f_2134(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2137)
-static void C_fcall f_2137(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2140)
-static void C_fcall f_2140(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2143)
-static void C_fcall f_2143(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2146)
-static void C_fcall f_2146(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4451)
-static void C_ccall f_4451(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2152)
-static void C_fcall f_2152(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4436)
-static void C_ccall f_4436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4439)
-static void C_ccall f_4439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4442)
-static void C_ccall f_4442(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2158)
-static void C_fcall f_2158(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4426)
-static void C_ccall f_4426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4429)
-static void C_ccall f_4429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2161)
-static void C_ccall f_2161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2164)
-static void C_ccall f_2164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4384)
-static void C_ccall f_4384(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2167)
-static void C_ccall f_2167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4378)
-static void C_ccall f_4378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2170)
-static void C_ccall f_2170(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4369)
-static void C_ccall f_4369(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2173)
-static void C_ccall f_2173(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4351)
-static void C_ccall f_4351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4354)
-static void C_ccall f_4354(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4357)
-static void C_ccall f_4357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4360)
-static void C_ccall f_4360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2176)
-static void C_ccall f_2176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4310)
-static void C_ccall f_4310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4312)
-static void C_fcall f_4312(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4341)
-static void C_ccall f_4341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4306)
-static void C_ccall f_4306(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2182)
-static void C_ccall f_2182(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2185)
-static void C_ccall f_2185(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4255)
-static void C_ccall f_4255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4257)
-static void C_fcall f_4257(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4286)
-static void C_ccall f_4286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2189)
-static void C_ccall f_2189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2192)
-static void C_fcall f_2192(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2195)
-static void C_fcall f_2195(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2198)
-static void C_fcall f_2198(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2201)
-static void C_fcall f_2201(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4152)
-static void C_fcall f_4152(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4166)
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4191)
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4196)
-static void C_ccall f_4196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4224)
-static void C_ccall f_4224(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4062)
-static void C_ccall f_4062(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4067)
-static void C_fcall f_4067(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4081)
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4106)
-static void C_ccall f_4106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4111)
-static void C_ccall f_4111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4139)
-static void C_ccall f_4139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2204)
-static void C_ccall f_2204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4056)
-static void C_ccall f_4056(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4048)
-static void C_ccall f_4048(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4023)
-static void C_ccall f_4023(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4025)
-static void C_fcall f_4025(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4035)
-static void C_ccall f_4035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2207)
-static void C_ccall f_2207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2214)
-static void C_ccall f_2214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2217)
-static void C_ccall f_2217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2220)
-static void C_ccall f_2220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3986)
-static void C_fcall f_3986(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4002)
-static void C_ccall f_4002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4005)
-static void C_ccall f_4005(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2223)
-static void C_ccall f_2223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2227)
-static void C_ccall f_2227(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2235)
-static void C_ccall f_2235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2239)
-static void C_ccall f_2239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3949)
-static void C_ccall f_3949(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3951)
-static void C_fcall f_3951(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3980)
-static void C_ccall f_3980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2242)
-static void C_ccall f_2242(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3910)
-static void C_ccall f_3910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3912)
-static void C_fcall f_3912(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3941)
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3906)
-static void C_ccall f_3906(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3850)
-static void C_ccall f_3850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3852)
-static void C_fcall f_3852(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3846)
-static void C_ccall f_3846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2246)
-static void C_ccall f_2246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2250)
-static void C_ccall f_2250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2253)
-static void C_fcall f_2253(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3825)
-static void C_ccall f_3825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2257)
-static void C_ccall f_2257(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3818)
-static void C_ccall f_3818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2261)
-static void C_ccall f_2261(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3811)
-static void C_ccall f_3811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2265)
-static void C_ccall f_2265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3804)
-static void C_ccall f_3804(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2269)
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3784)
-static void C_ccall f_3784(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2273)
-static void C_ccall f_2273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2284)
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2287)
-static void C_fcall f_2287(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2290)
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3743)
-static void C_ccall f_3743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2293)
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2296)
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2317)
-static void C_fcall f_2317(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2345)
-static void C_ccall f_2345(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2351)
-static void C_ccall f_2351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2355)
-static void C_ccall f_2355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2358)
-static void C_ccall f_2358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2361)
-static void C_ccall f_2361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2364)
-static void C_ccall f_2364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2372)
-static void C_ccall f_2372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2375)
-static void C_ccall f_2375(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2378)
-static void C_ccall f_2378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3711)
-static void C_ccall f_3711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3719)
-static void C_ccall f_3719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2381)
-static void C_ccall f_2381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2384)
-static void C_ccall f_2384(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3556)
-static void C_fcall f_3556(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3655)
-static void C_ccall f_3655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3704)
-static void C_ccall f_3704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3672)
-static void C_ccall f_3672(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3676)
-static void C_ccall f_3676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3681)
-static void C_fcall f_3681(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3702)
-static void C_ccall f_3702(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3667)
-static void C_ccall f_3667(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3658)
-static void C_ccall f_3658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3616)
-static void C_fcall f_3616(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3645)
-static void C_ccall f_3645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3571)
-static void C_ccall f_3571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3575)
-static void C_ccall f_3575(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3581)
-static void C_fcall f_3581(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3610)
-static void C_ccall f_3610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3579)
-static void C_ccall f_3579(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3567)
-static void C_ccall f_3567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3547)
-static void C_ccall f_3547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3551)
-static void C_ccall f_3551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2387)
-static void C_ccall f_2387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2390)
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3505)
-static void C_ccall f_3505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3511)
-static void C_fcall f_3511(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3540)
-static void C_ccall f_3540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3509)
-static void C_ccall f_3509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2393)
-static void C_fcall f_2393(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2396)
-static void C_ccall f_2396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3482)
-static void C_ccall f_3482(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3502)
-static void C_ccall f_3502(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2402)
-static void C_fcall f_2402(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3440)
-static void C_ccall f_3440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3442)
-static void C_fcall f_3442(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3471)
-static void C_ccall f_3471(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2405)
-static void C_ccall f_2405(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2408)
-static void C_ccall f_2408(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3374)
-static void C_fcall f_3374(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3180)
-static void C_ccall f_3180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3330)
-static void C_fcall f_3330(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3184)
-static void C_ccall f_3184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3188)
-static void C_fcall f_3188(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3207)
-static void C_fcall f_3207(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3192)
-static void C_ccall f_3192(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2414)
-static void C_ccall f_2414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3119)
-static void C_ccall f_3119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3124)
-static void C_fcall f_3124(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3136)
-static void C_ccall f_3136(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3139)
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3142)
-static void C_ccall f_3142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3145)
-static void C_ccall f_3145(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3159)
-static void C_ccall f_3159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2417)
-static void C_ccall f_2417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3113)
-static void C_ccall f_3113(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2420)
-static void C_ccall f_2420(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3107)
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2423)
-static void C_ccall f_2423(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2426)
-static void C_ccall f_2426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3092)
-static void C_ccall f_3092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2429)
-static void C_ccall f_2429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2434)
-static void C_ccall f_2434(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2437)
-static void C_ccall f_2437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2440)
-static void C_ccall f_2440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2443)
-static void C_ccall f_2443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3038)
-static void C_ccall f_3038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3050)
-static void C_fcall f_3050(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3079)
-static void C_ccall f_3079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3045)
-static void C_ccall f_3045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2446)
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3035)
-static void C_ccall f_3035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3031)
-static void C_ccall f_3031(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2457)
-static void C_ccall f_2457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2460)
-static void C_ccall f_2460(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2977)
-static void C_ccall f_2977(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3017)
-static void C_ccall f_3017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3009)
-static void C_ccall f_3009(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2980)
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2988)
-static void C_ccall f_2988(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2991)
-static void C_ccall f_2991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2994)
-static void C_ccall f_2994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3000)
-static void C_ccall f_3000(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3003)
-static void C_ccall f_3003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3006)
-static void C_ccall f_3006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2463)
-static void C_fcall f_2463(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2968)
-static void C_ccall f_2968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2971)
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2950)
-static void C_ccall f_2950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2956)
-static void C_ccall f_2956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2959)
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2962)
-static void C_ccall f_2962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2466)
-static void C_fcall f_2466(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2944)
-static void C_ccall f_2944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2469)
-static void C_ccall f_2469(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2937)
-static void C_ccall f_2937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2472)
-static void C_ccall f_2472(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2901)
-static void C_fcall f_2901(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2930)
-static void C_ccall f_2930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2899)
-static void C_ccall f_2899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2844)
-static void C_ccall f_2844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2846)
-static void C_fcall f_2846(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2884)
-static void C_ccall f_2884(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2854)
-static void C_fcall f_2854(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2881)
-static void C_ccall f_2881(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2877)
-static void C_ccall f_2877(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2858)
-static void C_ccall f_2858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2867)
-static void C_ccall f_2867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2870)
-static void C_ccall f_2870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2475)
-static void C_ccall f_2475(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2478)
-static void C_ccall f_2478(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2808)
-static void C_fcall f_2808(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2826)
-static void C_ccall f_2826(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2816)
-static void C_fcall f_2816(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2820)
-static void C_ccall f_2820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2481)
-static void C_ccall f_2481(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2487)
-static void C_ccall f_2487(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2493)
-static void C_ccall f_2493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2496)
-static void C_ccall f_2496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2499)
-static void C_ccall f_2499(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2504)
-static void C_fcall f_2504(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2511)
-static void C_ccall f_2511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2758)
-static void C_ccall f_2758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2761)
-static void C_ccall f_2761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2514)
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2518)
-static void C_ccall f_2518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2521)
-static void C_ccall f_2521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2524)
-static void C_ccall f_2524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2616)
-static void C_ccall f_2616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2746)
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2619)
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2626)
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2629)
-static void C_ccall f_2629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2632)
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2635)
-static void C_ccall f_2635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2638)
-static void C_ccall f_2638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2714)
-static void C_ccall f_2714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2720)
-static void C_ccall f_2720(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2723)
-static void C_ccall f_2723(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2641)
-static void C_ccall f_2641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2644)
-static void C_ccall f_2644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2658)
-static void C_ccall f_2658(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2662)
-static void C_ccall f_2662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2668)
-static void C_ccall f_2668(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2671)
-static void C_ccall f_2671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2674)
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2677)
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2680)
-static void C_ccall f_2680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f5154)
-static void C_ccall f5154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2699)
-static void C_ccall f_2699(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2683)
-static void C_ccall f_2683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2686)
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2652)
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2530)
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2544)
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2548)
-static void C_ccall f_2548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2551)
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2570)
-static void C_ccall f_2570(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2587)
-static void C_ccall f_2587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2590)
-static void C_ccall f_2590(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2596)
-static void C_ccall f_2596(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2599)
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2538)
-static void C_ccall f_2538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2336)
-static void C_ccall f_2336(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2329)
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2305)
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1982)
-static void C_fcall f_1982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2012)
-static void C_fcall f_2012(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2007)
-static void C_fcall f_2007(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1984)
-static void C_fcall f_1984(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1988)
-static void C_ccall f_1988(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2002)
-static void C_ccall f_2002(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1996)
-static void C_ccall f_1996(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1991)
-static void C_ccall f_1991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1976)
-static void C_fcall f_1976(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1947)
-static void C_fcall f_1947(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1954)
-static void C_ccall f_1954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1957)
-static void C_ccall f_1957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1960)
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1963)
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1937)
-static C_word C_fcall f_1937(C_word t0);
-C_noret_decl(f_1902)
-static void C_fcall f_1902(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1908)
-static void C_fcall f_1908(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1916)
-static void C_fcall f_1916(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1924)
-static void C_ccall f_1924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1928)
-static void C_ccall f_1928(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1822)
-static void C_fcall f_1822(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1891)
-static void C_ccall f_1891(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1887)
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1871)
-static void C_ccall f_1871(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1863)
-static void C_ccall f_1863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1832)
-static void C_ccall f_1832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1773)
-static void C_ccall f_1773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1780)
-static void C_ccall f_1780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1786)
-static void C_fcall f_1786(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1801)
-static void C_ccall f_1801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1797)
-static void C_ccall f_1797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1783)
-static void C_ccall f_1783(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1819)
-static void C_ccall f_1819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1730)
-static void C_fcall f_1730(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1737)
-static void C_ccall f_1737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1742)
-static void C_fcall f_1742(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1754)
-static void C_ccall f_1754(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1760)
-static void C_ccall f_1760(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1706)
-static void C_fcall f_1706(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1713)
-static void C_ccall f_1713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1716)
-static void C_ccall f_1716(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1719)
-static void C_ccall f_1719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1722)
-static void C_ccall f_1722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1725)
-static void C_ccall f_1725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1684)
-static void C_fcall f_1684(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1691)
-static void C_ccall f_1691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1704)
-static void C_ccall f_1704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1660)
-static void C_fcall f_1660(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1664)
-static void C_ccall f_1664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1673)
-static void C_ccall f_1673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1676)
-static void C_ccall f_1676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1679)
-static void C_ccall f_1679(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1682)
-static void C_ccall f_1682(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1645)
-static void C_fcall f_1645(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1652)
-static void C_ccall f_1652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1655)
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1537)
-static void C_fcall f_1537(C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_4789)
-static void C_fcall trf_4789(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4789(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4789(t0,t1,t2);}
-
-C_noret_decl(trf_4748)
-static void C_fcall trf_4748(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4748(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4748(t0,t1,t2);}
-
-C_noret_decl(trf_1595)
-static void C_fcall trf_1595(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1595(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1595(t0,t1);}
-
-C_noret_decl(trf_2061)
-static void C_fcall trf_2061(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2061(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2061(t0,t1);}
-
-C_noret_decl(trf_2064)
-static void C_fcall trf_2064(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2064(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2064(t0,t1);}
-
-C_noret_decl(trf_4658)
-static void C_fcall trf_4658(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4658(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4658(t0,t1,t2);}
-
-C_noret_decl(trf_4600)
-static void C_fcall trf_4600(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4600(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4600(t0,t1,t2);}
-
-C_noret_decl(trf_2082)
-static void C_fcall trf_2082(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2082(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2082(t0,t1);}
-
-C_noret_decl(trf_2085)
-static void C_fcall trf_2085(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2085(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2085(t0,t1);}
-
-C_noret_decl(trf_2088)
-static void C_fcall trf_2088(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2088(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2088(t0,t1);}
-
-C_noret_decl(trf_2094)
-static void C_fcall trf_2094(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2094(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2094(t0,t1);}
-
-C_noret_decl(trf_2100)
-static void C_fcall trf_2100(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2100(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2100(t0,t1);}
-
-C_noret_decl(trf_2103)
-static void C_fcall trf_2103(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2103(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2103(t0,t1);}
-
-C_noret_decl(trf_2106)
-static void C_fcall trf_2106(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2106(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2106(t0,t1);}
-
-C_noret_decl(trf_2109)
-static void C_fcall trf_2109(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2109(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2109(t0,t1);}
-
-C_noret_decl(trf_2112)
-static void C_fcall trf_2112(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2112(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2112(t0,t1);}
-
-C_noret_decl(trf_4503)
-static void C_fcall trf_4503(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4503(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4503(t0,t1,t2);}
-
-C_noret_decl(trf_2119)
-static void C_fcall trf_2119(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2119(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2119(t0,t1);}
-
-C_noret_decl(trf_2122)
-static void C_fcall trf_2122(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2122(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2122(t0,t1);}
-
-C_noret_decl(trf_2125)
-static void C_fcall trf_2125(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2125(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2125(t0,t1);}
-
-C_noret_decl(trf_2128)
-static void C_fcall trf_2128(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2128(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2128(t0,t1);}
-
-C_noret_decl(trf_2131)
-static void C_fcall trf_2131(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2131(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2131(t0,t1);}
-
-C_noret_decl(trf_2134)
-static void C_fcall trf_2134(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2134(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2134(t0,t1);}
-
-C_noret_decl(trf_2137)
-static void C_fcall trf_2137(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2137(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2137(t0,t1);}
-
-C_noret_decl(trf_2140)
-static void C_fcall trf_2140(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2140(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2140(t0,t1);}
-
-C_noret_decl(trf_2143)
-static void C_fcall trf_2143(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2143(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2143(t0,t1);}
-
-C_noret_decl(trf_2146)
-static void C_fcall trf_2146(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2146(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2146(t0,t1);}
-
-C_noret_decl(trf_2152)
-static void C_fcall trf_2152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2152(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2152(t0,t1);}
-
-C_noret_decl(trf_2158)
-static void C_fcall trf_2158(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2158(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2158(t0,t1);}
-
-C_noret_decl(trf_4312)
-static void C_fcall trf_4312(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4312(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4312(t0,t1,t2);}
-
-C_noret_decl(trf_4257)
-static void C_fcall trf_4257(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4257(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4257(t0,t1,t2);}
-
-C_noret_decl(trf_2192)
-static void C_fcall trf_2192(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2192(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2192(t0,t1);}
-
-C_noret_decl(trf_2195)
-static void C_fcall trf_2195(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2195(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2195(t0,t1);}
-
-C_noret_decl(trf_2198)
-static void C_fcall trf_2198(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2198(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2198(t0,t1);}
-
-C_noret_decl(trf_2201)
-static void C_fcall trf_2201(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2201(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2201(t0,t1);}
-
-C_noret_decl(trf_4152)
-static void C_fcall trf_4152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4152(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4152(t0,t1,t2);}
-
-C_noret_decl(trf_4067)
-static void C_fcall trf_4067(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4067(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4067(t0,t1,t2);}
-
-C_noret_decl(trf_4025)
-static void C_fcall trf_4025(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4025(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4025(t0,t1,t2);}
-
-C_noret_decl(trf_3986)
-static void C_fcall trf_3986(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3986(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3986(t0,t1,t2);}
-
-C_noret_decl(trf_3951)
-static void C_fcall trf_3951(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3951(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3951(t0,t1,t2);}
-
-C_noret_decl(trf_3912)
-static void C_fcall trf_3912(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3912(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3912(t0,t1,t2);}
-
-C_noret_decl(trf_3852)
-static void C_fcall trf_3852(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3852(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3852(t0,t1,t2);}
-
-C_noret_decl(trf_2253)
-static void C_fcall trf_2253(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2253(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2253(t0,t1);}
-
-C_noret_decl(trf_2287)
-static void C_fcall trf_2287(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2287(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2287(t0,t1);}
-
-C_noret_decl(trf_2317)
-static void C_fcall trf_2317(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2317(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2317(t0,t1);}
-
-C_noret_decl(trf_3556)
-static void C_fcall trf_3556(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3556(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3556(t0,t1,t2);}
-
-C_noret_decl(trf_3681)
-static void C_fcall trf_3681(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3681(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3681(t0,t1,t2);}
-
-C_noret_decl(trf_3616)
-static void C_fcall trf_3616(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3616(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3616(t0,t1,t2);}
-
-C_noret_decl(trf_3581)
-static void C_fcall trf_3581(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3581(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3581(t0,t1,t2);}
-
-C_noret_decl(trf_3511)
-static void C_fcall trf_3511(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3511(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3511(t0,t1,t2);}
-
-C_noret_decl(trf_2393)
-static void C_fcall trf_2393(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2393(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2393(t0,t1);}
-
-C_noret_decl(trf_2402)
-static void C_fcall trf_2402(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2402(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2402(t0,t1);}
-
-C_noret_decl(trf_3442)
-static void C_fcall trf_3442(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3442(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3442(t0,t1,t2);}
-
-C_noret_decl(trf_3374)
-static void C_fcall trf_3374(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3374(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3374(t0,t1,t2);}
-
-C_noret_decl(trf_3330)
-static void C_fcall trf_3330(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3330(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3330(t0,t1,t2);}
-
-C_noret_decl(trf_3188)
-static void C_fcall trf_3188(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3188(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3188(t0,t1);}
-
-C_noret_decl(trf_3207)
-static void C_fcall trf_3207(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3207(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3207(t0,t1,t2);}
-
-C_noret_decl(trf_3124)
-static void C_fcall trf_3124(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3124(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3124(t0,t1,t2);}
-
-C_noret_decl(trf_3050)
-static void C_fcall trf_3050(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3050(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3050(t0,t1,t2);}
-
-C_noret_decl(trf_2463)
-static void C_fcall trf_2463(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2463(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2463(t0,t1);}
-
-C_noret_decl(trf_2466)
-static void C_fcall trf_2466(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2466(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2466(t0,t1);}
-
-C_noret_decl(trf_2901)
-static void C_fcall trf_2901(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2901(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2901(t0,t1,t2);}
-
-C_noret_decl(trf_2846)
-static void C_fcall trf_2846(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2846(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2846(t0,t1,t2);}
-
-C_noret_decl(trf_2854)
-static void C_fcall trf_2854(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2854(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2854(t0,t1,t2);}
-
-C_noret_decl(trf_2808)
-static void C_fcall trf_2808(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2808(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2808(t0,t1,t2);}
-
-C_noret_decl(trf_2816)
-static void C_fcall trf_2816(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2816(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2816(t0,t1,t2);}
-
-C_noret_decl(trf_2504)
-static void C_fcall trf_2504(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2504(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2504(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1982)
-static void C_fcall trf_1982(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1982(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1982(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2012)
-static void C_fcall trf_2012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2012(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2012(t0,t1);}
-
-C_noret_decl(trf_2007)
-static void C_fcall trf_2007(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2007(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2007(t0,t1,t2);}
-
-C_noret_decl(trf_1984)
-static void C_fcall trf_1984(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1984(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1984(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1976)
-static void C_fcall trf_1976(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1976(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1976(t0,t1,t2);}
-
-C_noret_decl(trf_1947)
-static void C_fcall trf_1947(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1947(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1947(t0,t1,t2);}
-
-C_noret_decl(trf_1902)
-static void C_fcall trf_1902(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1902(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1902(t0,t1,t2);}
-
-C_noret_decl(trf_1908)
-static void C_fcall trf_1908(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1908(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1908(t0,t1,t2);}
-
-C_noret_decl(trf_1916)
-static void C_fcall trf_1916(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1916(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1916(t0,t1,t2);}
-
-C_noret_decl(trf_1822)
-static void C_fcall trf_1822(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1822(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1822(t0,t1);}
-
-C_noret_decl(trf_1786)
-static void C_fcall trf_1786(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1786(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1786(t0,t1);}
-
-C_noret_decl(trf_1730)
-static void C_fcall trf_1730(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1730(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1730(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1742)
-static void C_fcall trf_1742(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1742(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1742(t0,t1,t2);}
-
-C_noret_decl(trf_1706)
-static void C_fcall trf_1706(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1706(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_1706(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_1684)
-static void C_fcall trf_1684(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1684(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1684(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1660)
-static void C_fcall trf_1660(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1660(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1660(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1645)
-static void C_fcall trf_1645(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1645(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1645(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1537)
-static void C_fcall trf_1537(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1537(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1537(t0,t1);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_driver_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_driver_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("driver_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(3175)){
-C_save(t1);
-C_rereclaim2(3175*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,409);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],17,"user-options-pass");
-lf[3]=C_h_intern(&lf[3],14,"user-read-pass");
-lf[4]=C_h_intern(&lf[4],22,"user-preprocessor-pass");
-lf[5]=C_h_intern(&lf[5],9,"user-pass");
-lf[6]=C_h_intern(&lf[6],23,"user-post-analysis-pass");
-lf[7]=C_h_intern(&lf[7],19,"compile-source-file");
-lf[8]=C_h_intern(&lf[8],4,"quit");
-lf[9]=C_decode_literal(C_heaptop,"\376B\000\000 missing argument to `-~A\047 option");
-lf[10]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid argument to `~A\047 option");
-lf[11]=C_h_intern(&lf[11],12,"explicit-use");
-lf[12]=C_h_intern(&lf[12],26,"\010compilerexplicit-use-flag");
-lf[13]=C_h_intern(&lf[13],12,"\004coredeclare");
-lf[14]=C_h_intern(&lf[14],7,"verbose");
-lf[15]=C_h_intern(&lf[15],11,"output-file");
-lf[16]=C_h_intern(&lf[16],36,"\010compilerdefault-optimization-passes");
-lf[17]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\003\000\000\002\376\001\000\000\031\003sysimplicit-exit-handler\376\377\016\376\377\016\376\377\016");
-lf[18]=C_h_intern(&lf[18],7,"profile");
-lf[19]=C_h_intern(&lf[19],12,"profile-name");
-lf[20]=C_decode_literal(C_heaptop,"\376B\000\000\007PROFILE");
-lf[21]=C_h_intern(&lf[21],9,"heap-size");
-lf[22]=C_h_intern(&lf[22],17,"heap-initial-size");
-lf[23]=C_h_intern(&lf[23],11,"heap-growth");
-lf[24]=C_h_intern(&lf[24],14,"heap-shrinkage");
-lf[25]=C_h_intern(&lf[25],13,"keyword-style");
-lf[26]=C_h_intern(&lf[26],4,"unit");
-lf[27]=C_h_intern(&lf[27],12,"analyze-only");
-lf[28]=C_h_intern(&lf[28],7,"dynamic");
-lf[29]=C_h_intern(&lf[29],8,"unboxing");
-lf[30]=C_h_intern(&lf[30],7,"nursery");
-lf[31]=C_h_intern(&lf[31],10,"stack-size");
-lf[32]=C_h_intern(&lf[32],19,"\003sysstandard-output");
-lf[33]=C_h_intern(&lf[33],16,"\003sysflush-output");
-lf[34]=C_h_intern(&lf[34],19,"\003syswrite-char/port");
-lf[35]=C_h_intern(&lf[35],7,"fprintf");
-lf[36]=C_h_intern(&lf[36],26,"\010compilerdebugging-chicken");
-lf[37]=C_h_intern(&lf[37],7,"display");
-lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\010pass: ~a");
-lf[39]=C_h_intern(&lf[39],19,"\010compilerdump-nodes");
-lf[40]=C_h_intern(&lf[40],12,"pretty-print");
-lf[41]=C_h_intern(&lf[41],30,"\010compilerbuild-expression-tree");
-lf[42]=C_h_intern(&lf[42],34,"\010compilerdisplay-analysis-database");
-lf[43]=C_h_intern(&lf[43],5,"write");
-lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\013(iteration ");
-lf[45]=C_h_intern(&lf[45],7,"newline");
-lf[46]=C_h_intern(&lf[46],26,"\003sysdefault-read-info-hook");
-lf[47]=C_h_intern(&lf[47],19,"\003syshash-table-set!");
-lf[48]=C_h_intern(&lf[48],24,"\003sysline-number-database");
-lf[49]=C_h_intern(&lf[49],10,"alist-cons");
-lf[50]=C_h_intern(&lf[50],18,"\003syshash-table-ref");
-lf[51]=C_h_intern(&lf[51],9,"list-info");
-lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid numeric argument ~S");
-lf[53]=C_h_intern(&lf[53],9,"substring");
-lf[54]=C_decode_literal(C_heaptop,"\376B\000\000\003: \011");
-lf[55]=C_decode_literal(C_heaptop,"\376B\000\000\030milliseconds needed for ");
-lf[56]=C_h_intern(&lf[56],8,"\003sysread");
-lf[57]=C_h_intern(&lf[57],12,"\010compilerget");
-lf[58]=C_h_intern(&lf[58],13,"\010compilerput!");
-lf[59]=C_h_intern(&lf[59],27,"\010compileranalyze-expression");
-lf[60]=C_h_intern(&lf[60],9,"\003syserror");
-lf[61]=C_h_intern(&lf[61],1,"D");
-lf[62]=C_h_intern(&lf[62],25,"\010compilerimport-libraries");
-lf[63]=C_h_intern(&lf[63],26,"\010compilerdisabled-warnings");
-lf[64]=C_h_intern(&lf[64],16,"emit-inline-file");
-lf[65]=C_h_intern(&lf[65],12,"inline-limit");
-lf[66]=C_h_intern(&lf[66],21,"\010compilerverbose-mode");
-lf[67]=C_h_intern(&lf[67],31,"\003sysread-error-with-line-number");
-lf[68]=C_h_intern(&lf[68],21,"\003sysinclude-pathnames");
-lf[69]=C_h_intern(&lf[69],19,"\000compiler-extension");
-lf[70]=C_h_intern(&lf[70],12,"\003sysfeatures");
-lf[71]=C_h_intern(&lf[71],10,"\000compiling");
-lf[72]=C_h_intern(&lf[72],28,"\003sysexplicit-library-modules");
-lf[73]=C_h_intern(&lf[73],25,"\010compilertarget-heap-size");
-lf[74]=C_h_intern(&lf[74],33,"\010compilertarget-initial-heap-size");
-lf[75]=C_h_intern(&lf[75],27,"\010compilertarget-heap-growth");
-lf[76]=C_h_intern(&lf[76],30,"\010compilertarget-heap-shrinkage");
-lf[77]=C_h_intern(&lf[77],26,"\010compilertarget-stack-size");
-lf[78]=C_h_intern(&lf[78],8,"no-trace");
-lf[79]=C_h_intern(&lf[79],24,"\010compileremit-trace-info");
-lf[80]=C_h_intern(&lf[80],29,"disable-stack-overflow-checks");
-lf[81]=C_h_intern(&lf[81],40,"\010compilerdisable-stack-overflow-checking");
-lf[82]=C_h_intern(&lf[82],7,"version");
-lf[83]=C_h_intern(&lf[83],22,"\010compilerprint-version");
-lf[84]=C_h_intern(&lf[84],4,"help");
-lf[85]=C_h_intern(&lf[85],20,"\010compilerprint-usage");
-lf[86]=C_h_intern(&lf[86],7,"release");
-lf[87]=C_h_intern(&lf[87],15,"chicken-version");
-lf[88]=C_h_intern(&lf[88],24,"\010compilersource-filename");
-lf[89]=C_h_intern(&lf[89],28,"\010compilerprofile-lambda-list");
-lf[90]=C_h_intern(&lf[90],31,"\010compilerline-number-database-2");
-lf[91]=C_h_intern(&lf[91],4,"node");
-lf[92]=C_h_intern(&lf[92],6,"lambda");
-lf[93]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\016\376\377\016");
-lf[94]=C_h_intern(&lf[94],23,"\010compilerconstant-table");
-lf[95]=C_h_intern(&lf[95],21,"\010compilerinline-table");
-lf[96]=C_h_intern(&lf[96],23,"\010compilerfirst-analysis");
-lf[97]=C_h_intern(&lf[97],41,"\010compilerperform-high-level-optimizations");
-lf[98]=C_h_intern(&lf[98],37,"\010compilerinline-substitutions-enabled");
-lf[99]=C_h_intern(&lf[99],22,"optimize-leaf-routines");
-lf[100]=C_decode_literal(C_heaptop,"\376B\000\000\031leaf routine optimization");
-lf[101]=C_h_intern(&lf[101],34,"\010compilertransform-direct-lambdas!");
-lf[102]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
-lf[103]=C_h_intern(&lf[103],4,"leaf");
-lf[104]=C_h_intern(&lf[104],18,"\010compilerdebugging");
-lf[105]=C_h_intern(&lf[105],1,"p");
-lf[106]=C_decode_literal(C_heaptop,"\376B\000\000\025rewritings enabled...");
-lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\023optimized-iteration");
-lf[108]=C_h_intern(&lf[108],1,"5");
-lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\014optimization");
-lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\021optimization pass");
-lf[111]=C_h_intern(&lf[111],36,"\010compilerprepare-for-code-generation");
-lf[112]=C_decode_literal(C_heaptop,"\376B\000\000\025compilation finished.");
-lf[113]=C_h_intern(&lf[113],30,"\010compilercompiler-cleanup-hook");
-lf[114]=C_h_intern(&lf[114],1,"t");
-lf[115]=C_h_intern(&lf[115],17,"\003sysdisplay-times");
-lf[116]=C_h_intern(&lf[116],14,"\003sysstop-timer");
-lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\017code generation");
-lf[118]=C_h_intern(&lf[118],17,"close-output-port");
-lf[119]=C_h_intern(&lf[119],22,"\010compilergenerate-code");
-lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\023generating `~A\047 ...");
-lf[121]=C_h_intern(&lf[121],16,"open-output-file");
-lf[122]=C_h_intern(&lf[122],19,"current-output-port");
-lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\013preparation");
-lf[124]=C_h_intern(&lf[124],4,"exit");
-lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\010unboxing");
-lf[126]=C_h_intern(&lf[126],1,"U");
-lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\010unboxing");
-lf[128]=C_h_intern(&lf[128],26,"\010compilerperform-unboxing!");
-lf[129]=C_decode_literal(C_heaptop,"\376B\000\000\023performing unboxing");
-lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\021closure-converted");
-lf[131]=C_h_intern(&lf[131],1,"9");
-lf[132]=C_h_intern(&lf[132],20,"\003syswarnings-enabled");
-lf[133]=C_decode_literal(C_heaptop,"\376B\000\000#(don\047t worry - still compiling...)\012");
-lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\016final-analysis");
-lf[135]=C_h_intern(&lf[135],1,"8");
-lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\022closure conversion");
-lf[137]=C_h_intern(&lf[137],35,"\010compilerperform-closure-conversion");
-lf[138]=C_h_intern(&lf[138],27,"\010compilerinline-output-file");
-lf[139]=C_h_intern(&lf[139],32,"\010compileremit-global-inline-file");
-lf[140]=C_decode_literal(C_heaptop,"\376B\000\000&Generating global inline file `~a\047 ...");
-lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\011optimized");
-lf[142]=C_h_intern(&lf[142],1,"7");
-lf[143]=C_h_intern(&lf[143],1,"s");
-lf[144]=C_h_intern(&lf[144],33,"\010compilerprint-program-statistics");
-lf[145]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
-lf[146]=C_h_intern(&lf[146],1,"4");
-lf[147]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
-lf[148]=C_h_intern(&lf[148],1,"v");
-lf[149]=C_h_intern(&lf[149],25,"\010compilerdump-global-refs");
-lf[150]=C_h_intern(&lf[150],1,"d");
-lf[151]=C_h_intern(&lf[151],29,"\010compilerdump-defined-globals");
-lf[152]=C_h_intern(&lf[152],1,"u");
-lf[153]=C_h_intern(&lf[153],31,"\010compilerdump-undefined-globals");
-lf[154]=C_h_intern(&lf[154],3,"opt");
-lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\003cps");
-lf[156]=C_h_intern(&lf[156],1,"3");
-lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\016cps conversion");
-lf[158]=C_h_intern(&lf[158],31,"\010compilerperform-cps-conversion");
-lf[159]=C_h_intern(&lf[159],6,"unsafe");
-lf[160]=C_h_intern(&lf[160],34,"\010compilerscan-toplevel-assignments");
-lf[161]=C_h_intern(&lf[161],24,"\010compilerinline-globally");
-lf[162]=C_h_intern(&lf[162],23,"\010compilerinline-locally");
-lf[163]=C_h_intern(&lf[163],25,"\010compilerload-inline-file");
-lf[164]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
-lf[165]=C_h_intern(&lf[165],19,"consult-inline-file");
-lf[166]=C_h_intern(&lf[166],28,"\010compilerenable-inline-files");
-lf[167]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
-lf[168]=C_h_intern(&lf[168],12,"file-exists\077");
-lf[169]=C_h_intern(&lf[169],28,"\003sysresolve-include-filename");
-lf[170]=C_h_intern(&lf[170],13,"make-pathname");
-lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\006inline");
-lf[172]=C_h_intern(&lf[172],14,"symbol->string");
-lf[173]=C_h_intern(&lf[173],11,"concatenate");
-lf[174]=C_h_intern(&lf[174],3,"cdr");
-lf[175]=C_h_intern(&lf[175],2,"pp");
-lf[176]=C_h_intern(&lf[176],1,"M");
-lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\017; requirements:");
-lf[178]=C_h_intern(&lf[178],12,"vector->list");
-lf[179]=C_h_intern(&lf[179],26,"\010compilerfile-requirements");
-lf[180]=C_h_intern(&lf[180],26,"\010compilerdo-lambda-lifting");
-lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\015lambda lifted");
-lf[182]=C_h_intern(&lf[182],1,"L");
-lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\016lambda lifting");
-lf[184]=C_h_intern(&lf[184],32,"\010compilerperform-lambda-lifting!");
-lf[185]=C_h_intern(&lf[185],22,"\010compilerdo-scrutinize");
-lf[186]=C_decode_literal(C_heaptop,"\376B\000\000\032pre-analysis (lambda-lift)");
-lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
-lf[188]=C_h_intern(&lf[188],1,"0");
-lf[189]=C_h_intern(&lf[189],4,"lift");
-lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\010scrutiny");
-lf[191]=C_h_intern(&lf[191],19,"\010compilerscrutinize");
-lf[192]=C_decode_literal(C_heaptop,"\376B\000\000\023performing scrutiny");
-lf[193]=C_decode_literal(C_heaptop,"\376B\000\000\014pre-analysis");
-lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
-lf[195]=C_h_intern(&lf[195],8,"scrutiny");
-lf[196]=C_h_intern(&lf[196],27,"\010compilerload-type-database");
-lf[197]=C_h_intern(&lf[197],12,"\003sysfor-each");
-lf[198]=C_h_intern(&lf[198],5,"types");
-lf[199]=C_h_intern(&lf[199],17,"ignore-repository");
-lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\010types.db");
-lf[201]=C_h_intern(&lf[201],37,"\010compilerinitialize-analysis-database");
-lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\021initial node tree");
-lf[203]=C_h_intern(&lf[203],1,"T");
-lf[204]=C_h_intern(&lf[204],25,"\010compilerbuild-node-graph");
-lf[205]=C_h_intern(&lf[205],32,"\010compilercanonicalize-begin-body");
-lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\011user pass");
-lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\014User pass...");
-lf[208]=C_h_intern(&lf[208],12,"check-syntax");
-lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\015canonicalized");
-lf[210]=C_h_intern(&lf[210],1,"2");
-lf[211]=C_decode_literal(C_heaptop,"\376B\000\000\020canonicalization");
-lf[212]=C_h_intern(&lf[212],25,"\010compilercompiler-warning");
-lf[213]=C_h_intern(&lf[213],5,"style");
-lf[214]=C_decode_literal(C_heaptop,"\376B\000\000Icompiling extensions in unsafe mode is bad practice and should be avoided");
-lf[215]=C_h_intern(&lf[215],8,"feature\077");
-lf[216]=C_h_intern(&lf[216],19,"compiling-extension");
-lf[217]=C_h_intern(&lf[217],18,"\010compilerunit-name");
-lf[218]=C_h_intern(&lf[218],5,"usage");
-lf[219]=C_decode_literal(C_heaptop,"\376B\000\000*library unit `~a\047 compiled in dynamic mode");
-lf[220]=C_h_intern(&lf[220],37,"\010compilerdisplay-line-number-database");
-lf[221]=C_h_intern(&lf[221],1,"n");
-lf[222]=C_decode_literal(C_heaptop,"\376B\000\000\025line number database:");
-lf[223]=C_h_intern(&lf[223],32,"\010compilerdisplay-real-name-table");
-lf[224]=C_h_intern(&lf[224],1,"N");
-lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\020real name table:");
-lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\002\011\011");
-lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
-lf[228]=C_h_intern(&lf[228],35,"\010compilercompiler-syntax-statistics");
-lf[229]=C_h_intern(&lf[229],1,"S");
-lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\030applied compiler syntax:");
-lf[231]=C_h_intern(&lf[231],6,"append");
-lf[232]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
-lf[233]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
-lf[234]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
-lf[235]=C_h_intern(&lf[235],5,"quote");
-lf[236]=C_h_intern(&lf[236],33,"\010compilerprofile-info-vector-name");
-lf[237]=C_h_intern(&lf[237],28,"\003sysset-profile-info-vector!");
-lf[238]=C_h_intern(&lf[238],21,"\010compileremit-profile");
-lf[239]=C_h_intern(&lf[239],25,"\003sysregister-profile-info");
-lf[240]=C_h_intern(&lf[240],4,"set!");
-lf[241]=C_h_intern(&lf[241],13,"\004corecallunit");
-lf[242]=C_h_intern(&lf[242],19,"\010compilerused-units");
-lf[243]=C_h_intern(&lf[243],28,"\010compilerimmutable-constants");
-lf[244]=C_h_intern(&lf[244],6,"gensym");
-lf[245]=C_h_intern(&lf[245],32,"\010compilercanonicalize-expression");
-lf[246]=C_h_intern(&lf[246],4,"uses");
-lf[247]=C_h_intern(&lf[247],7,"declare");
-lf[248]=C_h_intern(&lf[248],10,"\003sysappend");
-lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\006source");
-lf[250]=C_h_intern(&lf[250],1,"1");
-lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\032User preprocessing pass...");
-lf[252]=C_decode_literal(C_heaptop,"\376B\000\000\021User read pass...");
-lf[253]=C_h_intern(&lf[253],21,"\010compilerstring->expr");
-lf[254]=C_h_intern(&lf[254],7,"reverse");
-lf[255]=C_h_intern(&lf[255],27,"\003syscurrent-source-filename");
-lf[256]=C_h_intern(&lf[256],33,"\010compilerclose-checked-input-file");
-lf[257]=C_h_intern(&lf[257],16,"\003sysdynamic-wind");
-lf[258]=C_h_intern(&lf[258],34,"\010compilercheck-and-open-input-file");
-lf[259]=C_h_intern(&lf[259],8,"epilogue");
-lf[260]=C_h_intern(&lf[260],8,"prologue");
-lf[261]=C_h_intern(&lf[261],8,"postlude");
-lf[262]=C_h_intern(&lf[262],7,"prelude");
-lf[263]=C_h_intern(&lf[263],11,"make-vector");
-lf[264]=C_h_intern(&lf[264],34,"\010compilerline-number-database-size");
-lf[265]=C_h_intern(&lf[265],1,"r");
-lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\021target stack size");
-lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\020target heap size");
-lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\021debugging options");
-lf[269]=C_decode_literal(C_heaptop,"\376B\000\000\007options");
-lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\022compiling `~a\047 ...");
-lf[271]=C_decode_literal(C_heaptop,"\376B\000\0009\012Enter \042chicken -help\042 for information on how to use it.\012");
-lf[272]=C_h_intern(&lf[272],5,"-help");
-lf[273]=C_h_intern(&lf[273],1,"h");
-lf[274]=C_h_intern(&lf[274],2,"-h");
-lf[275]=C_h_intern(&lf[275],33,"\010compilerload-identifier-database");
-lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\012modules.db");
-lf[277]=C_h_intern(&lf[277],18,"accumulate-profile");
-lf[278]=C_h_intern(&lf[278],28,"\010compilerprofiled-procedures");
-lf[279]=C_h_intern(&lf[279],3,"all");
-lf[280]=C_decode_literal(C_heaptop,"\376B\000\000\024Generating ~aprofile");
-lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\014accumulated ");
-lf[282]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[283]=C_h_intern(&lf[283],39,"\010compilerdefault-profiling-declarations");
-lf[284]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\004set!\376\003\000\000\002\376\001\000\000\027\003sysprofile-append-mode\376\003\000\000\002\376\377\006\001\376\377\016\376\377\016");
-lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\022debugging info: ~A");
-lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\011calltrace");
-lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
-lf[288]=C_h_intern(&lf[288],21,"no-usual-integrations");
-lf[289]=C_h_intern(&lf[289],17,"standard-bindings");
-lf[290]=C_h_intern(&lf[290],34,"\010compilerdefault-standard-bindings");
-lf[291]=C_h_intern(&lf[291],17,"extended-bindings");
-lf[292]=C_h_intern(&lf[292],34,"\010compilerdefault-extended-bindings");
-lf[293]=C_h_intern(&lf[293],1,"m");
-lf[294]=C_h_intern(&lf[294],14,"set-gc-report!");
-lf[295]=C_h_intern(&lf[295],42,"\010compilerdefault-default-target-stack-size");
-lf[296]=C_h_intern(&lf[296],41,"\010compilerdefault-default-target-heap-size");
-lf[297]=C_h_intern(&lf[297],14,"compile-syntax");
-lf[298]=C_h_intern(&lf[298],25,"\003sysenable-runtime-macros");
-lf[299]=C_h_intern(&lf[299],22,"\004corerequire-extension");
-lf[300]=C_h_intern(&lf[300],14,"string->symbol");
-lf[301]=C_h_intern(&lf[301],17,"require-extension");
-lf[302]=C_h_intern(&lf[302],16,"static-extension");
-lf[303]=C_h_intern(&lf[303],28,"\010compilerpostponed-initforms");
-lf[304]=C_h_intern(&lf[304],6,"delete");
-lf[305]=C_h_intern(&lf[305],3,"eq\077");
-lf[306]=C_h_intern(&lf[306],4,"load");
-lf[307]=C_h_intern(&lf[307],12,"load-verbose");
-lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\036Loading compiler extensions...");
-lf[309]=C_h_intern(&lf[309],6,"extend");
-lf[310]=C_h_intern(&lf[310],17,"register-feature!");
-lf[311]=C_h_intern(&lf[311],12,"string-split");
-lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[313]=C_h_intern(&lf[313],10,"append-map");
-lf[314]=C_h_intern(&lf[314],7,"feature");
-lf[315]=C_h_intern(&lf[315],38,"no-procedure-checks-for-usual-bindings");
-lf[316]=C_h_intern(&lf[316],8,"\003sysput!");
-lf[317]=C_h_intern(&lf[317],21,"\010compileralways-bound");
-lf[318]=C_h_intern(&lf[318],34,"\010compileralways-bound-to-procedure");
-lf[319]=C_h_intern(&lf[319],19,"no-procedure-checks");
-lf[320]=C_h_intern(&lf[320],28,"\010compilerno-procedure-checks");
-lf[321]=C_h_intern(&lf[321],15,"no-bound-checks");
-lf[322]=C_h_intern(&lf[322],24,"\010compilerno-bound-checks");
-lf[323]=C_h_intern(&lf[323],14,"no-argc-checks");
-lf[324]=C_h_intern(&lf[324],23,"\010compilerno-argc-checks");
-lf[325]=C_h_intern(&lf[325],20,"keep-shadowed-macros");
-lf[326]=C_h_intern(&lf[326],33,"\010compilerundefine-shadowed-macros");
-lf[327]=C_decode_literal(C_heaptop,"\376B\000\000(source- and output-filename are the same");
-lf[328]=C_h_intern(&lf[328],23,"\010compilerchop-separator");
-lf[329]=C_h_intern(&lf[329],12,"include-path");
-lf[330]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014-r5rs-syntax\376\377\016");
-lf[331]=C_h_intern(&lf[331],13,"symbol-escape");
-lf[332]=C_h_intern(&lf[332],20,"parentheses-synonyms");
-lf[333]=C_h_intern(&lf[333],5,"\000none");
-lf[334]=C_h_intern(&lf[334],14,"case-sensitive");
-lf[335]=C_decode_literal(C_heaptop,"\376B\000\000.Disabled the Chicken extensions to R5RS syntax");
-lf[336]=C_h_intern(&lf[336],16,"no-symbol-escape");
-lf[337]=C_decode_literal(C_heaptop,"\376B\000\000$Disabled support for escaped symbols");
-lf[338]=C_h_intern(&lf[338],23,"no-parenthesis-synonyms");
-lf[339]=C_h_intern(&lf[339],20,"parenthesis-synonyms");
-lf[340]=C_decode_literal(C_heaptop,"\376B\000\000)Disabled support for parenthesis synonyms");
-lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\006prefix");
-lf[342]=C_h_intern(&lf[342],7,"\000prefix");
-lf[343]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
-lf[344]=C_decode_literal(C_heaptop,"\376B\000\000\006suffix");
-lf[345]=C_h_intern(&lf[345],7,"\000suffix");
-lf[346]=C_decode_literal(C_heaptop,"\376B\000\000+invalid argument to `-keyword-style\047 option");
-lf[347]=C_h_intern(&lf[347],17,"compress-literals");
-lf[348]=C_decode_literal(C_heaptop,"\376B\000\000+`the -compress-literals\047 option is obsolete");
-lf[349]=C_h_intern(&lf[349],16,"case-insensitive");
-lf[350]=C_decode_literal(C_heaptop,"\376B\000\000,Identifiers and symbols are case insensitive");
-lf[351]=C_h_intern(&lf[351],24,"\010compilerinline-max-size");
-lf[352]=C_decode_literal(C_heaptop,"\376B\000\0000invalid argument to `-inline-limit\047 option: `~A\047");
-lf[353]=C_h_intern(&lf[353],26,"\010compilerlocal-definitions");
-lf[354]=C_h_intern(&lf[354],6,"inline");
-lf[355]=C_h_intern(&lf[355],30,"emit-external-prototypes-first");
-lf[356]=C_h_intern(&lf[356],30,"\010compilerexternal-protos-first");
-lf[357]=C_h_intern(&lf[357],5,"block");
-lf[358]=C_h_intern(&lf[358],26,"\010compilerblock-compilation");
-lf[359]=C_h_intern(&lf[359],17,"fixnum-arithmetic");
-lf[360]=C_h_intern(&lf[360],11,"number-type");
-lf[361]=C_h_intern(&lf[361],6,"fixnum");
-lf[362]=C_h_intern(&lf[362],18,"disable-interrupts");
-lf[363]=C_h_intern(&lf[363],28,"\010compilerinsert-timer-checks");
-lf[364]=C_h_intern(&lf[364],10,"setup-mode");
-lf[365]=C_h_intern(&lf[365],14,"\003syssetup-mode");
-lf[366]=C_h_intern(&lf[366],16,"unsafe-libraries");
-lf[367]=C_h_intern(&lf[367],27,"\010compileremit-unsafe-marker");
-lf[368]=C_h_intern(&lf[368],11,"no-warnings");
-lf[369]=C_decode_literal(C_heaptop,"\376B\000\000\025Warnings are disabled");
-lf[370]=C_h_intern(&lf[370],15,"disable-warning");
-lf[371]=C_h_intern(&lf[371],13,"inline-global");
-lf[372]=C_h_intern(&lf[372],5,"local");
-lf[373]=C_h_intern(&lf[373],18,"no-compiler-syntax");
-lf[374]=C_h_intern(&lf[374],32,"\010compilercompiler-syntax-enabled");
-lf[375]=C_h_intern(&lf[375],14,"no-lambda-info");
-lf[376]=C_h_intern(&lf[376],26,"\010compileremit-closure-info");
-lf[377]=C_h_intern(&lf[377],3,"raw");
-lf[378]=C_h_intern(&lf[378],12,"emit-exports");
-lf[379]=C_h_intern(&lf[379],7,"warning");
-lf[380]=C_decode_literal(C_heaptop,"\376B\000\000(deprecated compiler option: emit-exports");
-lf[381]=C_h_intern(&lf[381],1,"b");
-lf[382]=C_h_intern(&lf[382],15,"\003sysstart-timer");
-lf[383]=C_h_intern(&lf[383],10,"scrutinize");
-lf[384]=C_h_intern(&lf[384],11,"lambda-lift");
-lf[385]=C_h_intern(&lf[385],25,"emit-all-import-libraries");
-lf[386]=C_h_intern(&lf[386],29,"\010compilerall-import-libraries");
-lf[387]=C_h_intern(&lf[387],13,"string-append");
-lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
-lf[389]=C_h_intern(&lf[389],19,"emit-import-library");
-lf[390]=C_h_intern(&lf[390],16,"\003sysstring->list");
-lf[391]=C_h_intern(&lf[391],5,"debug");
-lf[392]=C_h_intern(&lf[392],18,"\003sysdload-disabled");
-lf[393]=C_h_intern(&lf[393],15,"repository-path");
-lf[394]=C_h_intern(&lf[394],30,"\010compilerstandalone-executable");
-lf[395]=C_h_intern(&lf[395],29,"\010compilerstring->c-identifier");
-lf[396]=C_h_intern(&lf[396],18,"\010compilerstringify");
-lf[397]=C_decode_literal(C_heaptop,"\376B\000\000\001;");
-lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[399]=C_h_intern(&lf[399],24,"get-environment-variable");
-lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\024CHICKEN_INCLUDE_PATH");
-lf[401]=C_h_intern(&lf[401],9,"to-stdout");
-lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
-lf[403]=C_h_intern(&lf[403],13,"pathname-file");
-lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\003out");
-lf[405]=C_h_intern(&lf[405],29,"\010compilerdefault-declarations");
-lf[406]=C_h_intern(&lf[406],30,"\010compilerunits-used-by-default");
-lf[407]=C_h_intern(&lf[407],28,"\010compilerinitialize-compiler");
-lf[408]=C_h_intern(&lf[408],14,"make-parameter");
-C_register_lf2(lf,409,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c341 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1508,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k1506 */
-static void C_ccall f_1508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1508,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1511,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k1509 in k1506 */
-static void C_ccall f_1511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1511,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 38 make-parameter */
-((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t2,C_SCHEME_FALSE);}
-
-/* k1514 in k1509 in k1506 */
-static void C_ccall f_1516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1516,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! user-options-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1520,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 39 make-parameter */
-((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-
-/* k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1520,2,t0,t1);}
-t2=C_mutate((C_word*)lf[3]+1 /* (set! user-read-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1524,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 40 make-parameter */
-((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-
-/* k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1524,2,t0,t1);}
-t2=C_mutate((C_word*)lf[4]+1 /* (set! user-preprocessor-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1528,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 41 make-parameter */
-((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-
-/* k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1528,2,t0,t1);}
-t2=C_mutate((C_word*)lf[5]+1 /* (set! user-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 42 make-parameter */
-((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-
-/* k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[2],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1532,2,t0,t1);}
-t2=C_mutate((C_word*)lf[6]+1 /* (set! user-post-analysis-pass ...) */,t1);
-t3=C_mutate((C_word*)lf[7]+1 /* (set! compile-source-file ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1534,tmp=(C_word)a,a+=2,tmp));
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1534(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1534r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1534r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1534r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(8);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1537,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1570,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 55 initialize-compiler */
-((C_proc2)C_retrieve_symbol_proc(lf[407]))(2,*((C_word*)lf[407]+1),t5);}
-
-/* k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1570(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1570,2,t0,t1);}
-t2=(C_word)C_i_memq(lf[11],((C_word*)t0)[5]);
-t3=C_mutate((C_word*)lf[12]+1 /* (set! explicit-use-flag ...) */,t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4829,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4833,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[12]))){
-/* batch-driver.scm: 58 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t5,C_retrieve(lf[405]),C_SCHEME_END_OF_LIST);}
-else{
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4848,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#append */
-t7=*((C_word*)lf[248]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,C_retrieve(lf[406]),C_SCHEME_END_OF_LIST);}}
-
-/* k4846 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4848(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4848,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[246],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* batch-driver.scm: 58 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],C_retrieve(lf[405]),t3);}
-
-/* k4831 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[248]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4829(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4829,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[13],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=t3;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(C_word)C_i_memq(lf[14],((C_word*)t0)[5]);
-t7=(C_word)C_i_memq(lf[15],((C_word*)t0)[5]);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1586,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t7)){
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4789,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* g7879 */
-t10=t9;
-f_4789(t10,t8,t7);}
-else{
-if(C_truep((C_word)C_i_memq(lf[401],((C_word*)t0)[5]))){
-t9=t8;
-f_1586(2,t9,C_SCHEME_FALSE);}
-else{
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4818,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* batch-driver.scm: 71 pathname-file */
-((C_proc3)C_retrieve_symbol_proc(lf[403]))(3,*((C_word*)lf[403]+1),t9,((C_word*)t0)[2]);}
-else{
-/* batch-driver.scm: 71 make-pathname */
-((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),t8,C_SCHEME_FALSE,lf[404],lf[402]);}}}}
-
-/* k4816 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 71 make-pathname */
-((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[402]);}
-
-/* g78 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4789(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4789,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4793,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 66 option-arg */
-f_1537(t3,t2);}
-
-/* k4791 in g78 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep((C_word)C_i_symbolp(t1))){
-/* batch-driver.scm: 68 symbol->string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[172]+1)))(3,*((C_word*)lf[172]+1),((C_word*)t0)[2],t1);}
-else{
-t2=t1;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1586(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1586,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1589,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4746,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4785,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 72 get-environment-variable */
-((C_proc3)C_retrieve_symbol_proc(lf[399]))(3,*((C_word*)lf[399]+1),t8,lf[400]);}
-
-/* k4783 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-/* batch-driver.scm: 72 string-split */
-((C_proc4)C_retrieve_symbol_proc(lf[311]))(4,*((C_word*)lf[311]+1),((C_word*)t0)[2],t2,lf[397]);}
-else{
-/* batch-driver.scm: 72 string-split */
-((C_proc4)C_retrieve_symbol_proc(lf[311]))(4,*((C_word*)lf[311]+1),((C_word*)t0)[2],lf[398],lf[397]);}}
-
-/* k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4746,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4748,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4748(t5,((C_word*)t0)[2],t1);}
-
-/* loop84 in k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4748(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4748,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[328]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4777,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g100101 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4775 in loop84 in k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4777,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop8497 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4748(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop8497 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4748(t6,((C_word*)t0)[3],t5);}}
-
-/* k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1589(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1589,2,t0,t1);}
-t2=C_retrieve(lf[16]);
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=lf[17];
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(C_word)C_i_memq(lf[18],((C_word*)t0)[8]);
-t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_1595,a[2]=t1,a[3]=t8,a[4]=t10,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=t4,a[10]=t6,a[11]=((C_word*)t0)[6],a[12]=((C_word*)t0)[7],a[13]=((C_word*)t0)[8],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(t11)){
-t13=t12;
-f_1595(t13,t11);}
-else{
-t13=(C_word)C_i_memq(lf[277],((C_word*)t0)[8]);
-t14=t12;
-f_1595(t14,(C_truep(t13)?t13:(C_word)C_i_memq(lf[19],((C_word*)t0)[8])));}}
-
-/* k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1595(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word ab[117],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1595,NULL,2,t0,t1);}
-t2=(C_word)C_i_memq(lf[19],((C_word*)t0)[13]);
-t3=(C_truep(t2)?(C_word)C_i_cadr(t2):C_SCHEME_FALSE);
-t4=(C_truep(t3)?t3:lf[20]);
-t5=(C_word)C_i_memq(lf[21],((C_word*)t0)[13]);
-t6=(C_word)C_i_memq(lf[22],((C_word*)t0)[13]);
-t7=(C_word)C_i_memq(lf[23],((C_word*)t0)[13]);
-t8=(C_word)C_i_memq(lf[24],((C_word*)t0)[13]);
-t9=(C_word)C_i_memq(lf[25],((C_word*)t0)[13]);
-t10=C_SCHEME_END_OF_LIST;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(C_word)C_i_memq(lf[26],((C_word*)t0)[13]);
-t13=(C_word)C_i_memq(lf[27],((C_word*)t0)[13]);
-t14=(C_word)C_i_memq(lf[28],((C_word*)t0)[13]);
-t15=(C_word)C_i_memq(lf[29],((C_word*)t0)[13]);
-t16=C_SCHEME_FALSE;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_FALSE;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_FALSE;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=(C_word)C_i_memq(lf[30],((C_word*)t0)[13]);
-t23=(C_truep(t22)?t22:(C_word)C_i_memq(lf[31],((C_word*)t0)[13]));
-t24=C_SCHEME_UNDEFINED;
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=C_SCHEME_UNDEFINED;
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_SCHEME_UNDEFINED;
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=C_SCHEME_UNDEFINED;
-t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
-t32=C_SCHEME_UNDEFINED;
-t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
-t34=C_SCHEME_UNDEFINED;
-t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
-t36=C_SCHEME_UNDEFINED;
-t37=(*a=C_VECTOR_TYPE|1,a[1]=t36,tmp=(C_word)a,a+=2,tmp);
-t38=C_SCHEME_UNDEFINED;
-t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
-t40=C_SCHEME_UNDEFINED;
-t41=(*a=C_VECTOR_TYPE|1,a[1]=t40,tmp=(C_word)a,a+=2,tmp);
-t42=C_SCHEME_UNDEFINED;
-t43=(*a=C_VECTOR_TYPE|1,a[1]=t42,tmp=(C_word)a,a+=2,tmp);
-t44=C_SCHEME_UNDEFINED;
-t45=(*a=C_VECTOR_TYPE|1,a[1]=t44,tmp=(C_word)a,a+=2,tmp);
-t46=C_SCHEME_UNDEFINED;
-t47=(*a=C_VECTOR_TYPE|1,a[1]=t46,tmp=(C_word)a,a+=2,tmp);
-t48=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1645,a[2]=((C_word*)t0)[12],tmp=(C_word)a,a+=3,tmp));
-t49=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1660,a[2]=t25,tmp=(C_word)a,a+=3,tmp));
-t50=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1684,a[2]=t27,a[3]=t17,tmp=(C_word)a,a+=4,tmp));
-t51=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1706,a[2]=t27,tmp=(C_word)a,a+=3,tmp));
-t52=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1730,a[2]=t27,tmp=(C_word)a,a+=3,tmp));
-t53=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1773,tmp=(C_word)a,a+=2,tmp));
-t54=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1822,tmp=(C_word)a,a+=2,tmp));
-t55=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1902,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp));
-t56=C_set_block_item(t41,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1937,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
-t57=C_set_block_item(t43,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1947,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
-t58=C_set_block_item(t45,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1976,a[2]=t35,tmp=(C_word)a,a+=3,tmp));
-t59=C_set_block_item(t47,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1982,a[2]=t21,tmp=(C_word)a,a+=3,tmp));
-t60=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2061,a[2]=((C_word*)t0)[10],a[3]=t9,a[4]=((C_word*)t0)[2],a[5]=t5,a[6]=t6,a[7]=t7,a[8]=t8,a[9]=((C_word*)t0)[11],a[10]=t37,a[11]=t23,a[12]=t1,a[13]=t45,a[14]=((C_word*)t0)[3],a[15]=t4,a[16]=((C_word*)t0)[4],a[17]=t33,a[18]=t39,a[19]=t31,a[20]=t15,a[21]=t13,a[22]=t14,a[23]=((C_word*)t0)[5],a[24]=t25,a[25]=t29,a[26]=t47,a[27]=t43,a[28]=t41,a[29]=t19,a[30]=((C_word*)t0)[6],a[31]=((C_word*)t0)[7],a[32]=((C_word*)t0)[8],a[33]=t21,a[34]=t11,a[35]=((C_word*)t0)[12],a[36]=((C_word*)t0)[13],a[37]=t17,tmp=(C_word)a,a+=38,tmp);
-if(C_truep(t12)){
-t61=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4719,a[2]=t60,tmp=(C_word)a,a+=3,tmp);
-t62=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4723,a[2]=t61,tmp=(C_word)a,a+=3,tmp);
-t63=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4727,a[2]=t62,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 174 option-arg */
-f_1537(t63,t12);}
-else{
-t61=t60;
-f_2061(t61,C_SCHEME_UNDEFINED);}}
-
-/* k4725 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4727(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 174 stringify */
-((C_proc3)C_retrieve_symbol_proc(lf[396]))(3,*((C_word*)lf[396]+1),((C_word*)t0)[2],t1);}
-
-/* k4721 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4723(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 174 string->c-identifier */
-((C_proc3)C_retrieve_symbol_proc(lf[395]))(3,*((C_word*)lf[395]+1),((C_word*)t0)[2],t1);}
-
-/* k4717 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[217]+1 /* (set! unit-name ...) */,t1);
-t3=((C_word*)t0)[2];
-f_2061(t3,t2);}
-
-/* k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2061(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2061,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2064,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
-t3=C_retrieve(lf[217]);
-if(C_truep(t3)){
-if(C_truep(t3)){
-t4=C_set_block_item(lf[394] /* standalone-executable */,0,C_SCHEME_FALSE);
-t5=t2;
-f_2064(t5,t4);}
-else{
-t4=t2;
-f_2064(t4,C_SCHEME_UNDEFINED);}}
-else{
-if(C_truep(((C_word*)t0)[22])){
-t4=C_set_block_item(lf[394] /* standalone-executable */,0,C_SCHEME_FALSE);
-t5=t2;
-f_2064(t5,t4);}
-else{
-t4=t2;
-f_2064(t4,C_SCHEME_UNDEFINED);}}}
-
-/* k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2064(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2064,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2067,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
-if(C_truep((C_word)C_i_memq(lf[199],((C_word*)t0)[36]))){
-t3=C_set_block_item(lf[392] /* dload-disabled */,0,C_SCHEME_TRUE);
-/* batch-driver.scm: 179 repository-path */
-((C_proc3)C_retrieve_symbol_proc(lf[393]))(3,*((C_word*)lf[393]+1),t2,C_SCHEME_FALSE);}
-else{
-t3=t2;
-f_2067(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[44],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2067,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4648,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4704,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 185 collect-options */
-t5=((C_word*)((C_word*)t0)[18])[1];
-f_1902(t5,t4,lf[391]);}
-
-/* k4702 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 181 append-map */
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4648(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4648,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4656,a[2]=t1,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-/* string->list */
-t8=C_retrieve(lf[390]);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t2);}
-
-/* k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4656,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4658,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4658(t5,((C_word*)t0)[2],t1);}
-
-/* loop355 in k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4658(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4658,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4696,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_a_i_string(&a,1,t4);
-/* batch-driver.scm: 183 string->symbol */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[300]+1)))(3,*((C_word*)lf[300]+1),t3,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4694 in loop355 in k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4696,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop355368 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4658(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop355368 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4658(t6,((C_word*)t0)[3],t5);}}
-
-/* k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2071(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[46],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2071,2,t0,t1);}
-t2=C_mutate((C_word*)lf[36]+1 /* (set! debugging-chicken ...) */,t1);
-t3=(C_word)C_i_memq(lf[61],C_retrieve(lf[36]));
-t4=C_mutate(((C_word *)((C_word*)t0)[37])+1,t3);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2079,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4598,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 191 collect-options */
-t11=((C_word*)((C_word*)t0)[18])[1];
-f_1902(t11,t10,lf[389]);}
-
-/* k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4598,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4600,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4600(t5,((C_word*)t0)[2],t1);}
-
-/* loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4600(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4600,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4635,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 189 string->symbol */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[300]+1)))(3,*((C_word*)lf[300]+1),t4,t3);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4633 in loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4635,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4639,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 190 string-append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[387]+1)))(4,*((C_word*)lf[387]+1),t2,((C_word*)t0)[2],lf[388]);}
-
-/* k4637 in k4633 in loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4639(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4639,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t4=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop379392 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_4600(t7,((C_word*)t0)[3],t6);}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop379392 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_4600(t7,((C_word*)t0)[3],t6);}}
-
-/* k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2079(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2079,2,t0,t1);}
-t2=C_mutate((C_word*)lf[62]+1 /* (set! import-libraries ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2082,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
-if(C_truep((C_word)C_i_memq(lf[385],((C_word*)t0)[36]))){
-if(C_truep(((C_word*)t0)[21])){
-t4=t3;
-f_2082(t4,C_SCHEME_UNDEFINED);}
-else{
-t4=C_set_block_item(lf[386] /* all-import-libraries */,0,C_SCHEME_TRUE);
-t5=t3;
-f_2082(t5,t4);}}
-else{
-t4=t3;
-f_2082(t4,C_SCHEME_UNDEFINED);}}
-
-/* k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2082(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2082,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
-if(C_truep((C_word)C_i_memq(lf[384],((C_word*)t0)[36]))){
-t3=C_set_block_item(lf[180] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2085(t4,t3);}
-else{
-t3=t2;
-f_2085(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2085(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2085,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2088,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
-if(C_truep((C_word)C_i_memq(lf[383],((C_word*)t0)[36]))){
-t3=C_set_block_item(lf[185] /* do-scrutinize */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2088(t4,t3);}
-else{
-t3=t2;
-f_2088(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2088(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2088,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2091,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
-if(C_truep((C_word)C_i_memq(lf[114],C_retrieve(lf[36])))){
-/* batch-driver.scm: 197 ##sys#start-timer */
-t3=*((C_word*)lf[382]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=t2;
-f_2091(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2091(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2091,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2094,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],a[34]=((C_word*)t0)[35],a[35]=((C_word*)t0)[36],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[381],C_retrieve(lf[36])))){
-t3=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t4=t2;
-f_2094(t4,t3);}
-else{
-t3=t2;
-f_2094(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2094(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2094,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2097,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[378],((C_word*)t0)[35]))){
-/* batch-driver.scm: 200 warning */
-((C_proc3)C_retrieve_symbol_proc(lf[379]))(3,*((C_word*)lf[379]+1),t2,lf[380]);}
-else{
-t3=t2;
-f_2097(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2097,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2100,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[377],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[12] /* explicit-use-flag */,0,C_SCHEME_TRUE);
-t4=C_set_block_item(((C_word*)t0)[15],0,C_SCHEME_END_OF_LIST);
-t5=C_set_block_item(((C_word*)t0)[31],0,C_SCHEME_END_OF_LIST);
-t6=t2;
-f_2100(t6,t5);}
-else{
-t3=t2;
-f_2100(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2100(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2100,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2103,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[375],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[376] /* emit-closure-info */,0,C_SCHEME_FALSE);
-t4=t2;
-f_2103(t4,t3);}
-else{
-t3=t2;
-f_2103(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2103(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2103,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2106,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[373],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[374] /* compiler-syntax-enabled */,0,C_SCHEME_FALSE);
-t4=t2;
-f_2106(t4,t3);}
-else{
-t3=t2;
-f_2106(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2106(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2106,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2109,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[372],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[353] /* local-definitions */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2109(t4,t3);}
-else{
-t3=t2;
-f_2109(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2109(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2109,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2112,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[371],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[166] /* enable-inline-files */,0,C_SCHEME_TRUE);
-t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
-t5=C_set_block_item(lf[161] /* inline-globally */,0,C_SCHEME_TRUE);
-t6=t2;
-f_2112(t6,t5);}
-else{
-t3=t2;
-f_2112(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2112(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[45],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2112,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2116,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4501,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 215 collect-options */
-t8=((C_word*)((C_word*)t0)[17])[1];
-f_1902(t8,t7,lf[370]);}
-
-/* k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4501,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4503,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4503(t5,((C_word*)t0)[2],t1);}
-
-/* loop431 in k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4503(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4503,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[300]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4532,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g447448 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4530 in loop431 in k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4532,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop431444 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4503(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop431444 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4503(t6,((C_word*)t0)[3],t5);}}
-
-/* k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2116,2,t0,t1);}
-t2=C_mutate((C_word*)lf[63]+1 /* (set! disabled-warnings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2119,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[368],((C_word*)t0)[35]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4496,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 217 dribble */
-t5=((C_word*)((C_word*)t0)[23])[1];
-f_1645(t5,t4,lf[369],C_SCHEME_END_OF_LIST);}
-else{
-t4=t3;
-f_2119(t4,C_SCHEME_UNDEFINED);}}
-
-/* k4494 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_set_block_item(lf[132] /* warnings-enabled */,0,C_SCHEME_FALSE);
-t3=((C_word*)t0)[2];
-f_2119(t3,t2);}
-
-/* k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2119(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2119,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2122,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[99],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[99] /* optimize-leaf-routines */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2122(t4,t3);}
-else{
-t3=t2;
-f_2122(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2122(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2122,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2125,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[159],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[159] /* unsafe */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2125(t4,t3);}
-else{
-t3=t2;
-f_2125(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2125(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2125,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2128,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep(((C_word*)t0)[21])){
-if(C_truep((C_word)C_i_memq(lf[366],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[367] /* emit-unsafe-marker */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2128(t4,t3);}
-else{
-t3=t2;
-f_2128(t3,C_SCHEME_UNDEFINED);}}
-else{
-t3=t2;
-f_2128(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2128(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2128,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2131,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[364],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[365] /* setup-mode */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2131(t4,t3);}
-else{
-t3=t2;
-f_2131(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2131(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2131,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2134,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[362],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[363] /* insert-timer-checks */,0,C_SCHEME_FALSE);
-t4=t2;
-f_2134(t4,t3);}
-else{
-t3=t2;
-f_2134(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2134(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2134,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2137,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[359],((C_word*)t0)[35]))){
-t3=C_mutate((C_word*)lf[360]+1 /* (set! number-type ...) */,lf[361]);
-t4=t2;
-f_2137(t4,t3);}
-else{
-t3=t2;
-f_2137(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2137(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2137,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2140,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[357],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[358] /* block-compilation */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2140(t4,t3);}
-else{
-t3=t2;
-f_2140(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2140(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2140,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2143,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[355],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[356] /* external-protos-first */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2143(t4,t3);}
-else{
-t3=t2;
-f_2143(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2143(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2143,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2146,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[354],((C_word*)t0)[35]))){
-t3=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2146(t4,t3);}
-else{
-t3=t2;
-f_2146(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2146(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2146,NULL,2,t0,t1);}
-t2=(C_word)C_i_memq(lf[64],((C_word*)t0)[35]);
-t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2152,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep(t2)){
-t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
-t5=C_set_block_item(lf[353] /* local-definitions */,0,C_SCHEME_TRUE);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4451,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 235 option-arg */
-f_1537(t6,t2);}
-else{
-t4=t3;
-f_2152(t4,C_SCHEME_FALSE);}}
-
-/* k4449 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4451(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[138]+1 /* (set! inline-output-file ...) */,t1);
-t3=((C_word*)t0)[2];
-f_2152(t3,t2);}
-
-/* k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2152(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2152,NULL,2,t0,t1);}
-t2=(C_word)C_i_memq(lf[65],((C_word*)t0)[35]);
-t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2158,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[35],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],tmp=(C_word)a,a+=36,tmp);
-if(C_truep(t2)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4436,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 238 option-arg */
-f_1537(t4,t2);}
-else{
-t4=t3;
-f_2158(t4,C_SCHEME_FALSE);}}
-
-/* k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4436,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4439,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 239 string->number */
-C_string_to_number(3,0,t2,t1);}
-
-/* k4437 in k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4442,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t1)){
-t3=t1;
-t4=C_mutate((C_word*)lf[351]+1 /* (set! inline-max-size ...) */,t3);
-t5=((C_word*)t0)[3];
-f_2158(t5,t4);}
-else{
-/* batch-driver.scm: 240 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[352],((C_word*)t0)[2]);}}
-
-/* k4440 in k4437 in k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4442(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[351]+1 /* (set! inline-max-size ...) */,t1);
-t3=((C_word*)t0)[2];
-f_2158(t3,t2);}
-
-/* k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2158(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2158,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2161,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[349],((C_word*)t0)[31]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4426,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 242 dribble */
-t4=((C_word*)((C_word*)t0)[23])[1];
-f_1645(t4,t3,lf[350],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2161(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4424 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4426,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4429,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 243 register-feature! */
-((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t2,lf[349]);}
-
-/* k4427 in k4424 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 244 case-sensitive */
-((C_proc3)C_retrieve_symbol_proc(lf[334]))(3,*((C_word*)lf[334]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2161,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2164,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
-if(C_truep((C_word)C_i_memq(lf[347],((C_word*)t0)[31]))){
-/* batch-driver.scm: 246 compiler-warning */
-((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),t2,lf[218],lf[348]);}
-else{
-t3=t2;
-f_2164(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2164,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2167,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],a[34]=((C_word*)t0)[35],tmp=(C_word)a,a+=35,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4384,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 248 option-arg */
-f_1537(t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_2167(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4382 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4384(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep((C_word)C_i_string_equal_p(lf[341],t1))){
-/* batch-driver.scm: 249 keyword-style */
-((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[342]);}
-else{
-if(C_truep((C_word)C_i_string_equal_p(lf[343],t1))){
-/* batch-driver.scm: 250 keyword-style */
-((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[333]);}
-else{
-if(C_truep((C_word)C_i_string_equal_p(lf[344],t1))){
-/* batch-driver.scm: 251 keyword-style */
-((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[345]);}
-else{
-/* batch-driver.scm: 252 quit */
-((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),((C_word*)t0)[2],lf[346]);}}}}
-
-/* k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2167,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2170,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
-if(C_truep((C_word)C_i_memq(lf[338],((C_word*)t0)[30]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4378,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 254 dribble */
-t4=((C_word*)((C_word*)t0)[22])[1];
-f_1645(t4,t3,lf[340],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2170(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4376 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 255 parenthesis-synonyms */
-((C_proc3)C_retrieve_symbol_proc(lf[339]))(3,*((C_word*)lf[339]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2170(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2170,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2173,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
-if(C_truep((C_word)C_i_memq(lf[336],((C_word*)t0)[30]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4369,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 257 dribble */
-t4=((C_word*)((C_word*)t0)[22])[1];
-f_1645(t4,t3,lf[337],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2173(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4367 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4369(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 258 symbol-escape */
-((C_proc3)C_retrieve_symbol_proc(lf[331]))(3,*((C_word*)lf[331]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2173(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2173,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2176,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
-if(C_truep((C_word)C_i_memq(lf[330],((C_word*)t0)[30]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4351,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 260 dribble */
-t4=((C_word*)((C_word*)t0)[22])[1];
-f_1645(t4,t3,lf[335],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2176(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4351,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4354,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 261 case-sensitive */
-((C_proc3)C_retrieve_symbol_proc(lf[334]))(3,*((C_word*)lf[334]+1),t2,C_SCHEME_FALSE);}
-
-/* k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4354(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4354,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4357,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 262 keyword-style */
-((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),t2,lf[333]);}
-
-/* k4355 in k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4357,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4360,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 263 parentheses-synonyms */
-((C_proc3)C_retrieve_symbol_proc(lf[332]))(3,*((C_word*)lf[332]+1),t2,C_SCHEME_FALSE);}
-
-/* k4358 in k4355 in k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 264 symbol-escape */
-((C_proc3)C_retrieve_symbol_proc(lf[331]))(3,*((C_word*)lf[331]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[47],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2176,2,t0,t1);}
-t2=C_mutate((C_word*)lf[66]+1 /* (set! verbose-mode ...) */,((C_word*)t0)[34]);
-t3=C_set_block_item(lf[67] /* read-error-with-line-number */,0,C_SCHEME_TRUE);
-t4=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2182,a[2]=((C_word*)t0)[34],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4306,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4310,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 268 collect-options */
-t11=((C_word*)((C_word*)t0)[16])[1];
-f_1902(t11,t10,lf[329]);}
-
-/* k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4310,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4312,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4312(t5,((C_word*)t0)[2],t1);}
-
-/* loop520 in k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4312(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4312,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[328]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4341,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g536537 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4339 in loop520 in k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4341,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop520533 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4312(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop520533 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4312(t6,((C_word*)t0)[3],t5);}}
-
-/* k4304 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4306(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 268 append */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[3],t1,C_retrieve(lf[68]),((C_word*)t0)[2]);}
-
-/* k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2182(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2182,2,t0,t1);}
-t2=C_mutate((C_word*)lf[68]+1 /* (set! include-pathnames ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2185,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-if(C_truep(((C_word*)t0)[21])){
-if(C_truep(((C_word*)t0)[28])){
-if(C_truep((C_word)C_i_string_equal_p(((C_word*)t0)[21],((C_word*)t0)[28]))){
-/* batch-driver.scm: 272 quit */
-((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t3,lf[327]);}
-else{
-t4=t3;
-f_2185(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-t4=t3;
-f_2185(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-t4=t3;
-f_2185(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2185(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[43],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2185,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2189,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4255,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 273 collect-options */
-t8=((C_word*)((C_word*)t0)[16])[1];
-f_1902(t8,t7,lf[246]);}
-
-/* k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4255,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4257,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4257(t5,((C_word*)t0)[2],t1);}
-
-/* loop549 in k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4257(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4257,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[300]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4286,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g565566 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4284 in loop549 in k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4286,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop549562 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4257(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop549562 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4257(t6,((C_word*)t0)[3],t5);}}
-
-/* k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2189,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[33])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2192,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[33],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],tmp=(C_word)a,a+=34,tmp);
-if(C_truep((C_word)C_i_memq(lf[325],((C_word*)t0)[30]))){
-t4=C_set_block_item(lf[326] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
-t5=t3;
-f_2192(t5,t4);}
-else{
-t4=t3;
-f_2192(t4,C_SCHEME_UNDEFINED);}}
-
-/* k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2192(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2192,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2195,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-if(C_truep((C_word)C_i_memq(lf[323],((C_word*)t0)[31]))){
-t3=C_set_block_item(lf[324] /* no-argc-checks */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2195(t4,t3);}
-else{
-t3=t2;
-f_2195(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2195(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2195,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2198,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-if(C_truep((C_word)C_i_memq(lf[321],((C_word*)t0)[31]))){
-t3=C_set_block_item(lf[322] /* no-bound-checks */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2198(t4,t3);}
-else{
-t3=t2;
-f_2198(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2198(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2198,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2201,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-if(C_truep((C_word)C_i_memq(lf[319],((C_word*)t0)[31]))){
-t3=C_set_block_item(lf[320] /* no-procedure-checks */,0,C_SCHEME_TRUE);
-t4=t2;
-f_2201(t4,t3);}
-else{
-t3=t2;
-f_2201(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2201(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[42],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2201,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2204,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-if(C_truep((C_word)C_i_memq(lf[315],((C_word*)t0)[31]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4062,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4152,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t7=((C_word*)t5)[1];
-f_4152(t7,t3,C_retrieve(lf[290]));}
-else{
-t3=t2;
-f_2204(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4152(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4152,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4224,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4191,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4166,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t6))){
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],C_SCHEME_TRUE);}
-else{
-t8=(C_word)C_i_cdr(t6);
-if(C_truep((C_word)C_i_nullp(t8))){
-t9=(C_word)C_i_car(t6);
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],t9);}
-else{
-/* ##sys#error */
-t9=*((C_word*)lf[60]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,lf[0],t6);}}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4164 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[318],t1);}
-
-/* k4189 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4191,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t2))){
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],C_SCHEME_TRUE);}
-else{
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=(C_word)C_i_car(t2);
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t5);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[60]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k4194 in k4189 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t1);}
-
-/* k4222 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4224(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4152(t3,((C_word*)t0)[2],t2);}
-
-/* k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4062(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4062,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4067,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4067(t5,((C_word*)t0)[2],C_retrieve(lf[292]));}
-
-/* loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4067(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4067,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4139,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4106,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4081,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t6))){
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],C_SCHEME_TRUE);}
-else{
-t8=(C_word)C_i_cdr(t6);
-if(C_truep((C_word)C_i_nullp(t8))){
-t9=(C_word)C_i_car(t6);
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],t9);}
-else{
-/* ##sys#error */
-t9=*((C_word*)lf[60]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,lf[0],t6);}}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4079 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[318],t1);}
-
-/* k4104 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4106,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4111,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t2))){
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],C_SCHEME_TRUE);}
-else{
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=(C_word)C_i_car(t2);
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t5);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[60]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k4109 in k4104 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t1);}
-
-/* k4137 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4139(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4067(t3,((C_word*)t0)[2],t2);}
-
-/* k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[43],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2204,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2207,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4023,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4048,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4056,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 297 collect-options */
-t6=((C_word*)((C_word*)t0)[17])[1];
-f_1902(t6,t5,lf[314]);}
-
-/* k4054 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4056(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 297 append-map */
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a4047 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4048(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4048,3,t0,t1,t2);}
-t3=C_retrieve(lf[311]);
-/* g695696 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[312]);}
-
-/* k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4023(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4023,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4025,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4025(t5,((C_word*)t0)[2],t1);}
-
-/* loop677 in k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_4025(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4025,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[310]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4035,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g684685 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4033 in loop677 in k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4025(t3,((C_word*)t0)[2],t2);}
-
-/* k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2207,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[69],C_retrieve(lf[70]));
-t3=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t2);
-t4=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
-/* batch-driver.scm: 301 collect-options */
-t5=((C_word*)((C_word*)t0)[17])[1];
-f_1902(t5,t4,lf[309]);}
-
-/* k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2214(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2214,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2217,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],tmp=(C_word)a,a+=35,tmp);
-/* batch-driver.scm: 302 dribble */
-t3=((C_word*)((C_word*)t0)[23])[1];
-f_1645(t3,t2,lf[308],C_SCHEME_END_OF_LIST);}
-
-/* k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2217,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2220,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],tmp=(C_word)a,a+=34,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* batch-driver.scm: 303 load-verbose */
-((C_proc3)C_retrieve_symbol_proc(lf[307]))(3,*((C_word*)lf[307]+1),t2,C_SCHEME_TRUE);}
-else{
-t3=t2;
-f_2220(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2220,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2223,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],tmp=(C_word)a,a+=33,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3986,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_3986(t6,t2,((C_word*)t0)[2]);}
-
-/* loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3986(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3986,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4005,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4002,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 305 ##sys#resolve-include-filename */
-((C_proc5)C_retrieve_symbol_proc(lf[169]))(5,*((C_word*)lf[169]+1),t5,t4,C_SCHEME_FALSE,C_SCHEME_TRUE);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4000 in loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 305 load */
-((C_proc3)C_retrieve_symbol_proc(lf[306]))(3,*((C_word*)lf[306]+1),((C_word*)t0)[2],t1);}
-
-/* k4003 in loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_4005(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3986(t3,((C_word*)t0)[2],t2);}
-
-/* k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2223,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2227,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],tmp=(C_word)a,a+=33,tmp);
-/* batch-driver.scm: 307 delete */
-((C_proc5)C_retrieve_symbol_proc(lf[304]))(5,*((C_word*)lf[304]+1),t2,lf[69],C_retrieve(lf[70]),*((C_word*)lf[305]+1));}
-
-/* k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2227(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2227,2,t0,t1);}
-t2=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[71],C_retrieve(lf[70]));
-t4=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2235,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],tmp=(C_word)a,a+=33,tmp);
-/* batch-driver.scm: 310 user-post-analysis-pass */
-((C_proc2)C_retrieve_symbol_proc(lf[6]))(2,*((C_word*)lf[6]+1),t5);}
-
-/* k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2235,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[32])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2239,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
-/* batch-driver.scm: 313 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t3,((C_word*)((C_word*)t0)[31])[1],C_retrieve(lf[303]));}
-
-/* k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[41],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2239,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[31])+1,t1);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2242,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3949,a[2]=t7,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 315 collect-options */
-t9=((C_word*)((C_word*)t0)[16])[1];
-f_1902(t9,t8,lf[302]);}
-
-/* k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3949(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3949,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3951,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_3951(t5,((C_word*)t0)[2],t1);}
-
-/* loop719 in k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3951(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3951,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[300]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3980,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g735736 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3978 in loop719 in k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3980,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop719732 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3951(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop719732 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3951(t6,((C_word*)t0)[3],t5);}}
-
-/* k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2242(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[59],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2242,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2246,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],tmp=(C_word)a,a+=33,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3846,a[2]=((C_word*)t0)[31],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3850,a[2]=t7,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t9=C_SCHEME_END_OF_LIST;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_FALSE;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3906,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
-t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3910,a[2]=t13,a[3]=t10,a[4]=t12,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 321 collect-options */
-t15=((C_word*)((C_word*)t0)[16])[1];
-f_1902(t15,t14,lf[301]);}
-
-/* k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3910,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3912,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_3912(t5,((C_word*)t0)[2],t1);}
-
-/* loop770 in k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3912(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3912,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[300]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3941,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g786787 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3939 in loop770 in k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3941,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop770783 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3912(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop770783 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3912(t6,((C_word*)t0)[3],t5);}}
-
-/* k3904 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3906(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 321 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3848 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3850,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3852,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_3852(t5,((C_word*)t0)[2],t1);}
-
-/* loop742 in k3848 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3852(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word *a;
-loop:
-a=C_alloc(15);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3852,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,lf[299],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t9=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t8);
-t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t8);
-t11=(C_word)C_slot(t2,C_fix(1));
-/* loop742755 */
-t17=t1;
-t18=t11;
-t1=t17;
-t2=t18;
-goto loop;}
-else{
-t9=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
-t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t8);
-t11=(C_word)C_slot(t2,C_fix(1));
-/* loop742755 */
-t17=t1;
-t18=t11;
-t1=t17;
-t2=t18;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3844 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 318 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
-
-/* k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2246,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[32])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2250,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[32],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
-/* batch-driver.scm: 325 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t3,C_retrieve(lf[72]),((C_word*)t0)[2]);}
-
-/* k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2250,2,t0,t1);}
-t2=C_mutate((C_word*)lf[72]+1 /* (set! explicit-library-modules ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2253,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
-if(C_truep((C_word)C_i_memq(lf[297],((C_word*)t0)[31]))){
-t4=C_set_block_item(lf[298] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
-t5=t3;
-f_2253(t5,t4);}
-else{
-t4=t3;
-f_2253(t4,C_SCHEME_UNDEFINED);}}
-
-/* k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2253(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2253,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|30,a[1]=(C_word)f_2257,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],tmp=(C_word)a,a+=31,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3825,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 331 option-arg */
-f_1537(t3,((C_word*)t0)[2]);}
-else{
-t3=C_retrieve(lf[296]);
-if(C_truep(t3)){
-t4=(C_word)C_eqp(t3,C_fix(0));
-t5=t2;
-f_2257(2,t5,(C_truep(t4)?C_SCHEME_FALSE:t3));}
-else{
-t4=t2;
-f_2257(2,t4,C_SCHEME_FALSE);}}}
-
-/* k3823 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 331 arg-val */
-f_1822(((C_word*)t0)[2],t1);}
-
-/* k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2257(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2257,2,t0,t1);}
-t2=C_mutate((C_word*)lf[73]+1 /* (set! target-heap-size ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|29,a[1]=(C_word)f_2261,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],tmp=(C_word)a,a+=30,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3818,a[2]=t3,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 335 option-arg */
-f_1537(t4,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_2261(2,t4,C_SCHEME_FALSE);}}
-
-/* k3816 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 335 arg-val */
-f_1822(((C_word*)t0)[2],t1);}
-
-/* k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2261(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2261,2,t0,t1);}
-t2=C_mutate((C_word*)lf[74]+1 /* (set! target-initial-heap-size ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|28,a[1]=(C_word)f_2265,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],tmp=(C_word)a,a+=29,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3811,a[2]=t3,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 336 option-arg */
-f_1537(t4,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_2265(2,t4,C_SCHEME_FALSE);}}
-
-/* k3809 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 336 arg-val */
-f_1822(((C_word*)t0)[2],t1);}
-
-/* k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2265,2,t0,t1);}
-t2=C_mutate((C_word*)lf[75]+1 /* (set! target-heap-growth ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|27,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],tmp=(C_word)a,a+=28,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3804,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 337 option-arg */
-f_1537(t4,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_2269(2,t4,C_SCHEME_FALSE);}}
-
-/* k3802 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3804(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 337 arg-val */
-f_1822(((C_word*)t0)[2],t1);}
-
-/* k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
-t2=C_mutate((C_word*)lf[76]+1 /* (set! target-heap-shrinkage ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2273,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[18],a[16]=((C_word*)t0)[19],a[17]=((C_word*)t0)[20],a[18]=((C_word*)t0)[21],a[19]=((C_word*)t0)[22],a[20]=((C_word*)t0)[23],a[21]=((C_word*)t0)[24],a[22]=((C_word*)t0)[25],a[23]=((C_word*)t0)[26],a[24]=((C_word*)t0)[27],tmp=(C_word)a,a+=25,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3784,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 340 option-arg */
-f_1537(t4,((C_word*)t0)[4]);}
-else{
-t4=C_retrieve(lf[295]);
-if(C_truep(t4)){
-t5=(C_word)C_eqp(t4,C_fix(0));
-t6=t3;
-f_2273(2,t6,(C_truep(t5)?C_SCHEME_FALSE:t4));}
-else{
-t5=t3;
-f_2273(2,t5,C_SCHEME_FALSE);}}}
-
-/* k3782 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3784(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 340 arg-val */
-f_1822(((C_word*)t0)[2],t1);}
-
-/* k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2273,2,t0,t1);}
-t2=C_mutate((C_word*)lf[77]+1 /* (set! target-stack-size ...) */,t1);
-t3=(C_word)C_i_memq(lf[78],((C_word*)t0)[24]);
-t4=(C_word)C_i_not(t3);
-t5=C_mutate((C_word*)lf[79]+1 /* (set! emit-trace-info ...) */,t4);
-t6=(C_word)C_i_memq(lf[80],((C_word*)t0)[24]);
-t7=C_mutate((C_word*)lf[81]+1 /* (set! disable-stack-overflow-checking ...) */,t6);
-t8=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
-if(C_truep((C_word)C_i_memq(lf[293],C_retrieve(lf[36])))){
-/* batch-driver.scm: 346 set-gc-report! */
-((C_proc3)C_retrieve_symbol_proc(lf[294]))(3,*((C_word*)lf[294]+1),t8,C_SCHEME_TRUE);}
-else{
-t9=t8;
-f_2284(2,t9,C_SCHEME_UNDEFINED);}}
-
-/* k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
-if(C_truep((C_word)C_i_memq(lf[288],((C_word*)t0)[24]))){
-t3=t2;
-f_2287(t3,C_SCHEME_UNDEFINED);}
-else{
-t3=C_mutate((C_word*)lf[289]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[290]));
-t4=C_mutate((C_word*)lf[291]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[292]));
-t5=t2;
-f_2287(t5,t4);}}
-
-/* k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2287(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2287,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
-if(C_truep(C_retrieve(lf[79]))){
-/* batch-driver.scm: 350 dribble */
-t3=((C_word*)((C_word*)t0)[16])[1];
-f_1645(t3,t2,lf[285],(C_word)C_a_i_list(&a,1,lf[286]));}
-else{
-/* batch-driver.scm: 350 dribble */
-t3=((C_word*)((C_word*)t0)[16])[1];
-f_1645(t3,t2,lf[285],(C_word)C_a_i_list(&a,1,lf[287]));}}
-
-/* k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],tmp=(C_word)a,a+=24,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(C_word)C_i_car(((C_word*)t0)[2]);
-t4=(C_word)C_eqp(lf[277],t3);
-t5=C_set_block_item(lf[238] /* emit-profile */,0,C_SCHEME_TRUE);
-t6=C_mutate((C_word*)lf[278]+1 /* (set! profiled-procedures ...) */,lf[279]);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3743,a[2]=t2,a[3]=((C_word*)t0)[16],a[4]=t4,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t4)){
-/* batch-driver.scm: 359 append */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[283]),lf[284]);}
-else{
-/* batch-driver.scm: 359 append */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[283]),C_SCHEME_END_OF_LIST);}}
-else{
-t3=t2;
-f_2293(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k3741 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3743,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-if(C_truep(((C_word*)t0)[4])){
-/* batch-driver.scm: 365 dribble */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1645(t3,((C_word*)t0)[2],lf[280],(C_word)C_a_i_list(&a,1,lf[281]));}
-else{
-/* batch-driver.scm: 365 dribble */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1645(t3,((C_word*)t0)[2],lf[280],(C_word)C_a_i_list(&a,1,lf[282]));}}
-
-/* k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 368 load-identifier-database */
-((C_proc3)C_retrieve_symbol_proc(lf[275]))(3,*((C_word*)lf[275]+1),t2,lf[276]);}
-
-/* k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
-if(C_truep((C_word)C_i_memq(lf[82],((C_word*)t0)[23]))){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[22],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 371 print-version */
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,C_SCHEME_TRUE);}
-else{
-t2=(C_word)C_i_memq(lf[84],((C_word*)t0)[23]);
-t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_2317(t4,t2);}
-else{
-t4=(C_word)C_i_memq(lf[272],((C_word*)t0)[23]);
-if(C_truep(t4)){
-t5=t3;
-f_2317(t5,t4);}
-else{
-t5=(C_word)C_i_memq(lf[273],((C_word*)t0)[23]);
-t6=t3;
-f_2317(t6,(C_truep(t5)?t5:(C_word)C_i_memq(lf[274],((C_word*)t0)[23])));}}}}
-
-/* k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2317(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2317,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* batch-driver.scm: 374 print-usage */
-((C_proc2)C_retrieve_symbol_proc(lf[85]))(2,*((C_word*)lf[85]+1),((C_word*)t0)[23]);}
-else{
-if(C_truep((C_word)C_i_memq(lf[86],((C_word*)t0)[22]))){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[23],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2336,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 376 chicken-version */
-((C_proc2)C_retrieve_symbol_proc(lf[87]))(2,*((C_word*)lf[87]+1),t3);}
-else{
-t2=((C_word*)t0)[21];
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[22],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[23],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=((C_word*)t0)[16],a[19]=((C_word*)t0)[17],a[20]=((C_word*)t0)[18],a[21]=((C_word*)t0)[19],a[22]=((C_word*)t0)[20],a[23]=((C_word*)t0)[21],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 384 dribble */
-t4=((C_word*)((C_word*)t0)[15])[1];
-f_1645(t4,t3,lf[270],(C_word)C_a_i_list(&a,1,((C_word*)t0)[21]));}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2345,a[2]=((C_word*)t0)[23],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 379 print-version */
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t3,C_SCHEME_TRUE);}}}}
-
-/* k2343 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2345(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 380 display */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],lf[271]);}
-
-/* k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2351,2,t0,t1);}
-t2=C_mutate((C_word*)lf[88]+1 /* (set! source-filename ...) */,((C_word*)t0)[23]);
-t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2355,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[23],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 386 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t3,lf[265],lf[269],((C_word*)t0)[9]);}
-
-/* k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2358,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 387 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[268],C_retrieve(lf[36]));}
-
-/* k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2358,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2361,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 388 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[267],C_retrieve(lf[73]));}
-
-/* k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2361,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 389 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[266],C_retrieve(lf[77]));}
-
-/* k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2364,2,t0,t1);}
-t2=(C_word)C_fudge(C_fix(6));
-t3=C_mutate(((C_word *)((C_word*)t0)[23])+1,t2);
-t4=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[23],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 393 make-vector */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[263]+1)))(4,*((C_word*)lf[263]+1),t4,C_retrieve(lf[264]),C_SCHEME_END_OF_LIST);}
-
-/* k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2372(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2372,2,t0,t1);}
-t2=C_mutate((C_word*)lf[48]+1 /* (set! line-number-database ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2375,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* batch-driver.scm: 394 collect-options */
-t4=((C_word*)((C_word*)t0)[10])[1];
-f_1902(t4,t3,lf[262]);}
-
-/* k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2375(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2375,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2378,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],tmp=(C_word)a,a+=25,tmp);
-/* batch-driver.scm: 395 collect-options */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_1902(t3,t2,lf[261]);}
-
-/* k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2378,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|25,a[1]=(C_word)f_2381,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],tmp=(C_word)a,a+=26,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3711,a[2]=((C_word*)t0)[11],a[3]=t2,a[4]=((C_word*)t0)[18],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 397 collect-options */
-t4=((C_word*)((C_word*)t0)[11])[1];
-f_1902(t4,t3,lf[260]);}
-
-/* k3709 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3711,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3719,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 399 collect-options */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1902(t4,t3,lf[259]);}
-
-/* k3717 in k3709 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 396 append */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2381,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|26,a[1]=(C_word)f_2384,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],tmp=(C_word)a,a+=27,tmp);
-/* batch-driver.scm: 401 user-read-pass */
-((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
-
-/* k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2384(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2384,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2387,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],a[11]=((C_word*)t0)[15],a[12]=((C_word*)t0)[16],a[13]=((C_word*)t0)[17],a[14]=((C_word*)t0)[18],a[15]=((C_word*)t0)[19],a[16]=((C_word*)t0)[20],a[17]=((C_word*)t0)[21],a[18]=((C_word*)t0)[22],a[19]=((C_word*)t0)[23],a[20]=((C_word*)t0)[24],a[21]=((C_word*)t0)[25],a[22]=((C_word*)t0)[26],tmp=(C_word)a,a+=23,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3547,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 403 dribble */
-t4=((C_word*)((C_word*)t0)[22])[1];
-f_1645(t4,t3,lf[252],C_SCHEME_END_OF_LIST);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3556,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp));
-t6=((C_word*)t4)[1];
-f_3556(t6,t2,((C_word*)t0)[4]);}}
-
-/* doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3556(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3556,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3567,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3571,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3616,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_3616(t12,t8,((C_word*)t0)[4]);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 413 check-and-open-input-file */
-((C_proc3)C_retrieve_symbol_proc(lf[258]))(3,*((C_word*)lf[258]+1),t4,t3);}}
-
-/* k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3655,2,t0,t1);}
-t2=((C_word*)t0)[7];
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3658,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3667,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3672,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3704,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#dynamic-wind */
-t10=*((C_word*)lf[257]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t6,t7,t8,t9);}
-
-/* a3703 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3704,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[255]));
-t3=C_mutate((C_word*)lf[255]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3672(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3672,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3676,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 415 read-form */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1976(t3,t2,((C_word*)t0)[5]);}
-
-/* k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3676,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3681,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_3681(t5,((C_word*)t0)[2],t1);}
-
-/* doloop919 in k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3681(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3681,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_eofp(t2))){
-/* batch-driver.scm: 418 close-checked-input-file */
-((C_proc4)C_retrieve_symbol_proc(lf[256]))(4,*((C_word*)lf[256]+1),t1,((C_word*)t0)[6],((C_word*)t0)[5]);}
-else{
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[4])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[4])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3702,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 416 read-form */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1976(t6,t5,((C_word*)t0)[6]);}}
-
-/* k3700 in doloop919 in k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3702(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_3681(t2,((C_word*)t0)[2],t1);}
-
-/* a3666 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3667(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3667,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[255]));
-t3=C_mutate((C_word*)lf[255]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* k3656 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3556(t3,((C_word*)t0)[2],t2);}
-
-/* loop861 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3616(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3616,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[253]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3645,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g877878 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3643 in loop861 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3645,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop861874 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3616(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop861874 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3616(t6,((C_word*)t0)[3],t5);}}
-
-/* k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3571(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3571,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3575,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 410 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[254]+1)))(3,*((C_word*)lf[254]+1),t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3575(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3575,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3579,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3581,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_3581(t10,t6,((C_word*)t0)[2]);}
-
-/* loop884 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3581(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3581,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[253]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3610,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g900901 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3608 in loop884 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3610,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop884897 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3581(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop884897 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3581(t6,((C_word*)t0)[3],t5);}}
-
-/* k3577 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3579(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 409 append */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3565 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k3545 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3547,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3551,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 404 proc */
-t3=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t3))(5,t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3549 in k3545 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_2387(2,t3,t2);}
-
-/* k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2387(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2387,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2390,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
-/* batch-driver.scm: 422 user-preprocessor-pass */
-((C_proc2)C_retrieve_symbol_proc(lf[4]))(2,*((C_word*)lf[4]+1),t2);}
-
-/* k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2390,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2393,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3505,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 424 dribble */
-t4=((C_word*)((C_word*)t0)[18])[1];
-f_1645(t4,t3,lf[251],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2393(t3,C_SCHEME_UNDEFINED);}}
-
-/* k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3505,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3509,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3511,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t8,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_3511(t10,t6,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* loop935 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3511(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3511,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3540,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g951952 */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3538 in loop935 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3540,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop935948 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3511(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop935948 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3511(t6,((C_word*)t0)[3],t5);}}
-
-/* k3507 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_2393(t3,t2);}
-
-/* k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2393(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2393,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2396,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
-/* batch-driver.scm: 427 print-expr */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_1730(t3,t2,lf[249],lf[250],((C_word*)((C_word*)t0)[3])[1]);}
-
-/* k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2396,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[22])[1]);
-t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_2402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],tmp=(C_word)a,a+=22,tmp);
-if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[2])[1]))){
-t4=t3;
-f_2402(t4,C_SCHEME_UNDEFINED);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3482,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 430 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t4,C_retrieve(lf[72]),((C_word*)((C_word*)t0)[2])[1]);}}
-
-/* k3480 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3482(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3482,2,t0,t1);}
-t2=C_mutate((C_word*)lf[72]+1 /* (set! explicit-library-modules ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3502,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t4=*((C_word*)lf[248]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_END_OF_LIST);}
-
-/* k3500 in k3480 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3502(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3502,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[246],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[247],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)((C_word*)t0)[3])[1]);
-t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t5);
-t7=((C_word*)t0)[2];
-f_2402(t7,t6);}
-
-/* k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2402(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2402,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2405,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],a[17]=((C_word*)t0)[19],a[18]=((C_word*)t0)[20],a[19]=((C_word*)t0)[21],tmp=(C_word)a,a+=20,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3440,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 432 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3440,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3442,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_3442(t5,((C_word*)t0)[2],t1);}
-
-/* loop968 in k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3442(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3442,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[245]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3471,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g984985 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3469 in loop968 in k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3471(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3471,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop968981 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3442(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop968981 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3442(t6,((C_word*)t0)[3],t5);}}
-
-/* k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2405(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2405,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_2408,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
-/* batch-driver.scm: 433 gensym */
-((C_proc2)C_retrieve_symbol_proc(lf[244]))(2,*((C_word*)lf[244]+1),t2);}
-
-/* k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2408(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2408,2,t0,t1);}
-t2=(C_word)C_i_length(C_retrieve(lf[89]));
-t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2414,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[18],a[16]=((C_word*)t0)[19],a[17]=((C_word*)t0)[20],tmp=(C_word)a,a+=18,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3180,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[4],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3374,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_3374(t12,t8,C_retrieve(lf[243]));}
-
-/* loop994 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3374(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word *a;
-loop:
-a=C_alloc(18);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3374,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_cdr(t3);
-t5=(C_word)C_i_car(t3);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[235],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t4,t8);
-t10=(C_word)C_a_i_cons(&a,2,lf[240],t9);
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t12=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11);
-t13=C_mutate(((C_word *)((C_word*)t0)[4])+1,t11);
-t14=(C_word)C_slot(t2,C_fix(1));
-/* loop9941007 */
-t20=t1;
-t21=t14;
-t1=t20;
-t2=t21;
-goto loop;}
-else{
-t12=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t13=C_mutate(((C_word *)((C_word*)t0)[4])+1,t11);
-t14=(C_word)C_slot(t2,C_fix(1));
-/* loop9941007 */
-t20=t1;
-t21=t14;
-t1=t20;
-t2=t21;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3180,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3184,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3330,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_3330(t10,t6,C_retrieve(lf[242]));}
-
-/* loop1022 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3330(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3330,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[241],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop10221035 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop10221035 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[41],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3184,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3188,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_retrieve(lf[238]))){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[235],t3);
-t5=(C_truep(C_retrieve(lf[217]))?(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST):(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST));
-t6=(C_word)C_a_i_cons(&a,2,lf[235],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,t4,t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[239],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[236]),t10);
-t12=(C_word)C_a_i_cons(&a,2,lf[240],t11);
-t13=t2;
-f_3188(t13,(C_word)C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST));}
-else{
-t3=t2;
-f_3188(t3,C_SCHEME_END_OF_LIST);}}
-
-/* k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3188(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3188,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3192,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3207,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_3207(t10,t6,C_retrieve(lf[89]));}
-
-/* loop1054 in k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3207(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word *a;
-loop:
-a=C_alloc(27);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3207,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,lf[235],t5);
-t7=(C_word)C_i_cdr(t3);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,lf[235],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,t6,t10);
-t12=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[236]),t11);
-t13=(C_word)C_a_i_cons(&a,2,lf[237],t12);
-t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t15=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t14);
-t16=C_mutate(((C_word *)((C_word*)t0)[4])+1,t14);
-t17=(C_word)C_slot(t2,C_fix(1));
-/* loop10541067 */
-t23=t1;
-t24=t17;
-t1=t23;
-t2=t24;
-goto loop;}
-else{
-t15=C_mutate(((C_word *)((C_word*)t0)[2])+1,t14);
-t16=C_mutate(((C_word *)((C_word*)t0)[4])+1,t14);
-t17=(C_word)C_slot(t2,C_fix(1));
-/* loop10541067 */
-t23=t1;
-t24=t17;
-t1=t23;
-t2=t24;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3190 in k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3192(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_retrieve(lf[217]);
-if(C_truep(t2)){
-/* batch-driver.scm: 435 append */
-((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],C_SCHEME_END_OF_LIST,lf[232]);}
-else{
-if(C_truep(((C_word*)t0)[3])){
-/* batch-driver.scm: 435 append */
-((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],C_SCHEME_END_OF_LIST,lf[233]);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-/* batch-driver.scm: 435 append */
-((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],t3,lf[234]);}}}
-
-/* k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2414,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2417,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3119,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_pairp(C_retrieve(lf[228])))){
-/* batch-driver.scm: 457 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t5,lf[229],lf[230]);}
-else{
-t6=t5;
-f_3119(2,t6,C_SCHEME_FALSE);}}
-
-/* k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3119,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3124,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_3124(t5,((C_word*)t0)[2],C_retrieve(lf[228]));}
-else{
-t2=((C_word*)t0)[2];
-f_2417(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3124(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3124,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3159,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=*((C_word*)lf[32]+1);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3136,a[2]=t4,a[3]=t5,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t6,lf[227],t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3136(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3136,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3139,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[2]);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,t3,((C_word*)t0)[3]);}
-
-/* k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,lf[226],((C_word*)t0)[3]);}
-
-/* k3140 in k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3142,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3145,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,t3,((C_word*)t0)[3]);}
-
-/* k3143 in k3140 in k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3145(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* write-char/port */
-t2=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-
-/* k3157 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3124(t3,((C_word*)t0)[2],t2);}
-
-/* k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2417,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2420,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3113,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 461 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[224],lf[225]);}
-
-/* k3111 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3113(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* batch-driver.scm: 462 display-real-name-table */
-((C_proc2)C_retrieve_symbol_proc(lf[223]))(2,*((C_word*)lf[223]+1),((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[2];
-f_2420(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2420(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2420,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2423,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3107,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 463 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[221],lf[222]);}
-
-/* k3105 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* batch-driver.scm: 464 display-line-number-database */
-((C_proc2)C_retrieve_symbol_proc(lf[220]))(2,*((C_word*)lf[220]+1),((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[2];
-f_2423(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2423(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2423,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-if(C_truep(C_retrieve(lf[217]))){
-if(C_truep(((C_word*)t0)[11])){
-/* batch-driver.scm: 467 compiler-warning */
-((C_proc5)C_retrieve_symbol_proc(lf[212]))(5,*((C_word*)lf[212]+1),t2,lf[218],lf[219],C_retrieve(lf[217]));}
-else{
-t3=t2;
-f_2426(2,t3,C_SCHEME_UNDEFINED);}}
-else{
-t3=t2;
-f_2426(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2426,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3092,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[159]))){
-/* batch-driver.scm: 469 feature? */
-((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),t3,lf[216]);}
-else{
-t4=t2;
-f_2429(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k3090 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3092(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* batch-driver.scm: 470 compiler-warning */
-((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),((C_word*)t0)[2],lf[213],lf[214]);}
-else{
-t2=((C_word*)t0)[2];
-f_2429(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2429,2,t0,t1);}
-t2=C_mutate((C_word*)lf[48]+1 /* (set! line-number-database ...) */,C_retrieve(lf[90]));
-t3=C_set_block_item(lf[90] /* line-number-database-2 */,0,C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-/* batch-driver.scm: 477 end-time */
-t5=((C_word*)((C_word*)t0)[17])[1];
-f_1947(t5,t4,lf[211]);}
-
-/* k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2434(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2434,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2437,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
-/* batch-driver.scm: 478 print-expr */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1730(t3,t2,lf[209],lf[210],((C_word*)((C_word*)t0)[3])[1]);}
-
-/* k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2437(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2437,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2440,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-if(C_truep((C_word)C_i_memq(lf[208],((C_word*)t0)[3]))){
-/* batch-driver.scm: 480 exit */
-((C_proc2)C_retrieve_symbol_proc(lf[124]))(2,*((C_word*)lf[124]+1),t2);}
-else{
-t3=t2;
-f_2440(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2440,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2443,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-/* batch-driver.scm: 482 user-pass */
-((C_proc2)C_retrieve_symbol_proc(lf[5]))(2,*((C_word*)lf[5]+1),t2);}
-
-/* k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2443,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2446,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3038,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[17],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 484 dribble */
-t4=((C_word*)((C_word*)t0)[13])[1];
-f_1645(t4,t3,lf[207],C_SCHEME_END_OF_LIST);}
-else{
-t3=t2;
-f_2446(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3038,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3045,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3050,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t9,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_3050(t11,t7,((C_word*)((C_word*)t0)[5])[1]);}
-
-/* loop1126 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_3050(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3050,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3079,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g11421143 */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3077 in loop1126 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3079(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3079,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11261139 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3050(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11261139 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3050(t6,((C_word*)t0)[3],t5);}}
-
-/* k3043 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-/* batch-driver.scm: 487 end-time */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1947(t3,((C_word*)t0)[2],lf[206]);}
-
-/* k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2446,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_3031,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3035,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 492 canonicalize-begin-body */
-((C_proc3)C_retrieve_symbol_proc(lf[205]))(3,*((C_word*)lf[205]+1),t3,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k3033 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 491 build-node-graph */
-((C_proc3)C_retrieve_symbol_proc(lf[204]))(3,*((C_word*)lf[204]+1),((C_word*)t0)[2],t1);}
-
-/* k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3031(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3031,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
-t3=(C_word)C_a_i_record(&a,4,lf[91],lf[92],lf[93],t2);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2457,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=((C_word*)t0)[16],tmp=(C_word)a,a+=19,tmp);
-/* batch-driver.scm: 495 print-node */
-t7=((C_word*)((C_word*)t0)[13])[1];
-f_1684(t7,t6,lf[202],lf[203],t3);}
-
-/* k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2457,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2460,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-/* batch-driver.scm: 496 initialize-analysis-database */
-((C_proc2)C_retrieve_symbol_proc(lf[201]))(2,*((C_word*)lf[201]+1),t2);}
-
-/* k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2460(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2460,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2463,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
-if(C_truep(C_retrieve(lf[185]))){
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2977,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[17],a[7]=t2,a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[18],tmp=(C_word)a,a+=10,tmp);
-if(C_truep((C_word)C_i_memq(lf[199],((C_word*)t0)[2]))){
-t4=t3;
-f_2977(2,t4,C_SCHEME_UNDEFINED);}
-else{
-/* batch-driver.scm: 501 load-type-database */
-((C_proc3)C_retrieve_symbol_proc(lf[196]))(3,*((C_word*)lf[196]+1),t3,lf[200]);}}
-else{
-t3=t2;
-f_2463(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2977(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2977,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2980,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3009,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3017,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 502 collect-options */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_1902(t5,t4,lf[198]);}
-
-/* k3015 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* for-each */
-t2=*((C_word*)lf[197]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a3008 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3009(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3009,3,t0,t1,t2);}
-t3=C_retrieve(lf[196]);
-/* g11741175 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,C_SCHEME_FALSE);}
-
-/* k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2980,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[8])[1]);
-t3=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2988,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 505 analyze */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_1982(t5,t4,lf[195],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
-
-/* k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2988(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2988,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2991,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 506 print-db */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1706(t4,t3,lf[194],lf[188],((C_word*)((C_word*)t0)[7])[1],C_fix(0));}
-
-/* k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2991,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2994,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 507 end-time */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_1947(t3,t2,lf[193]);}
-
-/* k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2994,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3000,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 509 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[192]);}
-
-/* k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3000(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3000,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3003,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 510 scrutinize */
-((C_proc4)C_retrieve_symbol_proc(lf[191]))(4,*((C_word*)lf[191]+1),t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k3001 in k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3003,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3006,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 511 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[190]);}
-
-/* k3004 in k3001 in k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_3006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[2];
-f_2463(t3,t2);}
-
-/* k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2463(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2463,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2466,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(C_retrieve(lf[180]))){
-t3=f_1937(((C_word*)((C_word*)t0)[17])[1]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2950,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[14],a[6]=t2,a[7]=((C_word*)t0)[17],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_retrieve(lf[185]))){
-t5=t4;
-f_2950(2,t5,C_SCHEME_UNDEFINED);}
-else{
-t5=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2968,a[2]=((C_word*)t0)[6],a[3]=t4,a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 518 analyze */
-t7=((C_word*)((C_word*)t0)[15])[1];
-f_1982(t7,t6,lf[189],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
-else{
-t3=t2;
-f_2466(t3,C_SCHEME_UNDEFINED);}}
-
-/* k2966 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2968,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 519 print-db */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1706(t4,t3,lf[187],lf[188],((C_word*)((C_word*)t0)[5])[1],C_fix(0));}
-
-/* k2969 in k2966 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 520 end-time */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_1947(t2,((C_word*)t0)[2],lf[186]);}
-
-/* k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2950,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[7])[1]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2956,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 522 perform-lambda-lifting! */
-((C_proc4)C_retrieve_symbol_proc(lf[184]))(4,*((C_word*)lf[184]+1),t3,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2956,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 523 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[183]);}
-
-/* k2957 in k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2962,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 524 print-node */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1684(t3,t2,lf[181],lf[182],((C_word*)t0)[2]);}
-
-/* k2960 in k2957 in k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[2];
-f_2466(t3,t2);}
-
-/* k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2466(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2466,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2469,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2944,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 527 vector->list */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[178]+1)))(3,*((C_word*)lf[178]+1),t3,C_retrieve(lf[179]));}
-
-/* k2942 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2944(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 527 concatenate */
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),((C_word*)t0)[2],t1);}
-
-/* k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2469(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2469,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2472,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2937,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 528 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[176],lf[177]);}
-
-/* k2935 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* batch-driver.scm: 529 pp */
-((C_proc3)C_retrieve_symbol_proc(lf[175]))(3,*((C_word*)lf[175]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_2472(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2472(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2472,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2475,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(C_retrieve(lf[166]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2844,a[2]=t2,a[3]=((C_word*)t0)[13],tmp=(C_word)a,a+=4,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2899,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2901,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_2901(t12,t8,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_2475(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* loop1226 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2901(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2901,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[174]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2930,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g12421243 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2928 in loop1226 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2930,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop12261239 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2901(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop12261239 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2901(t6,((C_word*)t0)[3],t5);}}
-
-/* k2897 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 539 concatenate */
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),((C_word*)t0)[2],t1);}
-
-/* k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2844,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2846,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_2846(t5,((C_word*)t0)[2],t1);}
-
-/* loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2846(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2846,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2884,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g12141215 */
-t6=t3;
-f_2854(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2882 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2884(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2846(t3,((C_word*)t0)[2],t2);}
-
-/* g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2854(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2854,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2858,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2877,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2881,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 534 symbol->string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[172]+1)))(3,*((C_word*)lf[172]+1),t5,t2);}
-
-/* k2879 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2881(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 534 make-pathname */
-((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[171]);}
-
-/* k2875 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2877(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 533 ##sys#resolve-include-filename */
-((C_proc5)C_retrieve_symbol_proc(lf[169]))(5,*((C_word*)lf[169]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_TRUE);}
-
-/* k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2858,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2867,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 536 file-exists? */
-((C_proc3)C_retrieve_symbol_proc(lf[168]))(3,*((C_word*)lf[168]+1),t2,t1);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k2865 in k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2867,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 537 dribble */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1645(t3,t2,lf[167],(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]));}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k2868 in k2865 in k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2870(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 538 load-inline-file */
-((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2475(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2475,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2478,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
-/* batch-driver.scm: 540 collect-options */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1902(t3,t2,lf[165]);}
-
-/* k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2478(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2478,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2481,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-if(C_truep((C_word)C_i_nullp(t1))){
-t3=t2;
-f_2481(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=C_set_block_item(lf[161] /* inline-globally */,0,C_SCHEME_TRUE);
-t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2808,a[2]=t6,a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_2808(t8,t2,t1);}}
-
-/* loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2808(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2808,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2816,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2826,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g12591260 */
-t6=t3;
-f_2816(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2824 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2826(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2808(t3,((C_word*)t0)[2],t2);}
-
-/* g1259 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2816(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2816,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2820,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 546 dribble */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1645(t4,t3,lf[164],(C_word)C_a_i_list(&a,1,t2));}
-
-/* k2818 in g1259 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2820(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 547 load-inline-file */
-((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2481(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2481,2,t0,t1);}
-t2=C_set_block_item(lf[48] /* line-number-database */,0,C_SCHEME_FALSE);
-t3=C_set_block_item(lf[94] /* constant-table */,0,C_SCHEME_FALSE);
-t4=C_set_block_item(lf[95] /* inline-table */,0,C_SCHEME_FALSE);
-t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2487,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(C_retrieve(lf[159]))){
-t6=t5;
-f_2487(2,t6,C_SCHEME_UNDEFINED);}
-else{
-t6=(C_word)C_slot(((C_word*)t0)[2],C_fix(3));
-t7=(C_word)C_i_car(t6);
-/* batch-driver.scm: 554 scan-toplevel-assignments */
-((C_proc3)C_retrieve_symbol_proc(lf[160]))(3,*((C_word*)lf[160]+1),t5,t7);}}
-
-/* k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2487(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2487,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[15])[1]);
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2493,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
-/* batch-driver.scm: 557 perform-cps-conversion */
-((C_proc3)C_retrieve_symbol_proc(lf[158]))(3,*((C_word*)lf[158]+1),t3,((C_word*)t0)[2]);}
-
-/* k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2493(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2493,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2496,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-/* batch-driver.scm: 558 end-time */
-t3=((C_word*)((C_word*)t0)[13])[1];
-f_1947(t3,t2,lf[157]);}
-
-/* k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2496,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2499,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-/* batch-driver.scm: 559 print-node */
-t3=((C_word*)((C_word*)t0)[12])[1];
-f_1684(t3,t2,lf[155],lf[156],((C_word*)t0)[2]);}
-
-/* k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2499(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2499,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2504,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=t3,a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp));
-t5=((C_word*)t3)[1];
-f_2504(t5,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2504(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2504,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t6=f_1937(((C_word*)((C_word*)t0)[14])[1]);
-t7=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=t2,a[16]=t5,a[17]=((C_word*)t0)[14],a[18]=t4,tmp=(C_word)a,a+=19,tmp);
-/* batch-driver.scm: 565 analyze */
-t8=((C_word*)((C_word*)t0)[11])[1];
-f_1982(t8,t7,lf[154],((C_word*)t5)[1],(C_word)C_a_i_list(&a,2,t2,t4));}
-
-/* k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2511,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2514,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],tmp=(C_word)a,a+=20,tmp);
-if(C_truep(C_retrieve(lf[96]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2758,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_memq(lf[152],C_retrieve(lf[36])))){
-/* batch-driver.scm: 568 dump-undefined-globals */
-((C_proc3)C_retrieve_symbol_proc(lf[153]))(3,*((C_word*)lf[153]+1),t3,t1);}
-else{
-t4=t3;
-f_2758(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-t3=t2;
-f_2514(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2756 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2758,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2761,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_memq(lf[150],C_retrieve(lf[36])))){
-/* batch-driver.scm: 570 dump-defined-globals */
-((C_proc3)C_retrieve_symbol_proc(lf[151]))(3,*((C_word*)lf[151]+1),t2,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_2761(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2759 in k2756 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep((C_word)C_i_memq(lf[148],C_retrieve(lf[36])))){
-/* batch-driver.scm: 572 dump-global-refs */
-((C_proc3)C_retrieve_symbol_proc(lf[149]))(3,*((C_word*)lf[149]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-f_2514(2,t3,t2);}}
-
-/* k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2514,2,t0,t1);}
-t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
-t3=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2518,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
-/* batch-driver.scm: 574 end-time */
-t4=((C_word*)((C_word*)t0)[13])[1];
-f_1947(t4,t3,lf[147]);}
-
-/* k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2518,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2521,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
-/* batch-driver.scm: 575 print-db */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1706(t3,t2,lf[145],lf[146],((C_word*)t0)[16],((C_word*)t0)[15]);}
-
-/* k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2521,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2524,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
-if(C_truep((C_word)C_i_memq(lf[143],C_retrieve(lf[36])))){
-/* batch-driver.scm: 577 print-program-statistics */
-((C_proc3)C_retrieve_symbol_proc(lf[144]))(3,*((C_word*)lf[144]+1),t2,((C_word*)t0)[16]);}
-else{
-t3=t2;
-f_2524(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2524,2,t0,t1);}
-if(C_truep(((C_word*)t0)[19])){
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2530,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[17],a[10]=((C_word*)t0)[18],tmp=(C_word)a,a+=11,tmp);
-/* batch-driver.scm: 580 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[105],lf[110],((C_word*)t0)[15]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2616,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[9],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],tmp=(C_word)a,a+=17,tmp);
-/* batch-driver.scm: 602 print-node */
-t3=((C_word*)((C_word*)t0)[11])[1];
-f_1684(t3,t2,lf[141],lf[142],((C_word*)((C_word*)t0)[17])[1]);}}
-
-/* k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2616,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(C_retrieve(lf[138]))){
-t3=C_retrieve(lf[138]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2746,a[2]=((C_word*)t0)[14],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 605 dribble */
-t5=((C_word*)((C_word*)t0)[13])[1];
-f_1645(t5,t4,lf[140],(C_word)C_a_i_list(&a,1,t3));}
-else{
-t3=t2;
-f_2619(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2744 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 606 emit-global-inline-file */
-((C_proc4)C_retrieve_symbol_proc(lf[139]))(4,*((C_word*)lf[139]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2619,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[16])[1]);
-t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2626,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-/* batch-driver.scm: 608 perform-closure-conversion */
-((C_proc4)C_retrieve_symbol_proc(lf[137]))(4,*((C_word*)lf[137]+1),t3,((C_word*)((C_word*)t0)[15])[1],((C_word*)t0)[14]);}
-
-/* k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2626,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[16])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2629,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-/* batch-driver.scm: 609 end-time */
-t4=((C_word*)((C_word*)t0)[12])[1];
-f_1947(t4,t3,lf[136]);}
-
-/* k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2629,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2632,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],tmp=(C_word)a,a+=15,tmp);
-/* batch-driver.scm: 610 print-db */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1706(t3,t2,lf[134],lf[135],((C_word*)t0)[14],((C_word*)t0)[2]);}
-
-/* k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2632,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(C_retrieve(lf[132]))){
-t3=(C_word)C_fudge(C_fix(6));
-t4=(C_word)C_fixnum_difference(t3,((C_word*)((C_word*)t0)[2])[1]);
-if(C_truep((C_word)C_fixnum_greaterp(t4,C_fix(60000)))){
-/* batch-driver.scm: 613 display */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),t2,lf[133]);}
-else{
-t5=t2;
-f_2635(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t3=t2;
-f_2635(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2635,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2638,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* batch-driver.scm: 614 print-node */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1684(t3,t2,lf[130],lf[131],((C_word*)((C_word*)t0)[12])[1]);}
-
-/* k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2638,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2641,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2714,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[12],a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 616 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[129]);}
-else{
-t3=t2;
-f_2641(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2714,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2720,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 618 perform-unboxing! */
-((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t3,((C_word*)((C_word*)t0)[3])[1]);}
-
-/* k2718 in k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2720(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2720,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2723,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 619 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[127]);}
-
-/* k2721 in k2718 in k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2723(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 620 print-node */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_1684(t2,((C_word*)t0)[3],lf[125],lf[126],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2641,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2644,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* batch-driver.scm: 621 exit */
-((C_proc3)C_retrieve_symbol_proc(lf[124]))(3,*((C_word*)lf[124]+1),t2,C_fix(0));}
-else{
-t3=t2;
-f_2644(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2644,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[10])[1]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2652,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2658,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-
-/* a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2658(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_2658,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2662,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t1,a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
-/* batch-driver.scm: 626 end-time */
-t7=((C_word*)((C_word*)t0)[6])[1];
-f_1947(t7,t6,lf[123]);}
-
-/* k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2662,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[12])[1]);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2668,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[8])){
-/* batch-driver.scm: 628 open-output-file */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[121]+1)))(3,*((C_word*)lf[121]+1),t3,((C_word*)t0)[8]);}
-else{
-/* batch-driver.scm: 628 current-output-port */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[122]+1)))(2,*((C_word*)lf[122]+1),t3);}}
-
-/* k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2668(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2668,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2671,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* batch-driver.scm: 629 dribble */
-t3=((C_word*)((C_word*)t0)[11])[1];
-f_1645(t3,t2,lf[120],(C_word)C_a_i_list(&a,1,((C_word*)t0)[8]));}
-
-/* k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2671,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2674,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 630 generate-code */
-((C_proc9)C_retrieve_symbol_proc(lf[119]))(9,*((C_word*)lf[119]+1),t2,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[8],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2674,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2677,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[3])){
-/* batch-driver.scm: 631 close-output-port */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[118]+1)))(3,*((C_word*)lf[118]+1),t2,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_2677(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2677,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2680,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 632 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[117]);}
-
-/* k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2680,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2683,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_memq(lf[114],C_retrieve(lf[36])))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2699,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 634 ##sys#stop-timer */
-t4=*((C_word*)lf[116]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f5154,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 635 compiler-cleanup-hook */
-((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t3);}}
-
-/* f5154 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f5154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 636 dribble */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_1645(t2,((C_word*)t0)[2],lf[112],C_SCHEME_END_OF_LIST);}
-
-/* k2697 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2699(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 634 ##sys#display-times */
-((C_proc3)C_retrieve_symbol_proc(lf[115]))(3,*((C_word*)lf[115]+1),((C_word*)t0)[2],t1);}
-
-/* k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2683,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2686,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 635 compiler-cleanup-hook */
-((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t2);}
-
-/* k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 636 dribble */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_1645(t2,((C_word*)t0)[2],lf[112],C_SCHEME_END_OF_LIST);}
-
-/* a2651 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2652,2,t0,t1);}
-/* batch-driver.scm: 625 prepare-for-code-generation */
-((C_proc4)C_retrieve_symbol_proc(lf[111]))(4,*((C_word*)lf[111]+1),t1,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-
-/* k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[10])[1]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2538,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2544,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-
-/* a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2544,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-/* batch-driver.scm: 584 end-time */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_1947(t5,t4,lf[109]);}
-
-/* k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2548,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-/* batch-driver.scm: 585 print-node */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1684(t3,t2,lf[107],lf[108],((C_word*)t0)[6]);}
-
-/* k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
-if(C_truep(((C_word*)t0)[9])){
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
-/* batch-driver.scm: 586 loop */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_2504(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_TRUE);}
-else{
-t2=C_retrieve(lf[98]);
-if(C_truep(t2)){
-if(C_truep(C_retrieve(lf[99]))){
-t3=f_1937(((C_word*)((C_word*)t0)[4])[1]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2587,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 593 analyze */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_1982(t5,t4,lf[103],((C_word*)t0)[5],C_SCHEME_END_OF_LIST);}
-else{
-t3=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
-/* batch-driver.scm: 599 loop */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_2504(t4,((C_word*)t0)[6],t3,((C_word*)t0)[5],C_SCHEME_FALSE);}}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2570,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* batch-driver.scm: 588 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[106]);}}}
-
-/* k2568 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2570(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_set_block_item(lf[98] /* inline-substitutions-enabled */,0,C_SCHEME_TRUE);
-t3=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-/* batch-driver.scm: 590 loop */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2504(t4,((C_word*)t0)[3],t3,((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2587,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2590,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* batch-driver.scm: 594 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[102]);}
-
-/* k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2590(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2590,2,t0,t1);}
-t2=f_1937(((C_word*)((C_word*)t0)[8])[1]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2596,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 596 transform-direct-lambdas! */
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),t3,((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* k2594 in k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2596(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2596,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2599,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* batch-driver.scm: 597 end-time */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1947(t3,t2,lf[100]);}
-
-/* k2597 in k2594 in k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
-/* batch-driver.scm: 598 loop */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2504(t3,((C_word*)t0)[4],t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a2537 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2538,2,t0,t1);}
-/* batch-driver.scm: 583 perform-high-level-optimizations */
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t1,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-
-/* k2334 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2336(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 376 display */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],t1);}
-
-/* k2327 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 377 newline */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
-
-/* k2303 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 372 newline */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
-
-/* analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1982,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1984,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2007,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2012,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-no294336 */
-t8=t7;
-f_2012(t8,t1);}
-else{
-t8=(C_word)C_i_car(t4);
-t9=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t9))){
-/* def-contf295334 */
-t10=t6;
-f_2007(t10,t1,t8);}
-else{
-t10=(C_word)C_i_car(t9);
-t11=(C_word)C_i_cdr(t9);
-if(C_truep((C_word)C_i_nullp(t11))){
-/* body292300 */
-t12=t5;
-f_1984(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[60]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-no294 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2012(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2012,NULL,2,t0,t1);}
-/* def-contf295334 */
-t2=((C_word*)t0)[2];
-f_2007(t2,t1,C_fix(0));}
-
-/* def-contf295 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_2007(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2007,NULL,3,t0,t1,t2);}
-/* body292300 */
-t3=((C_word*)t0)[2];
-f_1984(t3,t1,t2,C_SCHEME_TRUE);}
-
-/* body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1984(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1984,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1988,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* batch-driver.scm: 165 analyze-expression */
-((C_proc3)C_retrieve_symbol_proc(lf[59]))(3,*((C_word*)lf[59]+1),t4,((C_word*)t0)[2]);}
-
-/* k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1988(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1988,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1991,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1996,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2002,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 167 upap */
-t5=((C_word*)((C_word*)t0)[6])[1];
-((C_proc9)C_retrieve_proc(t5))(9,t5,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t3=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}}
-
-/* a2001 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_2002(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2002,5,t0,t1,t2,t3,t4);}
-t5=C_retrieve(lf[58]);
-/* g331332 */
-t6=t5;
-((C_proc6)C_retrieve_proc(t6))(6,t6,t1,((C_word*)t0)[2],t2,t3,t4);}
-
-/* a1995 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1996(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1996,4,t0,t1,t2,t3);}
-t4=C_retrieve(lf[57]);
-/* g316317 */
-t5=t4;
-((C_proc5)C_retrieve_proc(t5))(5,t5,t1,((C_word*)t0)[2],t2,t3);}
-
-/* k1989 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* read-form in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1976(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1976,NULL,3,t0,t1,t2);}
-/* batch-driver.scm: 161 ##sys#read */
-((C_proc4)C_retrieve_symbol_proc(lf[56]))(4,*((C_word*)lf[56]+1),t1,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1947(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1947,NULL,3,t0,t1,t2);}
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t3=*((C_word*)lf[32]+1);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1954,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t4,lf[55],t3);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1954,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1957,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
-
-/* k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1960,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,lf[54],((C_word*)t0)[3]);}
-
-/* k1958 in k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1963,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_fudge(C_fix(6));
-t4=(C_word)C_fixnum_difference(t3,((C_word*)((C_word*)t0)[2])[1]);
-/* write */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[43]+1)))(4,*((C_word*)lf[43]+1),t2,t4,((C_word*)t0)[3]);}
-
-/* k1961 in k1958 in k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* write-char/port */
-t2=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-
-/* begin-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static C_word C_fcall f_1937(C_word t0){
-C_word tmp;
-C_word t1;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t1=(C_word)C_fudge(C_fix(6));
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-return(t2);}
-else{
-t1=C_SCHEME_UNDEFINED;
-return(t1);}}
-
-/* collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1902(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1902,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1908,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_1908(t6,t1,((C_word*)t0)[2]);}
-
-/* loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1908(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1908,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_memq(((C_word*)t0)[4],t2);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1916,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* g267268 */
-t5=t4;
-f_1916(t5,t1,t3);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}}
-
-/* g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1916(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1916,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1924,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 150 option-arg */
-f_1537(t3,t2);}
-
-/* k1922 in g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1924,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1928,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cddr(((C_word*)t0)[3]);
-/* batch-driver.scm: 150 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1908(t4,t2,t3);}
-
-/* k1926 in k1922 in g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1928(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1928,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1822(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1822,NULL,2,t1,t2);}
-t3=(C_word)C_i_string_length(t2);
-t4=(C_word)C_fixnum_difference(t3,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1832,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_fixnum_lessp(t3,C_fix(2)))){
-/* batch-driver.scm: 141 string->number */
-C_string_to_number(3,0,t5,t2);}
-else{
-t6=(C_word)C_i_string_ref(t2,t4);
-t7=(C_word)C_eqp(t6,C_make_character(109));
-t8=(C_truep(t7)?t7:(C_word)C_eqp(t6,C_make_character(77)));
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1863,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1871,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 143 substring */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[53]+1)))(5,*((C_word*)lf[53]+1),t10,t2,C_fix(0),t4);}
-else{
-t9=(C_word)C_eqp(t6,C_make_character(107));
-t10=(C_truep(t9)?t9:(C_word)C_eqp(t6,C_make_character(75)));
-if(C_truep(t10)){
-t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1887,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1891,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 144 substring */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[53]+1)))(5,*((C_word*)lf[53]+1),t12,t2,C_fix(0),t4);}
-else{
-/* batch-driver.scm: 145 string->number */
-C_string_to_number(3,0,t5,t2);}}}}
-
-/* k1889 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1891(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 144 string->number */
-C_string_to_number(3,0,((C_word*)t0)[2],t1);}
-
-/* k1885 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_fixnum_times(t1,C_fix(1024));
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* batch-driver.scm: 146 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-
-/* k1869 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1871(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 143 string->number */
-C_string_to_number(3,0,((C_word*)t0)[2],t1);}
-
-/* k1861 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_fixnum_times(t1,C_fix(1048576));
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* batch-driver.scm: 146 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-
-/* k1830 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1832(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* batch-driver.scm: 146 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-
-/* infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1773,5,t0,t1,t2,t3,t4);}
-t5=C_retrieve(lf[46]);
-t6=(C_truep(t5)?t5:(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1819,tmp=(C_word)a,a+=2,tmp));
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1780,a[2]=t2,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* g212213 */
-t8=t6;
-((C_proc5)C_retrieve_proc(t8))(5,t8,t7,t2,t3,t4);}
-
-/* k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1780(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1780,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1783,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1786,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=(C_word)C_eqp(lf[51],((C_word*)t0)[2]);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(t1);
-t6=t3;
-f_1786(t6,(C_word)C_i_symbolp(t5));}
-else{
-t5=t3;
-f_1786(t5,C_SCHEME_FALSE);}}
-
-/* k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1786(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1786,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1797,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1801,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_i_car(((C_word*)t0)[5]);
-/* batch-driver.scm: 133 ##sys#hash-table-ref */
-((C_proc4)C_retrieve_symbol_proc(lf[50]))(4,*((C_word*)lf[50]+1),t4,C_retrieve(lf[48]),t5);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[5]);}}
-
-/* k1799 in k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-/* batch-driver.scm: 132 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[49]))(5,*((C_word*)lf[49]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-else{
-/* batch-driver.scm: 132 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[49]))(5,*((C_word*)lf[49]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
-
-/* k1795 in k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 129 ##sys#hash-table-set! */
-((C_proc5)C_retrieve_symbol_proc(lf[47]))(5,*((C_word*)lf[47]+1),((C_word*)t0)[3],C_retrieve(lf[48]),((C_word*)t0)[2],t1);}
-
-/* k1781 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1783(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* f_1819 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1819,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-
-/* print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1730(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1730,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1737,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* batch-driver.scm: 119 print-header */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1660(t6,t5,t2,t3);}
-
-/* k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1737,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1742,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_1742(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1742(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1742,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1760,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1754,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 122 pretty-print */
-((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+1),t5,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1752 in loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1754(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 123 newline */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
-
-/* k1758 in loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1760(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1742(t3,((C_word*)t0)[2],t2);}
-
-/* print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1706(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1706,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1713,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 114 print-header */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_1660(t7,t6,t2,t3);}
-
-/* k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1713,2,t0,t1);}
-if(C_truep(t1)){
-t2=*((C_word*)lf[32]+1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1716,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t3,lf[44],t2);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1716(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1716,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1719,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* write */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[43]+1)))(4,*((C_word*)lf[43]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1719,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1722,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* write-char/port */
-t3=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(41),((C_word*)t0)[2]);}
-
-/* k1720 in k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1725,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* write-char/port */
-t3=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-
-/* k1723 in k1720 in k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 116 display-analysis-database */
-((C_proc3)C_retrieve_symbol_proc(lf[42]))(3,*((C_word*)lf[42]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1684(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1684,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1691,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 108 print-header */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1660(t6,t5,t2,t3);}
-
-/* k1689 in print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1691(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1691,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-/* batch-driver.scm: 110 dump-nodes */
-((C_proc3)C_retrieve_symbol_proc(lf[39]))(3,*((C_word*)lf[39]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1704,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* batch-driver.scm: 111 build-expression-tree */
-((C_proc3)C_retrieve_symbol_proc(lf[41]))(3,*((C_word*)lf[41]+1),t2,((C_word*)t0)[2]);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k1702 in k1689 in print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* batch-driver.scm: 111 pretty-print */
-((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+1),((C_word*)t0)[2],t1);}
-
-/* print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1660(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1660,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1664,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* batch-driver.scm: 101 dribble */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_1645(t5,t4,lf[38],(C_word)C_a_i_list(&a,1,t2));}
-
-/* k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1664,2,t0,t1);}
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],C_retrieve(lf[36])))){
-t2=*((C_word*)lf[32]+1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1673,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* write-char/port */
-t4=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_make_character(91),t2);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1673,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1676,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1676,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1679,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* write-char/port */
-t3=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(93),((C_word*)t0)[2]);}
-
-/* k1677 in k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1679(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1679,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1682,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* write-char/port */
-t3=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-
-/* k1680 in k1677 in k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1682(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1645(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1645,NULL,4,t0,t1,t2,t3);}
-if(C_truep(((C_word*)t0)[2])){
-t4=*((C_word*)lf[32]+1);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1652,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_apply(6,0,t5,C_retrieve(lf[35]),t4,t2,t3);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k1650 in dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1652(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1652,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* write-char/port */
-t3=C_retrieve(lf[34]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-
-/* k1653 in k1650 in dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#flush-output */
-((C_proc3)C_retrieve_symbol_proc(lf[33]))(3,*((C_word*)lf[33]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* option-arg in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
-static void C_fcall f_1537(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1537,NULL,2,t1,t2);}
-t3=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=(C_word)C_i_car(t2);
-/* batch-driver.scm: 50 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t1,lf[9],t4);}
-else{
-t4=(C_word)C_i_cadr(t2);
-if(C_truep((C_word)C_i_symbolp(t4))){
-/* batch-driver.scm: 53 quit */
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t1,lf[10],t4);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[393] = {
-{"toplevel:batch_driver_scm",(void*)C_driver_toplevel},
-{"f_1508:batch_driver_scm",(void*)f_1508},
-{"f_1511:batch_driver_scm",(void*)f_1511},
-{"f_1516:batch_driver_scm",(void*)f_1516},
-{"f_1520:batch_driver_scm",(void*)f_1520},
-{"f_1524:batch_driver_scm",(void*)f_1524},
-{"f_1528:batch_driver_scm",(void*)f_1528},
-{"f_1532:batch_driver_scm",(void*)f_1532},
-{"f_1534:batch_driver_scm",(void*)f_1534},
-{"f_1570:batch_driver_scm",(void*)f_1570},
-{"f_4848:batch_driver_scm",(void*)f_4848},
-{"f_4833:batch_driver_scm",(void*)f_4833},
-{"f_4829:batch_driver_scm",(void*)f_4829},
-{"f_4818:batch_driver_scm",(void*)f_4818},
-{"f_4789:batch_driver_scm",(void*)f_4789},
-{"f_4793:batch_driver_scm",(void*)f_4793},
-{"f_1586:batch_driver_scm",(void*)f_1586},
-{"f_4785:batch_driver_scm",(void*)f_4785},
-{"f_4746:batch_driver_scm",(void*)f_4746},
-{"f_4748:batch_driver_scm",(void*)f_4748},
-{"f_4777:batch_driver_scm",(void*)f_4777},
-{"f_1589:batch_driver_scm",(void*)f_1589},
-{"f_1595:batch_driver_scm",(void*)f_1595},
-{"f_4727:batch_driver_scm",(void*)f_4727},
-{"f_4723:batch_driver_scm",(void*)f_4723},
-{"f_4719:batch_driver_scm",(void*)f_4719},
-{"f_2061:batch_driver_scm",(void*)f_2061},
-{"f_2064:batch_driver_scm",(void*)f_2064},
-{"f_2067:batch_driver_scm",(void*)f_2067},
-{"f_4704:batch_driver_scm",(void*)f_4704},
-{"f_4648:batch_driver_scm",(void*)f_4648},
-{"f_4656:batch_driver_scm",(void*)f_4656},
-{"f_4658:batch_driver_scm",(void*)f_4658},
-{"f_4696:batch_driver_scm",(void*)f_4696},
-{"f_2071:batch_driver_scm",(void*)f_2071},
-{"f_4598:batch_driver_scm",(void*)f_4598},
-{"f_4600:batch_driver_scm",(void*)f_4600},
-{"f_4635:batch_driver_scm",(void*)f_4635},
-{"f_4639:batch_driver_scm",(void*)f_4639},
-{"f_2079:batch_driver_scm",(void*)f_2079},
-{"f_2082:batch_driver_scm",(void*)f_2082},
-{"f_2085:batch_driver_scm",(void*)f_2085},
-{"f_2088:batch_driver_scm",(void*)f_2088},
-{"f_2091:batch_driver_scm",(void*)f_2091},
-{"f_2094:batch_driver_scm",(void*)f_2094},
-{"f_2097:batch_driver_scm",(void*)f_2097},
-{"f_2100:batch_driver_scm",(void*)f_2100},
-{"f_2103:batch_driver_scm",(void*)f_2103},
-{"f_2106:batch_driver_scm",(void*)f_2106},
-{"f_2109:batch_driver_scm",(void*)f_2109},
-{"f_2112:batch_driver_scm",(void*)f_2112},
-{"f_4501:batch_driver_scm",(void*)f_4501},
-{"f_4503:batch_driver_scm",(void*)f_4503},
-{"f_4532:batch_driver_scm",(void*)f_4532},
-{"f_2116:batch_driver_scm",(void*)f_2116},
-{"f_4496:batch_driver_scm",(void*)f_4496},
-{"f_2119:batch_driver_scm",(void*)f_2119},
-{"f_2122:batch_driver_scm",(void*)f_2122},
-{"f_2125:batch_driver_scm",(void*)f_2125},
-{"f_2128:batch_driver_scm",(void*)f_2128},
-{"f_2131:batch_driver_scm",(void*)f_2131},
-{"f_2134:batch_driver_scm",(void*)f_2134},
-{"f_2137:batch_driver_scm",(void*)f_2137},
-{"f_2140:batch_driver_scm",(void*)f_2140},
-{"f_2143:batch_driver_scm",(void*)f_2143},
-{"f_2146:batch_driver_scm",(void*)f_2146},
-{"f_4451:batch_driver_scm",(void*)f_4451},
-{"f_2152:batch_driver_scm",(void*)f_2152},
-{"f_4436:batch_driver_scm",(void*)f_4436},
-{"f_4439:batch_driver_scm",(void*)f_4439},
-{"f_4442:batch_driver_scm",(void*)f_4442},
-{"f_2158:batch_driver_scm",(void*)f_2158},
-{"f_4426:batch_driver_scm",(void*)f_4426},
-{"f_4429:batch_driver_scm",(void*)f_4429},
-{"f_2161:batch_driver_scm",(void*)f_2161},
-{"f_2164:batch_driver_scm",(void*)f_2164},
-{"f_4384:batch_driver_scm",(void*)f_4384},
-{"f_2167:batch_driver_scm",(void*)f_2167},
-{"f_4378:batch_driver_scm",(void*)f_4378},
-{"f_2170:batch_driver_scm",(void*)f_2170},
-{"f_4369:batch_driver_scm",(void*)f_4369},
-{"f_2173:batch_driver_scm",(void*)f_2173},
-{"f_4351:batch_driver_scm",(void*)f_4351},
-{"f_4354:batch_driver_scm",(void*)f_4354},
-{"f_4357:batch_driver_scm",(void*)f_4357},
-{"f_4360:batch_driver_scm",(void*)f_4360},
-{"f_2176:batch_driver_scm",(void*)f_2176},
-{"f_4310:batch_driver_scm",(void*)f_4310},
-{"f_4312:batch_driver_scm",(void*)f_4312},
-{"f_4341:batch_driver_scm",(void*)f_4341},
-{"f_4306:batch_driver_scm",(void*)f_4306},
-{"f_2182:batch_driver_scm",(void*)f_2182},
-{"f_2185:batch_driver_scm",(void*)f_2185},
-{"f_4255:batch_driver_scm",(void*)f_4255},
-{"f_4257:batch_driver_scm",(void*)f_4257},
-{"f_4286:batch_driver_scm",(void*)f_4286},
-{"f_2189:batch_driver_scm",(void*)f_2189},
-{"f_2192:batch_driver_scm",(void*)f_2192},
-{"f_2195:batch_driver_scm",(void*)f_2195},
-{"f_2198:batch_driver_scm",(void*)f_2198},
-{"f_2201:batch_driver_scm",(void*)f_2201},
-{"f_4152:batch_driver_scm",(void*)f_4152},
-{"f_4166:batch_driver_scm",(void*)f_4166},
-{"f_4191:batch_driver_scm",(void*)f_4191},
-{"f_4196:batch_driver_scm",(void*)f_4196},
-{"f_4224:batch_driver_scm",(void*)f_4224},
-{"f_4062:batch_driver_scm",(void*)f_4062},
-{"f_4067:batch_driver_scm",(void*)f_4067},
-{"f_4081:batch_driver_scm",(void*)f_4081},
-{"f_4106:batch_driver_scm",(void*)f_4106},
-{"f_4111:batch_driver_scm",(void*)f_4111},
-{"f_4139:batch_driver_scm",(void*)f_4139},
-{"f_2204:batch_driver_scm",(void*)f_2204},
-{"f_4056:batch_driver_scm",(void*)f_4056},
-{"f_4048:batch_driver_scm",(void*)f_4048},
-{"f_4023:batch_driver_scm",(void*)f_4023},
-{"f_4025:batch_driver_scm",(void*)f_4025},
-{"f_4035:batch_driver_scm",(void*)f_4035},
-{"f_2207:batch_driver_scm",(void*)f_2207},
-{"f_2214:batch_driver_scm",(void*)f_2214},
-{"f_2217:batch_driver_scm",(void*)f_2217},
-{"f_2220:batch_driver_scm",(void*)f_2220},
-{"f_3986:batch_driver_scm",(void*)f_3986},
-{"f_4002:batch_driver_scm",(void*)f_4002},
-{"f_4005:batch_driver_scm",(void*)f_4005},
-{"f_2223:batch_driver_scm",(void*)f_2223},
-{"f_2227:batch_driver_scm",(void*)f_2227},
-{"f_2235:batch_driver_scm",(void*)f_2235},
-{"f_2239:batch_driver_scm",(void*)f_2239},
-{"f_3949:batch_driver_scm",(void*)f_3949},
-{"f_3951:batch_driver_scm",(void*)f_3951},
-{"f_3980:batch_driver_scm",(void*)f_3980},
-{"f_2242:batch_driver_scm",(void*)f_2242},
-{"f_3910:batch_driver_scm",(void*)f_3910},
-{"f_3912:batch_driver_scm",(void*)f_3912},
-{"f_3941:batch_driver_scm",(void*)f_3941},
-{"f_3906:batch_driver_scm",(void*)f_3906},
-{"f_3850:batch_driver_scm",(void*)f_3850},
-{"f_3852:batch_driver_scm",(void*)f_3852},
-{"f_3846:batch_driver_scm",(void*)f_3846},
-{"f_2246:batch_driver_scm",(void*)f_2246},
-{"f_2250:batch_driver_scm",(void*)f_2250},
-{"f_2253:batch_driver_scm",(void*)f_2253},
-{"f_3825:batch_driver_scm",(void*)f_3825},
-{"f_2257:batch_driver_scm",(void*)f_2257},
-{"f_3818:batch_driver_scm",(void*)f_3818},
-{"f_2261:batch_driver_scm",(void*)f_2261},
-{"f_3811:batch_driver_scm",(void*)f_3811},
-{"f_2265:batch_driver_scm",(void*)f_2265},
-{"f_3804:batch_driver_scm",(void*)f_3804},
-{"f_2269:batch_driver_scm",(void*)f_2269},
-{"f_3784:batch_driver_scm",(void*)f_3784},
-{"f_2273:batch_driver_scm",(void*)f_2273},
-{"f_2284:batch_driver_scm",(void*)f_2284},
-{"f_2287:batch_driver_scm",(void*)f_2287},
-{"f_2290:batch_driver_scm",(void*)f_2290},
-{"f_3743:batch_driver_scm",(void*)f_3743},
-{"f_2293:batch_driver_scm",(void*)f_2293},
-{"f_2296:batch_driver_scm",(void*)f_2296},
-{"f_2317:batch_driver_scm",(void*)f_2317},
-{"f_2345:batch_driver_scm",(void*)f_2345},
-{"f_2351:batch_driver_scm",(void*)f_2351},
-{"f_2355:batch_driver_scm",(void*)f_2355},
-{"f_2358:batch_driver_scm",(void*)f_2358},
-{"f_2361:batch_driver_scm",(void*)f_2361},
-{"f_2364:batch_driver_scm",(void*)f_2364},
-{"f_2372:batch_driver_scm",(void*)f_2372},
-{"f_2375:batch_driver_scm",(void*)f_2375},
-{"f_2378:batch_driver_scm",(void*)f_2378},
-{"f_3711:batch_driver_scm",(void*)f_3711},
-{"f_3719:batch_driver_scm",(void*)f_3719},
-{"f_2381:batch_driver_scm",(void*)f_2381},
-{"f_2384:batch_driver_scm",(void*)f_2384},
-{"f_3556:batch_driver_scm",(void*)f_3556},
-{"f_3655:batch_driver_scm",(void*)f_3655},
-{"f_3704:batch_driver_scm",(void*)f_3704},
-{"f_3672:batch_driver_scm",(void*)f_3672},
-{"f_3676:batch_driver_scm",(void*)f_3676},
-{"f_3681:batch_driver_scm",(void*)f_3681},
-{"f_3702:batch_driver_scm",(void*)f_3702},
-{"f_3667:batch_driver_scm",(void*)f_3667},
-{"f_3658:batch_driver_scm",(void*)f_3658},
-{"f_3616:batch_driver_scm",(void*)f_3616},
-{"f_3645:batch_driver_scm",(void*)f_3645},
-{"f_3571:batch_driver_scm",(void*)f_3571},
-{"f_3575:batch_driver_scm",(void*)f_3575},
-{"f_3581:batch_driver_scm",(void*)f_3581},
-{"f_3610:batch_driver_scm",(void*)f_3610},
-{"f_3579:batch_driver_scm",(void*)f_3579},
-{"f_3567:batch_driver_scm",(void*)f_3567},
-{"f_3547:batch_driver_scm",(void*)f_3547},
-{"f_3551:batch_driver_scm",(void*)f_3551},
-{"f_2387:batch_driver_scm",(void*)f_2387},
-{"f_2390:batch_driver_scm",(void*)f_2390},
-{"f_3505:batch_driver_scm",(void*)f_3505},
-{"f_3511:batch_driver_scm",(void*)f_3511},
-{"f_3540:batch_driver_scm",(void*)f_3540},
-{"f_3509:batch_driver_scm",(void*)f_3509},
-{"f_2393:batch_driver_scm",(void*)f_2393},
-{"f_2396:batch_driver_scm",(void*)f_2396},
-{"f_3482:batch_driver_scm",(void*)f_3482},
-{"f_3502:batch_driver_scm",(void*)f_3502},
-{"f_2402:batch_driver_scm",(void*)f_2402},
-{"f_3440:batch_driver_scm",(void*)f_3440},
-{"f_3442:batch_driver_scm",(void*)f_3442},
-{"f_3471:batch_driver_scm",(void*)f_3471},
-{"f_2405:batch_driver_scm",(void*)f_2405},
-{"f_2408:batch_driver_scm",(void*)f_2408},
-{"f_3374:batch_driver_scm",(void*)f_3374},
-{"f_3180:batch_driver_scm",(void*)f_3180},
-{"f_3330:batch_driver_scm",(void*)f_3330},
-{"f_3184:batch_driver_scm",(void*)f_3184},
-{"f_3188:batch_driver_scm",(void*)f_3188},
-{"f_3207:batch_driver_scm",(void*)f_3207},
-{"f_3192:batch_driver_scm",(void*)f_3192},
-{"f_2414:batch_driver_scm",(void*)f_2414},
-{"f_3119:batch_driver_scm",(void*)f_3119},
-{"f_3124:batch_driver_scm",(void*)f_3124},
-{"f_3136:batch_driver_scm",(void*)f_3136},
-{"f_3139:batch_driver_scm",(void*)f_3139},
-{"f_3142:batch_driver_scm",(void*)f_3142},
-{"f_3145:batch_driver_scm",(void*)f_3145},
-{"f_3159:batch_driver_scm",(void*)f_3159},
-{"f_2417:batch_driver_scm",(void*)f_2417},
-{"f_3113:batch_driver_scm",(void*)f_3113},
-{"f_2420:batch_driver_scm",(void*)f_2420},
-{"f_3107:batch_driver_scm",(void*)f_3107},
-{"f_2423:batch_driver_scm",(void*)f_2423},
-{"f_2426:batch_driver_scm",(void*)f_2426},
-{"f_3092:batch_driver_scm",(void*)f_3092},
-{"f_2429:batch_driver_scm",(void*)f_2429},
-{"f_2434:batch_driver_scm",(void*)f_2434},
-{"f_2437:batch_driver_scm",(void*)f_2437},
-{"f_2440:batch_driver_scm",(void*)f_2440},
-{"f_2443:batch_driver_scm",(void*)f_2443},
-{"f_3038:batch_driver_scm",(void*)f_3038},
-{"f_3050:batch_driver_scm",(void*)f_3050},
-{"f_3079:batch_driver_scm",(void*)f_3079},
-{"f_3045:batch_driver_scm",(void*)f_3045},
-{"f_2446:batch_driver_scm",(void*)f_2446},
-{"f_3035:batch_driver_scm",(void*)f_3035},
-{"f_3031:batch_driver_scm",(void*)f_3031},
-{"f_2457:batch_driver_scm",(void*)f_2457},
-{"f_2460:batch_driver_scm",(void*)f_2460},
-{"f_2977:batch_driver_scm",(void*)f_2977},
-{"f_3017:batch_driver_scm",(void*)f_3017},
-{"f_3009:batch_driver_scm",(void*)f_3009},
-{"f_2980:batch_driver_scm",(void*)f_2980},
-{"f_2988:batch_driver_scm",(void*)f_2988},
-{"f_2991:batch_driver_scm",(void*)f_2991},
-{"f_2994:batch_driver_scm",(void*)f_2994},
-{"f_3000:batch_driver_scm",(void*)f_3000},
-{"f_3003:batch_driver_scm",(void*)f_3003},
-{"f_3006:batch_driver_scm",(void*)f_3006},
-{"f_2463:batch_driver_scm",(void*)f_2463},
-{"f_2968:batch_driver_scm",(void*)f_2968},
-{"f_2971:batch_driver_scm",(void*)f_2971},
-{"f_2950:batch_driver_scm",(void*)f_2950},
-{"f_2956:batch_driver_scm",(void*)f_2956},
-{"f_2959:batch_driver_scm",(void*)f_2959},
-{"f_2962:batch_driver_scm",(void*)f_2962},
-{"f_2466:batch_driver_scm",(void*)f_2466},
-{"f_2944:batch_driver_scm",(void*)f_2944},
-{"f_2469:batch_driver_scm",(void*)f_2469},
-{"f_2937:batch_driver_scm",(void*)f_2937},
-{"f_2472:batch_driver_scm",(void*)f_2472},
-{"f_2901:batch_driver_scm",(void*)f_2901},
-{"f_2930:batch_driver_scm",(void*)f_2930},
-{"f_2899:batch_driver_scm",(void*)f_2899},
-{"f_2844:batch_driver_scm",(void*)f_2844},
-{"f_2846:batch_driver_scm",(void*)f_2846},
-{"f_2884:batch_driver_scm",(void*)f_2884},
-{"f_2854:batch_driver_scm",(void*)f_2854},
-{"f_2881:batch_driver_scm",(void*)f_2881},
-{"f_2877:batch_driver_scm",(void*)f_2877},
-{"f_2858:batch_driver_scm",(void*)f_2858},
-{"f_2867:batch_driver_scm",(void*)f_2867},
-{"f_2870:batch_driver_scm",(void*)f_2870},
-{"f_2475:batch_driver_scm",(void*)f_2475},
-{"f_2478:batch_driver_scm",(void*)f_2478},
-{"f_2808:batch_driver_scm",(void*)f_2808},
-{"f_2826:batch_driver_scm",(void*)f_2826},
-{"f_2816:batch_driver_scm",(void*)f_2816},
-{"f_2820:batch_driver_scm",(void*)f_2820},
-{"f_2481:batch_driver_scm",(void*)f_2481},
-{"f_2487:batch_driver_scm",(void*)f_2487},
-{"f_2493:batch_driver_scm",(void*)f_2493},
-{"f_2496:batch_driver_scm",(void*)f_2496},
-{"f_2499:batch_driver_scm",(void*)f_2499},
-{"f_2504:batch_driver_scm",(void*)f_2504},
-{"f_2511:batch_driver_scm",(void*)f_2511},
-{"f_2758:batch_driver_scm",(void*)f_2758},
-{"f_2761:batch_driver_scm",(void*)f_2761},
-{"f_2514:batch_driver_scm",(void*)f_2514},
-{"f_2518:batch_driver_scm",(void*)f_2518},
-{"f_2521:batch_driver_scm",(void*)f_2521},
-{"f_2524:batch_driver_scm",(void*)f_2524},
-{"f_2616:batch_driver_scm",(void*)f_2616},
-{"f_2746:batch_driver_scm",(void*)f_2746},
-{"f_2619:batch_driver_scm",(void*)f_2619},
-{"f_2626:batch_driver_scm",(void*)f_2626},
-{"f_2629:batch_driver_scm",(void*)f_2629},
-{"f_2632:batch_driver_scm",(void*)f_2632},
-{"f_2635:batch_driver_scm",(void*)f_2635},
-{"f_2638:batch_driver_scm",(void*)f_2638},
-{"f_2714:batch_driver_scm",(void*)f_2714},
-{"f_2720:batch_driver_scm",(void*)f_2720},
-{"f_2723:batch_driver_scm",(void*)f_2723},
-{"f_2641:batch_driver_scm",(void*)f_2641},
-{"f_2644:batch_driver_scm",(void*)f_2644},
-{"f_2658:batch_driver_scm",(void*)f_2658},
-{"f_2662:batch_driver_scm",(void*)f_2662},
-{"f_2668:batch_driver_scm",(void*)f_2668},
-{"f_2671:batch_driver_scm",(void*)f_2671},
-{"f_2674:batch_driver_scm",(void*)f_2674},
-{"f_2677:batch_driver_scm",(void*)f_2677},
-{"f_2680:batch_driver_scm",(void*)f_2680},
-{"f5154:batch_driver_scm",(void*)f5154},
-{"f_2699:batch_driver_scm",(void*)f_2699},
-{"f_2683:batch_driver_scm",(void*)f_2683},
-{"f_2686:batch_driver_scm",(void*)f_2686},
-{"f_2652:batch_driver_scm",(void*)f_2652},
-{"f_2530:batch_driver_scm",(void*)f_2530},
-{"f_2544:batch_driver_scm",(void*)f_2544},
-{"f_2548:batch_driver_scm",(void*)f_2548},
-{"f_2551:batch_driver_scm",(void*)f_2551},
-{"f_2570:batch_driver_scm",(void*)f_2570},
-{"f_2587:batch_driver_scm",(void*)f_2587},
-{"f_2590:batch_driver_scm",(void*)f_2590},
-{"f_2596:batch_driver_scm",(void*)f_2596},
-{"f_2599:batch_driver_scm",(void*)f_2599},
-{"f_2538:batch_driver_scm",(void*)f_2538},
-{"f_2336:batch_driver_scm",(void*)f_2336},
-{"f_2329:batch_driver_scm",(void*)f_2329},
-{"f_2305:batch_driver_scm",(void*)f_2305},
-{"f_1982:batch_driver_scm",(void*)f_1982},
-{"f_2012:batch_driver_scm",(void*)f_2012},
-{"f_2007:batch_driver_scm",(void*)f_2007},
-{"f_1984:batch_driver_scm",(void*)f_1984},
-{"f_1988:batch_driver_scm",(void*)f_1988},
-{"f_2002:batch_driver_scm",(void*)f_2002},
-{"f_1996:batch_driver_scm",(void*)f_1996},
-{"f_1991:batch_driver_scm",(void*)f_1991},
-{"f_1976:batch_driver_scm",(void*)f_1976},
-{"f_1947:batch_driver_scm",(void*)f_1947},
-{"f_1954:batch_driver_scm",(void*)f_1954},
-{"f_1957:batch_driver_scm",(void*)f_1957},
-{"f_1960:batch_driver_scm",(void*)f_1960},
-{"f_1963:batch_driver_scm",(void*)f_1963},
-{"f_1937:batch_driver_scm",(void*)f_1937},
-{"f_1902:batch_driver_scm",(void*)f_1902},
-{"f_1908:batch_driver_scm",(void*)f_1908},
-{"f_1916:batch_driver_scm",(void*)f_1916},
-{"f_1924:batch_driver_scm",(void*)f_1924},
-{"f_1928:batch_driver_scm",(void*)f_1928},
-{"f_1822:batch_driver_scm",(void*)f_1822},
-{"f_1891:batch_driver_scm",(void*)f_1891},
-{"f_1887:batch_driver_scm",(void*)f_1887},
-{"f_1871:batch_driver_scm",(void*)f_1871},
-{"f_1863:batch_driver_scm",(void*)f_1863},
-{"f_1832:batch_driver_scm",(void*)f_1832},
-{"f_1773:batch_driver_scm",(void*)f_1773},
-{"f_1780:batch_driver_scm",(void*)f_1780},
-{"f_1786:batch_driver_scm",(void*)f_1786},
-{"f_1801:batch_driver_scm",(void*)f_1801},
-{"f_1797:batch_driver_scm",(void*)f_1797},
-{"f_1783:batch_driver_scm",(void*)f_1783},
-{"f_1819:batch_driver_scm",(void*)f_1819},
-{"f_1730:batch_driver_scm",(void*)f_1730},
-{"f_1737:batch_driver_scm",(void*)f_1737},
-{"f_1742:batch_driver_scm",(void*)f_1742},
-{"f_1754:batch_driver_scm",(void*)f_1754},
-{"f_1760:batch_driver_scm",(void*)f_1760},
-{"f_1706:batch_driver_scm",(void*)f_1706},
-{"f_1713:batch_driver_scm",(void*)f_1713},
-{"f_1716:batch_driver_scm",(void*)f_1716},
-{"f_1719:batch_driver_scm",(void*)f_1719},
-{"f_1722:batch_driver_scm",(void*)f_1722},
-{"f_1725:batch_driver_scm",(void*)f_1725},
-{"f_1684:batch_driver_scm",(void*)f_1684},
-{"f_1691:batch_driver_scm",(void*)f_1691},
-{"f_1704:batch_driver_scm",(void*)f_1704},
-{"f_1660:batch_driver_scm",(void*)f_1660},
-{"f_1664:batch_driver_scm",(void*)f_1664},
-{"f_1673:batch_driver_scm",(void*)f_1673},
-{"f_1676:batch_driver_scm",(void*)f_1676},
-{"f_1679:batch_driver_scm",(void*)f_1679},
-{"f_1682:batch_driver_scm",(void*)f_1682},
-{"f_1645:batch_driver_scm",(void*)f_1645},
-{"f_1652:batch_driver_scm",(void*)f_1652},
-{"f_1655:batch_driver_scm",(void*)f_1655},
-{"f_1537:batch_driver_scm",(void*)f_1537},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/c-backend.c b/bootstrap/c-backend.c
deleted file mode 100644
index fdf54a1e..00000000
--- a/bootstrap/c-backend.c
+++ /dev/null
@@ -1,17685 +0,0 @@
-/* Generated from c-backend.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:33
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: c-backend.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file c-backend.c
- unit: backend
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[864];
-static double C_possibly_force_alignment;
-
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub2463(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub2463(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word lit=(C_word )(C_a0);
-return(C_header_size(lit));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub2459(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub2459(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word lit=(C_word )(C_a0);
-
-#ifdef C_SIXTY_FOUR
-return((C_header_bits(lit) >> (24 + 32)) & 0xff);
-#else
-return((C_header_bits(lit) >> 24) & 0xff);
-#endif
-
-C_ret:
-#undef return
-
-return C_r;}
-
-C_noret_decl(C_backend_toplevel)
-C_externexport void C_ccall C_backend_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2508)
-static void C_ccall f_2508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2511)
-static void C_ccall f_2511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10305)
-static void C_ccall f_10305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10308)
-static void C_ccall f_10308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10335)
-static void C_ccall f_10335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10331)
-static void C_ccall f_10331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10311)
-static void C_ccall f_10311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10314)
-static void C_ccall f_10314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10327)
-static void C_ccall f_10327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10317)
-static void C_ccall f_10317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10320)
-static void C_ccall f_10320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10323)
-static void C_ccall f_10323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2597)
-static void C_ccall f_2597(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10005)
-static void C_ccall f_10005(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10281)
-static void C_ccall f_10281(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10279)
-static void C_ccall f_10279(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10267)
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10237)
-static void C_ccall f_10237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10198)
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10185)
-static void C_ccall f_10185(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10181)
-static void C_ccall f_10181(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10067)
-static void C_ccall f_10067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10014)
-static C_word C_fcall f_10014(C_word *a,C_word t0);
-C_noret_decl(f_9398)
-static void C_ccall f_9398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9509)
-static void C_fcall f_9509(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9674)
-static void C_ccall f_9674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9701)
-static void C_fcall f_9701(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9879)
-static void C_ccall f_9879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9882)
-static void C_ccall f_9882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9885)
-static void C_ccall f_9885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9888)
-static void C_ccall f_9888(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9858)
-static void C_ccall f_9858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9861)
-static void C_ccall f_9861(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9864)
-static void C_ccall f_9864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9867)
-static void C_ccall f_9867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9837)
-static void C_ccall f_9837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9840)
-static void C_ccall f_9840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9843)
-static void C_ccall f_9843(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9846)
-static void C_ccall f_9846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9800)
-static void C_ccall f_9800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9803)
-static void C_ccall f_9803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9806)
-static void C_ccall f_9806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9809)
-static void C_ccall f_9809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9779)
-static void C_ccall f_9779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9782)
-static void C_ccall f_9782(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9785)
-static void C_ccall f_9785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9788)
-static void C_ccall f_9788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9758)
-static void C_ccall f_9758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9761)
-static void C_ccall f_9761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9764)
-static void C_ccall f_9764(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9767)
-static void C_ccall f_9767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9737)
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9740)
-static void C_ccall f_9740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9743)
-static void C_ccall f_9743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9746)
-static void C_ccall f_9746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9716)
-static void C_ccall f_9716(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9719)
-static void C_ccall f_9719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9722)
-static void C_ccall f_9722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9725)
-static void C_ccall f_9725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9678)
-static void C_fcall f_9678(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9644)
-static void C_ccall f_9644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9647)
-static void C_ccall f_9647(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9650)
-static void C_ccall f_9650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9653)
-static void C_ccall f_9653(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9623)
-static void C_ccall f_9623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9626)
-static void C_ccall f_9626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9629)
-static void C_ccall f_9629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9632)
-static void C_ccall f_9632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9602)
-static void C_ccall f_9602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9605)
-static void C_ccall f_9605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9608)
-static void C_ccall f_9608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9611)
-static void C_ccall f_9611(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9578)
-static void C_ccall f_9578(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9581)
-static void C_ccall f_9581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9584)
-static void C_ccall f_9584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9587)
-static void C_ccall f_9587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9557)
-static void C_ccall f_9557(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9560)
-static void C_ccall f_9560(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9563)
-static void C_ccall f_9563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9566)
-static void C_ccall f_9566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9533)
-static void C_ccall f_9533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9536)
-static void C_ccall f_9536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9539)
-static void C_ccall f_9539(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9542)
-static void C_ccall f_9542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9512)
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9515)
-static void C_ccall f_9515(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9518)
-static void C_ccall f_9518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9521)
-static void C_ccall f_9521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9488)
-static void C_ccall f_9488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9491)
-static void C_ccall f_9491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9494)
-static void C_ccall f_9494(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9497)
-static void C_ccall f_9497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9467)
-static void C_ccall f_9467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9470)
-static void C_ccall f_9470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9473)
-static void C_ccall f_9473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9476)
-static void C_ccall f_9476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9400)
-static void C_fcall f_9400(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8908)
-static void C_ccall f_8908(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8938)
-static void C_fcall f_8938(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8965)
-static void C_fcall f_8965(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9160)
-static void C_fcall f_9160(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9169)
-static void C_fcall f_9169(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9178)
-static void C_ccall f_9178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9205)
-static void C_fcall f_9205(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9282)
-static void C_ccall f_9282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8910)
-static void C_fcall f_8910(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8024)
-static void C_ccall f_8024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8101)
-static void C_fcall f_8101(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8203)
-static void C_fcall f_8203(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8236)
-static void C_fcall f_8236(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8332)
-static void C_fcall f_8332(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8344)
-static void C_fcall f_8344(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8359)
-static void C_ccall f_8359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8404)
-static void C_fcall f_8404(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8421)
-static void C_fcall f_8421(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8438)
-static void C_fcall f_8438(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8477)
-static void C_fcall f_8477(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8494)
-static void C_fcall f_8494(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8511)
-static void C_fcall f_8511(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8528)
-static void C_fcall f_8528(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8545)
-static void C_fcall f_8545(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8562)
-static void C_fcall f_8562(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8579)
-static void C_fcall f_8579(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8591)
-static void C_ccall f_8591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8598)
-static void C_ccall f_8598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8608)
-static void C_fcall f_8608(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8648)
-static void C_ccall f_8648(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8618)
-static void C_fcall f_8618(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8606)
-static void C_ccall f_8606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8602)
-static void C_ccall f_8602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8569)
-static void C_ccall f_8569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8552)
-static void C_ccall f_8552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8535)
-static void C_ccall f_8535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8518)
-static void C_ccall f_8518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8501)
-static void C_ccall f_8501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8484)
-static void C_ccall f_8484(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8449)
-static void C_ccall f_8449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8459)
-static void C_ccall f_8459(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8457)
-static void C_ccall f_8457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8453)
-static void C_ccall f_8453(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8445)
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8432)
-static void C_ccall f_8432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8415)
-static void C_ccall f_8415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8363)
-static void C_fcall f_8363(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8031)
-static void C_fcall f_8031(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8026)
-static void C_fcall f_8026(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7959)
-static void C_ccall f_7959(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7963)
-static void C_ccall f_7963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7966)
-static void C_ccall f_7966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7969)
-static void C_ccall f_7969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7972)
-static void C_ccall f_7972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7978)
-static void C_ccall f_7978(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8022)
-static void C_ccall f_8022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7981)
-static void C_ccall f_7981(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7989)
-static void C_ccall f_7989(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8010)
-static void C_ccall f_8010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7993)
-static void C_ccall f_7993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7984)
-static void C_ccall f_7984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7465)
-static void C_ccall f_7465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7471)
-static void C_fcall f_7471(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7946)
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7479)
-static void C_fcall f_7479(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7483)
-static void C_ccall f_7483(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7486)
-static void C_ccall f_7486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7489)
-static void C_ccall f_7489(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7492)
-static void C_ccall f_7492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7498)
-static void C_ccall f_7498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7844)
-static void C_ccall f_7844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7847)
-static void C_ccall f_7847(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7943)
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7850)
-static void C_ccall f_7850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7853)
-static void C_ccall f_7853(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7856)
-static void C_ccall f_7856(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7859)
-static void C_ccall f_7859(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7892)
-static void C_fcall f_7892(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7908)
-static void C_ccall f_7908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7911)
-static void C_ccall f_7911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7862)
-static void C_ccall f_7862(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7890)
-static void C_ccall f_7890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7865)
-static void C_ccall f_7865(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7868)
-static void C_ccall f_7868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7871)
-static void C_ccall f_7871(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7500)
-static void C_ccall f_7500(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7510)
-static void C_fcall f_7510(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7519)
-static void C_fcall f_7519(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7531)
-static void C_fcall f_7531(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7543)
-static void C_fcall f_7543(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7549)
-static void C_ccall f_7549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7588)
-static void C_fcall f_7588(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7553)
-static void C_fcall f_7553(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7151)
-static void C_ccall f_7151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7157)
-static void C_fcall f_7157(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7452)
-static void C_ccall f_7452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7165)
-static void C_fcall f_7165(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7169)
-static void C_ccall f_7169(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7172)
-static void C_ccall f_7172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7175)
-static void C_ccall f_7175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7449)
-static void C_ccall f_7449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7181)
-static void C_ccall f_7181(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7184)
-static void C_ccall f_7184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7187)
-static void C_ccall f_7187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7190)
-static void C_ccall f_7190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7193)
-static void C_ccall f_7193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7196)
-static void C_ccall f_7196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7199)
-static void C_ccall f_7199(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7202)
-static void C_ccall f_7202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7205)
-static void C_ccall f_7205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7208)
-static void C_ccall f_7208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7438)
-static void C_ccall f_7438(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7211)
-static void C_ccall f_7211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7214)
-static void C_ccall f_7214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7217)
-static void C_ccall f_7217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7220)
-static void C_ccall f_7220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7223)
-static void C_ccall f_7223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7226)
-static void C_ccall f_7226(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7229)
-static void C_ccall f_7229(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7232)
-static void C_ccall f_7232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7329)
-static void C_ccall f_7329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7331)
-static void C_fcall f_7331(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7338)
-static void C_fcall f_7338(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7365)
-static void C_ccall f_7365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7368)
-static void C_ccall f_7368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7371)
-static void C_ccall f_7371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7359)
-static void C_ccall f_7359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7347)
-static void C_ccall f_7347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7351)
-static void C_ccall f_7351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7355)
-static void C_ccall f_7355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7377)
-static void C_ccall f_7377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7235)
-static void C_ccall f_7235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7238)
-static void C_ccall f_7238(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7268)
-static void C_ccall f_7268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7271)
-static void C_ccall f_7271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7309)
-static void C_ccall f_7309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7305)
-static void C_ccall f_7305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7274)
-static void C_ccall f_7274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7277)
-static void C_ccall f_7277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7280)
-static void C_ccall f_7280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7247)
-static void C_ccall f_7247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7250)
-static void C_ccall f_7250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7241)
-static void C_ccall f_7241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7111)
-static void C_ccall f_7111(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7117)
-static void C_fcall f_7117(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7129)
-static void C_ccall f_7129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7132)
-static void C_ccall f_7132(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7138)
-static void C_ccall f_7138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7057)
-static void C_ccall f_7057(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7061)
-static void C_ccall f_7061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7066)
-static void C_fcall f_7066(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7095)
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7098)
-static void C_ccall f_7098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7041)
-static void C_ccall f_7041(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7047)
-static void C_ccall f_7047(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7055)
-static void C_ccall f_7055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7025)
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7031)
-static void C_ccall f_7031(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7039)
-static void C_ccall f_7039(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6936)
-static void C_ccall f_6936(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6945)
-static void C_fcall f_6945(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6974)
-static void C_fcall f_6974(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6984)
-static void C_ccall f_6984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6859)
-static void C_ccall f_6859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6863)
-static void C_ccall f_6863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6877)
-static void C_fcall f_6877(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6890)
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6922)
-static void C_ccall f_6922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6893)
-static void C_ccall f_6893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6896)
-static void C_ccall f_6896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6866)
-static void C_ccall f_6866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6869)
-static void C_ccall f_6869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6872)
-static void C_ccall f_6872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2599)
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_6826)
-static void C_ccall f_6826(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6830)
-static void C_ccall f_6830(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6833)
-static void C_ccall f_6833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6836)
-static void C_ccall f_6836(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6839)
-static void C_ccall f_6839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6842)
-static void C_ccall f_6842(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6845)
-static void C_ccall f_6845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6848)
-static void C_ccall f_6848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6851)
-static void C_ccall f_6851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6854)
-static void C_ccall f_6854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6041)
-static void C_fcall f_6041(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6047)
-static void C_fcall f_6047(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6812)
-static void C_ccall f_6812(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6055)
-static void C_fcall f_6055(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6059)
-static void C_ccall f_6059(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6062)
-static void C_ccall f_6062(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6065)
-static void C_ccall f_6065(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6068)
-static void C_ccall f_6068(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6071)
-static void C_ccall f_6071(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6074)
-static void C_ccall f_6074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6809)
-static void C_ccall f_6809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6077)
-static void C_fcall f_6077(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6083)
-static void C_ccall f_6083(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6086)
-static void C_ccall f_6086(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6089)
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6092)
-static void C_ccall f_6092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6095)
-static void C_ccall f_6095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6098)
-static void C_ccall f_6098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6101)
-static void C_ccall f_6101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6104)
-static void C_ccall f_6104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6107)
-static void C_ccall f_6107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6110)
-static void C_ccall f_6110(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6113)
-static void C_ccall f_6113(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6116)
-static void C_ccall f_6116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6119)
-static void C_ccall f_6119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6778)
-static void C_ccall f_6778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6122)
-static void C_ccall f_6122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6739)
-static void C_ccall f_6739(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6742)
-static void C_ccall f_6742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6745)
-static void C_ccall f_6745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6761)
-static void C_ccall f_6761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6764)
-static void C_ccall f_6764(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6125)
-static void C_ccall f_6125(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6128)
-static void C_ccall f_6128(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6131)
-static void C_ccall f_6131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6711)
-static void C_fcall f_6711(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6714)
-static void C_ccall f_6714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6134)
-static void C_ccall f_6134(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6137)
-static void C_ccall f_6137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6140)
-static void C_ccall f_6140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6143)
-static void C_ccall f_6143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6146)
-static void C_fcall f_6146(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6149)
-static void C_ccall f_6149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6671)
-static void C_fcall f_6671(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6673)
-static void C_fcall f_6673(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6683)
-static void C_ccall f_6683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6624)
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6629)
-static void C_fcall f_6629(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6645)
-static void C_ccall f_6645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6656)
-static void C_ccall f_6656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6152)
-static void C_ccall f_6152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6573)
-static void C_fcall f_6573(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6585)
-static void C_ccall f_6585(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6588)
-static void C_ccall f_6588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6495)
-static void C_ccall f_6495(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6537)
-static void C_fcall f_6537(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6498)
-static void C_ccall f_6498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6504)
-static void C_fcall f_6504(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6507)
-static void C_ccall f_6507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6431)
-static void C_ccall f_6431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6434)
-static void C_ccall f_6434(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6437)
-static void C_ccall f_6437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6440)
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6443)
-static void C_ccall f_6443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6458)
-static void C_fcall f_6458(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6446)
-static void C_ccall f_6446(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6449)
-static void C_ccall f_6449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6417)
-static void C_ccall f_6417(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6425)
-static void C_ccall f_6425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6342)
-static void C_ccall f_6342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6348)
-static void C_ccall f_6348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6351)
-static void C_ccall f_6351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6385)
-static void C_ccall f_6385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6388)
-static void C_ccall f_6388(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6391)
-static void C_ccall f_6391(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6354)
-static void C_ccall f_6354(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6357)
-static void C_ccall f_6357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6360)
-static void C_ccall f_6360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6363)
-static void C_ccall f_6363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6372)
-static void C_ccall f_6372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6375)
-static void C_ccall f_6375(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6155)
-static void C_ccall f_6155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6178)
-static void C_fcall f_6178(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6283)
-static void C_ccall f_6283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6286)
-static void C_ccall f_6286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6298)
-static void C_ccall f_6298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6289)
-static void C_ccall f_6289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6184)
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6187)
-static void C_ccall f_6187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6270)
-static void C_ccall f_6270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6190)
-static void C_ccall f_6190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6193)
-static void C_ccall f_6193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6196)
-static void C_ccall f_6196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6199)
-static void C_ccall f_6199(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6264)
-static void C_ccall f_6264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6260)
-static void C_ccall f_6260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6202)
-static void C_ccall f_6202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6205)
-static void C_ccall f_6205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6208)
-static void C_ccall f_6208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6211)
-static void C_ccall f_6211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6214)
-static void C_ccall f_6214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6217)
-static void C_ccall f_6217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6235)
-static void C_fcall f_6235(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6245)
-static void C_ccall f_6245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6220)
-static void C_ccall f_6220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6158)
-static void C_ccall f_6158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6168)
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6161)
-static void C_ccall f_6161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5993)
-static void C_fcall f_5993(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6000)
-static void C_ccall f_6000(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6003)
-static void C_ccall f_6003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5916)
-static void C_fcall f_5916(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5923)
-static void C_ccall f_5923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5926)
-static void C_ccall f_5926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5931)
-static void C_fcall f_5931(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5987)
-static void C_ccall f_5987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5983)
-static void C_ccall f_5983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5968)
-static void C_ccall f_5968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5947)
-static void C_fcall f_5947(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5958)
-static void C_ccall f_5958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5954)
-static void C_ccall f_5954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5774)
-static void C_fcall f_5774(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5914)
-static void C_ccall f_5914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5781)
-static void C_fcall f_5781(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5787)
-static void C_ccall f_5787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5870)
-static void C_fcall f_5870(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5873)
-static void C_ccall f_5873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5883)
-static void C_ccall f_5883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5876)
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5837)
-static void C_ccall f_5837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5843)
-static void C_ccall f_5843(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5580)
-static void C_fcall f_5580(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5587)
-static void C_ccall f_5587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5696)
-static void C_ccall f_5696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5714)
-static void C_ccall f_5714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5743)
-static void C_fcall f_5743(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5765)
-static void C_ccall f_5765(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5721)
-static void C_ccall f_5721(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5655)
-static void C_ccall f_5655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5657)
-static void C_fcall f_5657(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5686)
-static void C_ccall f_5686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5651)
-static void C_ccall f_5651(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5647)
-static void C_ccall f_5647(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5618)
-static void C_ccall f_5618(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5622)
-static void C_ccall f_5622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5525)
-static void C_fcall f_5525(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5531)
-static void C_fcall f_5531(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5560)
-static void C_ccall f_5560(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5563)
-static void C_ccall f_5563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5566)
-static void C_ccall f_5566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5569)
-static void C_ccall f_5569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5572)
-static void C_ccall f_5572(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5541)
-static void C_ccall f_5541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5205)
-static void C_fcall f_5205(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5394)
-static void C_fcall f_5394(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5512)
-static void C_ccall f_5512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5402)
-static void C_fcall f_5402(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5406)
-static void C_ccall f_5406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5409)
-static void C_ccall f_5409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5412)
-static void C_ccall f_5412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5415)
-static void C_ccall f_5415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5418)
-static void C_ccall f_5418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5509)
-static void C_ccall f_5509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5421)
-static void C_fcall f_5421(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5424)
-static void C_fcall f_5424(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5430)
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5498)
-static void C_ccall f_5498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5464)
-static void C_ccall f_5464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5470)
-static void C_fcall f_5470(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5478)
-static void C_ccall f_5478(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5474)
-static void C_ccall f_5474(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5436)
-static void C_ccall f_5436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5439)
-static void C_ccall f_5439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5442)
-static void C_ccall f_5442(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5445)
-static void C_ccall f_5445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5448)
-static void C_ccall f_5448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5458)
-static void C_ccall f_5458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5451)
-static void C_ccall f_5451(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5324)
-static void C_ccall f_5324(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5343)
-static void C_fcall f_5343(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5381)
-static void C_ccall f_5381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5351)
-static void C_fcall f_5351(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5355)
-static void C_ccall f_5355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5358)
-static void C_ccall f_5358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5361)
-static void C_ccall f_5361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5364)
-static void C_ccall f_5364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5378)
-static void C_ccall f_5378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5374)
-static void C_ccall f_5374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5367)
-static void C_ccall f_5367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5327)
-static void C_ccall f_5327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5341)
-static void C_ccall f_5341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5330)
-static void C_ccall f_5330(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5337)
-static void C_ccall f_5337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5244)
-static void C_fcall f_5244(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5246)
-static void C_ccall f_5246(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5250)
-static void C_ccall f_5250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5253)
-static void C_ccall f_5253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5256)
-static void C_ccall f_5256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5259)
-static void C_ccall f_5259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5262)
-static void C_ccall f_5262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5265)
-static void C_ccall f_5265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5268)
-static void C_ccall f_5268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5271)
-static void C_ccall f_5271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5274)
-static void C_ccall f_5274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5277)
-static void C_ccall f_5277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5280)
-static void C_ccall f_5280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5283)
-static void C_ccall f_5283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5297)
-static void C_ccall f_5297(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5293)
-static void C_ccall f_5293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5286)
-static void C_ccall f_5286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5208)
-static void C_fcall f_5208(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5221)
-static void C_fcall f_5221(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5231)
-static void C_ccall f_5231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5212)
-static void C_ccall f_5212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4865)
-static void C_fcall f_4865(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4869)
-static void C_ccall f_4869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4938)
-static void C_fcall f_4938(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5192)
-static void C_ccall f_5192(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4946)
-static void C_fcall f_4946(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4950)
-static void C_ccall f_4950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4953)
-static void C_ccall f_4953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5189)
-static void C_ccall f_5189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4956)
-static void C_fcall f_4956(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5175)
-static void C_ccall f_5175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4959)
-static void C_ccall f_4959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4962)
-static void C_ccall f_4962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4965)
-static void C_ccall f_4965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4968)
-static void C_ccall f_4968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4971)
-static void C_ccall f_4971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4974)
-static void C_ccall f_4974(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5167)
-static void C_ccall f_5167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4977)
-static void C_fcall f_4977(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4980)
-static void C_ccall f_4980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5121)
-static void C_ccall f_5121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5123)
-static void C_fcall f_5123(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5149)
-static void C_ccall f_5149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5131)
-static void C_fcall f_5131(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5142)
-static void C_ccall f_5142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4983)
-static void C_ccall f_4983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5070)
-static void C_ccall f_5070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5073)
-static void C_ccall f_5073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5076)
-static void C_ccall f_5076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5079)
-static void C_ccall f_5079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5095)
-static void C_ccall f_5095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5098)
-static void C_ccall f_5098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11178)
-static void C_ccall f11178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5101)
-static void C_ccall f_5101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5104)
-static void C_ccall f_5104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4986)
-static void C_ccall f_4986(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4989)
-static void C_ccall f_4989(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4992)
-static void C_ccall f_4992(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5042)
-static void C_fcall f_5042(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5045)
-static void C_ccall f_5045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4995)
-static void C_ccall f_4995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4998)
-static void C_ccall f_4998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5030)
-static void C_ccall f_5030(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5033)
-static void C_ccall f_5033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5004)
-static void C_ccall f_5004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5013)
-static void C_ccall f_5013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5016)
-static void C_ccall f_5016(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4872)
-static void C_ccall f_4872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4877)
-static void C_fcall f_4877(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4889)
-static void C_ccall f_4889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4899)
-static void C_ccall f_4899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4901)
-static void C_fcall f_4901(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4911)
-static void C_ccall f_4911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4892)
-static void C_ccall f_4892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4925)
-static void C_ccall f_4925(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4694)
-static void C_fcall f_4694(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4701)
-static void C_ccall f_4701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4837)
-static void C_fcall f_4837(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4852)
-static void C_ccall f_4852(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4704)
-static void C_ccall f_4704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4707)
-static void C_ccall f_4707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4710)
-static void C_ccall f_4710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4715)
-static void C_fcall f_4715(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4725)
-static void C_ccall f_4725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4731)
-static void C_ccall f_4731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4784)
-static void C_fcall f_4784(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4794)
-static void C_ccall f_4794(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4734)
-static void C_ccall f_4734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4757)
-static void C_fcall f_4757(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4767)
-static void C_ccall f_4767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4737)
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4740)
-static void C_ccall f_4740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4525)
-static void C_fcall f_4525(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4686)
-static void C_ccall f_4686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4545)
-static void C_ccall f_4545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4644)
-static void C_ccall f_4644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4648)
-static void C_ccall f_4648(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4652)
-static void C_ccall f_4652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4656)
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4678)
-static void C_ccall f_4678(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4674)
-static void C_ccall f_4674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4666)
-static void C_ccall f_4666(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4664)
-static void C_ccall f_4664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4660)
-static void C_ccall f_4660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4563)
-static void C_ccall f_4563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4566)
-static void C_ccall f_4566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4569)
-static void C_ccall f_4569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4633)
-static void C_ccall f_4633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4572)
-static void C_ccall f_4572(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4575)
-static void C_ccall f_4575(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4578)
-static void C_ccall f_4578(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4593)
-static void C_ccall f_4593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4598)
-static void C_fcall f_4598(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4613)
-static void C_ccall f_4613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4581)
-static void C_ccall f_4581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4528)
-static void C_fcall f_4528(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4542)
-static void C_ccall f_4542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2644)
-static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4493)
-static void C_fcall f_4493(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4499)
-static void C_ccall f_4499(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4503)
-static void C_ccall f_4503(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2647)
-static void C_fcall f_2647(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4449)
-static void C_ccall f_4449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4452)
-static void C_ccall f_4452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4455)
-static void C_ccall f_4455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4458)
-static void C_ccall f_4458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4461)
-static void C_ccall f_4461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4464)
-static void C_ccall f_4464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4366)
-static void C_ccall f_4366(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4369)
-static void C_ccall f_4369(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4372)
-static void C_ccall f_4372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4385)
-static void C_fcall f_4385(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4408)
-static void C_ccall f_4408(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4411)
-static void C_ccall f_4411(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4414)
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4417)
-static void C_ccall f_4417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4395)
-static void C_ccall f_4395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4398)
-static void C_ccall f_4398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4347)
-static void C_ccall f_4347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4350)
-static void C_ccall f_4350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4324)
-static void C_ccall f_4324(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4327)
-static void C_ccall f_4327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4302)
-static void C_ccall f_4302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4274)
-static void C_ccall f_4274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4277)
-static void C_ccall f_4277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4294)
-static void C_ccall f_4294(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4280)
-static void C_ccall f_4280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4283)
-static void C_ccall f_4283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4258)
-static void C_ccall f_4258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4262)
-static void C_ccall f_4262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4244)
-static void C_ccall f_4244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4247)
-static void C_ccall f_4247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4228)
-static void C_ccall f_4228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4232)
-static void C_ccall f_4232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4210)
-static void C_ccall f_4210(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4213)
-static void C_ccall f_4213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4190)
-static void C_ccall f_4190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4154)
-static void C_ccall f_4154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4166)
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4157)
-static void C_ccall f_4157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4135)
-static void C_ccall f_4135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4138)
-static void C_ccall f_4138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4116)
-static void C_ccall f_4116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4119)
-static void C_ccall f_4119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4097)
-static void C_ccall f_4097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4100)
-static void C_ccall f_4100(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4078)
-static void C_ccall f_4078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4074)
-static void C_ccall f_4074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4022)
-static void C_ccall f_4022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4055)
-static void C_ccall f_4055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4025)
-static void C_ccall f_4025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4043)
-static void C_ccall f_4043(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4028)
-static void C_ccall f_4028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4031)
-static void C_ccall f_4031(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3989)
-static void C_ccall f_3989(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3973)
-static void C_ccall f_3973(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11150)
-static void C_ccall f11150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3976)
-static void C_ccall f_3976(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3979)
-static void C_ccall f_3979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3860)
-static void C_ccall f_3860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3863)
-static void C_ccall f_3863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3920)
-static void C_fcall f_3920(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3941)
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3928)
-static void C_fcall f_3928(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3932)
-static void C_ccall f_3932(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3935)
-static void C_ccall f_3935(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3866)
-static void C_ccall f_3866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3876)
-static void C_ccall f_3876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3878)
-static void C_fcall f_3878(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3893)
-static void C_ccall f_3893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3869)
-static void C_ccall f_3869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3401)
-static void C_ccall f_3401(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3404)
-static void C_fcall f_3404(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3810)
-static void C_ccall f_3810(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3806)
-static void C_ccall f_3806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3410)
-static void C_fcall f_3410(C_word t0,C_word t1) C_noret;
-C_noret_decl(f11142)
-static void C_ccall f11142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3799)
-static void C_ccall f_3799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2632)
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3792)
-static void C_ccall f_3792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3416)
-static void C_ccall f_3416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3620)
-static void C_fcall f_3620(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3709)
-static void C_ccall f_3709(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3712)
-static void C_ccall f_3712(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3715)
-static void C_ccall f_3715(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3730)
-static void C_fcall f_3730(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3718)
-static void C_ccall f_3718(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3721)
-static void C_ccall f_3721(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3724)
-static void C_ccall f_3724(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3640)
-static void C_ccall f_3640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3706)
-static void C_ccall f_3706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3699)
-static void C_ccall f_3699(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3695)
-static void C_ccall f_3695(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3688)
-static void C_ccall f_3688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3681)
-static void C_ccall f_3681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3656)
-static void C_ccall f_3656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3673)
-static void C_ccall f_3673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3669)
-static void C_ccall f_3669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3643)
-static void C_ccall f_3643(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3646)
-static void C_ccall f_3646(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3649)
-static void C_ccall f_3649(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3614)
-static void C_ccall f_3614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3452)
-static void C_ccall f_3452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3598)
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3601)
-static void C_ccall f_3601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3574)
-static void C_ccall f_3574(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3577)
-static void C_ccall f_3577(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3580)
-static void C_ccall f_3580(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11137)
-static void C_ccall f11137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3583)
-static void C_ccall f_3583(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3586)
-static void C_ccall f_3586(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3455)
-static void C_ccall f_3455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3458)
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3521)
-static void C_fcall f_3521(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3542)
-static void C_ccall f_3542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3529)
-static void C_fcall f_3529(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3533)
-static void C_ccall f_3533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3536)
-static void C_ccall f_3536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3461)
-static void C_ccall f_3461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3477)
-static void C_ccall f_3477(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3479)
-static void C_fcall f_3479(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3494)
-static void C_ccall f_3494(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3464)
-static void C_ccall f_3464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3467)
-static void C_ccall f_3467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3433)
-static void C_ccall f_3433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3436)
-static void C_ccall f_3436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3368)
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11129)
-static void C_ccall f11129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3364)
-static void C_ccall f_3364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3350)
-static void C_ccall f_3350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3353)
-static void C_ccall f_3353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3347)
-static void C_ccall f_3347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11124)
-static void C_ccall f11124(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3343)
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3329)
-static void C_ccall f_3329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3332)
-static void C_ccall f_3332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3281)
-static void C_ccall f_3281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3302)
-static void C_ccall f_3302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11119)
-static void C_ccall f11119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3298)
-static void C_ccall f_3298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3284)
-static void C_ccall f_3284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3287)
-static void C_ccall f_3287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3250)
-static void C_ccall f_3250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3246)
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3204)
-static void C_ccall f_3204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3172)
-static void C_ccall f_3172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3175)
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3101)
-static void C_ccall f_3101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3115)
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3117)
-static void C_fcall f_3117(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3138)
-static void C_ccall f_3138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3125)
-static void C_fcall f_3125(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3129)
-static void C_ccall f_3129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3132)
-static void C_ccall f_3132(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3104)
-static void C_ccall f_3104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3069)
-static void C_ccall f_3069(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3072)
-static void C_ccall f_3072(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3075)
-static void C_ccall f_3075(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3078)
-static void C_ccall f_3078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3040)
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3043)
-static void C_ccall f_3043(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3046)
-static void C_ccall f_3046(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3049)
-static void C_ccall f_3049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3003)
-static void C_ccall f_3003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3006)
-static void C_ccall f_3006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3009)
-static void C_ccall f_3009(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3012)
-static void C_ccall f_3012(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2970)
-static void C_ccall f_2970(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2973)
-static void C_ccall f_2973(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2976)
-static void C_ccall f_2976(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2979)
-static void C_ccall f_2979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2951)
-static void C_ccall f_2951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2954)
-static void C_ccall f_2954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2924)
-static void C_ccall f_2924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2927)
-static void C_ccall f_2927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2898)
-static void C_ccall f_2898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2901)
-static void C_ccall f_2901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2904)
-static void C_ccall f_2904(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2844)
-static void C_fcall f_2844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2854)
-static void C_ccall f_2854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2857)
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2860)
-static void C_ccall f_2860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2786)
-static void C_ccall f_2786(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2789)
-static void C_ccall f_2789(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2792)
-static void C_ccall f_2792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2795)
-static void C_ccall f_2795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2798)
-static void C_ccall f_2798(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2801)
-static void C_ccall f_2801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2602)
-static void C_fcall f_2602(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2614)
-static void C_ccall f_2614(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2622)
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2606)
-static void C_ccall f_2606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2557)
-static void C_ccall f_2557(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2565)
-static void C_ccall f_2565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2567)
-static void C_fcall f_2567(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2582)
-static void C_ccall f_2582(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2514)
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_2514)
-static void C_ccall f_2514r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_2520)
-static void C_fcall f_2520(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2544)
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_9509)
-static void C_fcall trf_9509(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9509(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9509(t0,t1);}
-
-C_noret_decl(trf_9701)
-static void C_fcall trf_9701(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9701(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9701(t0,t1);}
-
-C_noret_decl(trf_9678)
-static void C_fcall trf_9678(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9678(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9678(t0,t1,t2);}
-
-C_noret_decl(trf_9400)
-static void C_fcall trf_9400(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9400(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9400(t0,t1);}
-
-C_noret_decl(trf_8938)
-static void C_fcall trf_8938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8938(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8938(t0,t1);}
-
-C_noret_decl(trf_8965)
-static void C_fcall trf_8965(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8965(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8965(t0,t1);}
-
-C_noret_decl(trf_9160)
-static void C_fcall trf_9160(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9160(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9160(t0,t1);}
-
-C_noret_decl(trf_9169)
-static void C_fcall trf_9169(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9169(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9169(t0,t1);}
-
-C_noret_decl(trf_9205)
-static void C_fcall trf_9205(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9205(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9205(t0,t1);}
-
-C_noret_decl(trf_8910)
-static void C_fcall trf_8910(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8910(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8910(t0,t1);}
-
-C_noret_decl(trf_8101)
-static void C_fcall trf_8101(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8101(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8101(t0,t1);}
-
-C_noret_decl(trf_8203)
-static void C_fcall trf_8203(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8203(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8203(t0,t1);}
-
-C_noret_decl(trf_8236)
-static void C_fcall trf_8236(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8236(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8236(t0,t1);}
-
-C_noret_decl(trf_8332)
-static void C_fcall trf_8332(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8332(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8332(t0,t1);}
-
-C_noret_decl(trf_8344)
-static void C_fcall trf_8344(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8344(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8344(t0,t1);}
-
-C_noret_decl(trf_8404)
-static void C_fcall trf_8404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8404(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8404(t0,t1);}
-
-C_noret_decl(trf_8421)
-static void C_fcall trf_8421(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8421(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8421(t0,t1);}
-
-C_noret_decl(trf_8438)
-static void C_fcall trf_8438(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8438(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8438(t0,t1);}
-
-C_noret_decl(trf_8477)
-static void C_fcall trf_8477(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8477(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8477(t0,t1);}
-
-C_noret_decl(trf_8494)
-static void C_fcall trf_8494(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8494(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8494(t0,t1);}
-
-C_noret_decl(trf_8511)
-static void C_fcall trf_8511(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8511(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8511(t0,t1);}
-
-C_noret_decl(trf_8528)
-static void C_fcall trf_8528(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8528(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8528(t0,t1);}
-
-C_noret_decl(trf_8545)
-static void C_fcall trf_8545(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8545(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8545(t0,t1);}
-
-C_noret_decl(trf_8562)
-static void C_fcall trf_8562(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8562(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8562(t0,t1);}
-
-C_noret_decl(trf_8579)
-static void C_fcall trf_8579(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8579(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8579(t0,t1);}
-
-C_noret_decl(trf_8608)
-static void C_fcall trf_8608(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8608(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8608(t0,t1,t2);}
-
-C_noret_decl(trf_8618)
-static void C_fcall trf_8618(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8618(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8618(t0,t1);}
-
-C_noret_decl(trf_8363)
-static void C_fcall trf_8363(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8363(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8363(t0,t1,t2);}
-
-C_noret_decl(trf_8031)
-static void C_fcall trf_8031(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8031(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8031(t0,t1,t2);}
-
-C_noret_decl(trf_8026)
-static void C_fcall trf_8026(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8026(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8026(t0,t1);}
-
-C_noret_decl(trf_7471)
-static void C_fcall trf_7471(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7471(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7471(t0,t1,t2);}
-
-C_noret_decl(trf_7479)
-static void C_fcall trf_7479(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7479(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7479(t0,t1,t2);}
-
-C_noret_decl(trf_7892)
-static void C_fcall trf_7892(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7892(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7892(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7510)
-static void C_fcall trf_7510(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7510(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7510(t0,t1);}
-
-C_noret_decl(trf_7519)
-static void C_fcall trf_7519(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7519(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7519(t0,t1);}
-
-C_noret_decl(trf_7531)
-static void C_fcall trf_7531(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7531(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7531(t0,t1);}
-
-C_noret_decl(trf_7543)
-static void C_fcall trf_7543(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7543(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7543(t0,t1);}
-
-C_noret_decl(trf_7588)
-static void C_fcall trf_7588(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7588(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7588(t0,t1);}
-
-C_noret_decl(trf_7553)
-static void C_fcall trf_7553(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7553(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7553(t0,t1,t2);}
-
-C_noret_decl(trf_7157)
-static void C_fcall trf_7157(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7157(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7157(t0,t1,t2);}
-
-C_noret_decl(trf_7165)
-static void C_fcall trf_7165(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7165(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7165(t0,t1,t2);}
-
-C_noret_decl(trf_7331)
-static void C_fcall trf_7331(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7331(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_7331(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_7338)
-static void C_fcall trf_7338(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7338(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7338(t0,t1);}
-
-C_noret_decl(trf_7117)
-static void C_fcall trf_7117(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7117(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7117(t0,t1,t2);}
-
-C_noret_decl(trf_7066)
-static void C_fcall trf_7066(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7066(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7066(t0,t1,t2);}
-
-C_noret_decl(trf_6945)
-static void C_fcall trf_6945(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6945(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6945(t0,t1,t2);}
-
-C_noret_decl(trf_6974)
-static void C_fcall trf_6974(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6974(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6974(t0,t1);}
-
-C_noret_decl(trf_6877)
-static void C_fcall trf_6877(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6877(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6877(t0,t1,t2);}
-
-C_noret_decl(trf_6041)
-static void C_fcall trf_6041(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6041(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6041(t0,t1);}
-
-C_noret_decl(trf_6047)
-static void C_fcall trf_6047(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6047(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6047(t0,t1,t2);}
-
-C_noret_decl(trf_6055)
-static void C_fcall trf_6055(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6055(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6055(t0,t1,t2);}
-
-C_noret_decl(trf_6077)
-static void C_fcall trf_6077(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6077(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6077(t0,t1);}
-
-C_noret_decl(trf_6711)
-static void C_fcall trf_6711(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6711(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6711(t0,t1);}
-
-C_noret_decl(trf_6146)
-static void C_fcall trf_6146(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6146(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6146(t0,t1);}
-
-C_noret_decl(trf_6671)
-static void C_fcall trf_6671(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6671(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6671(t0,t1);}
-
-C_noret_decl(trf_6673)
-static void C_fcall trf_6673(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6673(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6673(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6629)
-static void C_fcall trf_6629(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6629(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6629(t0,t1,t2);}
-
-C_noret_decl(trf_6573)
-static void C_fcall trf_6573(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6573(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6573(t0,t1);}
-
-C_noret_decl(trf_6537)
-static void C_fcall trf_6537(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6537(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6537(t0,t1);}
-
-C_noret_decl(trf_6504)
-static void C_fcall trf_6504(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6504(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6504(t0,t1);}
-
-C_noret_decl(trf_6458)
-static void C_fcall trf_6458(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6458(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6458(t0,t1);}
-
-C_noret_decl(trf_6178)
-static void C_fcall trf_6178(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6178(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6178(t0,t1);}
-
-C_noret_decl(trf_6235)
-static void C_fcall trf_6235(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6235(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6235(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5993)
-static void C_fcall trf_5993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5993(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5993(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5916)
-static void C_fcall trf_5916(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5916(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5916(t0,t1,t2);}
-
-C_noret_decl(trf_5931)
-static void C_fcall trf_5931(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5931(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5931(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5947)
-static void C_fcall trf_5947(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5947(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5947(t0,t1);}
-
-C_noret_decl(trf_5774)
-static void C_fcall trf_5774(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5774(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5774(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5781)
-static void C_fcall trf_5781(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5781(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5781(t0,t1);}
-
-C_noret_decl(trf_5870)
-static void C_fcall trf_5870(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5870(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5870(t0,t1);}
-
-C_noret_decl(trf_5580)
-static void C_fcall trf_5580(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5580(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5580(t0,t1,t2);}
-
-C_noret_decl(trf_5743)
-static void C_fcall trf_5743(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5743(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5743(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5657)
-static void C_fcall trf_5657(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5657(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5657(t0,t1,t2);}
-
-C_noret_decl(trf_5525)
-static void C_fcall trf_5525(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5525(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5525(t0,t1);}
-
-C_noret_decl(trf_5531)
-static void C_fcall trf_5531(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5531(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5531(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5205)
-static void C_fcall trf_5205(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5205(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5205(t0,t1);}
-
-C_noret_decl(trf_5394)
-static void C_fcall trf_5394(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5394(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5394(t0,t1,t2);}
-
-C_noret_decl(trf_5402)
-static void C_fcall trf_5402(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5402(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5402(t0,t1,t2);}
-
-C_noret_decl(trf_5421)
-static void C_fcall trf_5421(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5421(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5421(t0,t1);}
-
-C_noret_decl(trf_5424)
-static void C_fcall trf_5424(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5424(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5424(t0,t1);}
-
-C_noret_decl(trf_5470)
-static void C_fcall trf_5470(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5470(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5470(t0,t1);}
-
-C_noret_decl(trf_5343)
-static void C_fcall trf_5343(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5343(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5343(t0,t1,t2);}
-
-C_noret_decl(trf_5351)
-static void C_fcall trf_5351(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5351(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5351(t0,t1,t2);}
-
-C_noret_decl(trf_5244)
-static void C_fcall trf_5244(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5244(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5244(t0,t1,t2);}
-
-C_noret_decl(trf_5208)
-static void C_fcall trf_5208(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5208(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5208(t0,t1);}
-
-C_noret_decl(trf_5221)
-static void C_fcall trf_5221(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5221(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5221(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4865)
-static void C_fcall trf_4865(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4865(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4865(t0,t1);}
-
-C_noret_decl(trf_4938)
-static void C_fcall trf_4938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4938(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4938(t0,t1,t2);}
-
-C_noret_decl(trf_4946)
-static void C_fcall trf_4946(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4946(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4946(t0,t1,t2);}
-
-C_noret_decl(trf_4956)
-static void C_fcall trf_4956(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4956(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4956(t0,t1);}
-
-C_noret_decl(trf_4977)
-static void C_fcall trf_4977(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4977(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4977(t0,t1);}
-
-C_noret_decl(trf_5123)
-static void C_fcall trf_5123(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5123(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5123(t0,t1,t2);}
-
-C_noret_decl(trf_5131)
-static void C_fcall trf_5131(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5131(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5131(t0,t1,t2);}
-
-C_noret_decl(trf_5042)
-static void C_fcall trf_5042(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5042(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5042(t0,t1);}
-
-C_noret_decl(trf_4877)
-static void C_fcall trf_4877(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4877(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4877(t0,t1,t2);}
-
-C_noret_decl(trf_4901)
-static void C_fcall trf_4901(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4901(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4901(t0,t1,t2);}
-
-C_noret_decl(trf_4694)
-static void C_fcall trf_4694(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4694(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4694(t0,t1);}
-
-C_noret_decl(trf_4837)
-static void C_fcall trf_4837(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4837(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4837(t0,t1,t2);}
-
-C_noret_decl(trf_4715)
-static void C_fcall trf_4715(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4715(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4715(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4784)
-static void C_fcall trf_4784(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4784(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4784(t0,t1,t2);}
-
-C_noret_decl(trf_4757)
-static void C_fcall trf_4757(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4757(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4757(t0,t1,t2);}
-
-C_noret_decl(trf_4525)
-static void C_fcall trf_4525(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4525(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4525(t0,t1);}
-
-C_noret_decl(trf_4598)
-static void C_fcall trf_4598(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4598(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4598(t0,t1,t2);}
-
-C_noret_decl(trf_4528)
-static void C_fcall trf_4528(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4528(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4528(t0,t1);}
-
-C_noret_decl(trf_2644)
-static void C_fcall trf_2644(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2644(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2644(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_4493)
-static void C_fcall trf_4493(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4493(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4493(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2647)
-static void C_fcall trf_2647(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2647(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2647(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4385)
-static void C_fcall trf_4385(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4385(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4385(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3920)
-static void C_fcall trf_3920(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3920(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3920(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3928)
-static void C_fcall trf_3928(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3928(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3928(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3878)
-static void C_fcall trf_3878(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3878(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3878(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3404)
-static void C_fcall trf_3404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3404(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3404(t0,t1);}
-
-C_noret_decl(trf_3410)
-static void C_fcall trf_3410(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3410(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3410(t0,t1);}
-
-C_noret_decl(trf_3620)
-static void C_fcall trf_3620(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3620(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3620(t0,t1);}
-
-C_noret_decl(trf_3730)
-static void C_fcall trf_3730(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3730(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3730(t0,t1);}
-
-C_noret_decl(trf_3521)
-static void C_fcall trf_3521(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3521(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3521(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3529)
-static void C_fcall trf_3529(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3529(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3529(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3479)
-static void C_fcall trf_3479(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3479(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3479(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3117)
-static void C_fcall trf_3117(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3117(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3117(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3125)
-static void C_fcall trf_3125(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3125(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3125(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2844)
-static void C_fcall trf_2844(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2844(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2844(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2602)
-static void C_fcall trf_2602(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2602(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2602(t0,t1,t2);}
-
-C_noret_decl(trf_2567)
-static void C_fcall trf_2567(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2567(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2567(t0,t1,t2);}
-
-C_noret_decl(trf_2520)
-static void C_fcall trf_2520(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2520(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2520(t0,t1,t2);}
-
-C_noret_decl(tr9)
-static void C_fcall tr9(C_proc9 k) C_regparm C_noret;
-C_regparm static void C_fcall tr9(C_proc9 k){
-C_word t8=C_pick(0);
-C_word t7=C_pick(1);
-C_word t6=C_pick(2);
-C_word t5=C_pick(3);
-C_word t4=C_pick(4);
-C_word t3=C_pick(5);
-C_word t2=C_pick(6);
-C_word t1=C_pick(7);
-C_word t0=C_pick(8);
-C_adjust_stack(-9);
-(k)(9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_backend_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_backend_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("backend_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(2512)){
-C_save(t1);
-C_rereclaim2(2512*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,864);
-lf[0]=C_h_intern(&lf[0],15,"\010compileroutput");
-lf[1]=C_h_intern(&lf[1],12,"\010compilergen");
-lf[2]=C_h_intern(&lf[2],7,"newline");
-lf[3]=C_h_intern(&lf[3],7,"display");
-lf[4]=C_h_intern(&lf[4],17,"\010compilergen-list");
-lf[5]=C_h_intern(&lf[5],11,"intersperse");
-lf[6]=C_h_intern(&lf[6],18,"\010compilerunique-id");
-lf[7]=C_h_intern(&lf[7],22,"\010compilergenerate-code");
-lf[8]=C_h_intern(&lf[8],13,"\010compilerbomb");
-lf[9]=C_decode_literal(C_heaptop,"\376B\000\000\021can\047t find lambda");
-lf[10]=C_h_intern(&lf[10],17,"lambda-literal-id");
-lf[11]=C_h_intern(&lf[11],4,"find");
-lf[12]=C_h_intern(&lf[12],14,"\004coreimmediate");
-lf[13]=C_h_intern(&lf[13],4,"bool");
-lf[14]=C_decode_literal(C_heaptop,"\376B\000\000\015C_SCHEME_TRUE");
-lf[15]=C_decode_literal(C_heaptop,"\376B\000\000\016C_SCHEME_FALSE");
-lf[16]=C_h_intern(&lf[16],4,"char");
-lf[17]=C_decode_literal(C_heaptop,"\376B\000\000\021C_make_character(");
-lf[18]=C_h_intern(&lf[18],3,"nil");
-lf[19]=C_decode_literal(C_heaptop,"\376B\000\000\024C_SCHEME_END_OF_LIST");
-lf[20]=C_h_intern(&lf[20],3,"fix");
-lf[21]=C_decode_literal(C_heaptop,"\376B\000\000\006C_fix(");
-lf[22]=C_h_intern(&lf[22],3,"eof");
-lf[23]=C_decode_literal(C_heaptop,"\376B\000\000\024C_SCHEME_END_OF_FILE");
-lf[24]=C_decode_literal(C_heaptop,"\376B\000\000\015bad immediate");
-lf[25]=C_h_intern(&lf[25],12,"\004coreliteral");
-lf[26]=C_decode_literal(C_heaptop,"\376B\000\000\013((C_word)li");
-lf[27]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[28]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
-lf[29]=C_h_intern(&lf[29],2,"if");
-lf[30]=C_decode_literal(C_heaptop,"\376B\000\000\005else{");
-lf[31]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
-lf[32]=C_decode_literal(C_heaptop,"\376B\000\000\013if(C_truep(");
-lf[33]=C_h_intern(&lf[33],9,"\004coreproc");
-lf[34]=C_decode_literal(C_heaptop,"\376B\000\000\010(C_word)");
-lf[35]=C_h_intern(&lf[35],9,"\004corebind");
-lf[36]=C_h_intern(&lf[36],16,"\004corelet_unboxed");
-lf[37]=C_h_intern(&lf[37],8,"\004coreref");
-lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\002)[");
-lf[39]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
-lf[40]=C_h_intern(&lf[40],10,"\004coreunbox");
-lf[41]=C_decode_literal(C_heaptop,"\376B\000\000\004)[1]");
-lf[42]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
-lf[43]=C_h_intern(&lf[43],13,"\004coreupdate_i");
-lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
-lf[45]=C_h_intern(&lf[45],11,"\004coreupdate");
-lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\002)+");
-lf[47]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[48]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
-lf[49]=C_h_intern(&lf[49],16,"\004coreupdatebox_i");
-lf[50]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
-lf[51]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
-lf[52]=C_h_intern(&lf[52],14,"\004coreupdatebox");
-lf[53]=C_decode_literal(C_heaptop,"\376B\000\000\004)+1,");
-lf[54]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
-lf[55]=C_h_intern(&lf[55],12,"\004coreclosure");
-lf[56]=C_decode_literal(C_heaptop,"\376B\000\000\021tmp=(C_word)a,a+=");
-lf[57]=C_decode_literal(C_heaptop,"\376B\000\000\005,tmp)");
-lf[58]=C_decode_literal(C_heaptop,"\376B\000\000\002a[");
-lf[59]=C_decode_literal(C_heaptop,"\376B\000\000\002]=");
-lf[60]=C_h_intern(&lf[60],4,"iota");
-lf[61]=C_decode_literal(C_heaptop,"\376B\000\000\023(*a=C_CLOSURE_TYPE|");
-lf[62]=C_h_intern(&lf[62],8,"\004corebox");
-lf[63]=C_decode_literal(C_heaptop,"\376B\000\000\030,tmp=(C_word)a,a+=2,tmp)");
-lf[64]=C_decode_literal(C_heaptop,"\376B\000\000\031(*a=C_VECTOR_TYPE|1,a[1]=");
-lf[65]=C_h_intern(&lf[65],10,"\004corelocal");
-lf[66]=C_h_intern(&lf[66],13,"\004coresetlocal");
-lf[67]=C_h_intern(&lf[67],11,"\004coreglobal");
-lf[68]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
-lf[69]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
-lf[70]=C_decode_literal(C_heaptop,"\376B\000\000\017C_retrieve2(lf[");
-lf[71]=C_decode_literal(C_heaptop,"\376B\000\000\002],");
-lf[72]=C_h_intern(&lf[72],21,"\010compilerc-ify-string");
-lf[73]=C_h_intern(&lf[73],14,"symbol->string");
-lf[74]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
-lf[75]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
-lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\016C_retrieve(lf[");
-lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
-lf[78]=C_h_intern(&lf[78],14,"\004coresetglobal");
-lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\012 /* (set! ");
-lf[80]=C_decode_literal(C_heaptop,"\376B\000\000\011 ...) */,");
-lf[81]=C_h_intern(&lf[81],17,"string-translate*");
-lf[82]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
-lf[83]=C_h_intern(&lf[83],8,"->string");
-lf[84]=C_h_intern(&lf[84],28,"\003syssymbol->qualified-string");
-lf[85]=C_decode_literal(C_heaptop,"\376B\000\000\015C_mutate(&lf[");
-lf[86]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
-lf[87]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mutate((C_word*)lf[");
-lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\003]+1");
-lf[89]=C_h_intern(&lf[89],16,"\004coresetglobal_i");
-lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
-lf[91]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
-lf[92]=C_decode_literal(C_heaptop,"\376B\000\000\005 */ =");
-lf[93]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
-lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\024C_set_block_item(lf[");
-lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
-lf[96]=C_decode_literal(C_heaptop,"\376B\000\000\006 */,0,");
-lf[97]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
-lf[98]=C_h_intern(&lf[98],14,"\004coreundefined");
-lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\022C_SCHEME_UNDEFINED");
-lf[100]=C_h_intern(&lf[100],9,"\004corecall");
-lf[101]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[102]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
-lf[103]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
-lf[104]=C_decode_literal(C_heaptop,"\376B\000\000\002c=");
-lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
-lf[106]=C_h_intern(&lf[106],26,"lambda-literal-temporaries");
-lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[108]=C_h_intern(&lf[108],22,"lambda-literal-looping");
-lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
-lf[111]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
-lf[112]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[113]=C_decode_literal(C_heaptop,"\376B\000\000\030C_retrieve2_symbol_proc(");
-lf[114]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[115]=C_h_intern(&lf[115],13,"string-append");
-lf[116]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
-lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
-lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
-lf[119]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
-lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
-lf[122]=C_decode_literal(C_heaptop,"\376B\000\000\032C_retrieve_symbol_proc(lf[");
-lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
-lf[124]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
-lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
-lf[126]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
-lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[128]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[129]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
-lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
-lf[131]=C_h_intern(&lf[131],6,"unsafe");
-lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\024(void*)(*((C_word*)t");
-lf[133]=C_decode_literal(C_heaptop,"\376B\000\000\004+1))");
-lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\021C_retrieve_proc(t");
-lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[136]=C_h_intern(&lf[136],28,"\010compilerno-procedure-checks");
-lf[137]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
-lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[139]=C_h_intern(&lf[139],24,"\010compileremit-trace-info");
-lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\011C_trace(\042");
-lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\003\042);");
-lf[142]=C_h_intern(&lf[142],16,"string-translate");
-lf[143]=C_decode_literal(C_heaptop,"\376B\000\000\001\134");
-lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[145]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
-lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
-lf[147]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
-lf[148]=C_h_intern(&lf[148],27,"lambda-literal-closure-size");
-lf[149]=C_h_intern(&lf[149],28,"\010compilersource-info->string");
-lf[150]=C_h_intern(&lf[150],12,"\004corerecurse");
-lf[151]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
-lf[152]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
-lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\003t0,");
-lf[154]=C_h_intern(&lf[154],16,"\004coredirect_call");
-lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i(&a,");
-lf[156]=C_h_intern(&lf[156],13,"\004corecallunit");
-lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[158]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel(");
-lf[160]=C_decode_literal(C_heaptop,"\376B\000\000\024,C_SCHEME_UNDEFINED,");
-lf[161]=C_h_intern(&lf[161],11,"\004corereturn");
-lf[162]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\007return(");
-lf[164]=C_h_intern(&lf[164],11,"\004coreinline");
-lf[165]=C_h_intern(&lf[165],20,"\004coreinline_allocate");
-lf[166]=C_decode_literal(C_heaptop,"\376B\000\000\004(&a,");
-lf[167]=C_h_intern(&lf[167],15,"\004coreinline_ref");
-lf[168]=C_h_intern(&lf[168],34,"\010compilerforeign-result-conversion");
-lf[169]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
-lf[170]=C_h_intern(&lf[170],18,"\004coreinline_update");
-lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\025),C_SCHEME_UNDEFINED)");
-lf[172]=C_decode_literal(C_heaptop,"\376B\000\000\002=(");
-lf[173]=C_h_intern(&lf[173],36,"\010compilerforeign-argument-conversion");
-lf[174]=C_h_intern(&lf[174],33,"\010compilerforeign-type-declaration");
-lf[175]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[176]=C_h_intern(&lf[176],19,"\004coreinline_loc_ref");
-lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\003)))");
-lf[178]=C_decode_literal(C_heaptop,"\376B\000\000\003*((");
-lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\021*)C_data_pointer(");
-lf[180]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
-lf[182]=C_h_intern(&lf[182],22,"\004coreinline_loc_update");
-lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\025),C_SCHEME_UNDEFINED)");
-lf[184]=C_decode_literal(C_heaptop,"\376B\000\000\003))=");
-lf[185]=C_decode_literal(C_heaptop,"\376B\000\000\004((*(");
-lf[186]=C_decode_literal(C_heaptop,"\376B\000\000\021*)C_data_pointer(");
-lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[188]=C_h_intern(&lf[188],16,"\004coreunboxed_ref");
-lf[189]=C_h_intern(&lf[189],17,"\004coreunboxed_set!");
-lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\025),C_SCHEME_UNDEFINED)");
-lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\002((");
-lf[192]=C_h_intern(&lf[192],19,"\004coreinline_unboxed");
-lf[193]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[194]=C_h_intern(&lf[194],11,"\004coreswitch");
-lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\010default:");
-lf[196]=C_decode_literal(C_heaptop,"\376B\000\000\005case ");
-lf[197]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
-lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\007switch(");
-lf[199]=C_h_intern(&lf[199],9,"\004corecond");
-lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\002)\077");
-lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\011(C_truep(");
-lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\010bad form");
-lf[203]=C_h_intern(&lf[203],13,"pair-for-each");
-lf[204]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
-lf[205]=C_h_intern(&lf[205],30,"\010compilerexternal-protos-first");
-lf[206]=C_h_intern(&lf[206],50,"\010compilergenerate-foreign-callback-stub-prototypes");
-lf[207]=C_h_intern(&lf[207],22,"foreign-callback-stubs");
-lf[208]=C_h_intern(&lf[208],29,"\010compilerforeign-declarations");
-lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\002*/");
-lf[210]=C_decode_literal(C_heaptop,"\376B\000\000\012#include \042");
-lf[211]=C_h_intern(&lf[211],28,"\010compilertarget-include-file");
-lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\001\042");
-lf[213]=C_h_intern(&lf[213],18,"\010compilerunit-name");
-lf[214]=C_decode_literal(C_heaptop,"\376B\000\000\011 unit: ");
-lf[215]=C_h_intern(&lf[215],19,"\010compilerused-units");
-lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\017 used units: ");
-lf[217]=C_h_intern(&lf[217],27,"\010compilercompiler-arguments");
-lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\022/* Generated from ");
-lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\030 by the CHICKEN compiler");
-lf[220]=C_decode_literal(C_heaptop,"\376B\000\0000 http://www.call-with-current-continuation.org");
-lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
-lf[222]=C_decode_literal(C_heaptop,"\376B\000\000\021 command line: ");
-lf[223]=C_h_intern(&lf[223],18,"string-intersperse");
-lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
-lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[227]=C_h_intern(&lf[227],7,"\003sysmap");
-lf[228]=C_h_intern(&lf[228],12,"string-split");
-lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[230]=C_h_intern(&lf[230],15,"chicken-version");
-lf[231]=C_h_intern(&lf[231],18,"\003sysdecode-seconds");
-lf[232]=C_h_intern(&lf[232],15,"current-seconds");
-lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\002};");
-lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\002,0");
-lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_char C_TLS li");
-lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\026[] C_aligned={C_lihdr(");
-lf[237]=C_h_intern(&lf[237],23,"\003syslambda-info->string");
-lf[238]=C_decode_literal(C_heaptop,"\376B\000\000)static double C_possibly_force_alignment;");
-lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\027static C_TLS C_word lf[");
-lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\002];");
-lf[241]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
-lf[242]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel)");
-lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\036C_externimport void C_ccall C_");
-lf[244]=C_decode_literal(C_heaptop,"\376B\000\000._toplevel(C_word c,C_word d,C_word k) C_noret;");
-lf[245]=C_decode_literal(C_heaptop,"\376B\000\000+static C_PTABLE_ENTRY *create_ptable(void);");
-lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
-lf[247]=C_h_intern(&lf[247],9,"make-list");
-lf[248]=C_decode_literal(C_heaptop,"\376B\000\000\007,C_word");
-lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\025typedef void (*C_proc");
-lf[250]=C_decode_literal(C_heaptop,"\376B\000\000\010)(C_word");
-lf[251]=C_h_intern(&lf[251],4,"none");
-lf[252]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
-lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
-lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
-lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
-lf[257]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
-lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\016,...) C_noret;");
-lf[259]=C_decode_literal(C_heaptop,"\376B\000\000\010 C_noret");
-lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
-lf[261]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
-lf[262]=C_h_intern(&lf[262],8,"toplevel");
-lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\034C_externexport void C_ccall ");
-lf[265]=C_h_intern(&lf[265],27,"\010compileremit-unsafe-marker");
-lf[266]=C_decode_literal(C_heaptop,"\376B\000\0001C_externexport void C_dynamic_and_unsafe(void) {}");
-lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
-lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[269]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
-lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
-lf[271]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
-lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
-lf[273]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
-lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
-lf[275]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
-lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
-lf[277]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[278]=C_h_intern(&lf[278],21,"small-parameter-limit");
-lf[279]=C_h_intern(&lf[279],11,"lset-adjoin");
-lf[280]=C_h_intern(&lf[280],1,"=");
-lf[281]=C_h_intern(&lf[281],32,"lambda-literal-callee-signatures");
-lf[282]=C_h_intern(&lf[282],24,"lambda-literal-allocated");
-lf[283]=C_h_intern(&lf[283],21,"lambda-literal-direct");
-lf[284]=C_h_intern(&lf[284],33,"lambda-literal-rest-argument-mode");
-lf[285]=C_h_intern(&lf[285],28,"lambda-literal-rest-argument");
-lf[286]=C_h_intern(&lf[286],27,"\010compilermake-variable-list");
-lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[288]=C_h_intern(&lf[288],27,"lambda-literal-customizable");
-lf[289]=C_h_intern(&lf[289],29,"lambda-literal-argument-count");
-lf[290]=C_decode_literal(C_heaptop,"\376B\000\000\020C_adjust_stack(-");
-lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
-lf[293]=C_decode_literal(C_heaptop,"\376B\000\000\010=C_pick(");
-lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[295]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
-lf[296]=C_h_intern(&lf[296],27,"\010compilermake-argument-list");
-lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[298]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
-lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\006(a,n);");
-lf[300]=C_decode_literal(C_heaptop,"\376B\000\000\007_vector");
-lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\017=C_restore_rest");
-lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n+1);");
-lf[303]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n*3);");
-lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\022n=C_rest_count(0);");
-lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
-lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
-lf[307]=C_decode_literal(C_heaptop,"\376B\000\000\006int n;");
-lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word *a,t");
-lf[309]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
-lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
-lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
-lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
-lf[315]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[316]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
-lf[317]=C_h_intern(&lf[317],12,"\003sysfor-each");
-lf[318]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
-lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[320]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
-lf[321]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
-lf[322]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
-lf[323]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
-lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
-lf[325]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[326]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
-lf[327]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
-lf[328]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
-lf[329]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
-lf[330]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[331]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
-lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\016(void *dummy){");
-lf[333]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
-lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[335]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
-lf[336]=C_decode_literal(C_heaptop,"\376B\000\000 (void *dummy) C_regparm C_noret;");
-lf[337]=C_h_intern(&lf[337],23,"lambda-literal-external");
-lf[338]=C_h_intern(&lf[338],17,"get-output-string");
-lf[339]=C_h_intern(&lf[339],19,"\003syswrite-char/port");
-lf[340]=C_h_intern(&lf[340],5,"write");
-lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
-lf[342]=C_h_intern(&lf[342],18,"open-output-string");
-lf[343]=C_h_intern(&lf[343],25,"\010compilerwords-per-flonum");
-lf[344]=C_h_intern(&lf[344],6,"reduce");
-lf[345]=C_h_intern(&lf[345],1,"+");
-lf[346]=C_h_intern(&lf[346],12,"vector->list");
-lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\035type of literal not supported");
-lf[348]=C_h_intern(&lf[348],14,"\010compilerwords");
-lf[349]=C_h_intern(&lf[349],15,"\003sysbytevector\077");
-lf[350]=C_h_intern(&lf[350],32,"\010compilerblock-variable-literal\077");
-lf[351]=C_h_intern(&lf[351],19,"\010compilerimmediate\077");
-lf[352]=C_decode_literal(C_heaptop,"\376B\000\000\007=C_fix(");
-lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[354]=C_h_intern(&lf[354],19,"\003sysundefined-value");
-lf[355]=C_decode_literal(C_heaptop,"\376B\000\000\024=C_SCHEME_UNDEFINED;");
-lf[356]=C_decode_literal(C_heaptop,"\376B\000\000\015C_SCHEME_TRUE");
-lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\016C_SCHEME_FALSE");
-lf[358]=C_decode_literal(C_heaptop,"\376B\000\000\022=C_make_character(");
-lf[359]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[360]=C_decode_literal(C_heaptop,"\376B\000\000\014C_h_intern(&");
-lf[361]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[362]=C_decode_literal(C_heaptop,"\376B\000\000\001=");
-lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\026=C_SCHEME_END_OF_LIST;");
-lf[364]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[365]=C_h_intern(&lf[365],23,"\010compilerencode-literal");
-lf[366]=C_decode_literal(C_heaptop,"\376B\000\000\034=C_decode_literal(C_heaptop,");
-lf[367]=C_h_intern(&lf[367],20,"\010compilerbig-fixnum\077");
-lf[368]=C_h_intern(&lf[368],6,"modulo");
-lf[369]=C_h_intern(&lf[369],3,"fx/");
-lf[370]=C_h_intern(&lf[370],14,"\003syscopy-bytes");
-lf[371]=C_h_intern(&lf[371],11,"make-string");
-lf[372]=C_h_intern(&lf[372],19,"lambda-literal-body");
-lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\022C_word *a=C_alloc(");
-lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[375]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
-lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
-lf[377]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
-lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
-lf[379]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
-lf[380]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
-lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
-lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\004);}}");
-lf[383]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[384]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
-lf[385]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[386]=C_decode_literal(C_heaptop,"\376B\000\000#=C_restore_rest(a,C_rest_count(0));");
-lf[387]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
-lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\005else{");
-lf[389]=C_decode_literal(C_heaptop,"\376B\000\000\015a=C_alloc((c-");
-lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\005)*3);");
-lf[391]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\001r");
-lf[393]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
-lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
-lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
-lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
-lf[397]=C_decode_literal(C_heaptop,"\376B\000\000\005,NULL");
-lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[399]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
-lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
-lf[401]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
-lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\022C_register_lf2(lf,");
-lf[403]=C_decode_literal(C_heaptop,"\376B\000\000\022,create_ptable());");
-lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\023C_initialize_lf(lf,");
-lf[405]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
-lf[407]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\017if(!C_demand_2(");
-lf[409]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
-lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
-lf[411]=C_decode_literal(C_heaptop,"\376B\000\000\015C_rereclaim2(");
-lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\024*sizeof(C_word), 1);");
-lf[413]=C_decode_literal(C_heaptop,"\376B\000\000\016t1=C_restore;}");
-lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\030C_check_nursery_minimum(");
-lf[415]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\015if(!C_demand(");
-lf[417]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
-lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
-lf[419]=C_decode_literal(C_heaptop,"\376B\000\000,C_reclaim((void*)toplevel_trampoline,NULL);}");
-lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\027toplevel_initialized=1;");
-lf[421]=C_h_intern(&lf[421],26,"\010compilertarget-stack-size");
-lf[422]=C_decode_literal(C_heaptop,"\376B\000\000\017C_resize_stack(");
-lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[424]=C_h_intern(&lf[424],30,"\010compilertarget-heap-shrinkage");
-lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\021C_heap_shrinkage=");
-lf[426]=C_h_intern(&lf[426],27,"\010compilertarget-heap-growth");
-lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\016C_heap_growth=");
-lf[428]=C_h_intern(&lf[428],33,"\010compilertarget-initial-heap-size");
-lf[429]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
-lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
-lf[431]=C_h_intern(&lf[431],25,"\010compilertarget-heap-size");
-lf[432]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
-lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
-lf[434]=C_decode_literal(C_heaptop,"\376B\000\000\027C_heap_size_is_fixed=1;");
-lf[435]=C_h_intern(&lf[435],40,"\010compilerdisable-stack-overflow-checking");
-lf[436]=C_decode_literal(C_heaptop,"\376B\000\000\033C_disable_overflow_check=1;");
-lf[437]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
-lf[438]=C_decode_literal(C_heaptop,"\376B\000\000;if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);");
-lf[439]=C_decode_literal(C_heaptop,"\376B\000\000\036else C_toplevel_entry(C_text(\042");
-lf[440]=C_decode_literal(C_heaptop,"\376B\000\000\004\042));");
-lf[441]=C_h_intern(&lf[441],4,"fold");
-lf[442]=C_decode_literal(C_heaptop,"\376B\000\000\035if(!C_demand(c*C_SIZEOF_PAIR+");
-lf[443]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
-lf[444]=C_h_intern(&lf[444],28,"\010compilerinsert-timer-checks");
-lf[445]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
-lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
-lf[447]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
-lf[448]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
-lf[449]=C_h_intern(&lf[449],23,"\010compilerno-argc-checks");
-lf[450]=C_decode_literal(C_heaptop,"\376B\000\000\004,c2,");
-lf[451]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[452]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
-lf[453]=C_decode_literal(C_heaptop,"\376B\000\000\014C_save_rest(");
-lf[454]=C_decode_literal(C_heaptop,"\376B\000\000\017C_word *a,c2=c;");
-lf[455]=C_decode_literal(C_heaptop,"\376B\000\000\012va_list v;");
-lf[456]=C_decode_literal(C_heaptop,"\376B\000\000\026if(!C_stack_probe(a)){");
-lf[457]=C_decode_literal(C_heaptop,"\376B\000\000\027if(!C_stack_probe(&a)){");
-lf[458]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
-lf[459]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
-lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
-lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
-lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\006if(c!=");
-lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\021) C_bad_argc_2(c,");
-lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
-lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
-lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
-lf[467]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
-lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[469]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word ab[");
-lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\010],*a=ab;");
-lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\016C_stack_check;");
-lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
-lf[473]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
-lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
-lf[475]=C_h_intern(&lf[475],6,"fixnum");
-lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
-lf[477]=C_h_intern(&lf[477],6,"flonum");
-lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\006double");
-lf[479]=C_decode_literal(C_heaptop,"\376B\000\000\004char");
-lf[480]=C_h_intern(&lf[480],7,"pointer");
-lf[481]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
-lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
-lf[483]=C_decode_literal(C_heaptop,"\376B\000\000\024invalid unboxed type");
-lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
-lf[485]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
-lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
-lf[487]=C_decode_literal(C_heaptop,"\376B\000\000\004,...");
-lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
-lf[489]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
-lf[490]=C_decode_literal(C_heaptop,"\376B\000\000!C_noret_decl(toplevel_trampoline)");
-lf[491]=C_decode_literal(C_heaptop,"\376B\000\000Gstatic void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;");
-lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\077C_regparm static void C_fcall toplevel_trampoline(void *dummy){");
-lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-lf[494]=C_decode_literal(C_heaptop,"\376B\000\000\042(2,C_SCHEME_UNDEFINED,C_restore);}");
-lf[495]=C_decode_literal(C_heaptop,"\376B\000\000\017void C_ccall C_");
-lf[496]=C_decode_literal(C_heaptop,"\376B\000\000\022C_main_entry_point");
-lf[497]=C_decode_literal(C_heaptop,"\376B\000\000(static C_TLS int toplevel_initialized=0;");
-lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
-lf[499]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
-lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
-lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
-lf[502]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
-lf[503]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
-lf[504]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
-lf[505]=C_h_intern(&lf[505],16,"\010compilercleanup");
-lf[506]=C_h_intern(&lf[506],18,"\010compilerdebugging");
-lf[507]=C_h_intern(&lf[507],1,"o");
-lf[508]=C_decode_literal(C_heaptop,"\376B\000\000 dropping unused closure argument");
-lf[509]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
-lf[510]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
-lf[511]=C_h_intern(&lf[511],34,"lambda-literal-unboxed-temporaries");
-lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[513]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[514]=C_h_intern(&lf[514],18,"\010compilerreal-name");
-lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\021/* end of file */");
-lf[516]=C_h_intern(&lf[516],25,"emit-procedure-table-info");
-lf[517]=C_h_intern(&lf[517],31,"generate-foreign-callback-stubs");
-lf[518]=C_h_intern(&lf[518],31,"\010compilergenerate-foreign-stubs");
-lf[519]=C_h_intern(&lf[519],29,"\010compilerforeign-lambda-stubs");
-lf[520]=C_h_intern(&lf[520],36,"\010compilergenerate-external-variables");
-lf[521]=C_h_intern(&lf[521],27,"\010compilerexternal-variables");
-lf[522]=C_h_intern(&lf[522],1,"p");
-lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\030code generation phase...");
-lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\001{");
-lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
-lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\016return ptable;");
-lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\005#else");
-lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\014return NULL;");
-lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
-lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\001}");
-lf[531]=C_decode_literal(C_heaptop,"\376B\000\000*static C_PTABLE_ENTRY *create_ptable(void)");
-lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
-lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\015{NULL,NULL}};");
-lf[534]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\013_toplevel},");
-lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\014C_toplevel},");
-lf[537]=C_decode_literal(C_heaptop,"\376B\000\000\002},");
-lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\002{\042");
-lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\011\042,(void*)");
-lf[540]=C_h_intern(&lf[540],29,"\010compilerstring->c-identifier");
-lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
-lf[542]=C_decode_literal(C_heaptop,"\376B\000\000\035static C_PTABLE_ENTRY ptable[");
-lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\005] = {");
-lf[544]=C_h_intern(&lf[544],11,"string-copy");
-lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
-lf[546]=C_h_intern(&lf[546],13,"list-tabulate");
-lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[548]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
-lf[549]=C_h_intern(&lf[549],41,"\010compilergenerate-foreign-callback-header");
-lf[550]=C_decode_literal(C_heaptop,"\376B\000\000\017C_externexport ");
-lf[551]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
-lf[552]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
-lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
-lf[554]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
-lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\015#undef return");
-lf[556]=C_decode_literal(C_heaptop,"\376B\000\000\006C_ret:");
-lf[557]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
-lf[558]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
-lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
-lf[560]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
-lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[562]=C_h_intern(&lf[562],4,"void");
-lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[564]=C_decode_literal(C_heaptop,"\376B\000\000\004C_r=");
-lf[565]=C_decode_literal(C_heaptop,"\376B\000\0003int C_level=C_save_callback_continuation(&C_a,C_k);");
-lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\002=(");
-lf[567]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
-lf[568]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[570]=C_decode_literal(C_heaptop,"\376B\000\0002C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;");
-lf[571]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
-lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
-lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
-lf[574]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
-lf[575]=C_decode_literal(C_heaptop,"\376B\000\000\014) C_regparm;");
-lf[576]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static C_word C_fcall ");
-lf[577]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
-lf[578]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[579]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
-lf[580]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
-lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_word C_fcall ");
-lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\042#define return(x) C_cblock C_r = (");
-lf[583]=C_decode_literal(C_heaptop,"\376B\000\000\036(x))); goto C_ret; C_cblockend");
-lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
-lf[585]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
-lf[586]=C_h_intern(&lf[586],21,"foreign-stub-callback");
-lf[587]=C_h_intern(&lf[587],16,"foreign-stub-cps");
-lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
-lf[589]=C_h_intern(&lf[589],27,"foreign-stub-argument-names");
-lf[590]=C_h_intern(&lf[590],17,"foreign-stub-body");
-lf[591]=C_h_intern(&lf[591],17,"foreign-stub-name");
-lf[592]=C_h_intern(&lf[592],24,"foreign-stub-return-type");
-lf[593]=C_decode_literal(C_heaptop,"\376B\000\000\014C_word C_buf");
-lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
-lf[595]=C_h_intern(&lf[595],27,"foreign-stub-argument-types");
-lf[596]=C_h_intern(&lf[596],19,"\010compilerreal-name2");
-lf[597]=C_h_intern(&lf[597],15,"foreign-stub-id");
-lf[598]=C_h_intern(&lf[598],5,"float");
-lf[599]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
-lf[600]=C_h_intern(&lf[600],8,"c-string");
-lf[601]=C_decode_literal(C_heaptop,"\376B\000\000\004+2+(");
-lf[602]=C_decode_literal(C_heaptop,"\376B\000\000!==NULL\0771:C_bytestowords(C_strlen(");
-lf[603]=C_decode_literal(C_heaptop,"\376B\000\000\003)))");
-lf[604]=C_h_intern(&lf[604],16,"nonnull-c-string");
-lf[605]=C_decode_literal(C_heaptop,"\376B\000\000\033+2+C_bytestowords(C_strlen(");
-lf[606]=C_decode_literal(C_heaptop,"\376B\000\000\002))");
-lf[607]=C_h_intern(&lf[607],3,"ref");
-lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
-lf[609]=C_h_intern(&lf[609],5,"const");
-lf[610]=C_h_intern(&lf[610],9,"c-pointer");
-lf[611]=C_h_intern(&lf[611],15,"nonnull-pointer");
-lf[612]=C_h_intern(&lf[612],17,"nonnull-c-pointer");
-lf[613]=C_h_intern(&lf[613],8,"function");
-lf[614]=C_h_intern(&lf[614],8,"instance");
-lf[615]=C_h_intern(&lf[615],16,"nonnull-instance");
-lf[616]=C_h_intern(&lf[616],12,"instance-ref");
-lf[617]=C_h_intern(&lf[617],18,"\003syshash-table-ref");
-lf[618]=C_h_intern(&lf[618],27,"\010compilerforeign-type-table");
-lf[619]=C_h_intern(&lf[619],17,"nonnull-c-string*");
-lf[620]=C_h_intern(&lf[620],25,"nonnull-unsigned-c-string");
-lf[621]=C_h_intern(&lf[621],26,"nonnull-unsigned-c-string*");
-lf[622]=C_h_intern(&lf[622],6,"symbol");
-lf[623]=C_h_intern(&lf[623],9,"c-string*");
-lf[624]=C_h_intern(&lf[624],17,"unsigned-c-string");
-lf[625]=C_h_intern(&lf[625],18,"unsigned-c-string*");
-lf[626]=C_h_intern(&lf[626],6,"double");
-lf[627]=C_h_intern(&lf[627],16,"unsigned-integer");
-lf[628]=C_h_intern(&lf[628],18,"unsigned-integer32");
-lf[629]=C_h_intern(&lf[629],4,"long");
-lf[630]=C_h_intern(&lf[630],7,"integer");
-lf[631]=C_h_intern(&lf[631],9,"integer32");
-lf[632]=C_h_intern(&lf[632],13,"unsigned-long");
-lf[633]=C_h_intern(&lf[633],6,"number");
-lf[634]=C_h_intern(&lf[634],9,"integer64");
-lf[635]=C_h_intern(&lf[635],13,"c-string-list");
-lf[636]=C_h_intern(&lf[636],14,"c-string-list*");
-lf[637]=C_h_intern(&lf[637],3,"int");
-lf[638]=C_h_intern(&lf[638],5,"int32");
-lf[639]=C_h_intern(&lf[639],5,"short");
-lf[640]=C_h_intern(&lf[640],14,"unsigned-short");
-lf[641]=C_h_intern(&lf[641],13,"scheme-object");
-lf[642]=C_h_intern(&lf[642],13,"unsigned-char");
-lf[643]=C_h_intern(&lf[643],12,"unsigned-int");
-lf[644]=C_h_intern(&lf[644],14,"unsigned-int32");
-lf[645]=C_h_intern(&lf[645],4,"byte");
-lf[646]=C_h_intern(&lf[646],13,"unsigned-byte");
-lf[647]=C_decode_literal(C_heaptop,"\376B\000\000\002;}");
-lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\033C_callback_wrapper((void *)");
-lf[649]=C_decode_literal(C_heaptop,"\376B\000\000\007return ");
-lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\002x=");
-lf[651]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\012C_save(x);");
-lf[653]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
-lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\035C_callback_adjust_stack(a,s);");
-lf[655]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word x,s=");
-lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\017,*a=C_alloc(s);");
-lf[657]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
-lf[659]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
-lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
-lf[661]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[662]=C_h_intern(&lf[662],36,"foreign-callback-stub-argument-types");
-lf[663]=C_h_intern(&lf[663],33,"foreign-callback-stub-return-type");
-lf[664]=C_h_intern(&lf[664],24,"foreign-callback-stub-id");
-lf[665]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[667]=C_h_intern(&lf[667],32,"foreign-callback-stub-qualifiers");
-lf[668]=C_h_intern(&lf[668],26,"foreign-callback-stub-name");
-lf[669]=C_h_intern(&lf[669],4,"quit");
-lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal foreign type `~A\047");
-lf[671]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\006C_word");
-lf[673]=C_decode_literal(C_heaptop,"\376B\000\000\006C_char");
-lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned C_char");
-lf[675]=C_decode_literal(C_heaptop,"\376B\000\000\014unsigned int");
-lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\005C_u32");
-lf[677]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
-lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s32");
-lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s64");
-lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\005short");
-lf[681]=C_decode_literal(C_heaptop,"\376B\000\000\004long");
-lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned short");
-lf[683]=C_decode_literal(C_heaptop,"\376B\000\000\015unsigned long");
-lf[684]=C_decode_literal(C_heaptop,"\376B\000\000\005float");
-lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\006double");
-lf[686]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
-lf[687]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
-lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\011C_char **");
-lf[689]=C_h_intern(&lf[689],11,"byte-vector");
-lf[690]=C_h_intern(&lf[690],19,"nonnull-byte-vector");
-lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
-lf[692]=C_h_intern(&lf[692],4,"blob");
-lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
-lf[694]=C_h_intern(&lf[694],9,"u16vector");
-lf[695]=C_h_intern(&lf[695],17,"nonnull-u16vector");
-lf[696]=C_decode_literal(C_heaptop,"\376B\000\000\020unsigned short *");
-lf[697]=C_h_intern(&lf[697],8,"s8vector");
-lf[698]=C_h_intern(&lf[698],16,"nonnull-s8vector");
-lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
-lf[700]=C_h_intern(&lf[700],9,"u32vector");
-lf[701]=C_h_intern(&lf[701],17,"nonnull-u32vector");
-lf[702]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned int *");
-lf[703]=C_h_intern(&lf[703],9,"s16vector");
-lf[704]=C_h_intern(&lf[704],17,"nonnull-s16vector");
-lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\007short *");
-lf[706]=C_h_intern(&lf[706],9,"s32vector");
-lf[707]=C_h_intern(&lf[707],17,"nonnull-s32vector");
-lf[708]=C_decode_literal(C_heaptop,"\376B\000\000\005int *");
-lf[709]=C_h_intern(&lf[709],9,"f32vector");
-lf[710]=C_h_intern(&lf[710],17,"nonnull-f32vector");
-lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\007float *");
-lf[712]=C_h_intern(&lf[712],9,"f64vector");
-lf[713]=C_h_intern(&lf[713],17,"nonnull-f64vector");
-lf[714]=C_decode_literal(C_heaptop,"\376B\000\000\010double *");
-lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
-lf[716]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
-lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\004void");
-lf[718]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
-lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
-lf[720]=C_decode_literal(C_heaptop,"\376B\000\000\001<");
-lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\002> ");
-lf[722]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[724]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\006const ");
-lf[726]=C_decode_literal(C_heaptop,"\376B\000\000\007struct ");
-lf[727]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[728]=C_decode_literal(C_heaptop,"\376B\000\000\006union ");
-lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[730]=C_decode_literal(C_heaptop,"\376B\000\000\005enum ");
-lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[732]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
-lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
-lf[734]=C_decode_literal(C_heaptop,"\376B\000\000\003 (*");
-lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
-lf[736]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[738]=C_h_intern(&lf[738],3,"...");
-lf[739]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
-lf[740]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[741]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[742]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[743]=C_h_intern(&lf[743],9,"\003syserror");
-lf[744]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[745]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010instance\376\003\000\000\002\376\001\000\000\020nonnull-instance\376\377\016");
-lf[746]=C_h_intern(&lf[746],4,"enum");
-lf[747]=C_h_intern(&lf[747],5,"union");
-lf[748]=C_h_intern(&lf[748],6,"struct");
-lf[749]=C_h_intern(&lf[749],8,"template");
-lf[750]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007pointer\376\003\000\000\002\376\001\000\000\017nonnull-pointer\376\003\000\000\002\376\001\000\000\011c-pointer\376\003\000\000\002\376\001\000\000\021nonnull-c"
-"-pointer\376\377\016");
-lf[751]=C_h_intern(&lf[751],12,"nonnull-blob");
-lf[752]=C_h_intern(&lf[752],8,"u8vector");
-lf[753]=C_h_intern(&lf[753],16,"nonnull-u8vector");
-lf[754]=C_h_intern(&lf[754],14,"scheme-pointer");
-lf[755]=C_h_intern(&lf[755],22,"nonnull-scheme-pointer");
-lf[756]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal foreign argument type `~A\047");
-lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[758]=C_decode_literal(C_heaptop,"\376B\000\000\031C_character_code((C_word)");
-lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
-lf[760]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
-lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\030(unsigned short)C_unfix(");
-lf[762]=C_decode_literal(C_heaptop,"\376B\000\000\027C_num_to_unsigned_long(");
-lf[763]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_double(");
-lf[764]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
-lf[765]=C_decode_literal(C_heaptop,"\376B\000\000\017C_num_to_int64(");
-lf[766]=C_decode_literal(C_heaptop,"\376B\000\000\016C_num_to_long(");
-lf[767]=C_decode_literal(C_heaptop,"\376B\000\000\026C_num_to_unsigned_int(");
-lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
-lf[769]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
-lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
-lf[771]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
-lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
-lf[773]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
-lf[774]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
-lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
-lf[776]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
-lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
-lf[778]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_u8vector_or_null(");
-lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_u8vector(");
-lf[780]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u16vector_or_null(");
-lf[781]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u16vector(");
-lf[782]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u32vector_or_null(");
-lf[783]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u32vector(");
-lf[784]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_s8vector_or_null(");
-lf[785]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_s8vector(");
-lf[786]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s16vector_or_null(");
-lf[787]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s16vector(");
-lf[788]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s32vector_or_null(");
-lf[789]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s32vector(");
-lf[790]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f32vector_or_null(");
-lf[791]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f32vector(");
-lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f64vector_or_null(");
-lf[793]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f64vector(");
-lf[794]=C_decode_literal(C_heaptop,"\376B\000\000\021C_string_or_null(");
-lf[795]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_string(");
-lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\010C_truep(");
-lf[797]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
-lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
-lf[799]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
-lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
-lf[801]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
-lf[802]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
-lf[803]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
-lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
-lf[805]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
-lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\020)C_c_pointer_nn(");
-lf[807]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
-lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
-lf[809]=C_decode_literal(C_heaptop,"\376B\000\000\021*)C_c_pointer_nn(");
-lf[810]=C_decode_literal(C_heaptop,"\376B\000\000 illegal foreign return type `~A\047");
-lf[811]=C_decode_literal(C_heaptop,"\376B\000\000\031C_make_character((C_word)");
-lf[812]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fix((C_word)");
-lf[813]=C_decode_literal(C_heaptop,"\376B\000\000%C_fix(C_MOST_POSITIVE_FIXNUM&(C_word)");
-lf[814]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fix((short)");
-lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\025C_fix(0xffff&(C_word)");
-lf[816]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fix((char)");
-lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fix(0xff&(C_word)");
-lf[818]=C_decode_literal(C_heaptop,"\376B\000\000\012C_flonum(&");
-lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\012C_number(&");
-lf[820]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
-lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
-lf[825]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_double_to_num(&");
-lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\027C_unsigned_int_to_num(&");
-lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\017C_long_to_num(&");
-lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\030C_unsigned_long_to_num(&");
-lf[829]=C_decode_literal(C_heaptop,"\376B\000\000\012C_mk_bool(");
-lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\011((C_word)");
-lf[831]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[833]=C_decode_literal(C_heaptop,"\376B\000\000\011,(void*)&");
-lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[836]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
-lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[839]=C_decode_literal(C_heaptop,"\376B\000\000\011,(void*)&");
-lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[841]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[842]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
-lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
-lf[844]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
-lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\001");
-lf[847]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\000");
-lf[848]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\012");
-lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\016");
-lf[850]=C_decode_literal(C_heaptop,"\376B\000\000\002\377>");
-lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\036");
-lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\002\377U");
-lf[853]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
-lf[854]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\001");
-lf[855]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
-lf[856]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
-lf[857]=C_decode_literal(C_heaptop,"\376B\000\000\001\001");
-lf[858]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid literal - cannot encode");
-lf[859]=C_h_intern(&lf[859],17,"\003sysstring-append");
-lf[860]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[861]=C_h_intern(&lf[861],5,"cons*");
-lf[862]=C_h_intern(&lf[862],6,"random");
-lf[863]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-C_register_lf2(lf,864,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2508,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k2506 */
-static void C_ccall f_2508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2508,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2511,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k2509 in k2506 */
-static void C_ccall f_2511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2511,2,t0,t1);}
-t2=C_set_block_item(lf[0] /* output */,0,C_SCHEME_FALSE);
-t3=C_mutate((C_word*)lf[1]+1 /* (set! gen ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2514,tmp=(C_word)a,a+=2,tmp));
-t4=C_mutate((C_word*)lf[4]+1 /* (set! gen-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2557,tmp=(C_word)a,a+=2,tmp));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2597,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10305,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}
-
-/* k10303 in k2509 in k2506 */
-static void C_ccall f_10305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10305,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10308,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[863],t1);}
-
-/* k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10308,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10331,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10335,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 57 random");
-((C_proc3)C_retrieve_symbol_proc(lf[862]))(3,*((C_word*)lf[862]+1),t4,C_fix(16777216));}
-
-/* k10333 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("number->string");
-C_number_to_string(4,0,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k10329 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10311,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(95),((C_word*)t0)[2]);}
-
-/* k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10327,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 57 current-seconds");
-((C_proc2)C_retrieve_symbol_proc(lf[232]))(2,*((C_word*)lf[232]+1),t3);}
-
-/* k10325 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10317,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(95),((C_word*)t0)[2]);}
-
-/* k10318 in k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10320,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),t2,((C_word*)t0)[2]);}
-
-/* k10321 in k10318 in k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
-static void C_ccall f_10323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 56 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[540]))(3,*((C_word*)lf[540]+1),((C_word*)t0)[2],t1);}
-
-/* k2595 in k2509 in k2506 */
-static void C_ccall f_2597(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2597,2,t0,t1);}
-t2=C_mutate((C_word*)lf[6]+1 /* (set! unique-id ...) */,t1);
-t3=C_mutate((C_word*)lf[7]+1 /* (set! generate-code ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2599,tmp=(C_word)a,a+=2,tmp));
-t4=C_mutate((C_word*)lf[516]+1 /* (set! emit-procedure-table-info ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6859,tmp=(C_word)a,a+=2,tmp));
-t5=C_mutate((C_word*)lf[505]+1 /* (set! cleanup ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6936,tmp=(C_word)a,a+=2,tmp));
-t6=C_mutate((C_word*)lf[286]+1 /* (set! make-variable-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7025,tmp=(C_word)a,a+=2,tmp));
-t7=C_mutate((C_word*)lf[296]+1 /* (set! make-argument-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7041,tmp=(C_word)a,a+=2,tmp));
-t8=C_mutate((C_word*)lf[520]+1 /* (set! generate-external-variables ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7057,tmp=(C_word)a,a+=2,tmp));
-t9=C_mutate((C_word*)lf[206]+1 /* (set! generate-foreign-callback-stub-prototypes ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7111,tmp=(C_word)a,a+=2,tmp));
-t10=C_mutate((C_word*)lf[518]+1 /* (set! generate-foreign-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7151,tmp=(C_word)a,a+=2,tmp));
-t11=C_mutate((C_word*)lf[517]+1 /* (set! generate-foreign-callback-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7465,tmp=(C_word)a,a+=2,tmp));
-t12=C_mutate((C_word*)lf[549]+1 /* (set! generate-foreign-callback-header ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7959,tmp=(C_word)a,a+=2,tmp));
-t13=C_mutate((C_word*)lf[174]+1 /* (set! foreign-type-declaration ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8024,tmp=(C_word)a,a+=2,tmp));
-t14=C_mutate((C_word*)lf[173]+1 /* (set! foreign-argument-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8908,tmp=(C_word)a,a+=2,tmp));
-t15=C_mutate((C_word*)lf[168]+1 /* (set! foreign-result-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9398,tmp=(C_word)a,a+=2,tmp));
-t16=C_mutate((C_word*)lf[365]+1 /* (set! encode-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10005,tmp=(C_word)a,a+=2,tmp));
-t17=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,C_SCHEME_UNDEFINED);}
-
-/* ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10005(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word ab[22],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10005,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10014,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10067,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=C_eqp(C_SCHEME_TRUE,t2);
-if(C_truep(t5)){
-t6=t1;
-t7=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t6,t7,lf[846]);}
-else{
-t6=C_eqp(C_SCHEME_FALSE,t2);
-if(C_truep(t6)){
-t7=t1;
-t8=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[847]);}
-else{
-if(C_truep(C_charp(t2))){
-t7=C_fix(C_character_code(t2));
-t8=f_10014(C_a_i(&a,4),t7);
-C_trace("c-backend.scm: 1398 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t4,lf[848],t8);}
-else{
-if(C_truep(C_i_nullp(t2))){
-t7=t1;
-t8=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[849]);}
-else{
-if(C_truep(C_eofp(t2))){
-t7=t1;
-t8=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[850]);}
-else{
-t7=C_retrieve(lf[354]);
-t8=C_eqp(t7,t2);
-if(C_truep(t8)){
-t9=t1;
-t10=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t9,t10,lf[851]);}
-else{
-if(C_truep(C_fixnump(t2))){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10185,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1403 big-fixnum?");
-((C_proc3)C_retrieve_symbol_proc(lf[367]))(3,*((C_word*)lf[367]+1),t9,t2);}
-else{
-if(C_truep(C_i_numberp(t2))){
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1412 number->string");
-C_number_to_string(3,0,t9,t2);}
-else{
-if(C_truep(C_i_symbolp(t2))){
-t9=C_slot(t2,C_fix(1));
-t10=C_i_string_length(t9);
-t11=f_10014(C_a_i(&a,4),t10);
-C_trace("c-backend.scm: 1415 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),t4,lf[857],t11,t9);}
-else{
-if(C_truep(C_immp(t2))){
-C_trace("c-backend.scm: 1420 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t4,lf[858],t2);}
-else{
-if(C_truep(C_byteblockp(t2))){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10237,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t10=t2;
-t11=stub2459(C_SCHEME_UNDEFINED,t10);
-t12=C_make_character(C_unfix(t11));
-t13=C_a_i_string(&a,1,t12);
-t14=t2;
-t15=stub2463(C_SCHEME_UNDEFINED,t14);
-t16=f_10014(C_a_i(&a,4),t15);
-C_trace("c-backend.scm: 1423 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t9,t13,t16);}
-else{
-t9=t2;
-t10=stub2463(C_SCHEME_UNDEFINED,t9);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10267,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t12=t2;
-t13=stub2459(C_SCHEME_UNDEFINED,t12);
-t14=C_make_character(C_unfix(t13));
-t15=C_a_i_string(&a,1,t14);
-t16=f_10014(C_a_i(&a,4),t10);
-t17=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10279,a[2]=t16,a[3]=t15,a[4]=t11,tmp=(C_word)a,a+=5,tmp);
-t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10281,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1433 list-tabulate");
-((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t17,t10,t18);}}}}}}}}}}}}
-
-/* a10280 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10281(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10281,3,t0,t1,t2);}
-t3=C_slot(((C_word*)t0)[2],t2);
-C_trace("c-backend.scm: 1433 encode-literal");
-((C_proc3)C_retrieve_symbol_proc(lf[365]))(3,*((C_word*)lf[365]+1),t1,t3);}
-
-/* k10277 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10279(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1430 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[861]))(5,*((C_word*)lf[861]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10265 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1429 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[860]);}
-
-/* k10235 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1422 ##sys#string-append");
-((C_proc4)C_retrieve_symbol_proc(lf[859]))(4,*((C_word*)lf[859]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10196 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1412 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[855],t1,lf[856]);}
-
-/* k10183 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10185(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10185,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10181,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1410 number->string");
-C_number_to_string(3,0,t2,((C_word*)t0)[2]);}
-else{
-t2=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(24));
-t3=C_fixnum_and(C_fix(255),t2);
-t4=C_make_character(C_unfix(t3));
-t5=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(16));
-t6=C_fixnum_and(C_fix(255),t5);
-t7=C_make_character(C_unfix(t6));
-t8=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(8));
-t9=C_fixnum_and(C_fix(255),t8);
-t10=C_make_character(C_unfix(t9));
-t11=C_fixnum_and(C_fix(255),((C_word*)t0)[2]);
-t12=C_make_character(C_unfix(t11));
-t13=C_a_i_string(&a,4,t4,t7,t10,t12);
-C_trace("c-backend.scm: 1404 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[854],t13);}}
-
-/* k10179 in k10183 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10181(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1410 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[852],t1,lf[853]);}
-
-/* k10065 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static void C_ccall f_10067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[2],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10067,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=C_a_i_string(&a,1,C_make_character(254));
-C_trace("c-backend.scm: 1394 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t2,t3,t1);}
-
-/* encode-size in ##compiler#encode-literal in k2595 in k2509 in k2506 */
-static C_word C_fcall f_10014(C_word *a,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_stack_check;
-t2=C_fixnum_shift_right(t1,C_fix(16));
-t3=C_fixnum_and(C_fix(255),t2);
-t4=C_make_character(C_unfix(t3));
-t5=C_fixnum_shift_right(t1,C_fix(8));
-t6=C_fixnum_and(C_fix(255),t5);
-t7=C_make_character(C_unfix(t6));
-t8=C_fixnum_and(C_fix(255),t1);
-t9=C_make_character(C_unfix(t8));
-return(C_a_i_string(&a,3,t4,t7,t9));}
-
-/* ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word ab[10],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9398,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9400,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t5=t2;
-t6=C_eqp(t5,lf[16]);
-t7=(C_truep(t6)?t6:C_eqp(t5,lf[642]));
-if(C_truep(t7)){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[811]);}
-else{
-t8=C_eqp(t5,lf[637]);
-t9=(C_truep(t8)?t8:C_eqp(t5,lf[638]));
-if(C_truep(t9)){
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[812]);}
-else{
-t10=C_eqp(t5,lf[643]);
-t11=(C_truep(t10)?t10:C_eqp(t5,lf[644]));
-if(C_truep(t11)){
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[813]);}
-else{
-t12=C_eqp(t5,lf[639]);
-if(C_truep(t12)){
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[814]);}
-else{
-t13=C_eqp(t5,lf[640]);
-if(C_truep(t13)){
-t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[815]);}
-else{
-t14=C_eqp(t5,lf[645]);
-if(C_truep(t14)){
-t15=t1;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[816]);}
-else{
-t15=C_eqp(t5,lf[646]);
-if(C_truep(t15)){
-t16=t1;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[817]);}
-else{
-t16=C_eqp(t5,lf[598]);
-t17=(C_truep(t16)?t16:C_eqp(t5,lf[626]));
-if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9467,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t18);}
-else{
-t18=C_eqp(t5,lf[633]);
-if(C_truep(t18)){
-t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9488,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t19);}
-else{
-t19=C_eqp(t5,lf[604]);
-t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9509,a[2]=t4,a[3]=t2,a[4]=t5,a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t19)){
-t21=t20;
-f_9509(t21,t19);}
-else{
-t21=C_eqp(t5,lf[600]);
-if(C_truep(t21)){
-t22=t20;
-f_9509(t22,t21);}
-else{
-t22=C_eqp(t5,lf[612]);
-if(C_truep(t22)){
-t23=t20;
-f_9509(t23,t22);}
-else{
-t23=C_eqp(t5,lf[623]);
-if(C_truep(t23)){
-t24=t20;
-f_9509(t24,t23);}
-else{
-t24=C_eqp(t5,lf[619]);
-if(C_truep(t24)){
-t25=t20;
-f_9509(t25,t24);}
-else{
-t25=C_eqp(t5,lf[624]);
-if(C_truep(t25)){
-t26=t20;
-f_9509(t26,t25);}
-else{
-t26=C_eqp(t5,lf[625]);
-if(C_truep(t26)){
-t27=t20;
-f_9509(t27,t26);}
-else{
-t27=C_eqp(t5,lf[620]);
-if(C_truep(t27)){
-t28=t20;
-f_9509(t28,t27);}
-else{
-t28=C_eqp(t5,lf[621]);
-if(C_truep(t28)){
-t29=t20;
-f_9509(t29,t28);}
-else{
-t29=C_eqp(t5,lf[622]);
-if(C_truep(t29)){
-t30=t20;
-f_9509(t30,t29);}
-else{
-t30=C_eqp(t5,lf[635]);
-t31=t20;
-f_9509(t31,(C_truep(t30)?t30:C_eqp(t5,lf[636])));}}}}}}}}}}}}}}}}}}}}
-
-/* k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9509(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9509,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9512,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t2);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[610]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9533,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t3);}
-else{
-t3=C_eqp(((C_word*)t0)[4],lf[630]);
-t4=(C_truep(t3)?t3:C_eqp(((C_word*)t0)[4],lf[631]));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9557,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t5);}
-else{
-t5=C_eqp(((C_word*)t0)[4],lf[634]);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9578,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}
-else{
-t6=C_eqp(((C_word*)t0)[4],lf[627]);
-t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[628]));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9602,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}
-else{
-t8=C_eqp(((C_word*)t0)[4],lf[629]);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9623,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t9);}
-else{
-t9=C_eqp(((C_word*)t0)[4],lf[632]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9644,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t10);}
-else{
-t10=C_eqp(((C_word*)t0)[4],lf[13]);
-if(C_truep(t10)){
-t11=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[829]);}
-else{
-t11=C_eqp(((C_word*)t0)[4],lf[562]);
-t12=(C_truep(t11)?t11:C_eqp(((C_word*)t0)[4],lf[641]));
-if(C_truep(t12)){
-t13=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[830]);}
-else{
-t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9674,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 1347 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t13,C_retrieve(lf[618]),((C_word*)t0)[3]);}
-else{
-t14=t13;
-f_9674(2,t14,C_SCHEME_FALSE);}}}}}}}}}}}
-
-/* k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9674,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9678,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("g23682369");
-t3=t2;
-f_9678(t3,((C_word*)t0)[4],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9701,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_listp(((C_word*)t0)[3]))){
-t3=C_i_length(((C_word*)t0)[3]);
-t4=t2;
-f_9701(t4,C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
-else{
-t3=t2;
-f_9701(t3,C_SCHEME_FALSE);}}}
-
-/* k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9701(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9701,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=C_eqp(t2,lf[611]);
-t4=(C_truep(t3)?t3:C_eqp(t2,lf[612]));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9716,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t5);}
-else{
-t5=C_eqp(t2,lf[607]);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9737,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}
-else{
-t6=C_eqp(t2,lf[614]);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9758,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t7);}
-else{
-t7=C_eqp(t2,lf[615]);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9779,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}
-else{
-t8=C_eqp(t2,lf[616]);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9800,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t9);}
-else{
-t9=C_eqp(t2,lf[609]);
-if(C_truep(t9)){
-t10=C_i_cadr(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 1362 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),((C_word*)t0)[4],t10,((C_word*)t0)[3]);}
-else{
-t10=C_eqp(t2,lf[480]);
-t11=(C_truep(t10)?t10:C_eqp(t2,lf[610]));
-if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9837,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t12);}
-else{
-t12=C_eqp(t2,lf[613]);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9858,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t13);}
-else{
-t13=C_eqp(t2,lf[746]);
-if(C_truep(t13)){
-t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9879,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t14);}
-else{
-C_trace("c-backend.scm: 1367 err");
-t14=((C_word*)t0)[2];
-f_9400(t14,((C_word*)t0)[4]);}}}}}}}}}}
-else{
-C_trace("c-backend.scm: 1368 err");
-t2=((C_word*)t0)[2];
-f_9400(t2,((C_word*)t0)[4]);}}
-
-/* k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9879,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9882,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[845],t1);}
-
-/* k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9882,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9883 in k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9885,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9888,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9886 in k9883 in k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9888(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9858,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9861,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[844],t1);}
-
-/* k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9861(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9861,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9864,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9862 in k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9864,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9867,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[843],((C_word*)t0)[2]);}
-
-/* k9865 in k9862 in k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9837,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9840,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[842],t1);}
-
-/* k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9840,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9843,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9841 in k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9843(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9843,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9846,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[841],((C_word*)t0)[2]);}
-
-/* k9844 in k9841 in k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9800(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9800,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9803,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[840],t1);}
-
-/* k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9803,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9806,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9804 in k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9806,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[839],((C_word*)t0)[2]);}
-
-/* k9807 in k9804 in k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9779,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9782,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[838],t1);}
-
-/* k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9782(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9782,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9785,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9783 in k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9785,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9788,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[837],((C_word*)t0)[2]);}
-
-/* k9786 in k9783 in k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9788(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9758,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9761,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[836],t1);}
-
-/* k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9761,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9764,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9762 in k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9764(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9764,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9767,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[835],((C_word*)t0)[2]);}
-
-/* k9765 in k9762 in k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9737,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9740,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[834],t1);}
-
-/* k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9740,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9743,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9741 in k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9743,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9746,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[833],((C_word*)t0)[2]);}
-
-/* k9744 in k9741 in k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9716(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9716,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9719,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[832],t1);}
-
-/* k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9719,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9722,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9720 in k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9725,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[831],((C_word*)t0)[2]);}
-
-/* k9723 in k9720 in k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* g2368 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9678(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9678,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_vectorp(t2))){
-t3=C_i_vector_ref(t2,C_fix(0));
-C_trace("c-backend.scm: 1349 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t1,t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-C_trace("c-backend.scm: 1349 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t1,t3,((C_word*)t0)[2]);}}
-
-/* k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9644,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9647,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[828],t1);}
-
-/* k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9647(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9647,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9650,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9648 in k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9650,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9653,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9651 in k9648 in k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9653(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9623,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9626,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[827],t1);}
-
-/* k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9626,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9627 in k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9629,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9632,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9630 in k9627 in k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9602,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9605,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[826],t1);}
-
-/* k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9605,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9608,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9606 in k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9608,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9611,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9609 in k9606 in k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9611(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9578(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9578,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9581,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[825],t1);}
-
-/* k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9581,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9584,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9582 in k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9584,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9587,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9585 in k9582 in k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9557(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9557,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9560,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[824],t1);}
-
-/* k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9560(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9560,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9563,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9561 in k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9563,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9566,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9564 in k9561 in k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9533,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9536,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[823],t1);}
-
-/* k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9536,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9539,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9537 in k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9539(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9539,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9542,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[822],((C_word*)t0)[2]);}
-
-/* k9540 in k9537 in k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9512,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9515,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[821],t1);}
-
-/* k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9515(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9515,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9518,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9516 in k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9518,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9521,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[820],((C_word*)t0)[2]);}
-
-/* k9519 in k9516 in k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9491,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[819],t1);}
-
-/* k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9491,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9494,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9492 in k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9494(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9494,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9497,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9495 in k9492 in k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9467,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9470,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[818],t1);}
-
-/* k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9470,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9473,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k9471 in k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9473(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9473,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9476,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
-
-/* k9474 in k9471 in k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* err in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9400(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9400,NULL,2,t0,t1);}
-C_trace("c-backend.scm: 1323 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[810],((C_word*)t0)[2]);}
-
-/* ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_8908(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8908,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8910,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=t2;
-t5=C_eqp(t4,lf[641]);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[757]);}
-else{
-t6=C_eqp(t4,lf[16]);
-t7=(C_truep(t6)?t6:C_eqp(t4,lf[642]));
-if(C_truep(t7)){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[758]);}
-else{
-t8=C_eqp(t4,lf[645]);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8938,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t8)){
-t10=t9;
-f_8938(t10,t8);}
-else{
-t10=C_eqp(t4,lf[637]);
-if(C_truep(t10)){
-t11=t9;
-f_8938(t11,t10);}
-else{
-t11=C_eqp(t4,lf[643]);
-if(C_truep(t11)){
-t12=t9;
-f_8938(t12,t11);}
-else{
-t12=C_eqp(t4,lf[644]);
-t13=t9;
-f_8938(t13,(C_truep(t12)?t12:C_eqp(t4,lf[646])));}}}}}}
-
-/* k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_8938(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8938,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[759]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[639]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[760]);}
-else{
-t3=C_eqp(((C_word*)t0)[4],lf[640]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[761]);}
-else{
-t4=C_eqp(((C_word*)t0)[4],lf[632]);
-if(C_truep(t4)){
-t5=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[762]);}
-else{
-t5=C_eqp(((C_word*)t0)[4],lf[626]);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_8965(t7,t5);}
-else{
-t7=C_eqp(((C_word*)t0)[4],lf[633]);
-t8=t6;
-f_8965(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[4],lf[598])));}}}}}}
-
-/* k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_8965(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8965,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[763]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[630]);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[4],lf[631]));
-if(C_truep(t3)){
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[764]);}
-else{
-t4=C_eqp(((C_word*)t0)[4],lf[634]);
-if(C_truep(t4)){
-t5=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[765]);}
-else{
-t5=C_eqp(((C_word*)t0)[4],lf[629]);
-if(C_truep(t5)){
-t6=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[766]);}
-else{
-t6=C_eqp(((C_word*)t0)[4],lf[627]);
-t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[628]));
-if(C_truep(t7)){
-t8=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[767]);}
-else{
-t8=C_eqp(((C_word*)t0)[4],lf[480]);
-if(C_truep(t8)){
-t9=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[768]);}
-else{
-t9=C_eqp(((C_word*)t0)[4],lf[611]);
-if(C_truep(t9)){
-t10=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[769]);}
-else{
-t10=C_eqp(((C_word*)t0)[4],lf[754]);
-if(C_truep(t10)){
-t11=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[770]);}
-else{
-t11=C_eqp(((C_word*)t0)[4],lf[755]);
-if(C_truep(t11)){
-t12=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[771]);}
-else{
-t12=C_eqp(((C_word*)t0)[4],lf[610]);
-if(C_truep(t12)){
-t13=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[772]);}
-else{
-t13=C_eqp(((C_word*)t0)[4],lf[612]);
-if(C_truep(t13)){
-t14=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[773]);}
-else{
-t14=C_eqp(((C_word*)t0)[4],lf[692]);
-if(C_truep(t14)){
-t15=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[774]);}
-else{
-t15=C_eqp(((C_word*)t0)[4],lf[751]);
-if(C_truep(t15)){
-t16=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[775]);}
-else{
-t16=C_eqp(((C_word*)t0)[4],lf[689]);
-if(C_truep(t16)){
-t17=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[776]);}
-else{
-t17=C_eqp(((C_word*)t0)[4],lf[690]);
-if(C_truep(t17)){
-t18=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[777]);}
-else{
-t18=C_eqp(((C_word*)t0)[4],lf[752]);
-if(C_truep(t18)){
-t19=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[778]);}
-else{
-t19=C_eqp(((C_word*)t0)[4],lf[753]);
-if(C_truep(t19)){
-t20=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[779]);}
-else{
-t20=C_eqp(((C_word*)t0)[4],lf[694]);
-if(C_truep(t20)){
-t21=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,lf[780]);}
-else{
-t21=C_eqp(((C_word*)t0)[4],lf[695]);
-if(C_truep(t21)){
-t22=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,lf[781]);}
-else{
-t22=C_eqp(((C_word*)t0)[4],lf[700]);
-if(C_truep(t22)){
-t23=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[782]);}
-else{
-t23=C_eqp(((C_word*)t0)[4],lf[701]);
-if(C_truep(t23)){
-t24=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t24+1)))(2,t24,lf[783]);}
-else{
-t24=C_eqp(((C_word*)t0)[4],lf[697]);
-if(C_truep(t24)){
-t25=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t25+1)))(2,t25,lf[784]);}
-else{
-t25=C_eqp(((C_word*)t0)[4],lf[698]);
-if(C_truep(t25)){
-t26=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t26+1)))(2,t26,lf[785]);}
-else{
-t26=C_eqp(((C_word*)t0)[4],lf[703]);
-if(C_truep(t26)){
-t27=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[786]);}
-else{
-t27=C_eqp(((C_word*)t0)[4],lf[704]);
-if(C_truep(t27)){
-t28=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[787]);}
-else{
-t28=C_eqp(((C_word*)t0)[4],lf[706]);
-if(C_truep(t28)){
-t29=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[788]);}
-else{
-t29=C_eqp(((C_word*)t0)[4],lf[707]);
-if(C_truep(t29)){
-t30=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t30+1)))(2,t30,lf[789]);}
-else{
-t30=C_eqp(((C_word*)t0)[4],lf[709]);
-if(C_truep(t30)){
-t31=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,lf[790]);}
-else{
-t31=C_eqp(((C_word*)t0)[4],lf[710]);
-if(C_truep(t31)){
-t32=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[791]);}
-else{
-t32=C_eqp(((C_word*)t0)[4],lf[712]);
-if(C_truep(t32)){
-t33=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t33+1)))(2,t33,lf[792]);}
-else{
-t33=C_eqp(((C_word*)t0)[4],lf[713]);
-if(C_truep(t33)){
-t34=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t34+1)))(2,t34,lf[793]);}
-else{
-t34=C_eqp(((C_word*)t0)[4],lf[600]);
-t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t34)){
-t36=t35;
-f_9160(t36,t34);}
-else{
-t36=C_eqp(((C_word*)t0)[4],lf[623]);
-if(C_truep(t36)){
-t37=t35;
-f_9160(t37,t36);}
-else{
-t37=C_eqp(((C_word*)t0)[4],lf[624]);
-t38=t35;
-f_9160(t38,(C_truep(t37)?t37:C_eqp(((C_word*)t0)[4],lf[625])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-
-/* k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9160(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9160,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[794]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[604]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9169,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_9169(t4,t2);}
-else{
-t4=C_eqp(((C_word*)t0)[4],lf[619]);
-if(C_truep(t4)){
-t5=t3;
-f_9169(t5,t4);}
-else{
-t5=C_eqp(((C_word*)t0)[4],lf[620]);
-if(C_truep(t5)){
-t6=t3;
-f_9169(t6,t5);}
-else{
-t6=C_eqp(((C_word*)t0)[4],lf[621]);
-t7=t3;
-f_9169(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[622])));}}}}}
-
-/* k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9169(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9169,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[795]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[13]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[796]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9178,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 1296 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t3,C_retrieve(lf[618]),((C_word*)t0)[3]);}
-else{
-t4=t3;
-f_9178(2,t4,C_SCHEME_FALSE);}}}}
-
-/* k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9178,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=t1;
-if(C_truep(C_i_vectorp(t3))){
-t4=C_i_vector_ref(t3,C_fix(0));
-C_trace("c-backend.scm: 1298 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,t4);}
-else{
-C_trace("c-backend.scm: 1298 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,t3);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9205,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_listp(((C_word*)t0)[3]))){
-t3=C_i_length(((C_word*)t0)[3]);
-t4=t2;
-f_9205(t4,C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
-else{
-t3=t2;
-f_9205(t3,C_SCHEME_FALSE);}}}
-
-/* k9203 in k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_9205(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9205,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[4]);
-t3=C_eqp(t2,lf[480]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[797]);}
-else{
-t4=C_eqp(t2,lf[611]);
-if(C_truep(t4)){
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[798]);}
-else{
-t5=C_eqp(t2,lf[610]);
-if(C_truep(t5)){
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[799]);}
-else{
-t6=C_eqp(t2,lf[612]);
-if(C_truep(t6)){
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[800]);}
-else{
-t7=C_eqp(t2,lf[614]);
-if(C_truep(t7)){
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[801]);}
-else{
-t8=C_eqp(t2,lf[615]);
-if(C_truep(t8)){
-t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[802]);}
-else{
-t9=C_eqp(t2,lf[613]);
-if(C_truep(t9)){
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[803]);}
-else{
-t10=C_eqp(t2,lf[609]);
-if(C_truep(t10)){
-t11=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1309 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),((C_word*)t0)[3],t11);}
-else{
-t11=C_eqp(t2,lf[746]);
-if(C_truep(t11)){
-t12=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[804]);}
-else{
-t12=C_eqp(t2,lf[607]);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9282,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t14=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1312 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t13,t14,lf[807]);}
-else{
-t13=C_eqp(t2,lf[616]);
-if(C_truep(t13)){
-t14=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1315 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[808],t14,lf[809]);}
-else{
-C_trace("c-backend.scm: 1316 err");
-t14=((C_word*)t0)[2];
-f_8910(t14,((C_word*)t0)[3]);}}}}}}}}}}}}
-else{
-C_trace("c-backend.scm: 1317 err");
-t2=((C_word*)t0)[2];
-f_8910(t2,((C_word*)t0)[3]);}}
-
-/* k9280 in k9203 in k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_ccall f_9282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1312 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[805],t1,lf[806]);}
-
-/* err in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
-static void C_fcall f_8910(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8910,NULL,2,t0,t1);}
-C_trace("c-backend.scm: 1250 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[756],((C_word*)t0)[2]);}
-
-/* ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[14],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8024,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8026,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8031,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t6=t2;
-t7=C_eqp(t6,lf[641]);
-if(C_truep(t7)){
-C_trace("c-backend.scm: 1157 str");
-t8=t5;
-f_8031(t8,t1,lf[672]);}
-else{
-t8=C_eqp(t6,lf[16]);
-t9=(C_truep(t8)?t8:C_eqp(t6,lf[645]));
-if(C_truep(t9)){
-C_trace("c-backend.scm: 1158 str");
-t10=t5;
-f_8031(t10,t1,lf[673]);}
-else{
-t10=C_eqp(t6,lf[642]);
-t11=(C_truep(t10)?t10:C_eqp(t6,lf[646]));
-if(C_truep(t11)){
-C_trace("c-backend.scm: 1159 str");
-t12=t5;
-f_8031(t12,t1,lf[674]);}
-else{
-t12=C_eqp(t6,lf[643]);
-t13=(C_truep(t12)?t12:C_eqp(t6,lf[627]));
-if(C_truep(t13)){
-C_trace("c-backend.scm: 1160 str");
-t14=t5;
-f_8031(t14,t1,lf[675]);}
-else{
-t14=C_eqp(t6,lf[644]);
-t15=(C_truep(t14)?t14:C_eqp(t6,lf[628]));
-if(C_truep(t15)){
-C_trace("c-backend.scm: 1161 str");
-t16=t5;
-f_8031(t16,t1,lf[676]);}
-else{
-t16=C_eqp(t6,lf[637]);
-t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8101,a[2]=t4,a[3]=t2,a[4]=t3,a[5]=t6,a[6]=t1,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t16)){
-t18=t17;
-f_8101(t18,t16);}
-else{
-t18=C_eqp(t6,lf[630]);
-t19=t17;
-f_8101(t19,(C_truep(t18)?t18:C_eqp(t6,lf[13])));}}}}}}}
-
-/* k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8101(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8101,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1162 str");
-t2=((C_word*)t0)[7];
-f_8031(t2,((C_word*)t0)[6],lf[677]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[638]);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[631]));
-if(C_truep(t3)){
-C_trace("c-backend.scm: 1163 str");
-t4=((C_word*)t0)[7];
-f_8031(t4,((C_word*)t0)[6],lf[678]);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[634]);
-if(C_truep(t4)){
-C_trace("c-backend.scm: 1164 str");
-t5=((C_word*)t0)[7];
-f_8031(t5,((C_word*)t0)[6],lf[679]);}
-else{
-t5=C_eqp(((C_word*)t0)[5],lf[639]);
-if(C_truep(t5)){
-C_trace("c-backend.scm: 1165 str");
-t6=((C_word*)t0)[7];
-f_8031(t6,((C_word*)t0)[6],lf[680]);}
-else{
-t6=C_eqp(((C_word*)t0)[5],lf[629]);
-if(C_truep(t6)){
-C_trace("c-backend.scm: 1166 str");
-t7=((C_word*)t0)[7];
-f_8031(t7,((C_word*)t0)[6],lf[681]);}
-else{
-t7=C_eqp(((C_word*)t0)[5],lf[640]);
-if(C_truep(t7)){
-C_trace("c-backend.scm: 1167 str");
-t8=((C_word*)t0)[7];
-f_8031(t8,((C_word*)t0)[6],lf[682]);}
-else{
-t8=C_eqp(((C_word*)t0)[5],lf[632]);
-if(C_truep(t8)){
-C_trace("c-backend.scm: 1168 str");
-t9=((C_word*)t0)[7];
-f_8031(t9,((C_word*)t0)[6],lf[683]);}
-else{
-t9=C_eqp(((C_word*)t0)[5],lf[598]);
-if(C_truep(t9)){
-C_trace("c-backend.scm: 1169 str");
-t10=((C_word*)t0)[7];
-f_8031(t10,((C_word*)t0)[6],lf[684]);}
-else{
-t10=C_eqp(((C_word*)t0)[5],lf[626]);
-t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[5],lf[633]));
-if(C_truep(t11)){
-C_trace("c-backend.scm: 1170 str");
-t12=((C_word*)t0)[7];
-f_8031(t12,((C_word*)t0)[6],lf[685]);}
-else{
-t12=C_eqp(((C_word*)t0)[5],lf[480]);
-t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[5],lf[611]));
-if(C_truep(t13)){
-C_trace("c-backend.scm: 1172 str");
-t14=((C_word*)t0)[7];
-f_8031(t14,((C_word*)t0)[6],lf[686]);}
-else{
-t14=C_eqp(((C_word*)t0)[5],lf[610]);
-t15=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8203,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t14)){
-t16=t15;
-f_8203(t16,t14);}
-else{
-t16=C_eqp(((C_word*)t0)[5],lf[612]);
-if(C_truep(t16)){
-t17=t15;
-f_8203(t17,t16);}
-else{
-t17=C_eqp(((C_word*)t0)[5],lf[754]);
-t18=t15;
-f_8203(t18,(C_truep(t17)?t17:C_eqp(((C_word*)t0)[5],lf[755])));}}}}}}}}}}}}}
-
-/* k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8203(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8203,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1173 str");
-t2=((C_word*)t0)[7];
-f_8031(t2,((C_word*)t0)[6],lf[687]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[635]);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[636]));
-if(C_truep(t3)){
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[688]);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[689]);
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[5],lf[690]));
-if(C_truep(t5)){
-C_trace("c-backend.scm: 1176 str");
-t6=((C_word*)t0)[7];
-f_8031(t6,((C_word*)t0)[6],lf[691]);}
-else{
-t6=C_eqp(((C_word*)t0)[5],lf[692]);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8236,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t6)){
-t8=t7;
-f_8236(t8,t6);}
-else{
-t8=C_eqp(((C_word*)t0)[5],lf[751]);
-if(C_truep(t8)){
-t9=t7;
-f_8236(t9,t8);}
-else{
-t9=C_eqp(((C_word*)t0)[5],lf[752]);
-t10=t7;
-f_8236(t10,(C_truep(t9)?t9:C_eqp(((C_word*)t0)[5],lf[753])));}}}}}}
-
-/* k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8236(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8236,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1177 str");
-t2=((C_word*)t0)[7];
-f_8031(t2,((C_word*)t0)[6],lf[693]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[694]);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[695]));
-if(C_truep(t3)){
-C_trace("c-backend.scm: 1178 str");
-t4=((C_word*)t0)[7];
-f_8031(t4,((C_word*)t0)[6],lf[696]);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[697]);
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[5],lf[698]));
-if(C_truep(t5)){
-C_trace("c-backend.scm: 1179 str");
-t6=((C_word*)t0)[7];
-f_8031(t6,((C_word*)t0)[6],lf[699]);}
-else{
-t6=C_eqp(((C_word*)t0)[5],lf[700]);
-t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[5],lf[701]));
-if(C_truep(t7)){
-C_trace("c-backend.scm: 1180 str");
-t8=((C_word*)t0)[7];
-f_8031(t8,((C_word*)t0)[6],lf[702]);}
-else{
-t8=C_eqp(((C_word*)t0)[5],lf[703]);
-t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[5],lf[704]));
-if(C_truep(t9)){
-C_trace("c-backend.scm: 1181 str");
-t10=((C_word*)t0)[7];
-f_8031(t10,((C_word*)t0)[6],lf[705]);}
-else{
-t10=C_eqp(((C_word*)t0)[5],lf[706]);
-t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[5],lf[707]));
-if(C_truep(t11)){
-C_trace("c-backend.scm: 1182 str");
-t12=((C_word*)t0)[7];
-f_8031(t12,((C_word*)t0)[6],lf[708]);}
-else{
-t12=C_eqp(((C_word*)t0)[5],lf[709]);
-t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[5],lf[710]));
-if(C_truep(t13)){
-C_trace("c-backend.scm: 1183 str");
-t14=((C_word*)t0)[7];
-f_8031(t14,((C_word*)t0)[6],lf[711]);}
-else{
-t14=C_eqp(((C_word*)t0)[5],lf[712]);
-t15=(C_truep(t14)?t14:C_eqp(((C_word*)t0)[5],lf[713]));
-if(C_truep(t15)){
-C_trace("c-backend.scm: 1184 str");
-t16=((C_word*)t0)[7];
-f_8031(t16,((C_word*)t0)[6],lf[714]);}
-else{
-t16=C_eqp(((C_word*)t0)[5],lf[604]);
-t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8332,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t16)){
-t18=t17;
-f_8332(t18,t16);}
-else{
-t18=C_eqp(((C_word*)t0)[5],lf[600]);
-if(C_truep(t18)){
-t19=t17;
-f_8332(t19,t18);}
-else{
-t19=C_eqp(((C_word*)t0)[5],lf[619]);
-if(C_truep(t19)){
-t20=t17;
-f_8332(t20,t19);}
-else{
-t20=C_eqp(((C_word*)t0)[5],lf[623]);
-t21=t17;
-f_8332(t21,(C_truep(t20)?t20:C_eqp(((C_word*)t0)[5],lf[622])));}}}}}}}}}}}}
-
-/* k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8332(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8332,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1186 str");
-t2=((C_word*)t0)[7];
-f_8031(t2,((C_word*)t0)[6],lf[715]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[620]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_8344(t4,t2);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[621]);
-if(C_truep(t4)){
-t5=t3;
-f_8344(t5,t4);}
-else{
-t5=C_eqp(((C_word*)t0)[5],lf[624]);
-t6=t3;
-f_8344(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[5],lf[625])));}}}}
-
-/* k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8344(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8344,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1188 str");
-t2=((C_word*)t0)[7];
-f_8031(t2,((C_word*)t0)[6],lf[716]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[562]);
-if(C_truep(t2)){
-C_trace("c-backend.scm: 1189 str");
-t3=((C_word*)t0)[7];
-f_8031(t3,((C_word*)t0)[6],lf[717]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 1191 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t3,C_retrieve(lf[618]),((C_word*)t0)[3]);}
-else{
-t4=t3;
-f_8359(2,t4,C_SCHEME_FALSE);}}}}
-
-/* k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8359,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8363,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("g19961997");
-t3=t2;
-f_8363(t3,((C_word*)t0)[5],t1);}
-else{
-if(C_truep(C_i_stringp(((C_word*)t0)[4]))){
-C_trace("c-backend.scm: 1194 str");
-t2=((C_word*)t0)[3];
-f_8031(t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-if(C_truep(C_i_listp(((C_word*)t0)[4]))){
-t2=C_i_length(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8404,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t4=C_eqp(C_fix(2),t2);
-if(C_truep(t4)){
-t5=C_i_car(((C_word*)t0)[4]);
-t6=t3;
-f_8404(t6,C_i_memq(t5,lf[750]));}
-else{
-t5=t3;
-f_8404(t5,C_SCHEME_FALSE);}}
-else{
-C_trace("c-backend.scm: 1244 err");
-t2=((C_word*)t0)[2];
-f_8026(t2,((C_word*)t0)[5]);}}}}
-
-/* k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8404(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8404,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8415,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1201 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t3,lf[718],((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8421,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_eqp(C_fix(2),((C_word*)t0)[2]);
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[7]);
-t5=t2;
-f_8421(t5,C_eqp(lf[607],t4));}
-else{
-t4=t2;
-f_8421(t4,C_SCHEME_FALSE);}}}
-
-/* k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8421(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8421,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8432,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1204 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t3,lf[719],((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8438,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],C_fix(2)))){
-t3=C_i_car(((C_word*)t0)[7]);
-t4=t2;
-f_8438(t4,C_eqp(lf[749],t3));}
-else{
-t3=t2;
-f_8438(t3,C_SCHEME_FALSE);}}}
-
-/* k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8438(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8438,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8445,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8449,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cadr(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 1209 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,t4,lf[724]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8477,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(2));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[5]);
-t5=t2;
-f_8477(t5,C_eqp(lf[609],t4));}
-else{
-t4=t2;
-f_8477(t4,C_SCHEME_FALSE);}}}
-
-/* k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8477(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8477,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8484,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 1216 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,t3,((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8494,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(2));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[5]);
-t5=t2;
-f_8494(t5,C_eqp(lf[748],t4));}
-else{
-t4=t2;
-f_8494(t4,C_SCHEME_FALSE);}}}
-
-/* k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8494(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8494,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8501,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1218 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(2));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[4]);
-t5=t2;
-f_8511(t5,C_eqp(lf[747],t4));}
-else{
-t4=t2;
-f_8511(t4,C_SCHEME_FALSE);}}}
-
-/* k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8511(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8511,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8518,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1220 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8528,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(2));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[4]);
-t5=t2;
-f_8528(t5,C_eqp(lf[746],t4));}
-else{
-t4=t2;
-f_8528(t4,C_SCHEME_FALSE);}}}
-
-/* k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8528(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8528,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8535,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1222 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(3));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[4]);
-t5=t2;
-f_8545(t5,C_i_memq(t4,lf[745]));}
-else{
-t4=t2;
-f_8545(t4,C_SCHEME_FALSE);}}}
-
-/* k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8545(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8545,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8552,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1224 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8562,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(3));
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[4]);
-t5=t2;
-f_8562(t5,C_eqp(lf[616],t4));}
-else{
-t4=t2;
-f_8562(t4,C_SCHEME_FALSE);}}}
-
-/* k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8562(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8562,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8569,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1226 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8579,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(3)))){
-t3=C_i_car(((C_word*)t0)[4]);
-t4=t2;
-f_8579(t4,C_eqp(lf[613],t3));}
-else{
-t3=t2;
-f_8579(t3,C_SCHEME_FALSE);}}}
-
-/* k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8579(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8579,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[5]);
-t3=C_i_caddr(((C_word*)t0)[5]);
-t4=C_i_cdddr(((C_word*)t0)[5]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8591,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_nullp(t4))){
-t6=t5;
-f_8591(2,t6,lf[742]);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=t5;
-f_8591(2,t7,C_i_car(t4));}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[743]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[744],t4);}}}
-else{
-C_trace("c-backend.scm: 1243 err");
-t2=((C_word*)t0)[2];
-f_8026(t2,((C_word*)t0)[4]);}}
-
-/* k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8591,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8598,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1232 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[741]);}
-
-/* k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8598,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8602,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8606,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8608,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_8608(t11,t7,((C_word*)t0)[2]);}
-
-/* loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8608(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8608,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8618,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8648,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=C_slot(t2,C_fix(0));
-t6=C_eqp(lf[738],t5);
-if(C_truep(t6)){
-t7=t3;
-f_8618(t7,C_a_i_cons(&a,2,lf[739],C_SCHEME_END_OF_LIST));}
-else{
-C_trace("c-backend.scm: 1239 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t4,t5,lf[740]);}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8646 in loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8648(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8648,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_8618(t2,C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
-
-/* k8616 in loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8618(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop20572070");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_8608(t5,((C_word*)t0)[3],t4);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop20572070");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_8608(t5,((C_word*)t0)[3],t4);}}
-
-/* k8604 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1235 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[737]);}
-
-/* k8600 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1231 string-append");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[115]+1)))(9,*((C_word*)lf[115]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[734],((C_word*)t0)[2],lf[735],t1,lf[736]);}
-
-/* k8567 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1226 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],t1,lf[733],((C_word*)t0)[2]);}
-
-/* k8550 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1224 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],t1,lf[732],((C_word*)t0)[2]);}
-
-/* k8533 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1222 string-append");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[730],t1,lf[731],((C_word*)t0)[2]);}
-
-/* k8516 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1220 string-append");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[728],t1,lf[729],((C_word*)t0)[2]);}
-
-/* k8499 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1218 string-append");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[726],t1,lf[727],((C_word*)t0)[2]);}
-
-/* k8482 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8484(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1216 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[725],t1);}
-
-/* k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8449,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8453,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8457,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8459,tmp=(C_word)a,a+=2,tmp);
-t5=C_i_cddr(((C_word*)t0)[2]);
-C_trace("map");
-t6=*((C_word*)lf[227]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
-
-/* a8458 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8459(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8459,3,t0,t1,t2);}
-t3=C_retrieve(lf[174]);
-C_trace("g20312032");
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[723]);}
-
-/* k8455 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1211 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[722]);}
-
-/* k8451 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8453(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1208 string-append");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[720],t1,lf[721]);}
-
-/* k8443 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1207 str");
-t2=((C_word*)t0)[3];
-f_8031(t2,((C_word*)t0)[2],t1);}
-
-/* k8430 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1204 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8413 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_ccall f_8415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1201 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* g1996 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8363(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8363,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_vectorp(t2))){
-t3=C_i_vector_ref(t2,C_fix(0));
-C_trace("c-backend.scm: 1193 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t1,t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-C_trace("c-backend.scm: 1193 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t1,t3,((C_word*)t0)[2]);}}
-
-/* str in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8031(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8031,NULL,3,t0,t1,t2);}
-C_trace("c-backend.scm: 1155 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),t1,t2,lf[671],((C_word*)t0)[2]);}
-
-/* err in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
-static void C_fcall f_8026(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8026,NULL,2,t0,t1);}
-C_trace("c-backend.scm: 1154 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[670],((C_word*)t0)[2]);}
-
-/* ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7959(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7959,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7963,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1136 foreign-callback-stub-name");
-((C_proc3)C_retrieve_symbol_proc(lf[668]))(3,*((C_word*)lf[668]+1),t4,t3);}
-
-/* k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7963,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7966,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1137 foreign-callback-stub-qualifiers");
-((C_proc3)C_retrieve_symbol_proc(lf[667]))(3,*((C_word*)lf[667]+1),t2,((C_word*)t0)[2]);}
-
-/* k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7966,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7969,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 1138 foreign-callback-stub-return-type");
-((C_proc3)C_retrieve_symbol_proc(lf[663]))(3,*((C_word*)lf[663]+1),t2,((C_word*)t0)[2]);}
-
-/* k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7969,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7972,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 1139 foreign-callback-stub-argument-types");
-((C_proc3)C_retrieve_symbol_proc(lf[662]))(3,*((C_word*)lf[662]+1),t2,((C_word*)t0)[2]);}
-
-/* k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7972,2,t0,t1);}
-t2=C_i_length(t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7978,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 1141 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t3,t2,lf[666]);}
-
-/* k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7978(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7978,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7981,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1142 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,((C_word*)t0)[2],lf[665]);}
-
-/* k8020 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_8022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1142 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],C_make_character(32),t1,((C_word*)t0)[3],C_make_character(32),((C_word*)t0)[2],C_make_character(40));}
-
-/* k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7981(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7981,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7989,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-backend.scm: 1143 pair-for-each");
-((C_proc5)C_retrieve_symbol_proc(lf[203]))(5,*((C_word*)lf[203]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7989(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7989,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7993,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8010,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_car(t3);
-t7=C_i_car(t2);
-C_trace("c-backend.scm: 1145 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t5,t6,t7);}
-
-/* k8008 in a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_8010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1145 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1);}
-
-/* k7991 in a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7993(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[3]);
-if(C_truep(C_i_pairp(t2))){
-C_trace("c-backend.scm: 1146 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7982 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
-static void C_ccall f_7984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1148 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7465,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7471,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_7471(t7,t1,t2);}
-
-/* loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7471(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7471,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7479,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g15231524");
-t6=t3;
-f_7479(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7944 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7471(t3,((C_word*)t0)[2],t2);}
-
-/* g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7479(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7479,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7483,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1083 foreign-callback-stub-id");
-((C_proc3)C_retrieve_symbol_proc(lf[664]))(3,*((C_word*)lf[664]+1),t3,t2);}
-
-/* k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7483(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7483,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7486,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1084 real-name2");
-((C_proc4)C_retrieve_symbol_proc(lf[596]))(4,*((C_word*)lf[596]+1),t2,t1,((C_word*)t0)[2]);}
-
-/* k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7489,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1085 foreign-callback-stub-return-type");
-((C_proc3)C_retrieve_symbol_proc(lf[663]))(3,*((C_word*)lf[663]+1),t2,((C_word*)t0)[2]);}
-
-/* k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7489(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7489,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 1086 foreign-callback-stub-argument-types");
-((C_proc3)C_retrieve_symbol_proc(lf[662]))(3,*((C_word*)lf[662]+1),t2,((C_word*)t0)[3]);}
-
-/* k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7492,2,t0,t1);}
-t2=C_i_length(t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7498,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 1088 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t3,t2,lf[661]);}
-
-/* k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7498,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7500,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7844,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 1115 fold");
-((C_proc6)C_retrieve_symbol_proc(lf[441]))(6,*((C_word*)lf[441]+1),t5,((C_word*)t3)[1],lf[660],((C_word*)t0)[4],t1);}
-
-/* k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7844,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7847,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 1116 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-
-/* k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7847(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7847,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7850,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7943,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1118 cleanup");
-((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_7850(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k7941 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1118 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[658],t1,lf[659]);}
-
-/* k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7850,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7853,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 1119 generate-foreign-callback-header");
-((C_proc4)C_retrieve_symbol_proc(lf[549]))(4,*((C_word*)lf[549]+1),t2,lf[657],((C_word*)t0)[2]);}
-
-/* k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7853(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7853,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7856,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 1120 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_make_character(123),C_SCHEME_TRUE,lf[655],((C_word*)t0)[2],lf[656]);}
-
-/* k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7856(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7856,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7859,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 1121 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[654]);}
-
-/* k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7859(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7859,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7862,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7892,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_7892(t6,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7892(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7892,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7911,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7908,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1124 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t9,t8,lf[653]);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k7906 in loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1124 gen");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[650],t1,((C_word*)t0)[2],lf[651],C_SCHEME_TRUE,lf[652]);}
-
-/* k7909 in loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7892(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7862(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7862,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7865,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_eqp(lf[562],((C_word*)t0)[4]);
-if(C_truep(t3)){
-t4=t2;
-f_7865(2,t4,C_SCHEME_UNDEFINED);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7890,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1129 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t4,((C_word*)t0)[4]);}}
-
-/* k7888 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1129 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[649],t1);}
-
-/* k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7865(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7865,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7868,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1130 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[648],((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],C_make_character(41));}
-
-/* k7866 in k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7868(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7868,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7871,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_eqp(lf[562],((C_word*)t0)[2]);
-if(C_truep(t3)){
-C_trace("c-backend.scm: 1132 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[647]);}
-else{
-C_trace("c-backend.scm: 1131 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-
-/* k7869 in k7866 in k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7871(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1132 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[647]);}
-
-/* compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7500(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[8],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7500,5,t0,t1,t2,t3,t4);}
-t5=t2;
-t6=C_eqp(t5,lf[16]);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7510,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t5,a[6]=t1,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t6)){
-t8=t7;
-f_7510(t8,t6);}
-else{
-t8=C_eqp(t5,lf[637]);
-if(C_truep(t8)){
-t9=t7;
-f_7510(t9,t8);}
-else{
-t9=C_eqp(t5,lf[638]);
-if(C_truep(t9)){
-t10=t7;
-f_7510(t10,t9);}
-else{
-t10=C_eqp(t5,lf[639]);
-if(C_truep(t10)){
-t11=t7;
-f_7510(t11,t10);}
-else{
-t11=C_eqp(t5,lf[13]);
-if(C_truep(t11)){
-t12=t7;
-f_7510(t12,t11);}
-else{
-t12=C_eqp(t5,lf[562]);
-if(C_truep(t12)){
-t13=t7;
-f_7510(t13,t12);}
-else{
-t13=C_eqp(t5,lf[640]);
-if(C_truep(t13)){
-t14=t7;
-f_7510(t14,t13);}
-else{
-t14=C_eqp(t5,lf[641]);
-if(C_truep(t14)){
-t15=t7;
-f_7510(t15,t14);}
-else{
-t15=C_eqp(t5,lf[642]);
-if(C_truep(t15)){
-t16=t7;
-f_7510(t16,t15);}
-else{
-t16=C_eqp(t5,lf[643]);
-if(C_truep(t16)){
-t17=t7;
-f_7510(t17,t16);}
-else{
-t17=C_eqp(t5,lf[644]);
-if(C_truep(t17)){
-t18=t7;
-f_7510(t18,t17);}
-else{
-t18=C_eqp(t5,lf[645]);
-t19=t7;
-f_7510(t19,(C_truep(t18)?t18:C_eqp(t5,lf[646])));}}}}}}}}}}}}
-
-/* k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7510(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7510,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[7];
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[598]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7519,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_7519(t4,t2);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[626]);
-if(C_truep(t4)){
-t5=t3;
-f_7519(t5,t4);}
-else{
-t5=C_eqp(((C_word*)t0)[5],lf[610]);
-if(C_truep(t5)){
-t6=t3;
-f_7519(t6,t5);}
-else{
-t6=C_eqp(((C_word*)t0)[5],lf[627]);
-if(C_truep(t6)){
-t7=t3;
-f_7519(t7,t6);}
-else{
-t7=C_eqp(((C_word*)t0)[5],lf[628]);
-if(C_truep(t7)){
-t8=t3;
-f_7519(t8,t7);}
-else{
-t8=C_eqp(((C_word*)t0)[5],lf[629]);
-if(C_truep(t8)){
-t9=t3;
-f_7519(t9,t8);}
-else{
-t9=C_eqp(((C_word*)t0)[5],lf[630]);
-if(C_truep(t9)){
-t10=t3;
-f_7519(t10,t9);}
-else{
-t10=C_eqp(((C_word*)t0)[5],lf[631]);
-if(C_truep(t10)){
-t11=t3;
-f_7519(t11,t10);}
-else{
-t11=C_eqp(((C_word*)t0)[5],lf[632]);
-if(C_truep(t11)){
-t12=t3;
-f_7519(t12,t11);}
-else{
-t12=C_eqp(((C_word*)t0)[5],lf[612]);
-if(C_truep(t12)){
-t13=t3;
-f_7519(t13,t12);}
-else{
-t13=C_eqp(((C_word*)t0)[5],lf[633]);
-if(C_truep(t13)){
-t14=t3;
-f_7519(t14,t13);}
-else{
-t14=C_eqp(((C_word*)t0)[5],lf[634]);
-if(C_truep(t14)){
-t15=t3;
-f_7519(t15,t14);}
-else{
-t15=C_eqp(((C_word*)t0)[5],lf[635]);
-t16=t3;
-f_7519(t16,(C_truep(t15)?t15:C_eqp(((C_word*)t0)[5],lf[636])));}}}}}}}}}}}}}}
-
-/* k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7519(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7519,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1097 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[599]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[600]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7531,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_7531(t4,t2);}
-else{
-t4=C_eqp(((C_word*)t0)[5],lf[623]);
-if(C_truep(t4)){
-t5=t3;
-f_7531(t5,t4);}
-else{
-t5=C_eqp(((C_word*)t0)[5],lf[624]);
-if(C_truep(t5)){
-t6=t3;
-f_7531(t6,t5);}
-else{
-t6=C_eqp(((C_word*)t0)[5],lf[624]);
-t7=t3;
-f_7531(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[5],lf[625])));}}}}}
-
-/* k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7531(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7531,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1099 string-append");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[115]+1)))(8,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[601],((C_word*)t0)[5],lf[602],((C_word*)t0)[5],lf[603]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[604]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7543,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_7543(t4,t2);}
-else{
-t4=C_eqp(((C_word*)t0)[4],lf[619]);
-if(C_truep(t4)){
-t5=t3;
-f_7543(t5,t4);}
-else{
-t5=C_eqp(((C_word*)t0)[4],lf[620]);
-if(C_truep(t5)){
-t6=t3;
-f_7543(t6,t5);}
-else{
-t6=C_eqp(((C_word*)t0)[4],lf[621]);
-t7=t3;
-f_7543(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[622])));}}}}}
-
-/* k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7543(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7543,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1101 string-append");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[6],((C_word*)t0)[5],lf[605],((C_word*)t0)[4],lf[606]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7549,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[2]))){
-C_trace("c-backend.scm: 1103 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t2,C_retrieve(lf[618]),((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_7549(2,t3,C_SCHEME_FALSE);}}}
-
-/* k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7549,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7553,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("g17171718");
-t3=t2;
-f_7553(t3,((C_word*)t0)[3],t1);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-t2=C_i_car(((C_word*)t0)[2]);
-t3=C_eqp(t2,lf[607]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7588,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_7588(t5,t3);}
-else{
-t5=C_eqp(t2,lf[480]);
-if(C_truep(t5)){
-t6=t4;
-f_7588(t6,t5);}
-else{
-t6=C_eqp(t2,lf[610]);
-if(C_truep(t6)){
-t7=t4;
-f_7588(t7,t6);}
-else{
-t7=C_eqp(t2,lf[611]);
-if(C_truep(t7)){
-t8=t4;
-f_7588(t8,t7);}
-else{
-t8=C_eqp(t2,lf[612]);
-if(C_truep(t8)){
-t9=t4;
-f_7588(t9,t8);}
-else{
-t9=C_eqp(t2,lf[613]);
-if(C_truep(t9)){
-t10=t4;
-f_7588(t10,t9);}
-else{
-t10=C_eqp(t2,lf[614]);
-if(C_truep(t10)){
-t11=t4;
-f_7588(t11,t10);}
-else{
-t11=C_eqp(t2,lf[615]);
-t12=t4;
-f_7588(t12,(C_truep(t11)?t11:C_eqp(t2,lf[616])));}}}}}}}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}}}
-
-/* k7586 in k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7588(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-C_trace("c-backend.scm: 1110 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[608]);}
-else{
-t2=C_eqp(((C_word*)t0)[5],lf[609]);
-if(C_truep(t2)){
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1111 compute-size");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7500(5,t4,((C_word*)t0)[7],t3,((C_word*)t0)[2],((C_word*)t0)[6]);}
-else{
-t3=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[6]);}}}
-
-/* g1717 in k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7553(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7553,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_vectorp(t2))){
-t3=C_i_vector_ref(t2,C_fix(0));
-C_trace("c-backend.scm: 1105 compute-size");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_7500(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t3=t2;
-C_trace("c-backend.scm: 1105 compute-size");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_7500(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7151,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7157,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_7157(t7,t1,t2);}
-
-/* loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7157(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7157,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7165,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7452,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g14121413");
-t6=t3;
-f_7165(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7450 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7157(t3,((C_word*)t0)[2],t2);}
-
-/* g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7165(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7165,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7169,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1016 foreign-stub-id");
-((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),t3,t2);}
-
-/* k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7169(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7169,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7172,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1017 real-name2");
-((C_proc4)C_retrieve_symbol_proc(lf[596]))(4,*((C_word*)lf[596]+1),t2,t1,((C_word*)t0)[2]);}
-
-/* k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7172,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7175,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1018 foreign-stub-argument-types");
-((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),t2,((C_word*)t0)[2]);}
-
-/* k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7175,2,t0,t1);}
-t2=C_i_length(t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7181,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7449,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1020 make-variable-list");
-((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t4,t2,lf[594]);}
-
-/* k7447 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7449,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[593],t1);
-C_trace("c-backend.scm: 1020 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t2,C_make_character(44));}
-
-/* k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7181(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7181,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7184,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 1021 foreign-stub-return-type");
-((C_proc3)C_retrieve_symbol_proc(lf[592]))(3,*((C_word*)lf[592]+1),t2,((C_word*)t0)[2]);}
-
-/* k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7184,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7187,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 1022 foreign-stub-name");
-((C_proc3)C_retrieve_symbol_proc(lf[591]))(3,*((C_word*)lf[591]+1),t2,((C_word*)t0)[2]);}
-
-/* k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7187,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7190,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 1023 foreign-stub-body");
-((C_proc3)C_retrieve_symbol_proc(lf[590]))(3,*((C_word*)lf[590]+1),t2,((C_word*)t0)[2]);}
-
-/* k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7190,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 1024 foreign-stub-argument-names");
-((C_proc3)C_retrieve_symbol_proc(lf[589]))(3,*((C_word*)lf[589]+1),t2,((C_word*)t0)[2]);}
-
-/* k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7193,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_7196(2,t3,t1);}
-else{
-C_trace("c-backend.scm: 1024 make-list");
-((C_proc4)C_retrieve_symbol_proc(lf[247]))(4,*((C_word*)lf[247]+1),t2,((C_word*)t0)[8],C_SCHEME_FALSE);}}
-
-/* k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7196,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7199,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-C_trace("c-backend.scm: 1025 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t2,((C_word*)t0)[9],lf[588]);}
-
-/* k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7199(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7199,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7202,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-C_trace("c-backend.scm: 1026 foreign-stub-cps");
-((C_proc3)C_retrieve_symbol_proc(lf[587]))(3,*((C_word*)lf[587]+1),t2,((C_word*)t0)[2]);}
-
-/* k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7202,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7205,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-C_trace("c-backend.scm: 1027 foreign-stub-callback");
-((C_proc3)C_retrieve_symbol_proc(lf[586]))(3,*((C_word*)lf[586]+1),t2,((C_word*)t0)[2]);}
-
-/* k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7205,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t1,a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-C_trace("c-backend.scm: 1028 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-
-/* k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7208,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7211,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7438,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1030 cleanup");
-((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_7211(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k7436 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7438(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1030 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[584],t1,lf[585]);}
-
-/* k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(((C_word*)t0)[12])){
-C_trace("c-backend.scm: 1032 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[582],((C_word*)t0)[6],lf[583]);}
-else{
-t3=t2;
-f_7214(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7214(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7214,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7217,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(((C_word*)t0)[10])){
-C_trace("c-backend.scm: 1035 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[577],((C_word*)t0)[2],lf[578],C_SCHEME_TRUE,lf[579],((C_word*)t0)[2],lf[580]);}
-else{
-C_trace("c-backend.scm: 1037 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[581],((C_word*)t0)[2],C_make_character(40));}}
-
-/* k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7217,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7220,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[3]);}
-
-/* k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7220,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7223,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-if(C_truep(((C_word*)t0)[10])){
-C_trace("c-backend.scm: 1040 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[572],C_SCHEME_TRUE,lf[573],((C_word*)t0)[2],lf[574]);}
-else{
-C_trace("c-backend.scm: 1041 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[575],C_SCHEME_TRUE,lf[576],((C_word*)t0)[2],C_make_character(40));}}
-
-/* k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7223,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7226,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-
-/* k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7226(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7226,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7229,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 1043 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[571]);}
-
-/* k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7229(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7229,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7232,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 1044 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[570]);}
-
-/* k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7232(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7232,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7235,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1053 iota");
-((C_proc3)C_retrieve_symbol_proc(lf[60]))(3,*((C_word*)lf[60]+1),t3,((C_word*)t0)[6]);}
-
-/* k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7329,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7331,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_7331(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7331(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7331,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7338,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_pairp(t2))){
-t6=C_i_pairp(t3);
-t7=t5;
-f_7338(t7,(C_truep(t6)?C_i_pairp(t4):C_SCHEME_FALSE));}
-else{
-t6=t5;
-f_7338(t6,C_SCHEME_FALSE);}}
-
-/* k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_fcall f_7338(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7338,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_slot(((C_word*)t0)[6],C_fix(0));
-t4=C_slot(((C_word*)t0)[5],C_fix(0));
-t5=C_slot(((C_word*)t0)[4],C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7347,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7359,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t5)){
-C_trace("c-backend.scm: 1050 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t7,t5);}
-else{
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7365,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7365,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7368,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(116),t1);}
-
-/* k7366 in k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7368,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7371,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k7369 in k7366 in k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k7357 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1048 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1051 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[569]);}
-
-/* k7349 in k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7351,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7355,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 1052 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
-
-/* k7353 in k7349 in k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1047 gen");
-((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],lf[566],((C_word*)t0)[3],C_make_character(41),t1,lf[567],((C_word*)t0)[2],lf[568]);}
-
-/* k7375 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7377(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_slot(((C_word*)t0)[6],C_fix(1));
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_7331(t5,((C_word*)t0)[2],t2,t3,t4);}
-
-/* k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7235,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7238,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(((C_word*)t0)[7])){
-C_trace("c-backend.scm: 1054 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[565]);}
-else{
-t3=t2;
-f_7238(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7238(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7238,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7241,a[2]=((C_word*)t0)[9],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[8])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7247,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1056 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,((C_word*)t0)[8],C_SCHEME_TRUE,lf[556]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7268,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t4=C_eqp(((C_word*)t0)[5],lf[562]);
-if(C_truep(t4)){
-C_trace("c-backend.scm: 1067 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
-else{
-C_trace("c-backend.scm: 1066 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[564],((C_word*)t0)[2]);}}}
-
-/* k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7268,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7271,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 1068 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],C_make_character(40));}
-
-/* k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7271,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7274,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7305,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7309,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1069 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[2],lf[563]);}
-
-/* k7307 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7309(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1069 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-
-/* k7303 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-
-/* k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7274,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7277,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_eqp(((C_word*)t0)[2],lf[562]);
-if(C_truep(t3)){
-t4=t2;
-f_7277(2,t4,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 1070 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-
-/* k7275 in k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7277,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1071 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[561]);}
-
-/* k7278 in k7275 in k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 1073 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[557],C_SCHEME_TRUE,lf[558]);}
-else{
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 1075 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[559]);}
-else{
-C_trace("c-backend.scm: 1076 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[560]);}}}
-
-/* k7245 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7247,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 1058 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[555],C_SCHEME_TRUE);}
-
-/* k7248 in k7245 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 1060 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[551],C_SCHEME_TRUE,lf[552]);}
-else{
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 1062 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[553]);}
-else{
-C_trace("c-backend.scm: 1063 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[554]);}}}
-
-/* k7239 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
-static void C_ccall f_7241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1077 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-
-/* ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
-static void C_ccall f_7111(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7111,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7117,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_7117(t6,t1,t2);}
-
-/* loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
-static void C_fcall f_7117(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7117,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7138,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7129,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 1008 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7127 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
-static void C_ccall f_7129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7129,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7132,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1009 generate-foreign-callback-header");
-((C_proc4)C_retrieve_symbol_proc(lf[549]))(4,*((C_word*)lf[549]+1),t2,lf[550],((C_word*)t0)[2]);}
-
-/* k7130 in k7127 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
-static void C_ccall f_7132(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 1010 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k7136 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
-static void C_ccall f_7138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7117(t3,((C_word*)t0)[2],t2);}
-
-/* ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
-static void C_ccall f_7057(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7057,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7061,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 993 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
-
-/* k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
-static void C_ccall f_7061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7061,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7066,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_7066(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
-static void C_fcall f_7066(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7066,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7098,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=C_i_vector_ref(t4,C_fix(0));
-t6=C_i_vector_ref(t4,C_fix(1));
-t7=C_i_vector_ref(t4,C_fix(2));
-t8=(C_truep(t7)?lf[547]:lf[548]);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7095,a[2]=t8,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 999 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t9,t6,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7093 in loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 999 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2],t1,C_make_character(59));}
-
-/* k7096 in loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
-static void C_ccall f_7098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7066(t3,((C_word*)t0)[2],t2);}
-
-/* ##compiler#make-argument-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7041(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7041,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7047,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 985 list-tabulate");
-((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t1,t2,t4);}
-
-/* a7046 in ##compiler#make-argument-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7047(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7047,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7055,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 987 number->string");
-C_number_to_string(3,0,t3,t2);}
-
-/* k7053 in a7046 in ##compiler#make-argument-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 987 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* ##compiler#make-variable-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7025,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7031,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 980 list-tabulate");
-((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t1,t2,t4);}
-
-/* a7030 in ##compiler#make-variable-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7031(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7031,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7039,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 982 number->string");
-C_number_to_string(3,0,t3,t2);}
-
-/* k7037 in a7030 in ##compiler#make-variable-list in k2595 in k2509 in k2506 */
-static void C_ccall f_7039(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 982 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[545],((C_word*)t0)[2],t1);}
-
-/* ##compiler#cleanup in k2595 in k2509 in k2506 */
-static void C_ccall f_6936(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6936,3,t0,t1,t2);}
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_i_string_length(t2);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6945,a[2]=t7,a[3]=t2,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_6945(t9,t1,C_fix(0));}
-
-/* loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
-static void C_fcall f_6945(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6945,NULL,3,t0,t1,t2);}
-t3=t2;
-if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[5]))){
-t4=((C_word*)((C_word*)t0)[4])[1];
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?t4:((C_word*)t0)[3]));}
-else{
-t4=C_i_string_ref(((C_word*)t0)[3],t2);
-t5=C_fixnum_lessp(t4,C_make_character(32));
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6974,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_6974(t7,t5);}
-else{
-t7=C_fixnum_greaterp(t4,C_make_character(126));
-if(C_truep(t7)){
-t8=t6;
-f_6974(t8,t7);}
-else{
-t8=C_eqp(t4,C_make_character(42));
-if(C_truep(t8)){
-t9=C_fixnum_decrease(((C_word*)t0)[5]);
-t10=t2;
-if(C_truep(C_fixnum_lessp(t10,t9))){
-t11=C_fixnum_increase(t2);
-t12=C_i_string_ref(((C_word*)t0)[3],t11);
-t13=t6;
-f_6974(t13,C_eqp(C_make_character(47),t12));}
-else{
-t11=t6;
-f_6974(t11,C_SCHEME_FALSE);}}
-else{
-t9=t6;
-f_6974(t9,C_SCHEME_FALSE);}}}}}
-
-/* k6972 in loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
-static void C_fcall f_6974(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6974,NULL,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t2=C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],C_make_character(126));
-t3=C_fixnum_increase(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 974 loop");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_6945(t4,((C_word*)t0)[4],t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6984,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 971 string-copy");
-((C_proc3)C_retrieve_symbol_proc(lf[544]))(3,*((C_word*)lf[544]+1),t2,((C_word*)t0)[3]);}}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t2=C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[2]);
-t3=C_fixnum_increase(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 974 loop");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_6945(t4,((C_word*)t0)[4],t3);}
-else{
-t2=C_fixnum_increase(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 974 loop");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_6945(t3,((C_word*)t0)[4],t2);}}}
-
-/* k6982 in k6972 in loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
-static void C_ccall f_6984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_string_set(((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4],C_make_character(126));
-t4=C_fixnum_increase(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 974 loop");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_6945(t5,((C_word*)t0)[2],t4);}
-
-/* emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6859,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6863,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_length(t2);
-t6=C_fixnum_increase(t5);
-C_trace("c-backend.scm: 936 gen");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[541],C_SCHEME_TRUE,lf[542],t6,lf[543]);}
-
-/* k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6866,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6877,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_6877(t6,t2,((C_word*)t0)[2]);}
-
-/* doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_fcall f_6877(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6877,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-C_trace("c-backend.scm: 940 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_SCHEME_TRUE,lf[533]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6890,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=C_i_car(t2);
-C_trace("c-backend.scm: 941 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t3,t4);}}
-
-/* k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6890,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6893,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6922,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 942 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[540]))(3,*((C_word*)lf[540]+1),t3,((C_word*)t0)[2]);}
-
-/* k6920 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6922(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 942 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[538],((C_word*)t0)[2],C_make_character(58),t1,lf[539]);}
-
-/* k6891 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6896,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_eqp(lf[262],((C_word*)t0)[2]);
-if(C_truep(t3)){
-if(C_truep(C_retrieve(lf[213]))){
-C_trace("c-backend.scm: 945 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[534],C_retrieve(lf[213]),lf[535]);}
-else{
-C_trace("c-backend.scm: 946 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[536]);}}
-else{
-C_trace("c-backend.scm: 947 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[537]);}}
-
-/* k6894 in k6891 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6877(t3,((C_word*)t0)[2],t2);}
-
-/* k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6866,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6869,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 948 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[532]);}
-
-/* k6867 in k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6869,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6872,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 949 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[531]);}
-
-/* k6870 in k6867 in k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
-static void C_ccall f_6872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 950 gen");
-((C_proc15)C_retrieve_proc(*((C_word*)lf[1]+1)))(15,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[524],C_SCHEME_TRUE,lf[525],C_SCHEME_TRUE,lf[526],C_SCHEME_TRUE,lf[527],C_SCHEME_TRUE,lf[528],C_SCHEME_TRUE,lf[529],C_SCHEME_TRUE,lf[530]);}
-
-/* ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
-C_word tmp;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word ab[78],*a=ab;
-if(c!=9) C_bad_argc_2(c,9,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr9,(void*)f_2599,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_SCHEME_UNDEFINED;
-t22=(*a=C_VECTOR_TYPE|1,a[1]=t21,tmp=(C_word)a,a+=2,tmp);
-t23=C_SCHEME_UNDEFINED;
-t24=(*a=C_VECTOR_TYPE|1,a[1]=t23,tmp=(C_word)a,a+=2,tmp);
-t25=C_SCHEME_UNDEFINED;
-t26=(*a=C_VECTOR_TYPE|1,a[1]=t25,tmp=(C_word)a,a+=2,tmp);
-t27=C_SCHEME_UNDEFINED;
-t28=(*a=C_VECTOR_TYPE|1,a[1]=t27,tmp=(C_word)a,a+=2,tmp);
-t29=C_SCHEME_UNDEFINED;
-t30=(*a=C_VECTOR_TYPE|1,a[1]=t29,tmp=(C_word)a,a+=2,tmp);
-t31=C_SCHEME_UNDEFINED;
-t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
-t33=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2602,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t34=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2644,a[2]=t10,tmp=(C_word)a,a+=3,tmp));
-t35=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4525,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-t36=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4694,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
-t37=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4865,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t38=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5205,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t39=C_set_block_item(t22,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5525,a[2]=t2,a[3]=t26,tmp=(C_word)a,a+=4,tmp));
-t40=C_set_block_item(t24,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5580,a[2]=t24,tmp=(C_word)a,a+=3,tmp));
-t41=C_set_block_item(t26,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5774,a[2]=t28,tmp=(C_word)a,a+=3,tmp));
-t42=C_set_block_item(t28,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5916,a[2]=t30,tmp=(C_word)a,a+=3,tmp));
-t43=C_set_block_item(t30,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5993,tmp=(C_word)a,a+=2,tmp));
-t44=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6041,a[2]=t4,a[3]=t8,a[4]=t24,a[5]=t22,a[6]=t2,a[7]=t12,tmp=(C_word)a,a+=8,tmp));
-t45=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6826,a[2]=t14,a[3]=t16,a[4]=t18,a[5]=t8,a[6]=t20,a[7]=t32,a[8]=t6,a[9]=t4,a[10]=t1,a[11]=t5,tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 919 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[506]))(4,*((C_word*)lf[506]+1),t45,lf[522],lf[523]);}
-
-/* k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6826(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6826,2,t0,t1);}
-t2=C_mutate((C_word*)lf[0]+1 /* (set! output ...) */,((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6830,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 921 header");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_4525(t4,t3);}
-
-/* k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6830(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6830,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6833,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 922 declarations");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_4694(t3,t2);}
-
-/* k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6833,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6836,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 923 generate-external-variables");
-((C_proc3)C_retrieve_symbol_proc(lf[520]))(3,*((C_word*)lf[520]+1),t2,C_retrieve(lf[521]));}
-
-/* k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6836(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6836,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6839,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 924 generate-foreign-stubs");
-((C_proc4)C_retrieve_symbol_proc(lf[518]))(4,*((C_word*)lf[518]+1),t2,C_retrieve(lf[519]),((C_word*)t0)[3]);}
-
-/* k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6839,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6842,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 925 prototypes");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_4865(t3,t2);}
-
-/* k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6842(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6842,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6845,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 926 generate-foreign-callback-stubs");
-((C_proc4)C_retrieve_symbol_proc(lf[517]))(4,*((C_word*)lf[517]+1),t2,C_retrieve(lf[207]),((C_word*)t0)[2]);}
-
-/* k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6845(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6845,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6848,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 927 trampolines");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_5205(t3,t2);}
-
-/* k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6848(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6848,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6851,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 928 procedures");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_6041(t3,t2);}
-
-/* k6849 in k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6851,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6854,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 929 emit-procedure-table-info");
-((C_proc4)C_retrieve_symbol_proc(lf[516]))(4,*((C_word*)lf[516]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6852 in k6849 in k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[2];
-C_trace("c-backend.scm: 488 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[515],C_SCHEME_TRUE);}
-
-/* procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6041(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6041,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6047,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_6047(t5,t1,((C_word*)t0)[2]);}
-
-/* loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6047(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6047,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6055,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6812,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g10271028");
-t6=t3;
-f_6055(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6810 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6812(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6047(t3,((C_word*)t0)[2],t2);}
-
-/* g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6055(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6055,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6059,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 738 lambda-literal-argument-count");
-((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-
-/* k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6059(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6059,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6062,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 739 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[6]);}
-
-/* k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6062(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6062,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6065,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 740 real-name");
-((C_proc4)C_retrieve_symbol_proc(lf[514]))(4,*((C_word*)lf[514]+1),t2,t1,((C_word*)t0)[2]);}
-
-/* k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6065(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6065,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6068,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 741 lambda-literal-allocated");
-((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[6]);}
-
-/* k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6068(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6068,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 742 lambda-literal-rest-argument");
-((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t2,((C_word*)t0)[7]);}
-
-/* k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6071(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6071,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6074,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t3,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-C_trace("c-backend.scm: 743 lambda-literal-customizable");
-((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t4,((C_word*)t0)[8]);}
-
-/* k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6074,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6077,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6809,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 744 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[8]);}
-else{
-t3=t2;
-f_6077(t3,C_SCHEME_FALSE);}}
-
-/* k6807 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_6077(t2,C_eqp(t1,C_fix(0)));}
-
-/* k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6077(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6077,NULL,2,t0,t1);}
-t2=(C_truep(t1)?C_fixnum_difference(((C_word*)t0)[13],C_fix(1)):C_a_i_minus(&a,2,((C_word*)t0)[13],C_fix(0)));
-t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_6083,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[11],a[15]=((C_word*)t0)[12],tmp=(C_word)a,a+=16,tmp);
-C_trace("c-backend.scm: 746 make-variable-list");
-((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,((C_word*)t0)[13],lf[513]);}
-
-/* k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6083(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6083,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6086,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-C_trace("c-backend.scm: 747 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t2,((C_word*)t0)[13],lf[512]);}
-
-/* k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6086(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6086,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6089,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=C_i_cdr(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 748 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}
-else{
-t3=((C_word*)t0)[2];
-C_trace("c-backend.scm: 748 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
-
-/* k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6089,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6092,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t1,a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=C_i_cdr(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 749 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}
-else{
-t3=((C_word*)t0)[2];
-C_trace("c-backend.scm: 749 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
-
-/* k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6092(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6092,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_6095,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
-C_trace("c-backend.scm: 750 lambda-literal-external");
-((C_proc3)C_retrieve_symbol_proc(lf[337]))(3,*((C_word*)lf[337]+1),t2,((C_word*)t0)[12]);}
-
-/* k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6095,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_6098,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
-C_trace("c-backend.scm: 751 lambda-literal-looping");
-((C_proc3)C_retrieve_symbol_proc(lf[108]))(3,*((C_word*)lf[108]+1),t2,((C_word*)t0)[13]);}
-
-/* k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6098,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_6101,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],tmp=(C_word)a,a+=20,tmp);
-C_trace("c-backend.scm: 752 lambda-literal-direct");
-((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[14]);}
-
-/* k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6101,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_6104,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
-C_trace("c-backend.scm: 753 lambda-literal-rest-argument-mode");
-((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[15]);}
-
-/* k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6104,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_6107,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],tmp=(C_word)a,a+=22,tmp);
-C_trace("c-backend.scm: 754 lambda-literal-temporaries");
-((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t2,((C_word*)t0)[16]);}
-
-/* k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6107,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6110,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],tmp=(C_word)a,a+=23,tmp);
-C_trace("c-backend.scm: 755 lambda-literal-unboxed-temporaries");
-((C_proc3)C_retrieve_symbol_proc(lf[511]))(3,*((C_word*)lf[511]+1),t2,((C_word*)t0)[17]);}
-
-/* k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6110(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6110,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6113,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
-if(C_truep(C_retrieve(lf[213]))){
-C_trace("c-backend.scm: 757 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t2,C_retrieve(lf[213]),lf[509]);}
-else{
-t3=t2;
-f_6113(2,t3,lf[510]);}}
-
-/* k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6113(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6113,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_6116,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],tmp=(C_word)a,a+=25,tmp);
-if(C_truep(((C_word*)t0)[6])){
-C_trace("c-backend.scm: 759 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[506]))(5,*((C_word*)lf[506]+1),t2,lf[507],lf[508],((C_word*)t0)[15]);}
-else{
-t3=t2;
-f_6116(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6116,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_6119,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
-C_trace("c-backend.scm: 760 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6119,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6122,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],tmp=(C_word)a,a+=24,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6778,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 761 cleanup");
-((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
-
-/* k6776 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 761 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[503],t1,lf[504],C_SCHEME_TRUE);}
-
-/* k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6122,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6125,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-t3=C_eqp(lf[262],((C_word*)t0)[15]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6761,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 770 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[497]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6739,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 763 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[502]);}}
-
-/* k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6739(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6739,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 764 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[500]);}
-else{
-C_trace("c-backend.scm: 764 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[501]);}}
-
-/* k6740 in k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6742,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6745,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 766 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[498]);}
-else{
-C_trace("c-backend.scm: 767 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[499]);}}
-
-/* k6743 in k6740 in k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 768 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6759 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6761,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6764,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_retrieve(lf[213]))){
-t3=t2;
-f_6764(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 772 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[496]);}}
-
-/* k6762 in k6759 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6764(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 773 gen");
-((C_proc16)C_retrieve_proc(*((C_word*)lf[1]+1)))(16,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[490],C_SCHEME_TRUE,lf[491],C_SCHEME_TRUE,lf[492],C_SCHEME_TRUE,lf[493],((C_word*)t0)[2],lf[494],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[495],((C_word*)t0)[2]);}
-
-/* k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6125(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6125,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6128,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-C_trace("c-backend.scm: 778 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
-
-/* k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6128(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6128,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6131,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-if(C_truep(((C_word*)t0)[12])){
-t3=t2;
-f_6131(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 779 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[489]);}}
-
-/* k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6131(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6131,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6134,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6711,a[2]=t2,a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[11])){
-t4=C_eqp(((C_word*)t0)[18],C_fix(0));
-t5=t3;
-f_6711(t5,C_i_not(t4));}
-else{
-t4=t3;
-f_6711(t4,C_SCHEME_FALSE);}}
-
-/* k6709 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6711(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6711,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6714,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 781 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[488]);}
-else{
-t2=((C_word*)t0)[2];
-f_6134(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k6712 in k6709 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 782 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_6134(2,t3,t2);}}
-
-/* k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6134(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6134,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6137,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[16]);}
-
-/* k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6137,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6140,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[22])[1])){
-C_trace("c-backend.scm: 784 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[487]);}
-else{
-t3=t2;
-f_6140(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6140,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6143,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-C_trace("c-backend.scm: 785 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[486]);}
-
-/* k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6143,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6146,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-t3=C_eqp(((C_word*)t0)[3],lf[251]);
-if(C_truep(t3)){
-t4=C_set_block_item(((C_word*)t0)[22],0,C_SCHEME_FALSE);
-t5=t2;
-f_6146(t5,t4);}
-else{
-t4=t2;
-f_6146(t4,C_SCHEME_UNDEFINED);}}
-
-/* k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6146(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6146,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6149,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-C_trace("c-backend.scm: 787 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[485]);}
-
-/* k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6149,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6152,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],tmp=(C_word)a,a+=23,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[22])[1])){
-C_trace("c-backend.scm: 789 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[474],((C_word*)t0)[21],C_make_character(59));}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6624,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6671,a[2]=((C_word*)t0)[21],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t5=C_fixnum_decrease(((C_word*)t0)[21]);
-t6=t4;
-f_6671(t6,C_fixnum_plus(((C_word*)t0)[17],t5));}
-else{
-t5=t4;
-f_6671(t5,((C_word*)t0)[17]);}}}
-
-/* k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6671(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6671,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6673,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_6673(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* doloop1080 in k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6673(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6673,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6683,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 794 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[484],t2,C_make_character(59));}}
-
-/* k6681 in doloop1080 in k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_increase(((C_word*)t0)[5]);
-t3=C_fixnum_decrease(((C_word*)t0)[4]);
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_6673(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6629,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_6629(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6629(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6629,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6656,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6645,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t6=C_i_cdr(t4);
-t7=C_eqp(t6,lf[475]);
-if(C_truep(t7)){
-t8=C_i_car(t4);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[476],C_make_character(32),t8,C_make_character(59));}
-else{
-t8=C_eqp(t6,lf[477]);
-if(C_truep(t8)){
-t9=C_i_car(t4);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[478],C_make_character(32),t9,C_make_character(59));}
-else{
-t9=C_eqp(t6,lf[16]);
-if(C_truep(t9)){
-t10=C_i_car(t4);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[479],C_make_character(32),t10,C_make_character(59));}
-else{
-t10=C_eqp(t6,lf[480]);
-if(C_truep(t10)){
-t11=C_i_car(t4);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[481],C_make_character(32),t11,C_make_character(59));}
-else{
-t11=C_eqp(t6,lf[13]);
-if(C_truep(t11)){
-t12=C_i_car(t4);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[482],C_make_character(32),t12,C_make_character(59));}
-else{
-C_trace("c-backend.scm: 733 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t5,lf[483],t6);}}}}}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6643 in loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 797 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,t1,C_make_character(32),t2,C_make_character(59));}
-
-/* k6654 in loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6629(t3,((C_word*)t0)[2],t2);}
-
-/* k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6152(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[32],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6152,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_6155,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[16],a[10]=((C_word*)t0)[17],a[11]=((C_word*)t0)[18],a[12]=((C_word*)t0)[19],a[13]=((C_word*)t0)[20],a[14]=((C_word*)t0)[21],a[15]=((C_word*)t0)[22],tmp=(C_word)a,a+=16,tmp);
-t3=C_eqp(lf[262],((C_word*)t0)[14]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6342,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[17],a[4]=((C_word*)t0)[7],a[5]=t2,a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6417,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 800 fold");
-((C_proc5)C_retrieve_symbol_proc(lf[441]))(5,*((C_word*)lf[441]+1),t4,t5,C_fix(0),((C_word*)t0)[8]);}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[21])[1])){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6431,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[20],a[4]=((C_word*)t0)[17],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 834 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[455]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6495,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[20],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t2,a[8]=((C_word*)t0)[17],a[9]=((C_word*)t0)[3],tmp=(C_word)a,a+=10,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6573,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[17],a[4]=t4,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t6=((C_word*)t0)[10];
-if(C_truep(t6)){
-t7=t5;
-f_6573(t7,C_SCHEME_FALSE);}
-else{
-t7=((C_word*)t0)[17];
-t8=t5;
-f_6573(t8,C_fixnum_greaterp(t7,C_fix(0)));}}}}
-
-/* k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6573(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6573,NULL,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(((C_word*)t0)[5])){
-C_trace("c-backend.scm: 848 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[465],C_SCHEME_TRUE,lf[466],C_SCHEME_TRUE,lf[467],((C_word*)t0)[3],lf[468]);}
-else{
-C_trace("c-backend.scm: 851 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[469],((C_word*)t0)[3],lf[470]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6585,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=t2;
-f_6585(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 853 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[473]);}}}
-
-/* k6583 in k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6585(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6585,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6588,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 854 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[472]);}
-else{
-t3=t2;
-f_6588(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6586 in k6583 in k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6588(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(C_truep(((C_word*)t0)[3])){
-t2=C_retrieve(lf[131]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[2];
-f_6495(2,t4,t3);}
-else{
-t3=C_retrieve(lf[435]);
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=((C_word*)t0)[2];
-f_6495(2,t5,t4);}
-else{
-C_trace("c-backend.scm: 858 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[471]);}}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_6495(2,t3,t2);}}
-
-/* k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6495(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6495,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6498,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6537,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[5])){
-t4=C_retrieve(lf[131]);
-if(C_truep(t4)){
-t5=t3;
-f_6537(t5,C_SCHEME_FALSE);}
-else{
-t5=C_retrieve(lf[449]);
-t6=t3;
-f_6537(t6,(C_truep(t5)?C_SCHEME_FALSE:C_i_not(((C_word*)t0)[2])));}}
-else{
-t4=t3;
-f_6537(t4,C_SCHEME_FALSE);}}
-
-/* k6535 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6537(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_eqp(((C_word*)t0)[4],lf[251]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-if(C_truep(C_fixnum_greaterp(t3,C_fix(2)))){
-C_trace("c-backend.scm: 862 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[459],((C_word*)t0)[3],lf[460],((C_word*)t0)[3],lf[461]);}
-else{
-t4=((C_word*)t0)[2];
-f_6498(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-C_trace("c-backend.scm: 863 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[462],((C_word*)t0)[3],lf[463],((C_word*)t0)[3],lf[464]);}}
-else{
-t2=((C_word*)t0)[2];
-f_6498(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6498,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6504,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(t3)){
-t4=t2;
-f_6504(t4,C_SCHEME_FALSE);}
-else{
-if(C_truep(((C_word*)t0)[2])){
-t4=((C_word*)t0)[2];
-t5=t2;
-f_6504(t5,t4);}
-else{
-t4=((C_word*)t0)[5];
-t5=t2;
-f_6504(t5,C_fixnum_greaterp(t4,C_fix(0)));}}}
-
-/* k6502 in k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6504(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6504,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6507,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_retrieve(lf[444]))){
-C_trace("c-backend.scm: 865 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[458]);}
-else{
-t3=t2;
-f_6507(2,t3,C_SCHEME_UNDEFINED);}}
-else{
-t2=((C_word*)t0)[2];
-f_6155(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k6505 in k6502 in k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-t2=((C_word*)t0)[3];
-if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
-C_trace("c-backend.scm: 867 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[456]);}
-else{
-C_trace("c-backend.scm: 868 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[457]);}}
-else{
-C_trace("c-backend.scm: 868 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[457]);}}
-
-/* k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6431,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 835 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[454]);}
-
-/* k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6434(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6434,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 836 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[453]);}
-
-/* k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6437(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6437,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6440,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(C_fixnum_greaterp(t3,C_fix(0)))){
-t4=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-C_trace("c-backend.scm: 838 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_make_character(116),t4);}
-else{
-C_trace("c-backend.scm: 839 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[452]);}}
-
-/* k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6440,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6443,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 840 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[450],((C_word*)t0)[3],lf[451]);}
-
-/* k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6443,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6446,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6458,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=C_retrieve(lf[131]);
-if(C_truep(t4)){
-t5=t3;
-f_6458(t5,C_SCHEME_FALSE);}
-else{
-t5=C_retrieve(lf[449]);
-if(C_truep(t5)){
-t6=t3;
-f_6458(t6,C_SCHEME_FALSE);}
-else{
-t6=((C_word*)t0)[3];
-t7=C_fixnum_greaterp(t6,C_fix(2));
-t8=t3;
-f_6458(t8,(C_truep(t7)?C_i_not(((C_word*)t0)[2]):C_SCHEME_FALSE));}}}
-
-/* k6456 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6458(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("c-backend.scm: 842 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[446],((C_word*)t0)[2],lf[447],((C_word*)t0)[2],lf[448]);}
-else{
-t2=((C_word*)t0)[3];
-f_6446(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k6444 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6446(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6446,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6449,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_retrieve(lf[444]))){
-C_trace("c-backend.scm: 843 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[445]);}
-else{
-C_trace("c-backend.scm: 844 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[442],((C_word*)t0)[2],lf[443]);}}
-
-/* k6447 in k6444 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 844 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[442],((C_word*)t0)[2],lf[443]);}
-
-/* a6416 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6417(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6417,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6425,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 800 literal-size");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_5580(t5,t4,t2);}
-
-/* k6423 in a6416 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(((C_word*)t0)[2],t1));}
-
-/* k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6342,2,t0,t1);}
-t2=C_i_length(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6348,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 802 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[437],C_SCHEME_TRUE,lf[438],C_SCHEME_TRUE,lf[439],((C_word*)t0)[2],lf[440]);}
-
-/* k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6348,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_retrieve(lf[435]))){
-C_trace("c-backend.scm: 806 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[436]);}
-else{
-t3=t2;
-f_6351(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6351,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6354,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_retrieve(lf[213]))){
-t3=t2;
-f_6354(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6385,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[428]))){
-C_trace("c-backend.scm: 809 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[429],C_retrieve(lf[428]),lf[430]);}
-else{
-if(C_truep(C_retrieve(lf[431]))){
-C_trace("c-backend.scm: 811 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[432],C_retrieve(lf[431]),lf[433],C_SCHEME_TRUE,lf[434]);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t3;
-f_6385(2,t5,t4);}}}}
-
-/* k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6385,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6388,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[426]))){
-C_trace("c-backend.scm: 814 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[427],C_retrieve(lf[426]),C_make_character(59));}
-else{
-t3=t2;
-f_6388(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6386 in k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6388(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6388,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6391,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[424]))){
-C_trace("c-backend.scm: 816 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[425],C_retrieve(lf[424]),C_make_character(59));}
-else{
-t3=t2;
-f_6391(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6389 in k6386 in k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6391(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_retrieve(lf[421]))){
-C_trace("c-backend.scm: 818 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[422],C_retrieve(lf[421]),lf[423]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_6354(2,t3,t2);}}
-
-/* k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6354(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6354,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6357,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 819 gen");
-((C_proc16)C_retrieve_proc(*((C_word*)lf[1]+1)))(16,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[414],((C_word*)t0)[3],lf[415],C_SCHEME_TRUE,lf[416],((C_word*)t0)[3],lf[417],C_SCHEME_TRUE,lf[418],C_SCHEME_TRUE,lf[419],C_SCHEME_TRUE,lf[420]);}
-
-/* k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6357,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6360,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 824 gen");
-((C_proc14)C_retrieve_proc(*((C_word*)lf[1]+1)))(14,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[408],((C_word*)t0)[2],lf[409],C_SCHEME_TRUE,lf[410],C_SCHEME_TRUE,lf[411],((C_word*)t0)[2],lf[412],C_SCHEME_TRUE,lf[413]);}
-
-/* k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6360,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6363,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 828 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[406],((C_word*)t0)[2],lf[407]);}
-
-/* k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6363,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[4],C_fix(0));
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-f_6155(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 830 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[404],((C_word*)t0)[4],lf[405]);}}
-
-/* k6370 in k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6372(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6372,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6375,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 831 literal-frame");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_5525(t3,t2);}
-
-/* k6373 in k6370 in k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6375(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 832 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[402],((C_word*)t0)[2],lf[403]);}
-
-/* k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6155,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6158,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6178,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[13],a[9]=t2,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[14],tmp=(C_word)a,a+=12,tmp);
-t4=C_eqp(lf[262],((C_word*)t0)[7]);
-if(C_truep(t4)){
-t5=t3;
-f_6178(t5,C_SCHEME_FALSE);}
-else{
-t5=((C_word*)t0)[3];
-if(C_truep(t5)){
-t6=t3;
-f_6178(t6,C_SCHEME_FALSE);}
-else{
-t6=((C_word*)((C_word*)t0)[14])[1];
-if(C_truep(t6)){
-t7=t3;
-f_6178(t7,t6);}
-else{
-if(C_truep(((C_word*)t0)[2])){
-t7=((C_word*)t0)[2];
-t8=t3;
-f_6178(t8,t7);}
-else{
-t7=((C_word*)t0)[10];
-t8=t3;
-f_6178(t8,C_fixnum_greaterp(t7,C_fix(0)));}}}}}
-
-/* k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6178(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6178,NULL,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(((C_word*)((C_word*)t0)[11])[1])){
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6184,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
-C_trace("c-backend.scm: 879 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[393],lf[394],((C_word*)t0)[8],C_make_character(114));}
-else{
-C_trace("c-backend.scm: 879 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[395],lf[394],((C_word*)t0)[8],C_make_character(114));}}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6283,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
-C_trace("c-backend.scm: 902 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[399],lf[400]);}
-else{
-C_trace("c-backend.scm: 902 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[401],lf[400]);}}}
-else{
-t2=((C_word*)t0)[9];
-f_6158(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6286,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 904 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[3],lf[397]);}
-else{
-C_trace("c-backend.scm: 905 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[398],((C_word*)t0)[3]);}}
-
-/* k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6286,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6289,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6298,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 907 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_make_character(44),((C_word*)t0)[3],C_make_character(44));}
-else{
-C_trace("c-backend.scm: 909 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[4],lf[396]);}}
-
-/* k6296 in k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-
-/* k6287 in k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 909 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[396]);}
-
-/* k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6184,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6187,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 880 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[391],((C_word*)t0)[4],lf[392]);}
-
-/* k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6187,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6190,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6270,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 882 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_make_character(44),((C_word*)t0)[3],C_make_character(44));}
-else{
-t3=t2;
-f_6190(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6268 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-
-/* k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6190,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 884 gen");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,lf[387],C_SCHEME_TRUE,lf[388],C_SCHEME_TRUE,lf[389],((C_word*)t0)[5],lf[390]);}
-
-/* k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6193,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 887 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[385],((C_word*)t0)[5],lf[386]);}
-
-/* k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6196,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6199,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 888 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],lf[384]);}
-
-/* k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6199(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6199,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6202,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6260,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6264,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 889 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[5],lf[383]);}
-
-/* k6262 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 889 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-
-/* k6258 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-
-/* k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6202,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6205,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 890 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[381],((C_word*)t0)[5],lf[382]);}
-
-/* k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6205,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6208,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 892 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[379],((C_word*)t0)[2],lf[380]);}
-
-/* k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6208,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6211,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-
-/* k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6211,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 894 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[377],((C_word*)t0)[3],lf[378]);}
-
-/* k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6214(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6214,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6217,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 895 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[376]);}
-
-/* k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6217,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6220,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6235,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t7=((C_word*)t5)[1];
-f_6235(t7,t2,t3,((C_word*)t0)[2]);}
-
-/* doloop1230 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_6235(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6235,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6245,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 899 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[375],t2,C_make_character(59));}}
-
-/* k6243 in doloop1230 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_6235(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k6218 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
-C_trace("c-backend.scm: 900 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[373],((C_word*)t0)[3],lf[374]);}
-else{
-t3=((C_word*)t0)[2];
-f_6158(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6158,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6161,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6168,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 911 lambda-literal-body");
-((C_proc3)C_retrieve_symbol_proc(lf[372]))(3,*((C_word*)lf[372]+1),t3,((C_word*)t0)[2]);}
-
-/* k6166 in k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=C_fixnum_increase(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 910 expression");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2644(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[5];
-C_trace("c-backend.scm: 910 expression");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2644(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}}
-
-/* k6159 in k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 916 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-
-/* string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5993(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5993,NULL,4,t1,t2,t3,t4);}
-t5=C_fixnum_difference(t4,t3);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6000,a[2]=t5,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 722 make-string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[371]+1)))(3,*((C_word*)lf[371]+1),t6,t5);}
-
-/* k5998 in string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6000(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6000,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6003,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 723 ##sys#copy-bytes");
-((C_proc7)C_retrieve_symbol_proc(lf[370]))(7,*((C_word*)lf[370]+1),t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
-
-/* k6001 in k5998 in string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_6003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5916(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5916,NULL,3,t0,t1,t2);}
-t3=C_block_size(t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5923,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 711 fx/");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[369]+1)))(4,*((C_word*)lf[369]+1),t4,t3,C_fix(80));}
-
-/* k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5923,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5926,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 712 modulo");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[368]+1)))(4,*((C_word*)lf[368]+1),t2,((C_word*)t0)[5],C_fix(80));}
-
-/* k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5926,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5931,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_5931(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
-
-/* doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5931(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5931,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_fix(0));
-if(C_truep(t4)){
-t5=C_eqp(((C_word*)t0)[6],C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5947,a[2]=((C_word*)t0)[6],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_5947(t7,t5);}
-else{
-t7=C_eqp(((C_word*)t0)[3],C_fix(0));
-t8=t6;
-f_5947(t8,C_i_not(t7));}}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5968,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5983,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5987,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-t8=C_fixnum_plus(t3,C_fix(80));
-C_trace("c-backend.scm: 718 string-like-substring");
-f_5993(t7,((C_word*)t0)[4],t3,t8);}}
-
-/* k5985 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 718 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-
-/* k5981 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 718 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k5966 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_decrease(((C_word*)t0)[5]);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(80));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_5931(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5947(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5947,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5954,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5958,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 717 string-like-substring");
-f_5993(t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k5956 in k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 717 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-
-/* k5952 in k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 717 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1);}
-
-/* gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5774(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5774,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5781,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnump(t2))){
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5914,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 684 big-fixnum?");
-((C_proc3)C_retrieve_symbol_proc(lf[367]))(3,*((C_word*)lf[367]+1),t5,t2);}
-else{
-t5=t4;
-f_5781(t5,C_SCHEME_FALSE);}}
-
-/* k5912 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_5781(t2,C_i_not(t1));}
-
-/* k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5781(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5781,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-backend.scm: 685 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],lf[352],((C_word*)t0)[3],lf[353]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5787,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 686 block-variable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[350]))(3,*((C_word*)lf[350]+1),t2,((C_word*)t0)[3]);}}
-
-/* k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5787,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_retrieve(lf[354]);
-t3=C_eqp(((C_word*)t0)[4],t2);
-if(C_truep(t3)){
-C_trace("c-backend.scm: 688 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[355]);}
-else{
-if(C_truep(C_booleanp(((C_word*)t0)[4]))){
-if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 690 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],C_make_character(61),lf[356],C_make_character(59));}
-else{
-C_trace("c-backend.scm: 690 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],C_make_character(61),lf[357],C_make_character(59));}}
-else{
-if(C_truep(C_charp(((C_word*)t0)[4]))){
-t4=C_fix(C_character_code(((C_word*)t0)[4]));
-C_trace("c-backend.scm: 692 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[358],t4,lf[359]);}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[4]))){
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5837,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 695 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),t5,t4);}
-else{
-if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
-C_trace("c-backend.scm: 700 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[363]);}
-else{
-t4=C_immp(((C_word*)t0)[4]);
-t5=(C_truep(t4)?C_SCHEME_FALSE:C_lambdainfop(((C_word*)t0)[4]));
-if(C_truep(t5)){
-t6=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=C_fixnump(((C_word*)t0)[4]);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t6)){
-t8=t7;
-f_5870(t8,t6);}
-else{
-t8=C_immp(((C_word*)t0)[4]);
-t9=t7;
-f_5870(t9,C_i_not(t8));}}}}}}}}}
-
-/* k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5870(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5870,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5873,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 704 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],lf[366]);}
-else{
-t2=((C_word*)t0)[5];
-t3=((C_word*)t0)[3];
-C_trace("c-backend.scm: 661 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}}
-
-/* k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5873,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5876,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5883,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 705 encode-literal");
-((C_proc3)C_retrieve_symbol_proc(lf[365]))(3,*((C_word*)lf[365]+1),t3,((C_word*)t0)[2]);}
-
-/* k5881 in k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 705 gen-string-constant");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_5916(t2,((C_word*)t0)[2],t1);}
-
-/* k5874 in k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 706 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[364]);}
-
-/* k5835 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5837,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5843,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 697 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,((C_word*)t0)[2],lf[362]);}
-
-/* k5841 in k5835 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5843(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 698 gen");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),((C_word*)t0)[5],lf[360],((C_word*)t0)[4],C_make_character(44),((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],lf[361]);}
-
-/* literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5580(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5580,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5587,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 664 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[351]))(3,*((C_word*)lf[351]+1),t3,t2);}
-
-/* k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5587,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-else{
-if(C_truep(C_i_stringp(((C_word*)t0)[3]))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-else{
-if(C_truep(C_i_numberp(((C_word*)t0)[3]))){
-t2=C_retrieve(lf[343]);
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(10));}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5618,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_car(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 668 literal-size");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5580(t4,t2,t3);}
-else{
-if(C_truep(C_i_vectorp(((C_word*)t0)[3]))){
-t2=C_i_vector_length(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5647,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5651,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5655,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 669 vector->list");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[346]+1)))(3,*((C_word*)lf[346]+1),t9,((C_word*)t0)[3]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 670 block-variable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[350]))(3,*((C_word*)lf[350]+1),t2,((C_word*)t0)[3]);}}}}}}}
-
-/* k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5696,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-else{
-if(C_truep(C_immp(((C_word*)t0)[3]))){
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-C_trace("c-backend.scm: 661 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}
-else{
-if(C_truep(C_lambdainfop(((C_word*)t0)[3]))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5714,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 673 ##sys#bytevector?");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[349]+1)))(3,*((C_word*)lf[349]+1),t2,((C_word*)t0)[3]);}}}}
-
-/* k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5714,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5721,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=C_block_size(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 673 words");
-((C_proc3)C_retrieve_symbol_proc(lf[348]))(3,*((C_word*)lf[348]+1),t2,t3);}
-else{
-if(C_truep(C_structurep(((C_word*)t0)[3]))){
-t2=C_block_size(((C_word*)t0)[3]);
-t3=C_fixnum_plus(C_fix(2),t2);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5743,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t2,tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_5743(t7,((C_word*)t0)[4],C_fix(0),t3);}
-else{
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-C_trace("c-backend.scm: 661 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}}}
-
-/* loop in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5743(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5743,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-if(C_truep(C_fixnum_greater_or_equal_p(t4,((C_word*)t0)[5]))){
-t5=t3;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=C_fixnum_increase(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5765,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t7=C_slot(((C_word*)t0)[3],t2);
-C_trace("c-backend.scm: 679 literal-size");
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_5580(t8,t6,t7);}}
-
-/* k5763 in loop in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5765(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],t1);
-C_trace("c-backend.scm: 679 loop");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_5743(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k5719 in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5721(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(C_fix(2),t1));}
-
-/* k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5655,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5657,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_5657(t5,((C_word*)t0)[2],t1);}
-
-/* loop925 in k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5657(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5657,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5686,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-C_trace("g941942");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_5580(t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5684 in loop925 in k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5686,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop925938");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5657(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop925938");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5657(t6,((C_word*)t0)[3],t5);}}
-
-/* k5649 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5651(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 669 reduce");
-((C_proc5)C_retrieve_symbol_proc(lf[344]))(5,*((C_word*)lf[344]+1),((C_word*)t0)[2],*((C_word*)lf[345]+1),C_fix(0),t1);}
-
-/* k5645 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5647(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(C_fixnum_plus(C_fix(1),((C_word*)t0)[2]),t1));}
-
-/* k5616 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5618(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5618,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5622,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 668 literal-size");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5580(t4,t2,t3);}
-
-/* k5620 in k5616 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(C_fixnum_plus(C_fix(3),((C_word*)t0)[2]),t1));}
-
-/* literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5525(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5525,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5531,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_5531(t5,t1,C_fix(0),((C_word*)t0)[2]);}
-
-/* doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5531(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5531,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5541,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=C_i_car(t3);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5560,a[2]=t2,a[3]=t5,a[4]=t4,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}}
-
-/* k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5560(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5560,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5563,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[341],t1);}
-
-/* k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5563,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5566,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[340]+1)))(4,*((C_word*)lf[340]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5566,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5569,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("write-char/port");
-t3=C_retrieve(lf[339]);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(93),((C_word*)t0)[2]);}
-
-/* k5567 in k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5569,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5572,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),t2,((C_word*)t0)[2]);}
-
-/* k5570 in k5567 in k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5572(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 658 gen-lit");
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k5539 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_increase(((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[4]);
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_5531(t4,((C_word*)t0)[2],t2,t3);}
-
-/* trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5205(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5205,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5208,tmp=(C_word)a,a+=2,tmp));
-t11=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5244,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
-t12=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5324,a[2]=t3,a[3]=t7,a[4]=t5,a[5]=t9,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5394,a[2]=t14,a[3]=t3,a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp));
-t16=((C_word*)t14)[1];
-f_5394(t16,t12,((C_word*)t0)[2]);}
-
-/* loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5394(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5394,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5512,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g820821");
-t6=t3;
-f_5402(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5510 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5394(t3,((C_word*)t0)[2],t2);}
-
-/* g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5402(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5402,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5406,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 619 lambda-literal-argument-count");
-((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-
-/* k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5406,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5409,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 620 lambda-literal-rest-argument");
-((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t4,((C_word*)t0)[2]);}
-
-/* k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5409,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5412,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 621 lambda-literal-rest-argument-mode");
-((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[2]);}
-
-/* k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5412,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5415,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 622 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
-
-/* k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5415,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 623 lambda-literal-customizable");
-((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t2,((C_word*)t0)[2]);}
-
-/* k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5418,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5421,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5509,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 624 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_5421(t3,C_SCHEME_FALSE);}}
-
-/* k5507 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_5421(t2,C_eqp(t1,C_fix(0)));}
-
-/* k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5421(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5421,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5424,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t1)){
-t3=C_fixnum_decrease(((C_word*)((C_word*)t0)[9])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[9])+1,t3);
-t5=t2;
-f_5424(t5,t4);}
-else{
-t3=t2;
-f_5424(t3,C_SCHEME_UNDEFINED);}}
-
-/* k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5424(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5424,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5430,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 626 lambda-literal-direct");
-((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[2]);}
-
-/* k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(((C_word*)t0)[10])){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5436,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 628 gen");
-((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[333],((C_word*)t0)[8],lf[334],C_SCHEME_TRUE,lf[335],((C_word*)t0)[8],lf[336]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5464,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=t2;
-f_5464(2,t3,((C_word*)t0)[4]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5498,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 636 lambda-literal-allocated");
-((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t3,((C_word*)t0)[2]);}}}}
-
-/* k5496 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_greaterp(t1,C_fix(0));
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-f_5464(2,t3,t2);}
-else{
-C_trace("c-backend.scm: 636 lambda-literal-external");
-((C_proc3)C_retrieve_symbol_proc(lf[337]))(3,*((C_word*)lf[337]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5464,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5470,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=C_eqp(((C_word*)t0)[2],lf[251]);
-t4=t2;
-f_5470(t4,C_i_not(t3));}
-else{
-t3=t2;
-f_5470(t3,C_SCHEME_FALSE);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5470(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5470,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5474,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 638 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t2,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[5])[1],((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5478,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 639 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t2,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[2])[1],((C_word*)((C_word*)t0)[3])[1]);}}
-
-/* k5476 in k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5478(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k5472 in k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5474(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5436,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 630 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[331],((C_word*)t0)[3],lf[332]);}
-
-/* k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5442,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 631 restore");
-f_5208(t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5442(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5442,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5445,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 632 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],C_make_character(40));}
-
-/* k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5445,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5448,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 633 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t2,((C_word*)((C_word*)t0)[2])[1],lf[330]);}
-
-/* k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5448,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5458,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 634 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t3,t1,C_make_character(44));}
-
-/* k5456 in k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-
-/* k5449 in k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5451(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 635 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[329]);}
-
-/* k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5324(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5324,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5327,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5343,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_5343(t6,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5343(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5343,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5351,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5381,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g872873");
-t6=t3;
-f_5351(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5379 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5343(t3,((C_word*)t0)[2],t2);}
-
-/* g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5351(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5351,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5355,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 643 gen");
-((C_proc13)C_retrieve_proc(*((C_word*)lf[1]+1)))(13,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[324],t2,lf[325],C_SCHEME_TRUE,lf[326],t2,lf[327],t2,lf[328]);}
-
-/* k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5358,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 645 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[321],((C_word*)t0)[3],lf[322],((C_word*)t0)[3],lf[323]);}
-
-/* k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5358,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5361,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 646 restore");
-f_5208(t2,((C_word*)t0)[3]);}
-
-/* k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5361,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 647 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[320],((C_word*)t0)[2],C_make_character(44));}
-
-/* k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5364,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5367,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5374,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5378,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 648 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[2],lf[319]);}
-
-/* k5376 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 648 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-
-/* k5372 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-
-/* k5365 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 649 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[318]);}
-
-/* k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5327,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5330,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5341,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 651 emitter");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_5244(t4,t3,C_SCHEME_FALSE);}
-
-/* k5339 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[317]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k5328 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5330(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5330,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5337,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 652 emitter");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_5244(t3,t2,C_SCHEME_TRUE);}
-
-/* k5335 in k5328 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[317]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* emitter in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5244(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5244,NULL,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5246,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp));}
-
-/* f_5246 in emitter in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5246(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5246,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=(C_truep(((C_word*)t0)[3])?C_make_character(118):lf[312]);
-t5=(C_truep(((C_word*)t0)[3])?C_make_character(118):lf[313]);
-C_trace("c-backend.scm: 597 gen");
-((C_proc14)C_retrieve_proc(*((C_word*)lf[1]+1)))(14,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[314],t2,C_make_character(114),t4,lf[315],C_SCHEME_TRUE,lf[316],t2,C_make_character(114),t5);}
-
-/* k5248 */
-static void C_ccall f_5250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5250,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5253,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 599 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[310],((C_word*)t0)[4],lf[311]);}
-
-/* k5251 in k5248 */
-static void C_ccall f_5253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5253,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5256,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 600 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[309],((C_word*)t0)[4],C_make_character(114));}
-
-/* k5254 in k5251 in k5248 */
-static void C_ccall f_5256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5256,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5259,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[3])){
-C_trace("c-backend.scm: 601 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(118));}
-else{
-t3=t2;
-f_5259(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5259,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5262,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 602 gen");
-((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),t2,lf[305],((C_word*)t0)[4],lf[306],C_SCHEME_TRUE,lf[307],C_SCHEME_TRUE,lf[308],((C_word*)t0)[4],C_make_character(59));}
-
-/* k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5262,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5265,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 605 restore");
-f_5208(t2,((C_word*)t0)[4]);}
-
-/* k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5265,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5268,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 606 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[304]);}
-
-/* k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5268,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5271,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 608 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[302]);}
-else{
-C_trace("c-backend.scm: 609 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[303]);}}
-
-/* k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5271,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5274,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 610 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[3],lf[301]);}
-
-/* k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5274,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5277,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 611 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[300]);}
-else{
-t3=t2;
-f_5277(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5277,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 612 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[299]);}
-
-/* k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5280,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5283,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 613 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[298]);}
-
-/* k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5286,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5293,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5297,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=C_fixnum_plus(((C_word*)t0)[2],C_fix(1));
-C_trace("c-backend.scm: 614 make-argument-list");
-((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,t5,lf[297]);}
-
-/* k5295 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5297(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 614 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-
-/* k5291 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-
-/* k5284 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
-static void C_ccall f_5286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 615 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[295]);}
-
-/* restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5208(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5208,NULL,2,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5212,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=C_fixnum_difference(t2,C_fix(1));
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5221,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-t8=((C_word*)t6)[1];
-f_5221(t8,t3,t4,C_fix(0));}
-
-/* doloop790 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5221(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5221,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5231,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 592 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[292],t2,lf[293],t3,lf[294]);}}
-
-/* k5229 in doloop790 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_difference(((C_word*)t0)[5],C_fix(1));
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_5221(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k5210 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5212(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 593 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[290],((C_word*)t0)[2],lf[291]);}
-
-/* prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4865(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4865,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4869,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 521 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE);}
-
-/* k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4869,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4872,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4938,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_4938(t6,t2,((C_word*)t0)[2]);}
-
-/* loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4938(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4938,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4946,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5192,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g665666");
-t6=t3;
-f_4946(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5190 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5192(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4938(t3,((C_word*)t0)[2],t2);}
-
-/* g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4946(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4946,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4950,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 524 lambda-literal-argument-count");
-((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-
-/* k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4950,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4953,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 525 lambda-literal-customizable");
-((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t2,((C_word*)t0)[2]);}
-
-/* k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4953,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4956,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5189,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 526 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_4956(t3,C_SCHEME_FALSE);}}
-
-/* k5187 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_4956(t2,C_eqp(t1,C_fix(0)));}
-
-/* k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4956(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4956,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5175,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t1)){
-t4=C_fixnum_decrease(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 527 make-variable-list");
-((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,t4,lf[287]);}
-else{
-t4=((C_word*)t0)[5];
-C_trace("c-backend.scm: 527 make-variable-list");
-((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,t4,lf[287]);}}
-
-/* k5173 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 527 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-
-/* k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4959,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4962,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 528 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
-
-/* k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 529 lambda-literal-rest-argument");
-((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t2,((C_word*)t0)[2]);}
-
-/* k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4965,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4968,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 530 lambda-literal-rest-argument-mode");
-((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[2]);}
-
-/* k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4968,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 531 lambda-literal-direct");
-((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[2]);}
-
-/* k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4971,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4974,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 532 lambda-literal-allocated");
-((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[2]);}
-
-/* k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4974(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4974,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4977,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-t3=((C_word*)t0)[8];
-t4=C_retrieve(lf[278]);
-if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5167,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t6=C_fixnum_increase(((C_word*)t0)[8]);
-C_trace("c-backend.scm: 534 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t5,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[3])[1],t6);}
-else{
-t5=t2;
-f_4977(t5,C_SCHEME_UNDEFINED);}}
-
-/* k5165 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_4977(t3,t2);}
-
-/* k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4977(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4977,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4980,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
-C_trace("c-backend.scm: 535 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-
-/* k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4980,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4983,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5121,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 540 lambda-literal-callee-signatures");
-((C_proc3)C_retrieve_symbol_proc(lf[281]))(3,*((C_word*)lf[281]+1),t3,((C_word*)t0)[2]);}
-
-/* k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5121,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5123,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_5123(t5,((C_word*)t0)[2],t1);}
-
-/* loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5123(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5123,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5131,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5149,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g691692");
-t6=t3;
-f_5131(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5147 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5123(t3,((C_word*)t0)[2],t2);}
-
-/* g691 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5131(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5131,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=C_retrieve(lf[278]);
-if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5142,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t6=C_fixnum_increase(t2);
-C_trace("c-backend.scm: 539 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t5,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[2])[1],t6);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k5140 in g691 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4983,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4986,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t3=C_eqp(lf[262],((C_word*)t0)[5]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5095,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[213]))){
-C_trace("c-backend.scm: 550 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t4,C_retrieve(lf[213]),lf[269]);}
-else{
-t5=t4;
-f_5095(2,t5,lf[270]);}}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5070,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 542 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,lf[276],((C_word*)t0)[5],lf[277],C_SCHEME_TRUE);}}
-
-/* k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5070,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5073,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 543 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[275]);}
-
-/* k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5073,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5076,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 544 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[273]);}
-else{
-C_trace("c-backend.scm: 544 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[274]);}}
-
-/* k5074 in k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5076,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5079,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 546 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[271]);}
-else{
-C_trace("c-backend.scm: 547 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[272]);}}
-
-/* k5077 in k5074 in k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5079(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 548 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5095,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5098,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 551 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,lf[267],t1,lf[268],C_SCHEME_TRUE);}
-
-/* k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5098,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5101,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_retrieve(lf[265]))){
-C_trace("c-backend.scm: 553 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[266],C_SCHEME_TRUE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11178,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 554 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[264]);}}
-
-/* f11178 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 555 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[263],((C_word*)t0)[2]);}
-
-/* k5099 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5101,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5104,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 554 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[264]);}
-
-/* k5102 in k5099 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 555 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[263],((C_word*)t0)[2]);}
-
-/* k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4986(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4986,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4989,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 556 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
-
-/* k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4989(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4989,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4992,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=t2;
-f_4992(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 557 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[261]);}}
-
-/* k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4992(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4992,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4995,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5042,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t4=C_eqp(((C_word*)t0)[2],C_fix(0));
-t5=t3;
-f_5042(t5,C_i_not(t4));}
-else{
-t4=t3;
-f_5042(t4,C_SCHEME_FALSE);}}
-
-/* k5040 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_5042(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5042,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5045,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 559 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[260]);}
-else{
-t2=((C_word*)t0)[2];
-f_4995(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k5043 in k5040 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 560 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_4995(2,t3,t2);}}
-
-/* k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4995,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4998,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[4]);}
-
-/* k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4998,2,t0,t1);}
-if(C_truep(((C_word*)t0)[8])){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5004,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 563 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[258]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5030,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 571 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-
-/* k5028 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5030(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5030,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5033,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 574 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(59));}
-else{
-C_trace("c-backend.scm: 573 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[259]);}}
-
-/* k5031 in k5028 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 574 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5004,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[6],lf[251]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5013,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 566 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[254],((C_word*)t0)[2],lf[255],C_SCHEME_TRUE,lf[256],((C_word*)t0)[2],lf[257]);}}
-
-/* k5011 in k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5013,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5016,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-
-/* k5014 in k5011 in k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_5016(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-C_trace("c-backend.scm: 569 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[252],t2,lf[253]);}
-
-/* k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4872,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4877,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4877(t5,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4877(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4877,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4925,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4889,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 578 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[249],t4,lf[250]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4889,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4892,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4899,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 579 make-list");
-((C_proc4)C_retrieve_symbol_proc(lf[247]))(4,*((C_word*)lf[247]+1),t3,((C_word*)t0)[2],lf[248]);}
-
-/* k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4899,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4901,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4901(t5,((C_word*)t0)[2],t1);}
-
-/* loop760 in k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4901(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4901,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[1]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4911,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g767768");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4909 in loop760 in k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4901(t3,((C_word*)t0)[2],t2);}
-
-/* k4890 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 580 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[246]);}
-
-/* k4923 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4925(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4877(t3,((C_word*)t0)[2],t2);}
-
-/* declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4694(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4694,NULL,2,t0,t1);}
-t2=C_i_length(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4701,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 492 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[245]);}
-
-/* k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4701,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4704,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4837,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_4837(t6,t2,C_retrieve(lf[215]));}
-
-/* loop609 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4837(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4837,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4852,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-C_trace("c-backend.scm: 495 gen");
-((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[241],t4,lf[242],C_SCHEME_TRUE,lf[243],t4,lf[244]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4850 in loop609 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4852(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4837(t3,((C_word*)t0)[2],t2);}
-
-/* k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4704,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4707,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_eqp(((C_word*)t0)[2],C_fix(0));
-if(C_truep(t3)){
-t4=t2;
-f_4707(2,t4,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 499 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[239],((C_word*)t0)[2],lf[240]);}}
-
-/* k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4707,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4710,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 500 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[238]);}
-
-/* k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4710,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4715,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4715(t5,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
-
-/* doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4715(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4715,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4725,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=C_i_car(t3);
-C_trace("c-backend.scm: 504 ##sys#lambda-info->string");
-((C_proc3)C_retrieve_symbol_proc(lf[237]))(3,*((C_word*)lf[237]+1),t4,t5);}}
-
-/* k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4725,2,t0,t1);}
-t2=C_i_string_length(t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4731,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-t4=C_fixnum_shift_right(t2,C_fix(16));
-t5=C_fixnum_shift_right(t2,C_fix(8));
-t6=C_fixnum_and(C_fix(255),t5);
-t7=C_fixnum_and(C_fix(255),t2);
-C_trace("c-backend.scm: 506 gen");
-((C_proc12)C_retrieve_proc(*((C_word*)lf[1]+1)))(12,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[235],((C_word*)t0)[5],lf[236],t4,C_make_character(44),t6,C_make_character(44),t7,C_make_character(41));}
-
-/* k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4731,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4734,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4784,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_4784(t6,t2,C_fix(0));}
-
-/* doloop632 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4784(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4784,NULL,3,t0,t1,t2);}
-t3=t2;
-if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[4]))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4794,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_string_ref(((C_word*)t0)[2],t2);
-t6=C_fix(C_character_code(t5));
-C_trace("c-backend.scm: 513 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_make_character(44),t6);}}
-
-/* k4792 in doloop632 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4794(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_increase(((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4784(t3,((C_word*)t0)[2],t2);}
-
-/* k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4734,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4737,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[2],C_fix(7));
-t4=C_fixnum_and(C_fix(16777208),t3);
-t5=C_fixnum_difference(t4,((C_word*)t0)[2]);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4757,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
-t9=((C_word*)t7)[1];
-f_4757(t9,t2,t5);}
-
-/* doloop639 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4757(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4757,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_fix(0));
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4767,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 516 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[234]);}}
-
-/* k4765 in doloop639 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_decrease(((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4757(t3,((C_word*)t0)[2],t2);}
-
-/* k4735 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4737,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4740,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 517 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[233]);}
-
-/* k4738 in k4735 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_increase(((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[4]);
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4715(t4,((C_word*)t0)[2],t2,t3);}
-
-/* header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4525(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4525,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4528,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4545,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4686,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 458 current-seconds");
-((C_proc2)C_retrieve_symbol_proc(lf[232]))(2,*((C_word*)lf[232]+1),t4);}
-
-/* k4684 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 458 ##sys#decode-seconds");
-((C_proc4)C_retrieve_symbol_proc(lf[231]))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4545,2,t0,t1);}
-t2=C_i_vector_ref(t1,C_fix(1));
-t3=C_i_vector_ref(t1,C_fix(2));
-t4=C_i_vector_ref(t1,C_fix(3));
-t5=C_i_vector_ref(t1,C_fix(4));
-t6=C_i_vector_ref(t1,C_fix(5));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4563,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t8=C_fixnum_plus(C_fix(1900),t6);
-t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4644,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=t8,a[7]=((C_word*)t0)[3],a[8]=t7,tmp=(C_word)a,a+=9,tmp);
-t10=C_fixnum_increase(t5);
-C_trace("c-backend.scm: 466 pad0");
-f_4528(t9,t10);}
-
-/* k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4644,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4648,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 466 pad0");
-f_4528(t2,((C_word*)t0)[2]);}
-
-/* k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4648(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4648,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4652,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 466 pad0");
-f_4528(t2,((C_word*)t0)[2]);}
-
-/* k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4652(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4652,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4656,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 466 pad0");
-f_4528(t2,((C_word*)t0)[2]);}
-
-/* k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4656,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4660,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4664,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4666,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4674,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4678,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 469 chicken-version");
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),t6,C_SCHEME_TRUE);}
-
-/* k4676 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4678(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 469 string-split");
-((C_proc4)C_retrieve_symbol_proc(lf[228]))(4,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1,lf[229]);}
-
-/* k4672 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("map");
-t2=*((C_word*)lf[227]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a4665 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4666(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4666,3,t0,t1,t2);}
-t3=*((C_word*)lf[115]+1);
-C_trace("g568569");
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,lf[225],t2,lf[226]);}
-
-/* k4662 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 467 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[224]);}
-
-/* k4658 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 464 gen");
-((C_proc21)C_retrieve_proc(*((C_word*)lf[1]+1)))(21,*((C_word*)lf[1]+1),((C_word*)t0)[8],lf[218],((C_word*)t0)[7],lf[219],C_SCHEME_TRUE,lf[220],C_SCHEME_TRUE,lf[221],((C_word*)t0)[6],C_make_character(45),((C_word*)t0)[5],C_make_character(45),((C_word*)t0)[4],C_make_character(32),((C_word*)t0)[3],C_make_character(58),((C_word*)t0)[2],C_SCHEME_TRUE,t1,lf[222]);}
-
-/* k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4563,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4566,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 472 gen-list");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),t2,C_retrieve(lf[217]));}
-
-/* k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4566,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4569,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 473 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-
-/* k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4569,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4572,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[213]))){
-C_trace("c-backend.scm: 474 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[214],C_retrieve(lf[213]));}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4633,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 476 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[216]);}}
-
-/* k4631 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 477 gen-list");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],C_retrieve(lf[215]));}
-
-/* k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4572(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4572,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4575,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 478 gen");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[209],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[210],C_retrieve(lf[211]),lf[212]);}
-
-/* k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4575(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4575,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4578,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_retrieve(lf[205]))){
-C_trace("c-backend.scm: 480 generate-foreign-callback-stub-prototypes");
-((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),t2,C_retrieve(lf[207]));}
-else{
-t3=t2;
-f_4578(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4578(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4578,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4581,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_pairp(C_retrieve(lf[208])))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4593,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 482 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
-else{
-if(C_truep(C_retrieve(lf[205]))){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-C_trace("c-backend.scm: 485 generate-foreign-callback-stub-prototypes");
-((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),((C_word*)t0)[2],C_retrieve(lf[207]));}}}
-
-/* k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4593,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4598,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_4598(t5,((C_word*)t0)[2],C_retrieve(lf[208]));}
-
-/* loop583 in k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4598(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4598,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4613,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-C_trace("c-backend.scm: 483 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4611 in loop583 in k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4598(t3,((C_word*)t0)[2],t2);}
-
-/* k4579 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_retrieve(lf[205]))){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-C_trace("c-backend.scm: 485 generate-foreign-callback-stub-prototypes");
-((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),((C_word*)t0)[2],C_retrieve(lf[207]));}}
-
-/* pad0 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4528(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4528,NULL,2,t1,t2);}
-t3=t2;
-if(C_truep(C_fixnum_lessp(t3,C_fix(10)))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4542,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 456 number->string");
-C_number_to_string(3,0,t4,t2);}
-else{
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k4540 in pad0 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 456 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[204],t1);}
-
-/* expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2644,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2647,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t8,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
-t10=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4493,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-C_trace("c-backend.scm: 451 expr");
-t11=((C_word*)t6)[1];
-f_2647(t11,t1,t2,t3);}
-
-/* expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4493(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4493,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4499,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 445 pair-for-each");
-((C_proc4)C_retrieve_symbol_proc(lf[203]))(4,*((C_word*)lf[203]+1),t1,t4,t2);}
-
-/* a4498 in expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4499(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4499,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4503,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=C_eqp(t2,((C_word*)t0)[2]);
-if(C_truep(t4)){
-t5=C_i_car(t2);
-C_trace("c-backend.scm: 448 expr");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t6,t1,t5,((C_word*)t0)[3]);}
-else{
-C_trace("c-backend.scm: 447 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_make_character(44));}}
-
-/* k4501 in a4498 in expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4503(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 448 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_2647(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word t130;
-C_word t131;
-C_word t132;
-C_word t133;
-C_word t134;
-C_word t135;
-C_word t136;
-C_word t137;
-C_word t138;
-C_word t139;
-C_word t140;
-C_word t141;
-C_word t142;
-C_word t143;
-C_word t144;
-C_word t145;
-C_word t146;
-C_word t147;
-C_word t148;
-C_word t149;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2647,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=C_slot(t4,C_fix(3));
-t6=t2;
-t7=C_slot(t6,C_fix(2));
-t8=t2;
-t9=C_slot(t8,C_fix(1));
-t10=C_eqp(t9,lf[12]);
-if(C_truep(t10)){
-t11=C_i_car(t7);
-t12=C_eqp(t11,lf[13]);
-if(C_truep(t12)){
-if(C_truep(C_i_cadr(t7))){
-C_trace("c-backend.scm: 84 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[14]);}
-else{
-C_trace("c-backend.scm: 84 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[15]);}}
-else{
-t13=C_eqp(t11,lf[16]);
-if(C_truep(t13)){
-t14=C_i_cadr(t7);
-t15=C_fix(C_character_code(t14));
-C_trace("c-backend.scm: 85 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[17],t15,C_make_character(41));}
-else{
-t14=C_eqp(t11,lf[18]);
-if(C_truep(t14)){
-C_trace("c-backend.scm: 86 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[19]);}
-else{
-t15=C_eqp(t11,lf[20]);
-if(C_truep(t15)){
-t16=C_i_cadr(t7);
-C_trace("c-backend.scm: 87 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[21],t16,C_make_character(41));}
-else{
-t16=C_eqp(t11,lf[22]);
-if(C_truep(t16)){
-C_trace("c-backend.scm: 88 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[23]);}
-else{
-C_trace("c-backend.scm: 89 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t1,lf[24]);}}}}}}
-else{
-t11=C_eqp(t9,lf[25]);
-if(C_truep(t11)){
-t12=C_i_car(t7);
-if(C_truep(C_i_vectorp(t12))){
-t13=C_i_vector_ref(t12,C_fix(0));
-C_trace("c-backend.scm: 94 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[26],t13,lf[27]);}
-else{
-t13=C_i_car(t7);
-C_trace("c-backend.scm: 95 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[28],t13,C_make_character(93));}}
-else{
-t12=C_eqp(t9,lf[29]);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2786,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 98 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t13,C_SCHEME_TRUE,lf[32]);}
-else{
-t13=C_eqp(t9,lf[33]);
-if(C_truep(t13)){
-t14=C_i_car(t7);
-C_trace("c-backend.scm: 107 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,lf[34],t14);}
-else{
-t14=C_eqp(t9,lf[35]);
-if(C_truep(t14)){
-t15=C_i_car(t7);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2844,a[2]=((C_word*)t0)[5],a[3]=t17,tmp=(C_word)a,a+=4,tmp));
-t19=((C_word*)t17)[1];
-f_2844(t19,t1,t5,t3,t15);}
-else{
-t15=C_eqp(t9,lf[36]);
-if(C_truep(t15)){
-t16=C_i_car(t7);
-t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2898,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 120 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t17,C_SCHEME_TRUE,t16,C_make_character(61));}
-else{
-t16=C_eqp(t9,lf[37]);
-if(C_truep(t16)){
-t17=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2924,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 126 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t17,lf[39]);}
-else{
-t17=C_eqp(t9,lf[40]);
-if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2951,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 131 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t18,lf[42]);}
-else{
-t18=C_eqp(t9,lf[43]);
-if(C_truep(t18)){
-t19=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2970,a[2]=t7,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 136 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t19,lf[44]);}
-else{
-t19=C_eqp(t9,lf[45]);
-if(C_truep(t19)){
-t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3003,a[2]=t7,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 143 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t20,lf[48]);}
-else{
-t20=C_eqp(t9,lf[49]);
-if(C_truep(t20)){
-t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3040,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 150 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t21,lf[51]);}
-else{
-t21=C_eqp(t9,lf[52]);
-if(C_truep(t21)){
-t22=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3069,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 157 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t22,lf[54]);}
-else{
-t22=C_eqp(t9,lf[55]);
-if(C_truep(t22)){
-t23=C_i_car(t7);
-t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3101,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t23,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 165 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t24,lf[61],t23,C_make_character(44));}
-else{
-t23=C_eqp(t9,lf[62]);
-if(C_truep(t23)){
-t24=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3172,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 175 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t24,lf[64]);}
-else{
-t24=C_eqp(t9,lf[65]);
-if(C_truep(t24)){
-t25=C_i_car(t7);
-C_trace("c-backend.scm: 179 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_make_character(116),t25);}
-else{
-t25=C_eqp(t9,lf[66]);
-if(C_truep(t25)){
-t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3204,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-t27=C_i_car(t7);
-C_trace("c-backend.scm: 182 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t26,C_make_character(116),t27,C_make_character(61));}
-else{
-t26=C_eqp(t9,lf[67]);
-if(C_truep(t26)){
-t27=C_i_car(t7);
-t28=C_i_cadr(t7);
-if(C_truep(C_i_caddr(t7))){
-if(C_truep(t28)){
-C_trace("c-backend.scm: 191 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[68],t27,lf[69]);}
-else{
-t29=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3246,a[2]=t27,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3250,a[2]=t29,tmp=(C_word)a,a+=3,tmp);
-t31=C_i_cadddr(t7);
-C_trace("c-backend.scm: 192 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t30,t31);}}
-else{
-if(C_truep(t28)){
-C_trace("c-backend.scm: 193 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[74],t27,lf[75]);}
-else{
-C_trace("c-backend.scm: 194 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[76],t27,lf[77]);}}}
-else{
-t27=C_eqp(t9,lf[78]);
-if(C_truep(t27)){
-t28=C_i_car(t7);
-t29=C_i_cadr(t7);
-t30=C_i_caddr(t7);
-t31=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3281,a[2]=t30,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t29)){
-C_trace("c-backend.scm: 201 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t31,lf[85],t28,lf[86]);}
-else{
-C_trace("c-backend.scm: 202 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t31,lf[87],t28,lf[88]);}}
-else{
-t28=C_eqp(t9,lf[89]);
-if(C_truep(t28)){
-t29=C_i_car(t7);
-t30=C_i_cadr(t7);
-t31=C_i_caddr(t7);
-if(C_truep(t30)){
-t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3329,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3343,a[2]=t29,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
-t34=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3347,a[2]=t33,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 213 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t34,t31);}
-else{
-t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3350,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3364,a[2]=t29,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
-t34=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3368,a[2]=t33,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 218 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t34,t31);}}
-else{
-t29=C_eqp(t9,lf[98]);
-if(C_truep(t29)){
-C_trace("c-backend.scm: 222 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[99]);}
-else{
-t30=C_eqp(t9,lf[100]);
-if(C_truep(t30)){
-t31=C_i_cdr(t5);
-t32=C_i_length(t31);
-t33=t3;
-t34=C_fixnum_increase(t32);
-t35=C_i_cdr(t7);
-t36=C_i_pairp(t35);
-t37=(C_truep(t36)?C_i_cadr(t7):C_SCHEME_FALSE);
-t38=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3401,a[2]=t36,a[3]=((C_word*)t0)[2],a[4]=t37,a[5]=t33,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],a[8]=t32,a[9]=t34,a[10]=t3,a[11]=t31,a[12]=((C_word*)t0)[4],a[13]=t1,a[14]=t5,a[15]=t7,tmp=(C_word)a,a+=16,tmp);
-C_trace("c-backend.scm: 231 source-info->string");
-((C_proc3)C_retrieve_symbol_proc(lf[149]))(3,*((C_word*)lf[149]+1),t38,t37);}
-else{
-t31=C_eqp(t9,lf[150]);
-if(C_truep(t31)){
-t32=C_i_length(t5);
-t33=C_fixnum_increase(t32);
-t34=C_i_car(t7);
-t35=C_i_cadr(t7);
-t36=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3989,a[2]=t35,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t33,a[6]=t5,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=t32,a[10]=t1,a[11]=t34,tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 315 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t36,((C_word*)t0)[3]);}
-else{
-t32=C_eqp(t9,lf[154]);
-if(C_truep(t32)){
-t33=C_i_cdr(t5);
-t34=C_i_length(t33);
-t35=C_fixnum_increase(t34);
-t36=C_i_caddr(t7);
-t37=C_i_cadddr(t7);
-t38=C_eqp(t37,C_fix(0));
-t39=C_i_not(t38);
-t40=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4074,a[2]=t36,a[3]=t37,a[4]=t39,a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[4],a[8]=t33,a[9]=t1,a[10]=t5,tmp=(C_word)a,a+=11,tmp);
-t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4078,a[2]=t40,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 343 find-lambda");
-t42=((C_word*)((C_word*)t0)[2])[1];
-f_2602(t42,t41,t36);}
-else{
-t33=C_eqp(t9,lf[156]);
-if(C_truep(t33)){
-t34=C_i_length(t5);
-t35=C_fixnum_plus(t34,C_fix(1));
-t36=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4097,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t37=C_i_car(t7);
-C_trace("c-backend.scm: 360 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t36,C_SCHEME_TRUE,lf[158],t37,lf[159],t35,lf[160]);}
-else{
-t34=C_eqp(t9,lf[161]);
-if(C_truep(t34)){
-t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4116,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 365 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t35,C_SCHEME_TRUE,lf[163]);}
-else{
-t35=C_eqp(t9,lf[164]);
-if(C_truep(t35)){
-t36=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4135,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t37=C_i_car(t7);
-C_trace("c-backend.scm: 370 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t36,t37,C_make_character(40));}
-else{
-t36=C_eqp(t9,lf[165]);
-if(C_truep(t36)){
-t37=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4154,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t38=C_i_car(t7);
-t39=C_i_length(t5);
-C_trace("c-backend.scm: 375 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t37,t38,lf[166],t39);}
-else{
-t37=C_eqp(t9,lf[167]);
-if(C_truep(t37)){
-t38=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4190,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-t39=C_i_cadr(t7);
-C_trace("c-backend.scm: 383 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t38,t39,lf[169]);}
-else{
-t38=C_eqp(t9,lf[170]);
-if(C_truep(t38)){
-t39=C_i_cadr(t7);
-t40=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4210,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t41=C_i_car(t7);
-t42=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4228,a[2]=t39,a[3]=t41,a[4]=t40,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 387 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t42,t39,lf[175]);}
-else{
-t39=C_eqp(t9,lf[176]);
-if(C_truep(t39)){
-t40=C_i_car(t7);
-t41=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4244,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t42=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4258,a[2]=t40,a[3]=t41,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 393 foreign-result-conversion");
-((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t42,t40,lf[181]);}
-else{
-t40=C_eqp(t9,lf[182]);
-if(C_truep(t40)){
-t41=C_i_car(t7);
-t42=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4274,a[2]=t41,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4302,a[2]=t42,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 399 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t43,t41,lf[187]);}
-else{
-t41=C_eqp(t9,lf[188]);
-if(C_truep(t41)){
-t42=C_i_car(t7);
-C_trace("c-backend.scm: 406 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,t42);}
-else{
-t42=C_eqp(t9,lf[189]);
-if(C_truep(t42)){
-t43=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4324,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t44=C_i_car(t7);
-C_trace("c-backend.scm: 409 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t43,lf[191],t44,C_make_character(61));}
-else{
-t43=C_eqp(t9,lf[192]);
-if(C_truep(t43)){
-t44=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4347,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t45=C_i_car(t7);
-C_trace("c-backend.scm: 414 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t44,t45,lf[193]);}
-else{
-t44=C_eqp(t9,lf[194]);
-if(C_truep(t44)){
-t45=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4366,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 419 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t45,C_SCHEME_TRUE,lf[198]);}
-else{
-t45=C_eqp(t9,lf[199]);
-if(C_truep(t45)){
-t46=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4449,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 434 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t46,lf[201]);}
-else{
-t46=t2;
-t47=C_slot(t46,C_fix(1));
-C_trace("c-backend.scm: 442 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t1,lf[202],t47);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-
-/* k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4449,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4452,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 435 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4452,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4455,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 436 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[200]);}
-
-/* k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4455,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 437 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4458,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4461,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 438 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
-
-/* k4459 in k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4461,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4464,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_caddr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 439 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4462 in k4459 in k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 440 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4366(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4366,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4369,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 420 expr");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[3]);}
-
-/* k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4369(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4369,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 421 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[197]);}
-
-/* k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4372(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4372,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[6]);
-t3=C_i_cdr(((C_word*)t0)[5]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4385,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_4385(t7,((C_word*)t0)[2],t2,t3);}
-
-/* doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_4385(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4385,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_fix(0));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4395,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 425 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[195]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4408,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 428 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[196]);}}
-
-/* k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4408(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4408,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4411,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_car(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 429 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4411(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4411,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4414,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 430 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
-
-/* k4412 in k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4414,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4417,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_cadr(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 431 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4415 in k4412 in k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_decrease(((C_word*)t0)[5]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4385(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k4393 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4395,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4398,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 426 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4396 in k4393 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 427 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-
-/* k4345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4350,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 415 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4348 in k4345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 416 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k4322 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4324(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4324,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4327,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 410 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4325 in k4322 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 411 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[190]);}
-
-/* k4300 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 399 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[185],t1,lf[186]);}
-
-/* k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4274,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4277,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 400 expr");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[3]);}
-
-/* k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4277,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4280,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4294,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 401 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t3,((C_word*)t0)[2]);}
-
-/* k4292 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4294(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 401 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[184],t1);}
-
-/* k4278 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4280,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4283,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 402 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4281 in k4278 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 403 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[183]);}
-
-/* k4256 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4258,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4262,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 393 foreign-type-declaration");
-((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[180]);}
-
-/* k4260 in k4256 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 393 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[178],t1,lf[179]);}
-
-/* k4242 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4244,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4247,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 394 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4245 in k4242 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 395 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[177]);}
-
-/* k4226 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4228,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4232,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 387 foreign-argument-conversion");
-((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
-
-/* k4230 in k4226 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4232(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 387 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_make_character(40),((C_word*)t0)[3],lf[172],((C_word*)t0)[2],C_make_character(41),t1);}
-
-/* k4208 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4210(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4210,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4213,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 388 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4211 in k4208 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 389 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[171]);}
-
-/* k4188 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 383 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1,t2,C_make_character(41));}
-
-/* k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4154,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4157,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4166,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 378 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_make_character(44));}
-else{
-C_trace("c-backend.scm: 380 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_make_character(41));}}
-
-/* k4164 in k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 379 expr-args");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_4493(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4155 in k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 380 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k4133 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4135,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4138,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 371 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4136 in k4133 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 372 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k4114 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4116,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4119,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 366 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k4117 in k4114 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 367 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[162]);}
-
-/* k4095 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4097,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4100,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 361 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4098 in k4095 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4100(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 362 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[157]);}
-
-/* k4076 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 343 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),((C_word*)t0)[2],t1);}
-
-/* k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4074,2,t0,t1);}
-t2=C_eqp(t1,C_fix(0));
-t3=C_i_car(((C_word*)t0)[10]);
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 345 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,((C_word*)t0)[2],C_make_character(40));}
-
-/* k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4022,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4025,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4055,a[2]=((C_word*)t0)[9],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 347 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,lf[155],((C_word*)t0)[2],C_make_character(41));}
-else{
-t3=t2;
-f_4025(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k4053 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_not(((C_word*)t0)[4]);
-if(C_truep(t2)){
-if(C_truep(t2)){
-C_trace("c-backend.scm: 348 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(44));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-f_4025(2,t4,t3);}}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-C_trace("c-backend.scm: 348 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(44));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-f_4025(2,t4,t3);}}}
-
-/* k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4025,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4028,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=t2;
-f_4028(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4043,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 350 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t3,((C_word*)t0)[2],((C_word*)t0)[5]);}}
-
-/* k4041 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4043(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 351 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_4028(2,t3,t2);}}
-
-/* k4026 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4028,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4031,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-C_trace("c-backend.scm: 352 expr-args");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4493(t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
-else{
-C_trace("c-backend.scm: 353 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_make_character(41));}}
-
-/* k4029 in k4026 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_4031(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 353 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3989(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3989,2,t0,t1);}
-t2=C_eqp(t1,C_fix(0));
-if(C_truep(((C_word*)t0)[11])){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3860,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 317 lambda-literal-temporaries");
-((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t3,((C_word*)t0)[4]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3973,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 330 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t3,((C_word*)t0)[2],C_make_character(40));}}
-
-/* k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3973(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3973,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3976,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11150,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 332 expr-args");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_4493(t4,t3,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-C_trace("c-backend.scm: 331 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[153]);}}
-
-/* f11150 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 333 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3974 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3976(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3976,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3979,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 332 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3977 in k3974 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3979(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 333 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3860,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3863,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_fixnum_plus(t1,((C_word*)t0)[2]);
-C_trace("c-backend.scm: 318 iota");
-((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t2,((C_word*)t0)[6],t3,C_fix(1));}
-
-/* k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3866,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3920,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_3920(t6,t2,((C_word*)t0)[2],t1);}
-
-/* loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3920(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3920,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3928,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3941,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g418419");
-t10=t6;
-f_3928(t10,t7,t8,t9);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k3939 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3920(t4,((C_word*)t0)[2],t2,t3);}
-
-/* g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3928(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3928,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3932,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 321 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
-
-/* k3930 in g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3932(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3932,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3935,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 322 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3933 in k3930 in g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3935(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 323 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3866,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3869,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3876,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 327 iota");
-((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
-
-/* k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3876,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3878,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_3878(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop428 in k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3878(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3878,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3893,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-C_trace("c-backend.scm: 326 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t8,lf[152],t7,C_make_character(59));}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k3891 in loop428 in k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3878(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k3867 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 328 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[151]);}
-
-/* k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3401(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3401,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3404,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=C_i_cddr(((C_word*)t0)[15]);
-t4=C_i_pairp(t3);
-t5=t2;
-f_3404(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[15]):C_SCHEME_FALSE));}
-else{
-t3=t2;
-f_3404(t3,C_SCHEME_FALSE);}}
-
-/* k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3404(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3404,NULL,2,t0,t1);}
-t2=(C_truep(t1)?C_i_cadddr(((C_word*)t0)[15]):C_SCHEME_FALSE);
-t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_3410,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=t1,a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(t2)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3806,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3810,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 234 find-lambda");
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_2602(t6,t5,t1);}
-else{
-t4=t3;
-f_3410(t4,C_SCHEME_FALSE);}}
-
-/* k3808 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3810(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 234 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),((C_word*)t0)[2],t1);}
-
-/* k3804 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_3410(t2,C_eqp(t1,C_fix(0)));}
-
-/* k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3410(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3410,NULL,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[16]);
-t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3416,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=t2,tmp=(C_word)a,a+=16,tmp);
-if(C_truep(((C_word*)t0)[3])){
-if(C_truep(C_retrieve(lf[139]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3792,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=((C_word*)t0)[2];
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2632,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 71 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t6,t5);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3799,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=((C_word*)t0)[2];
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11142,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t6,t5);}}
-else{
-t4=t3;
-f_3416(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* f11142 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[147]);}
-
-/* k3797 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 239 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[145],t1,lf[146]);}
-
-/* k2630 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 71 string-translate");
-((C_proc5)C_retrieve_symbol_proc(lf[142]))(5,*((C_word*)lf[142]+1),((C_word*)t0)[2],t1,lf[143],lf[144]);}
-
-/* k3790 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 238 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[140],t1,lf[141]);}
-
-/* k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3416,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[15],C_fix(1));
-t3=C_eqp(lf[33],t2);
-if(C_truep(t3)){
-t4=C_slot(((C_word*)t0)[15],C_fix(2));
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3433,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],tmp=(C_word)a,a+=6,tmp);
-t6=C_i_car(t4);
-C_trace("c-backend.scm: 242 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,t6,C_make_character(40),((C_word*)t0)[10],lf[102]);}
-else{
-if(C_truep(((C_word*)t0)[9])){
-t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3452,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[8],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3614,a[2]=((C_word*)t0)[5],a[3]=t4,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-backend.scm: 246 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t5,((C_word*)t0)[5]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3620,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
-t5=C_slot(((C_word*)t0)[15],C_fix(1));
-t6=C_eqp(lf[67],t5);
-if(C_truep(t6)){
-t7=C_retrieve(lf[131]);
-if(C_truep(t7)){
-t8=t4;
-f_3620(t8,C_SCHEME_FALSE);}
-else{
-t8=C_retrieve(lf[136]);
-if(C_truep(t8)){
-t9=t4;
-f_3620(t9,C_SCHEME_FALSE);}
-else{
-t9=C_i_car(((C_word*)t0)[2]);
-t10=t4;
-f_3620(t10,C_i_not(t9));}}}
-else{
-t7=t4;
-f_3620(t7,C_SCHEME_FALSE);}}}}
-
-/* k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3620(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3620,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_slot(((C_word*)t0)[10],C_fix(2));
-t3=C_i_car(t2);
-t4=C_i_cadr(t2);
-t5=C_i_caddr(t2);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3640,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=t7,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
-C_trace("c-backend.scm: 280 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t8,C_SCHEME_TRUE,lf[126],((C_word*)t0)[5],lf[127]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3709,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("c-backend.scm: 299 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[4],C_make_character(61));}}
-
-/* k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3709(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3709,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3712,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 300 expr");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t3,t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
-
-/* k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3712(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3712,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3715,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 301 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_make_character(59),C_SCHEME_TRUE,lf[137],((C_word*)t0)[4],lf[138]);}
-
-/* k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3715(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3715,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3718,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_retrieve(lf[131]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3730,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_3730(t5,t3);}
-else{
-t5=C_retrieve(lf[136]);
-t6=t4;
-f_3730(t6,(C_truep(t5)?t5:C_i_car(((C_word*)t0)[2])));}}
-
-/* k3728 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3730(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("c-backend.scm: 304 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[132],((C_word*)t0)[2],lf[133]);}
-else{
-C_trace("c-backend.scm: 305 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[134],((C_word*)t0)[2],lf[135]);}}
-
-/* k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3718(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3718,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3721,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 306 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[129],((C_word*)t0)[3],lf[130],((C_word*)t0)[2],C_make_character(44));}
-
-/* k3719 in k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3721(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3721,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3724,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 307 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3722 in k3719 in k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3724(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 308 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[128]);}
-
-/* k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3640(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3640,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3643,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[5])){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3656,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3681,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 282 number->string");
-C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
-else{
-if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3688,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3695,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 289 number->string");
-C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3699,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3706,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 293 number->string");
-C_number_to_string(3,0,t4,((C_word*)t0)[2]);}}}
-
-/* k3704 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 293 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[124],t1,lf[125]);}
-
-/* k3697 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3699(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-C_trace("c-backend.scm: 294 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[122],((C_word*)t0)[2],lf[123]);}
-
-/* k3693 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3695(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 289 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[120],t1,lf[121]);}
-
-/* k3686 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-C_trace("c-backend.scm: 290 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[118],((C_word*)((C_word*)t0)[3])[1],lf[119]);}
-
-/* k3679 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 282 string-append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[116],t1,lf[117]);}
-
-/* k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3656,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 284 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[111],((C_word*)((C_word*)t0)[5])[1],lf[112]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3669,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3673,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=C_i_cadddr(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 286 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t4,t5);}}
-
-/* k3671 in k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 286 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-
-/* k3667 in k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 285 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[113],((C_word*)((C_word*)t0)[2])[1],lf[114],t1,C_make_character(41));}
-
-/* k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3643(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3643,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3646,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 295 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[110],((C_word*)t0)[3],C_make_character(44),((C_word*)((C_word*)t0)[2])[1],C_make_character(44));}
-
-/* k3644 in k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3646(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3646,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3649,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 296 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3647 in k3644 in k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3649(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 297 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[109]);}
-
-/* k3612 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_eqp(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-C_trace("c-backend.scm: 247 lambda-literal-looping");
-((C_proc3)C_retrieve_symbol_proc(lf[108]))(3,*((C_word*)lf[108]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t3=((C_word*)t0)[3];
-f_3452(2,t3,C_SCHEME_FALSE);}}
-
-/* k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3452,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3455,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-backend.scm: 248 lambda-literal-temporaries");
-((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t2,((C_word*)t0)[7]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3574,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
-if(C_truep(((C_word*)t0)[5])){
-t3=t2;
-f_3574(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3598,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[10],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 263 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[4],C_make_character(61));}}}
-
-/* k3596 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3601,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 264 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3599 in k3596 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 265 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3574(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3574,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3577,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-C_trace("c-backend.scm: 266 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],C_make_character(40));}
-
-/* k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3577(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3577,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3580,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=t2;
-f_3580(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("c-backend.scm: 267 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],C_make_character(44));}}
-
-/* k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3580(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3580,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3583,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11137,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 269 expr-args");
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_4493(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-C_trace("c-backend.scm: 268 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(116),((C_word*)t0)[2],C_make_character(44));}}
-
-/* f11137 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 270 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
-
-/* k3581 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3583(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3583,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3586,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 269 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3584 in k3581 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3586(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 270 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
-
-/* k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3455,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=C_fixnum_plus(t1,((C_word*)t0)[6]);
-C_trace("c-backend.scm: 249 iota");
-((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t2,((C_word*)t0)[5],t3,C_fix(1));}
-
-/* k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3461,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3521,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_3521(t6,t2,((C_word*)t0)[2],t1);}
-
-/* loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3521(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3521,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3529,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3542,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g297298");
-t10=t6;
-f_3529(t10,t7,t8,t9);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k3540 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3521(t4,((C_word*)t0)[2],t2,t3);}
-
-/* g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3529(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3529,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3533,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 252 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
-
-/* k3531 in g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3533,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3536,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 253 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3534 in k3531 in g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 254 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3461,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3464,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3477,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 258 iota");
-((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
-
-/* k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3477(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3477,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3479,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_3479(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop307 in k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3479(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3479,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3494,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-C_trace("c-backend.scm: 257 gen");
-((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t8,lf[105],t7,C_make_character(59));}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k3492 in loop307 in k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3494(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3479(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k3462 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3464,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3467,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[3])){
-C_trace("c-backend.scm: 260 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[103]);}
-else{
-C_trace("c-backend.scm: 259 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[104],((C_word*)t0)[2],C_make_character(59));}}
-
-/* k3465 in k3462 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 260 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[103]);}
-
-/* k3431 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3433,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3436,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 243 expr-args");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3434 in k3431 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 244 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[101]);}
-
-/* k3366 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3368,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11129,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t1);}
-
-/* f11129 in k3366 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[97]);}
-
-/* k3362 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 217 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[94],((C_word*)t0)[2],lf[95],t1,lf[96]);}
-
-/* k3348 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3350,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3353,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 219 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3351 in k3348 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 220 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11124,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t1);}
-
-/* f11124 in k3345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11124(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[93]);}
-
-/* k3341 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 212 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[90],((C_word*)t0)[2],lf[91],t1,lf[92]);}
-
-/* k3327 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3329,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3332,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 214 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3330 in k3327 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 215 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-
-/* k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3281(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3281,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3284,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3298,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3302,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 203 ##sys#symbol->qualified-string");
-((C_proc3)C_retrieve_symbol_proc(lf[84]))(3,*((C_word*)lf[84]+1),t4,((C_word*)t0)[2]);}
-
-/* k3300 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3302,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11119,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t1);}
-
-/* f11119 in k3300 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f11119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[82]);}
-
-/* k3296 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 203 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[79],t1,lf[80]);}
-
-/* k3282 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3284,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3287,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 204 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3285 in k3282 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 205 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3248 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 192 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-
-/* k3244 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 192 gen");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[70],((C_word*)t0)[2],lf[71],t1,C_make_character(41));}
-
-/* k3202 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 183 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* k3170 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3172,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3175,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 176 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3173 in k3170 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 177 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[63]);}
-
-/* k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3101,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3104,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 171 iota");
-((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[6],C_fix(1),C_fix(1));}
-
-/* k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3117,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_3117(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3117(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3117,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3125,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3138,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g193194");
-t10=t6;
-f_3125(t10,t7,t8,t9);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k3136 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3117(t4,((C_word*)t0)[2],t2,t3);}
-
-/* g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_3125(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3125,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3129,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 168 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t4,lf[58],t3,lf[59]);}
-
-/* k3127 in g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3129,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3132,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 169 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3130 in k3127 in g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3132(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 170 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-
-/* k3102 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_increase(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 172 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[56],t2,lf[57]);}
-
-/* k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3069(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3069,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3072,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 158 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3072(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3072,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3075,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 159 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[53]);}
-
-/* k3073 in k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3075(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3075,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3078,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 160 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3076 in k3073 in k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 161 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3043,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 151 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3043(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3043,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 152 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[50]);}
-
-/* k3044 in k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3046(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3046,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3049,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 153 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3047 in k3044 in k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 154 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3003,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 144 expr");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[3]);}
-
-/* k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3006,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3009,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[2]);
-t4=C_fixnum_plus(t3,C_fix(1));
-C_trace("c-backend.scm: 145 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[46],t4,lf[47]);}
-
-/* k3007 in k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3009(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3009,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3012,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 146 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k3010 in k3007 in k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_3012(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 147 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2970(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2970,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2973,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 137 expr");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[3]);}
-
-/* k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2973(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2973,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2976,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 138 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(44),t3,C_make_character(44));}
-
-/* k2974 in k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2976(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2976,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2979,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 139 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2977 in k2974 in k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2979(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 140 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-
-/* k2949 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2951,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2954,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 132 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2952 in k2949 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 133 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[41]);}
-
-/* k2922 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2924,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2927,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 127 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2925 in k2922 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[3]);
-t3=C_fixnum_plus(t2,C_fix(1));
-C_trace("c-backend.scm: 128 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[38],t3,C_make_character(93));}
-
-/* k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2898,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2901,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 121 expr");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2899 in k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2901,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2904,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 122 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(59));}
-
-/* k2902 in k2899 in k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2904(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 123 expr");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_2647(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_2844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2844,NULL,5,t0,t1,t2,t3,t4);}
-t5=t4;
-if(C_truep(C_fixnum_greaterp(t5,C_fix(0)))){
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-C_trace("c-backend.scm: 112 gen");
-((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
-else{
-t6=C_i_car(t2);
-C_trace("c-backend.scm: 116 expr");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_2647(t7,t1,t6,t3);}}
-
-/* k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2854,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2857,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[7]);
-C_trace("c-backend.scm: 113 expr");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[6]);}
-
-/* k2855 in k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2857,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2860,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-backend.scm: 114 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(59));}
-
-/* k2858 in k2855 in k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_fixnum_increase(((C_word*)t0)[5]);
-t4=C_fixnum_decrease(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 115 loop");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2844(t5,((C_word*)t0)[2],t2,t3,t4);}
-
-/* k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2786(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2786,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2789,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 99 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2789(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2789,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2792,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 100 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[31]);}
-
-/* k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2792,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2795,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 101 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2795,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2798,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-backend.scm: 102 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(125),C_SCHEME_TRUE,lf[30]);}
-
-/* k2796 in k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2798(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2798,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2801,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_caddr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 103 expr");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2647(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k2799 in k2796 in k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-backend.scm: 104 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-
-/* find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_fcall f_2602(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2602,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2606,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2614,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 68 find");
-((C_proc4)C_retrieve_symbol_proc(lf[11]))(4,*((C_word*)lf[11]+1),t3,t4,((C_word*)t0)[2]);}
-
-/* a2613 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2614(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2614,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2622,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-backend.scm: 68 lambda-literal-id");
-((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t3,t2);}
-
-/* k2620 in a2613 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_eqp(((C_word*)t0)[2],t1));}
-
-/* k2604 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
-static void C_ccall f_2606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-C_trace("c-backend.scm: 69 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[9],((C_word*)t0)[2]);}}
-
-/* ##compiler#gen-list in k2509 in k2506 */
-static void C_ccall f_2557(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2557,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2565,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 50 intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t3,t2,C_make_character(32));}
-
-/* k2563 in ##compiler#gen-list in k2509 in k2506 */
-static void C_ccall f_2565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2565,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2567,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_2567(t5,((C_word*)t0)[2],t1);}
-
-/* loop50 in k2563 in ##compiler#gen-list in k2509 in k2506 */
-static void C_fcall f_2567(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2567,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2582,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-C_trace("c-backend.scm: 49 display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t3,t4,*((C_word*)lf[0]+1));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2580 in loop50 in k2563 in ##compiler#gen-list in k2509 in k2506 */
-static void C_ccall f_2582(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2567(t3,((C_word*)t0)[2],t2);}
-
-/* ##compiler#gen in k2509 in k2506 */
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_2514r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_2514r(t0,t1,t2);}}
-
-static void C_ccall f_2514r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2520,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_2520(t6,t1,t2);}
-
-/* loop34 in ##compiler#gen in k2509 in k2506 */
-static void C_fcall f_2520(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2520,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2544,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=C_eqp(C_SCHEME_TRUE,t4);
-if(C_truep(t5)){
-C_trace("c-backend.scm: 43 newline");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[2]+1)))(3,*((C_word*)lf[2]+1),t3,*((C_word*)lf[0]+1));}
-else{
-C_trace("c-backend.scm: 44 display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t3,t4,*((C_word*)lf[0]+1));}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2542 in loop34 in ##compiler#gen in k2509 in k2506 */
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2520(t3,((C_word*)t0)[2],t2);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[795] = {
-{"toplevel:c_backend_scm",(void*)C_backend_toplevel},
-{"f_2508:c_backend_scm",(void*)f_2508},
-{"f_2511:c_backend_scm",(void*)f_2511},
-{"f_10305:c_backend_scm",(void*)f_10305},
-{"f_10308:c_backend_scm",(void*)f_10308},
-{"f_10335:c_backend_scm",(void*)f_10335},
-{"f_10331:c_backend_scm",(void*)f_10331},
-{"f_10311:c_backend_scm",(void*)f_10311},
-{"f_10314:c_backend_scm",(void*)f_10314},
-{"f_10327:c_backend_scm",(void*)f_10327},
-{"f_10317:c_backend_scm",(void*)f_10317},
-{"f_10320:c_backend_scm",(void*)f_10320},
-{"f_10323:c_backend_scm",(void*)f_10323},
-{"f_2597:c_backend_scm",(void*)f_2597},
-{"f_10005:c_backend_scm",(void*)f_10005},
-{"f_10281:c_backend_scm",(void*)f_10281},
-{"f_10279:c_backend_scm",(void*)f_10279},
-{"f_10267:c_backend_scm",(void*)f_10267},
-{"f_10237:c_backend_scm",(void*)f_10237},
-{"f_10198:c_backend_scm",(void*)f_10198},
-{"f_10185:c_backend_scm",(void*)f_10185},
-{"f_10181:c_backend_scm",(void*)f_10181},
-{"f_10067:c_backend_scm",(void*)f_10067},
-{"f_10014:c_backend_scm",(void*)f_10014},
-{"f_9398:c_backend_scm",(void*)f_9398},
-{"f_9509:c_backend_scm",(void*)f_9509},
-{"f_9674:c_backend_scm",(void*)f_9674},
-{"f_9701:c_backend_scm",(void*)f_9701},
-{"f_9879:c_backend_scm",(void*)f_9879},
-{"f_9882:c_backend_scm",(void*)f_9882},
-{"f_9885:c_backend_scm",(void*)f_9885},
-{"f_9888:c_backend_scm",(void*)f_9888},
-{"f_9858:c_backend_scm",(void*)f_9858},
-{"f_9861:c_backend_scm",(void*)f_9861},
-{"f_9864:c_backend_scm",(void*)f_9864},
-{"f_9867:c_backend_scm",(void*)f_9867},
-{"f_9837:c_backend_scm",(void*)f_9837},
-{"f_9840:c_backend_scm",(void*)f_9840},
-{"f_9843:c_backend_scm",(void*)f_9843},
-{"f_9846:c_backend_scm",(void*)f_9846},
-{"f_9800:c_backend_scm",(void*)f_9800},
-{"f_9803:c_backend_scm",(void*)f_9803},
-{"f_9806:c_backend_scm",(void*)f_9806},
-{"f_9809:c_backend_scm",(void*)f_9809},
-{"f_9779:c_backend_scm",(void*)f_9779},
-{"f_9782:c_backend_scm",(void*)f_9782},
-{"f_9785:c_backend_scm",(void*)f_9785},
-{"f_9788:c_backend_scm",(void*)f_9788},
-{"f_9758:c_backend_scm",(void*)f_9758},
-{"f_9761:c_backend_scm",(void*)f_9761},
-{"f_9764:c_backend_scm",(void*)f_9764},
-{"f_9767:c_backend_scm",(void*)f_9767},
-{"f_9737:c_backend_scm",(void*)f_9737},
-{"f_9740:c_backend_scm",(void*)f_9740},
-{"f_9743:c_backend_scm",(void*)f_9743},
-{"f_9746:c_backend_scm",(void*)f_9746},
-{"f_9716:c_backend_scm",(void*)f_9716},
-{"f_9719:c_backend_scm",(void*)f_9719},
-{"f_9722:c_backend_scm",(void*)f_9722},
-{"f_9725:c_backend_scm",(void*)f_9725},
-{"f_9678:c_backend_scm",(void*)f_9678},
-{"f_9644:c_backend_scm",(void*)f_9644},
-{"f_9647:c_backend_scm",(void*)f_9647},
-{"f_9650:c_backend_scm",(void*)f_9650},
-{"f_9653:c_backend_scm",(void*)f_9653},
-{"f_9623:c_backend_scm",(void*)f_9623},
-{"f_9626:c_backend_scm",(void*)f_9626},
-{"f_9629:c_backend_scm",(void*)f_9629},
-{"f_9632:c_backend_scm",(void*)f_9632},
-{"f_9602:c_backend_scm",(void*)f_9602},
-{"f_9605:c_backend_scm",(void*)f_9605},
-{"f_9608:c_backend_scm",(void*)f_9608},
-{"f_9611:c_backend_scm",(void*)f_9611},
-{"f_9578:c_backend_scm",(void*)f_9578},
-{"f_9581:c_backend_scm",(void*)f_9581},
-{"f_9584:c_backend_scm",(void*)f_9584},
-{"f_9587:c_backend_scm",(void*)f_9587},
-{"f_9557:c_backend_scm",(void*)f_9557},
-{"f_9560:c_backend_scm",(void*)f_9560},
-{"f_9563:c_backend_scm",(void*)f_9563},
-{"f_9566:c_backend_scm",(void*)f_9566},
-{"f_9533:c_backend_scm",(void*)f_9533},
-{"f_9536:c_backend_scm",(void*)f_9536},
-{"f_9539:c_backend_scm",(void*)f_9539},
-{"f_9542:c_backend_scm",(void*)f_9542},
-{"f_9512:c_backend_scm",(void*)f_9512},
-{"f_9515:c_backend_scm",(void*)f_9515},
-{"f_9518:c_backend_scm",(void*)f_9518},
-{"f_9521:c_backend_scm",(void*)f_9521},
-{"f_9488:c_backend_scm",(void*)f_9488},
-{"f_9491:c_backend_scm",(void*)f_9491},
-{"f_9494:c_backend_scm",(void*)f_9494},
-{"f_9497:c_backend_scm",(void*)f_9497},
-{"f_9467:c_backend_scm",(void*)f_9467},
-{"f_9470:c_backend_scm",(void*)f_9470},
-{"f_9473:c_backend_scm",(void*)f_9473},
-{"f_9476:c_backend_scm",(void*)f_9476},
-{"f_9400:c_backend_scm",(void*)f_9400},
-{"f_8908:c_backend_scm",(void*)f_8908},
-{"f_8938:c_backend_scm",(void*)f_8938},
-{"f_8965:c_backend_scm",(void*)f_8965},
-{"f_9160:c_backend_scm",(void*)f_9160},
-{"f_9169:c_backend_scm",(void*)f_9169},
-{"f_9178:c_backend_scm",(void*)f_9178},
-{"f_9205:c_backend_scm",(void*)f_9205},
-{"f_9282:c_backend_scm",(void*)f_9282},
-{"f_8910:c_backend_scm",(void*)f_8910},
-{"f_8024:c_backend_scm",(void*)f_8024},
-{"f_8101:c_backend_scm",(void*)f_8101},
-{"f_8203:c_backend_scm",(void*)f_8203},
-{"f_8236:c_backend_scm",(void*)f_8236},
-{"f_8332:c_backend_scm",(void*)f_8332},
-{"f_8344:c_backend_scm",(void*)f_8344},
-{"f_8359:c_backend_scm",(void*)f_8359},
-{"f_8404:c_backend_scm",(void*)f_8404},
-{"f_8421:c_backend_scm",(void*)f_8421},
-{"f_8438:c_backend_scm",(void*)f_8438},
-{"f_8477:c_backend_scm",(void*)f_8477},
-{"f_8494:c_backend_scm",(void*)f_8494},
-{"f_8511:c_backend_scm",(void*)f_8511},
-{"f_8528:c_backend_scm",(void*)f_8528},
-{"f_8545:c_backend_scm",(void*)f_8545},
-{"f_8562:c_backend_scm",(void*)f_8562},
-{"f_8579:c_backend_scm",(void*)f_8579},
-{"f_8591:c_backend_scm",(void*)f_8591},
-{"f_8598:c_backend_scm",(void*)f_8598},
-{"f_8608:c_backend_scm",(void*)f_8608},
-{"f_8648:c_backend_scm",(void*)f_8648},
-{"f_8618:c_backend_scm",(void*)f_8618},
-{"f_8606:c_backend_scm",(void*)f_8606},
-{"f_8602:c_backend_scm",(void*)f_8602},
-{"f_8569:c_backend_scm",(void*)f_8569},
-{"f_8552:c_backend_scm",(void*)f_8552},
-{"f_8535:c_backend_scm",(void*)f_8535},
-{"f_8518:c_backend_scm",(void*)f_8518},
-{"f_8501:c_backend_scm",(void*)f_8501},
-{"f_8484:c_backend_scm",(void*)f_8484},
-{"f_8449:c_backend_scm",(void*)f_8449},
-{"f_8459:c_backend_scm",(void*)f_8459},
-{"f_8457:c_backend_scm",(void*)f_8457},
-{"f_8453:c_backend_scm",(void*)f_8453},
-{"f_8445:c_backend_scm",(void*)f_8445},
-{"f_8432:c_backend_scm",(void*)f_8432},
-{"f_8415:c_backend_scm",(void*)f_8415},
-{"f_8363:c_backend_scm",(void*)f_8363},
-{"f_8031:c_backend_scm",(void*)f_8031},
-{"f_8026:c_backend_scm",(void*)f_8026},
-{"f_7959:c_backend_scm",(void*)f_7959},
-{"f_7963:c_backend_scm",(void*)f_7963},
-{"f_7966:c_backend_scm",(void*)f_7966},
-{"f_7969:c_backend_scm",(void*)f_7969},
-{"f_7972:c_backend_scm",(void*)f_7972},
-{"f_7978:c_backend_scm",(void*)f_7978},
-{"f_8022:c_backend_scm",(void*)f_8022},
-{"f_7981:c_backend_scm",(void*)f_7981},
-{"f_7989:c_backend_scm",(void*)f_7989},
-{"f_8010:c_backend_scm",(void*)f_8010},
-{"f_7993:c_backend_scm",(void*)f_7993},
-{"f_7984:c_backend_scm",(void*)f_7984},
-{"f_7465:c_backend_scm",(void*)f_7465},
-{"f_7471:c_backend_scm",(void*)f_7471},
-{"f_7946:c_backend_scm",(void*)f_7946},
-{"f_7479:c_backend_scm",(void*)f_7479},
-{"f_7483:c_backend_scm",(void*)f_7483},
-{"f_7486:c_backend_scm",(void*)f_7486},
-{"f_7489:c_backend_scm",(void*)f_7489},
-{"f_7492:c_backend_scm",(void*)f_7492},
-{"f_7498:c_backend_scm",(void*)f_7498},
-{"f_7844:c_backend_scm",(void*)f_7844},
-{"f_7847:c_backend_scm",(void*)f_7847},
-{"f_7943:c_backend_scm",(void*)f_7943},
-{"f_7850:c_backend_scm",(void*)f_7850},
-{"f_7853:c_backend_scm",(void*)f_7853},
-{"f_7856:c_backend_scm",(void*)f_7856},
-{"f_7859:c_backend_scm",(void*)f_7859},
-{"f_7892:c_backend_scm",(void*)f_7892},
-{"f_7908:c_backend_scm",(void*)f_7908},
-{"f_7911:c_backend_scm",(void*)f_7911},
-{"f_7862:c_backend_scm",(void*)f_7862},
-{"f_7890:c_backend_scm",(void*)f_7890},
-{"f_7865:c_backend_scm",(void*)f_7865},
-{"f_7868:c_backend_scm",(void*)f_7868},
-{"f_7871:c_backend_scm",(void*)f_7871},
-{"f_7500:c_backend_scm",(void*)f_7500},
-{"f_7510:c_backend_scm",(void*)f_7510},
-{"f_7519:c_backend_scm",(void*)f_7519},
-{"f_7531:c_backend_scm",(void*)f_7531},
-{"f_7543:c_backend_scm",(void*)f_7543},
-{"f_7549:c_backend_scm",(void*)f_7549},
-{"f_7588:c_backend_scm",(void*)f_7588},
-{"f_7553:c_backend_scm",(void*)f_7553},
-{"f_7151:c_backend_scm",(void*)f_7151},
-{"f_7157:c_backend_scm",(void*)f_7157},
-{"f_7452:c_backend_scm",(void*)f_7452},
-{"f_7165:c_backend_scm",(void*)f_7165},
-{"f_7169:c_backend_scm",(void*)f_7169},
-{"f_7172:c_backend_scm",(void*)f_7172},
-{"f_7175:c_backend_scm",(void*)f_7175},
-{"f_7449:c_backend_scm",(void*)f_7449},
-{"f_7181:c_backend_scm",(void*)f_7181},
-{"f_7184:c_backend_scm",(void*)f_7184},
-{"f_7187:c_backend_scm",(void*)f_7187},
-{"f_7190:c_backend_scm",(void*)f_7190},
-{"f_7193:c_backend_scm",(void*)f_7193},
-{"f_7196:c_backend_scm",(void*)f_7196},
-{"f_7199:c_backend_scm",(void*)f_7199},
-{"f_7202:c_backend_scm",(void*)f_7202},
-{"f_7205:c_backend_scm",(void*)f_7205},
-{"f_7208:c_backend_scm",(void*)f_7208},
-{"f_7438:c_backend_scm",(void*)f_7438},
-{"f_7211:c_backend_scm",(void*)f_7211},
-{"f_7214:c_backend_scm",(void*)f_7214},
-{"f_7217:c_backend_scm",(void*)f_7217},
-{"f_7220:c_backend_scm",(void*)f_7220},
-{"f_7223:c_backend_scm",(void*)f_7223},
-{"f_7226:c_backend_scm",(void*)f_7226},
-{"f_7229:c_backend_scm",(void*)f_7229},
-{"f_7232:c_backend_scm",(void*)f_7232},
-{"f_7329:c_backend_scm",(void*)f_7329},
-{"f_7331:c_backend_scm",(void*)f_7331},
-{"f_7338:c_backend_scm",(void*)f_7338},
-{"f_7365:c_backend_scm",(void*)f_7365},
-{"f_7368:c_backend_scm",(void*)f_7368},
-{"f_7371:c_backend_scm",(void*)f_7371},
-{"f_7359:c_backend_scm",(void*)f_7359},
-{"f_7347:c_backend_scm",(void*)f_7347},
-{"f_7351:c_backend_scm",(void*)f_7351},
-{"f_7355:c_backend_scm",(void*)f_7355},
-{"f_7377:c_backend_scm",(void*)f_7377},
-{"f_7235:c_backend_scm",(void*)f_7235},
-{"f_7238:c_backend_scm",(void*)f_7238},
-{"f_7268:c_backend_scm",(void*)f_7268},
-{"f_7271:c_backend_scm",(void*)f_7271},
-{"f_7309:c_backend_scm",(void*)f_7309},
-{"f_7305:c_backend_scm",(void*)f_7305},
-{"f_7274:c_backend_scm",(void*)f_7274},
-{"f_7277:c_backend_scm",(void*)f_7277},
-{"f_7280:c_backend_scm",(void*)f_7280},
-{"f_7247:c_backend_scm",(void*)f_7247},
-{"f_7250:c_backend_scm",(void*)f_7250},
-{"f_7241:c_backend_scm",(void*)f_7241},
-{"f_7111:c_backend_scm",(void*)f_7111},
-{"f_7117:c_backend_scm",(void*)f_7117},
-{"f_7129:c_backend_scm",(void*)f_7129},
-{"f_7132:c_backend_scm",(void*)f_7132},
-{"f_7138:c_backend_scm",(void*)f_7138},
-{"f_7057:c_backend_scm",(void*)f_7057},
-{"f_7061:c_backend_scm",(void*)f_7061},
-{"f_7066:c_backend_scm",(void*)f_7066},
-{"f_7095:c_backend_scm",(void*)f_7095},
-{"f_7098:c_backend_scm",(void*)f_7098},
-{"f_7041:c_backend_scm",(void*)f_7041},
-{"f_7047:c_backend_scm",(void*)f_7047},
-{"f_7055:c_backend_scm",(void*)f_7055},
-{"f_7025:c_backend_scm",(void*)f_7025},
-{"f_7031:c_backend_scm",(void*)f_7031},
-{"f_7039:c_backend_scm",(void*)f_7039},
-{"f_6936:c_backend_scm",(void*)f_6936},
-{"f_6945:c_backend_scm",(void*)f_6945},
-{"f_6974:c_backend_scm",(void*)f_6974},
-{"f_6984:c_backend_scm",(void*)f_6984},
-{"f_6859:c_backend_scm",(void*)f_6859},
-{"f_6863:c_backend_scm",(void*)f_6863},
-{"f_6877:c_backend_scm",(void*)f_6877},
-{"f_6890:c_backend_scm",(void*)f_6890},
-{"f_6922:c_backend_scm",(void*)f_6922},
-{"f_6893:c_backend_scm",(void*)f_6893},
-{"f_6896:c_backend_scm",(void*)f_6896},
-{"f_6866:c_backend_scm",(void*)f_6866},
-{"f_6869:c_backend_scm",(void*)f_6869},
-{"f_6872:c_backend_scm",(void*)f_6872},
-{"f_2599:c_backend_scm",(void*)f_2599},
-{"f_6826:c_backend_scm",(void*)f_6826},
-{"f_6830:c_backend_scm",(void*)f_6830},
-{"f_6833:c_backend_scm",(void*)f_6833},
-{"f_6836:c_backend_scm",(void*)f_6836},
-{"f_6839:c_backend_scm",(void*)f_6839},
-{"f_6842:c_backend_scm",(void*)f_6842},
-{"f_6845:c_backend_scm",(void*)f_6845},
-{"f_6848:c_backend_scm",(void*)f_6848},
-{"f_6851:c_backend_scm",(void*)f_6851},
-{"f_6854:c_backend_scm",(void*)f_6854},
-{"f_6041:c_backend_scm",(void*)f_6041},
-{"f_6047:c_backend_scm",(void*)f_6047},
-{"f_6812:c_backend_scm",(void*)f_6812},
-{"f_6055:c_backend_scm",(void*)f_6055},
-{"f_6059:c_backend_scm",(void*)f_6059},
-{"f_6062:c_backend_scm",(void*)f_6062},
-{"f_6065:c_backend_scm",(void*)f_6065},
-{"f_6068:c_backend_scm",(void*)f_6068},
-{"f_6071:c_backend_scm",(void*)f_6071},
-{"f_6074:c_backend_scm",(void*)f_6074},
-{"f_6809:c_backend_scm",(void*)f_6809},
-{"f_6077:c_backend_scm",(void*)f_6077},
-{"f_6083:c_backend_scm",(void*)f_6083},
-{"f_6086:c_backend_scm",(void*)f_6086},
-{"f_6089:c_backend_scm",(void*)f_6089},
-{"f_6092:c_backend_scm",(void*)f_6092},
-{"f_6095:c_backend_scm",(void*)f_6095},
-{"f_6098:c_backend_scm",(void*)f_6098},
-{"f_6101:c_backend_scm",(void*)f_6101},
-{"f_6104:c_backend_scm",(void*)f_6104},
-{"f_6107:c_backend_scm",(void*)f_6107},
-{"f_6110:c_backend_scm",(void*)f_6110},
-{"f_6113:c_backend_scm",(void*)f_6113},
-{"f_6116:c_backend_scm",(void*)f_6116},
-{"f_6119:c_backend_scm",(void*)f_6119},
-{"f_6778:c_backend_scm",(void*)f_6778},
-{"f_6122:c_backend_scm",(void*)f_6122},
-{"f_6739:c_backend_scm",(void*)f_6739},
-{"f_6742:c_backend_scm",(void*)f_6742},
-{"f_6745:c_backend_scm",(void*)f_6745},
-{"f_6761:c_backend_scm",(void*)f_6761},
-{"f_6764:c_backend_scm",(void*)f_6764},
-{"f_6125:c_backend_scm",(void*)f_6125},
-{"f_6128:c_backend_scm",(void*)f_6128},
-{"f_6131:c_backend_scm",(void*)f_6131},
-{"f_6711:c_backend_scm",(void*)f_6711},
-{"f_6714:c_backend_scm",(void*)f_6714},
-{"f_6134:c_backend_scm",(void*)f_6134},
-{"f_6137:c_backend_scm",(void*)f_6137},
-{"f_6140:c_backend_scm",(void*)f_6140},
-{"f_6143:c_backend_scm",(void*)f_6143},
-{"f_6146:c_backend_scm",(void*)f_6146},
-{"f_6149:c_backend_scm",(void*)f_6149},
-{"f_6671:c_backend_scm",(void*)f_6671},
-{"f_6673:c_backend_scm",(void*)f_6673},
-{"f_6683:c_backend_scm",(void*)f_6683},
-{"f_6624:c_backend_scm",(void*)f_6624},
-{"f_6629:c_backend_scm",(void*)f_6629},
-{"f_6645:c_backend_scm",(void*)f_6645},
-{"f_6656:c_backend_scm",(void*)f_6656},
-{"f_6152:c_backend_scm",(void*)f_6152},
-{"f_6573:c_backend_scm",(void*)f_6573},
-{"f_6585:c_backend_scm",(void*)f_6585},
-{"f_6588:c_backend_scm",(void*)f_6588},
-{"f_6495:c_backend_scm",(void*)f_6495},
-{"f_6537:c_backend_scm",(void*)f_6537},
-{"f_6498:c_backend_scm",(void*)f_6498},
-{"f_6504:c_backend_scm",(void*)f_6504},
-{"f_6507:c_backend_scm",(void*)f_6507},
-{"f_6431:c_backend_scm",(void*)f_6431},
-{"f_6434:c_backend_scm",(void*)f_6434},
-{"f_6437:c_backend_scm",(void*)f_6437},
-{"f_6440:c_backend_scm",(void*)f_6440},
-{"f_6443:c_backend_scm",(void*)f_6443},
-{"f_6458:c_backend_scm",(void*)f_6458},
-{"f_6446:c_backend_scm",(void*)f_6446},
-{"f_6449:c_backend_scm",(void*)f_6449},
-{"f_6417:c_backend_scm",(void*)f_6417},
-{"f_6425:c_backend_scm",(void*)f_6425},
-{"f_6342:c_backend_scm",(void*)f_6342},
-{"f_6348:c_backend_scm",(void*)f_6348},
-{"f_6351:c_backend_scm",(void*)f_6351},
-{"f_6385:c_backend_scm",(void*)f_6385},
-{"f_6388:c_backend_scm",(void*)f_6388},
-{"f_6391:c_backend_scm",(void*)f_6391},
-{"f_6354:c_backend_scm",(void*)f_6354},
-{"f_6357:c_backend_scm",(void*)f_6357},
-{"f_6360:c_backend_scm",(void*)f_6360},
-{"f_6363:c_backend_scm",(void*)f_6363},
-{"f_6372:c_backend_scm",(void*)f_6372},
-{"f_6375:c_backend_scm",(void*)f_6375},
-{"f_6155:c_backend_scm",(void*)f_6155},
-{"f_6178:c_backend_scm",(void*)f_6178},
-{"f_6283:c_backend_scm",(void*)f_6283},
-{"f_6286:c_backend_scm",(void*)f_6286},
-{"f_6298:c_backend_scm",(void*)f_6298},
-{"f_6289:c_backend_scm",(void*)f_6289},
-{"f_6184:c_backend_scm",(void*)f_6184},
-{"f_6187:c_backend_scm",(void*)f_6187},
-{"f_6270:c_backend_scm",(void*)f_6270},
-{"f_6190:c_backend_scm",(void*)f_6190},
-{"f_6193:c_backend_scm",(void*)f_6193},
-{"f_6196:c_backend_scm",(void*)f_6196},
-{"f_6199:c_backend_scm",(void*)f_6199},
-{"f_6264:c_backend_scm",(void*)f_6264},
-{"f_6260:c_backend_scm",(void*)f_6260},
-{"f_6202:c_backend_scm",(void*)f_6202},
-{"f_6205:c_backend_scm",(void*)f_6205},
-{"f_6208:c_backend_scm",(void*)f_6208},
-{"f_6211:c_backend_scm",(void*)f_6211},
-{"f_6214:c_backend_scm",(void*)f_6214},
-{"f_6217:c_backend_scm",(void*)f_6217},
-{"f_6235:c_backend_scm",(void*)f_6235},
-{"f_6245:c_backend_scm",(void*)f_6245},
-{"f_6220:c_backend_scm",(void*)f_6220},
-{"f_6158:c_backend_scm",(void*)f_6158},
-{"f_6168:c_backend_scm",(void*)f_6168},
-{"f_6161:c_backend_scm",(void*)f_6161},
-{"f_5993:c_backend_scm",(void*)f_5993},
-{"f_6000:c_backend_scm",(void*)f_6000},
-{"f_6003:c_backend_scm",(void*)f_6003},
-{"f_5916:c_backend_scm",(void*)f_5916},
-{"f_5923:c_backend_scm",(void*)f_5923},
-{"f_5926:c_backend_scm",(void*)f_5926},
-{"f_5931:c_backend_scm",(void*)f_5931},
-{"f_5987:c_backend_scm",(void*)f_5987},
-{"f_5983:c_backend_scm",(void*)f_5983},
-{"f_5968:c_backend_scm",(void*)f_5968},
-{"f_5947:c_backend_scm",(void*)f_5947},
-{"f_5958:c_backend_scm",(void*)f_5958},
-{"f_5954:c_backend_scm",(void*)f_5954},
-{"f_5774:c_backend_scm",(void*)f_5774},
-{"f_5914:c_backend_scm",(void*)f_5914},
-{"f_5781:c_backend_scm",(void*)f_5781},
-{"f_5787:c_backend_scm",(void*)f_5787},
-{"f_5870:c_backend_scm",(void*)f_5870},
-{"f_5873:c_backend_scm",(void*)f_5873},
-{"f_5883:c_backend_scm",(void*)f_5883},
-{"f_5876:c_backend_scm",(void*)f_5876},
-{"f_5837:c_backend_scm",(void*)f_5837},
-{"f_5843:c_backend_scm",(void*)f_5843},
-{"f_5580:c_backend_scm",(void*)f_5580},
-{"f_5587:c_backend_scm",(void*)f_5587},
-{"f_5696:c_backend_scm",(void*)f_5696},
-{"f_5714:c_backend_scm",(void*)f_5714},
-{"f_5743:c_backend_scm",(void*)f_5743},
-{"f_5765:c_backend_scm",(void*)f_5765},
-{"f_5721:c_backend_scm",(void*)f_5721},
-{"f_5655:c_backend_scm",(void*)f_5655},
-{"f_5657:c_backend_scm",(void*)f_5657},
-{"f_5686:c_backend_scm",(void*)f_5686},
-{"f_5651:c_backend_scm",(void*)f_5651},
-{"f_5647:c_backend_scm",(void*)f_5647},
-{"f_5618:c_backend_scm",(void*)f_5618},
-{"f_5622:c_backend_scm",(void*)f_5622},
-{"f_5525:c_backend_scm",(void*)f_5525},
-{"f_5531:c_backend_scm",(void*)f_5531},
-{"f_5560:c_backend_scm",(void*)f_5560},
-{"f_5563:c_backend_scm",(void*)f_5563},
-{"f_5566:c_backend_scm",(void*)f_5566},
-{"f_5569:c_backend_scm",(void*)f_5569},
-{"f_5572:c_backend_scm",(void*)f_5572},
-{"f_5541:c_backend_scm",(void*)f_5541},
-{"f_5205:c_backend_scm",(void*)f_5205},
-{"f_5394:c_backend_scm",(void*)f_5394},
-{"f_5512:c_backend_scm",(void*)f_5512},
-{"f_5402:c_backend_scm",(void*)f_5402},
-{"f_5406:c_backend_scm",(void*)f_5406},
-{"f_5409:c_backend_scm",(void*)f_5409},
-{"f_5412:c_backend_scm",(void*)f_5412},
-{"f_5415:c_backend_scm",(void*)f_5415},
-{"f_5418:c_backend_scm",(void*)f_5418},
-{"f_5509:c_backend_scm",(void*)f_5509},
-{"f_5421:c_backend_scm",(void*)f_5421},
-{"f_5424:c_backend_scm",(void*)f_5424},
-{"f_5430:c_backend_scm",(void*)f_5430},
-{"f_5498:c_backend_scm",(void*)f_5498},
-{"f_5464:c_backend_scm",(void*)f_5464},
-{"f_5470:c_backend_scm",(void*)f_5470},
-{"f_5478:c_backend_scm",(void*)f_5478},
-{"f_5474:c_backend_scm",(void*)f_5474},
-{"f_5436:c_backend_scm",(void*)f_5436},
-{"f_5439:c_backend_scm",(void*)f_5439},
-{"f_5442:c_backend_scm",(void*)f_5442},
-{"f_5445:c_backend_scm",(void*)f_5445},
-{"f_5448:c_backend_scm",(void*)f_5448},
-{"f_5458:c_backend_scm",(void*)f_5458},
-{"f_5451:c_backend_scm",(void*)f_5451},
-{"f_5324:c_backend_scm",(void*)f_5324},
-{"f_5343:c_backend_scm",(void*)f_5343},
-{"f_5381:c_backend_scm",(void*)f_5381},
-{"f_5351:c_backend_scm",(void*)f_5351},
-{"f_5355:c_backend_scm",(void*)f_5355},
-{"f_5358:c_backend_scm",(void*)f_5358},
-{"f_5361:c_backend_scm",(void*)f_5361},
-{"f_5364:c_backend_scm",(void*)f_5364},
-{"f_5378:c_backend_scm",(void*)f_5378},
-{"f_5374:c_backend_scm",(void*)f_5374},
-{"f_5367:c_backend_scm",(void*)f_5367},
-{"f_5327:c_backend_scm",(void*)f_5327},
-{"f_5341:c_backend_scm",(void*)f_5341},
-{"f_5330:c_backend_scm",(void*)f_5330},
-{"f_5337:c_backend_scm",(void*)f_5337},
-{"f_5244:c_backend_scm",(void*)f_5244},
-{"f_5246:c_backend_scm",(void*)f_5246},
-{"f_5250:c_backend_scm",(void*)f_5250},
-{"f_5253:c_backend_scm",(void*)f_5253},
-{"f_5256:c_backend_scm",(void*)f_5256},
-{"f_5259:c_backend_scm",(void*)f_5259},
-{"f_5262:c_backend_scm",(void*)f_5262},
-{"f_5265:c_backend_scm",(void*)f_5265},
-{"f_5268:c_backend_scm",(void*)f_5268},
-{"f_5271:c_backend_scm",(void*)f_5271},
-{"f_5274:c_backend_scm",(void*)f_5274},
-{"f_5277:c_backend_scm",(void*)f_5277},
-{"f_5280:c_backend_scm",(void*)f_5280},
-{"f_5283:c_backend_scm",(void*)f_5283},
-{"f_5297:c_backend_scm",(void*)f_5297},
-{"f_5293:c_backend_scm",(void*)f_5293},
-{"f_5286:c_backend_scm",(void*)f_5286},
-{"f_5208:c_backend_scm",(void*)f_5208},
-{"f_5221:c_backend_scm",(void*)f_5221},
-{"f_5231:c_backend_scm",(void*)f_5231},
-{"f_5212:c_backend_scm",(void*)f_5212},
-{"f_4865:c_backend_scm",(void*)f_4865},
-{"f_4869:c_backend_scm",(void*)f_4869},
-{"f_4938:c_backend_scm",(void*)f_4938},
-{"f_5192:c_backend_scm",(void*)f_5192},
-{"f_4946:c_backend_scm",(void*)f_4946},
-{"f_4950:c_backend_scm",(void*)f_4950},
-{"f_4953:c_backend_scm",(void*)f_4953},
-{"f_5189:c_backend_scm",(void*)f_5189},
-{"f_4956:c_backend_scm",(void*)f_4956},
-{"f_5175:c_backend_scm",(void*)f_5175},
-{"f_4959:c_backend_scm",(void*)f_4959},
-{"f_4962:c_backend_scm",(void*)f_4962},
-{"f_4965:c_backend_scm",(void*)f_4965},
-{"f_4968:c_backend_scm",(void*)f_4968},
-{"f_4971:c_backend_scm",(void*)f_4971},
-{"f_4974:c_backend_scm",(void*)f_4974},
-{"f_5167:c_backend_scm",(void*)f_5167},
-{"f_4977:c_backend_scm",(void*)f_4977},
-{"f_4980:c_backend_scm",(void*)f_4980},
-{"f_5121:c_backend_scm",(void*)f_5121},
-{"f_5123:c_backend_scm",(void*)f_5123},
-{"f_5149:c_backend_scm",(void*)f_5149},
-{"f_5131:c_backend_scm",(void*)f_5131},
-{"f_5142:c_backend_scm",(void*)f_5142},
-{"f_4983:c_backend_scm",(void*)f_4983},
-{"f_5070:c_backend_scm",(void*)f_5070},
-{"f_5073:c_backend_scm",(void*)f_5073},
-{"f_5076:c_backend_scm",(void*)f_5076},
-{"f_5079:c_backend_scm",(void*)f_5079},
-{"f_5095:c_backend_scm",(void*)f_5095},
-{"f_5098:c_backend_scm",(void*)f_5098},
-{"f11178:c_backend_scm",(void*)f11178},
-{"f_5101:c_backend_scm",(void*)f_5101},
-{"f_5104:c_backend_scm",(void*)f_5104},
-{"f_4986:c_backend_scm",(void*)f_4986},
-{"f_4989:c_backend_scm",(void*)f_4989},
-{"f_4992:c_backend_scm",(void*)f_4992},
-{"f_5042:c_backend_scm",(void*)f_5042},
-{"f_5045:c_backend_scm",(void*)f_5045},
-{"f_4995:c_backend_scm",(void*)f_4995},
-{"f_4998:c_backend_scm",(void*)f_4998},
-{"f_5030:c_backend_scm",(void*)f_5030},
-{"f_5033:c_backend_scm",(void*)f_5033},
-{"f_5004:c_backend_scm",(void*)f_5004},
-{"f_5013:c_backend_scm",(void*)f_5013},
-{"f_5016:c_backend_scm",(void*)f_5016},
-{"f_4872:c_backend_scm",(void*)f_4872},
-{"f_4877:c_backend_scm",(void*)f_4877},
-{"f_4889:c_backend_scm",(void*)f_4889},
-{"f_4899:c_backend_scm",(void*)f_4899},
-{"f_4901:c_backend_scm",(void*)f_4901},
-{"f_4911:c_backend_scm",(void*)f_4911},
-{"f_4892:c_backend_scm",(void*)f_4892},
-{"f_4925:c_backend_scm",(void*)f_4925},
-{"f_4694:c_backend_scm",(void*)f_4694},
-{"f_4701:c_backend_scm",(void*)f_4701},
-{"f_4837:c_backend_scm",(void*)f_4837},
-{"f_4852:c_backend_scm",(void*)f_4852},
-{"f_4704:c_backend_scm",(void*)f_4704},
-{"f_4707:c_backend_scm",(void*)f_4707},
-{"f_4710:c_backend_scm",(void*)f_4710},
-{"f_4715:c_backend_scm",(void*)f_4715},
-{"f_4725:c_backend_scm",(void*)f_4725},
-{"f_4731:c_backend_scm",(void*)f_4731},
-{"f_4784:c_backend_scm",(void*)f_4784},
-{"f_4794:c_backend_scm",(void*)f_4794},
-{"f_4734:c_backend_scm",(void*)f_4734},
-{"f_4757:c_backend_scm",(void*)f_4757},
-{"f_4767:c_backend_scm",(void*)f_4767},
-{"f_4737:c_backend_scm",(void*)f_4737},
-{"f_4740:c_backend_scm",(void*)f_4740},
-{"f_4525:c_backend_scm",(void*)f_4525},
-{"f_4686:c_backend_scm",(void*)f_4686},
-{"f_4545:c_backend_scm",(void*)f_4545},
-{"f_4644:c_backend_scm",(void*)f_4644},
-{"f_4648:c_backend_scm",(void*)f_4648},
-{"f_4652:c_backend_scm",(void*)f_4652},
-{"f_4656:c_backend_scm",(void*)f_4656},
-{"f_4678:c_backend_scm",(void*)f_4678},
-{"f_4674:c_backend_scm",(void*)f_4674},
-{"f_4666:c_backend_scm",(void*)f_4666},
-{"f_4664:c_backend_scm",(void*)f_4664},
-{"f_4660:c_backend_scm",(void*)f_4660},
-{"f_4563:c_backend_scm",(void*)f_4563},
-{"f_4566:c_backend_scm",(void*)f_4566},
-{"f_4569:c_backend_scm",(void*)f_4569},
-{"f_4633:c_backend_scm",(void*)f_4633},
-{"f_4572:c_backend_scm",(void*)f_4572},
-{"f_4575:c_backend_scm",(void*)f_4575},
-{"f_4578:c_backend_scm",(void*)f_4578},
-{"f_4593:c_backend_scm",(void*)f_4593},
-{"f_4598:c_backend_scm",(void*)f_4598},
-{"f_4613:c_backend_scm",(void*)f_4613},
-{"f_4581:c_backend_scm",(void*)f_4581},
-{"f_4528:c_backend_scm",(void*)f_4528},
-{"f_4542:c_backend_scm",(void*)f_4542},
-{"f_2644:c_backend_scm",(void*)f_2644},
-{"f_4493:c_backend_scm",(void*)f_4493},
-{"f_4499:c_backend_scm",(void*)f_4499},
-{"f_4503:c_backend_scm",(void*)f_4503},
-{"f_2647:c_backend_scm",(void*)f_2647},
-{"f_4449:c_backend_scm",(void*)f_4449},
-{"f_4452:c_backend_scm",(void*)f_4452},
-{"f_4455:c_backend_scm",(void*)f_4455},
-{"f_4458:c_backend_scm",(void*)f_4458},
-{"f_4461:c_backend_scm",(void*)f_4461},
-{"f_4464:c_backend_scm",(void*)f_4464},
-{"f_4366:c_backend_scm",(void*)f_4366},
-{"f_4369:c_backend_scm",(void*)f_4369},
-{"f_4372:c_backend_scm",(void*)f_4372},
-{"f_4385:c_backend_scm",(void*)f_4385},
-{"f_4408:c_backend_scm",(void*)f_4408},
-{"f_4411:c_backend_scm",(void*)f_4411},
-{"f_4414:c_backend_scm",(void*)f_4414},
-{"f_4417:c_backend_scm",(void*)f_4417},
-{"f_4395:c_backend_scm",(void*)f_4395},
-{"f_4398:c_backend_scm",(void*)f_4398},
-{"f_4347:c_backend_scm",(void*)f_4347},
-{"f_4350:c_backend_scm",(void*)f_4350},
-{"f_4324:c_backend_scm",(void*)f_4324},
-{"f_4327:c_backend_scm",(void*)f_4327},
-{"f_4302:c_backend_scm",(void*)f_4302},
-{"f_4274:c_backend_scm",(void*)f_4274},
-{"f_4277:c_backend_scm",(void*)f_4277},
-{"f_4294:c_backend_scm",(void*)f_4294},
-{"f_4280:c_backend_scm",(void*)f_4280},
-{"f_4283:c_backend_scm",(void*)f_4283},
-{"f_4258:c_backend_scm",(void*)f_4258},
-{"f_4262:c_backend_scm",(void*)f_4262},
-{"f_4244:c_backend_scm",(void*)f_4244},
-{"f_4247:c_backend_scm",(void*)f_4247},
-{"f_4228:c_backend_scm",(void*)f_4228},
-{"f_4232:c_backend_scm",(void*)f_4232},
-{"f_4210:c_backend_scm",(void*)f_4210},
-{"f_4213:c_backend_scm",(void*)f_4213},
-{"f_4190:c_backend_scm",(void*)f_4190},
-{"f_4154:c_backend_scm",(void*)f_4154},
-{"f_4166:c_backend_scm",(void*)f_4166},
-{"f_4157:c_backend_scm",(void*)f_4157},
-{"f_4135:c_backend_scm",(void*)f_4135},
-{"f_4138:c_backend_scm",(void*)f_4138},
-{"f_4116:c_backend_scm",(void*)f_4116},
-{"f_4119:c_backend_scm",(void*)f_4119},
-{"f_4097:c_backend_scm",(void*)f_4097},
-{"f_4100:c_backend_scm",(void*)f_4100},
-{"f_4078:c_backend_scm",(void*)f_4078},
-{"f_4074:c_backend_scm",(void*)f_4074},
-{"f_4022:c_backend_scm",(void*)f_4022},
-{"f_4055:c_backend_scm",(void*)f_4055},
-{"f_4025:c_backend_scm",(void*)f_4025},
-{"f_4043:c_backend_scm",(void*)f_4043},
-{"f_4028:c_backend_scm",(void*)f_4028},
-{"f_4031:c_backend_scm",(void*)f_4031},
-{"f_3989:c_backend_scm",(void*)f_3989},
-{"f_3973:c_backend_scm",(void*)f_3973},
-{"f11150:c_backend_scm",(void*)f11150},
-{"f_3976:c_backend_scm",(void*)f_3976},
-{"f_3979:c_backend_scm",(void*)f_3979},
-{"f_3860:c_backend_scm",(void*)f_3860},
-{"f_3863:c_backend_scm",(void*)f_3863},
-{"f_3920:c_backend_scm",(void*)f_3920},
-{"f_3941:c_backend_scm",(void*)f_3941},
-{"f_3928:c_backend_scm",(void*)f_3928},
-{"f_3932:c_backend_scm",(void*)f_3932},
-{"f_3935:c_backend_scm",(void*)f_3935},
-{"f_3866:c_backend_scm",(void*)f_3866},
-{"f_3876:c_backend_scm",(void*)f_3876},
-{"f_3878:c_backend_scm",(void*)f_3878},
-{"f_3893:c_backend_scm",(void*)f_3893},
-{"f_3869:c_backend_scm",(void*)f_3869},
-{"f_3401:c_backend_scm",(void*)f_3401},
-{"f_3404:c_backend_scm",(void*)f_3404},
-{"f_3810:c_backend_scm",(void*)f_3810},
-{"f_3806:c_backend_scm",(void*)f_3806},
-{"f_3410:c_backend_scm",(void*)f_3410},
-{"f11142:c_backend_scm",(void*)f11142},
-{"f_3799:c_backend_scm",(void*)f_3799},
-{"f_2632:c_backend_scm",(void*)f_2632},
-{"f_3792:c_backend_scm",(void*)f_3792},
-{"f_3416:c_backend_scm",(void*)f_3416},
-{"f_3620:c_backend_scm",(void*)f_3620},
-{"f_3709:c_backend_scm",(void*)f_3709},
-{"f_3712:c_backend_scm",(void*)f_3712},
-{"f_3715:c_backend_scm",(void*)f_3715},
-{"f_3730:c_backend_scm",(void*)f_3730},
-{"f_3718:c_backend_scm",(void*)f_3718},
-{"f_3721:c_backend_scm",(void*)f_3721},
-{"f_3724:c_backend_scm",(void*)f_3724},
-{"f_3640:c_backend_scm",(void*)f_3640},
-{"f_3706:c_backend_scm",(void*)f_3706},
-{"f_3699:c_backend_scm",(void*)f_3699},
-{"f_3695:c_backend_scm",(void*)f_3695},
-{"f_3688:c_backend_scm",(void*)f_3688},
-{"f_3681:c_backend_scm",(void*)f_3681},
-{"f_3656:c_backend_scm",(void*)f_3656},
-{"f_3673:c_backend_scm",(void*)f_3673},
-{"f_3669:c_backend_scm",(void*)f_3669},
-{"f_3643:c_backend_scm",(void*)f_3643},
-{"f_3646:c_backend_scm",(void*)f_3646},
-{"f_3649:c_backend_scm",(void*)f_3649},
-{"f_3614:c_backend_scm",(void*)f_3614},
-{"f_3452:c_backend_scm",(void*)f_3452},
-{"f_3598:c_backend_scm",(void*)f_3598},
-{"f_3601:c_backend_scm",(void*)f_3601},
-{"f_3574:c_backend_scm",(void*)f_3574},
-{"f_3577:c_backend_scm",(void*)f_3577},
-{"f_3580:c_backend_scm",(void*)f_3580},
-{"f11137:c_backend_scm",(void*)f11137},
-{"f_3583:c_backend_scm",(void*)f_3583},
-{"f_3586:c_backend_scm",(void*)f_3586},
-{"f_3455:c_backend_scm",(void*)f_3455},
-{"f_3458:c_backend_scm",(void*)f_3458},
-{"f_3521:c_backend_scm",(void*)f_3521},
-{"f_3542:c_backend_scm",(void*)f_3542},
-{"f_3529:c_backend_scm",(void*)f_3529},
-{"f_3533:c_backend_scm",(void*)f_3533},
-{"f_3536:c_backend_scm",(void*)f_3536},
-{"f_3461:c_backend_scm",(void*)f_3461},
-{"f_3477:c_backend_scm",(void*)f_3477},
-{"f_3479:c_backend_scm",(void*)f_3479},
-{"f_3494:c_backend_scm",(void*)f_3494},
-{"f_3464:c_backend_scm",(void*)f_3464},
-{"f_3467:c_backend_scm",(void*)f_3467},
-{"f_3433:c_backend_scm",(void*)f_3433},
-{"f_3436:c_backend_scm",(void*)f_3436},
-{"f_3368:c_backend_scm",(void*)f_3368},
-{"f11129:c_backend_scm",(void*)f11129},
-{"f_3364:c_backend_scm",(void*)f_3364},
-{"f_3350:c_backend_scm",(void*)f_3350},
-{"f_3353:c_backend_scm",(void*)f_3353},
-{"f_3347:c_backend_scm",(void*)f_3347},
-{"f11124:c_backend_scm",(void*)f11124},
-{"f_3343:c_backend_scm",(void*)f_3343},
-{"f_3329:c_backend_scm",(void*)f_3329},
-{"f_3332:c_backend_scm",(void*)f_3332},
-{"f_3281:c_backend_scm",(void*)f_3281},
-{"f_3302:c_backend_scm",(void*)f_3302},
-{"f11119:c_backend_scm",(void*)f11119},
-{"f_3298:c_backend_scm",(void*)f_3298},
-{"f_3284:c_backend_scm",(void*)f_3284},
-{"f_3287:c_backend_scm",(void*)f_3287},
-{"f_3250:c_backend_scm",(void*)f_3250},
-{"f_3246:c_backend_scm",(void*)f_3246},
-{"f_3204:c_backend_scm",(void*)f_3204},
-{"f_3172:c_backend_scm",(void*)f_3172},
-{"f_3175:c_backend_scm",(void*)f_3175},
-{"f_3101:c_backend_scm",(void*)f_3101},
-{"f_3115:c_backend_scm",(void*)f_3115},
-{"f_3117:c_backend_scm",(void*)f_3117},
-{"f_3138:c_backend_scm",(void*)f_3138},
-{"f_3125:c_backend_scm",(void*)f_3125},
-{"f_3129:c_backend_scm",(void*)f_3129},
-{"f_3132:c_backend_scm",(void*)f_3132},
-{"f_3104:c_backend_scm",(void*)f_3104},
-{"f_3069:c_backend_scm",(void*)f_3069},
-{"f_3072:c_backend_scm",(void*)f_3072},
-{"f_3075:c_backend_scm",(void*)f_3075},
-{"f_3078:c_backend_scm",(void*)f_3078},
-{"f_3040:c_backend_scm",(void*)f_3040},
-{"f_3043:c_backend_scm",(void*)f_3043},
-{"f_3046:c_backend_scm",(void*)f_3046},
-{"f_3049:c_backend_scm",(void*)f_3049},
-{"f_3003:c_backend_scm",(void*)f_3003},
-{"f_3006:c_backend_scm",(void*)f_3006},
-{"f_3009:c_backend_scm",(void*)f_3009},
-{"f_3012:c_backend_scm",(void*)f_3012},
-{"f_2970:c_backend_scm",(void*)f_2970},
-{"f_2973:c_backend_scm",(void*)f_2973},
-{"f_2976:c_backend_scm",(void*)f_2976},
-{"f_2979:c_backend_scm",(void*)f_2979},
-{"f_2951:c_backend_scm",(void*)f_2951},
-{"f_2954:c_backend_scm",(void*)f_2954},
-{"f_2924:c_backend_scm",(void*)f_2924},
-{"f_2927:c_backend_scm",(void*)f_2927},
-{"f_2898:c_backend_scm",(void*)f_2898},
-{"f_2901:c_backend_scm",(void*)f_2901},
-{"f_2904:c_backend_scm",(void*)f_2904},
-{"f_2844:c_backend_scm",(void*)f_2844},
-{"f_2854:c_backend_scm",(void*)f_2854},
-{"f_2857:c_backend_scm",(void*)f_2857},
-{"f_2860:c_backend_scm",(void*)f_2860},
-{"f_2786:c_backend_scm",(void*)f_2786},
-{"f_2789:c_backend_scm",(void*)f_2789},
-{"f_2792:c_backend_scm",(void*)f_2792},
-{"f_2795:c_backend_scm",(void*)f_2795},
-{"f_2798:c_backend_scm",(void*)f_2798},
-{"f_2801:c_backend_scm",(void*)f_2801},
-{"f_2602:c_backend_scm",(void*)f_2602},
-{"f_2614:c_backend_scm",(void*)f_2614},
-{"f_2622:c_backend_scm",(void*)f_2622},
-{"f_2606:c_backend_scm",(void*)f_2606},
-{"f_2557:c_backend_scm",(void*)f_2557},
-{"f_2565:c_backend_scm",(void*)f_2565},
-{"f_2567:c_backend_scm",(void*)f_2567},
-{"f_2582:c_backend_scm",(void*)f_2582},
-{"f_2514:c_backend_scm",(void*)f_2514},
-{"f_2520:c_backend_scm",(void*)f_2520},
-{"f_2544:c_backend_scm",(void*)f_2544},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/c-platform.c b/bootstrap/c-platform.c
deleted file mode 100644
index faeeefc8..00000000
--- a/bootstrap/c-platform.c
+++ /dev/null
@@ -1,10214 +0,0 @@
-/* Generated from c-platform.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:33
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: c-platform.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file c-platform.c
- unit: platform
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[913];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_platform_toplevel)
-C_externexport void C_ccall C_platform_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1311)
-static void C_ccall f_1311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1314)
-static void C_ccall f_1314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4964)
-static void C_ccall f_4964(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1337)
-static void C_ccall f_1337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1340)
-static void C_ccall f_1340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4787)
-static void C_ccall f_4787(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4928)
-static void C_ccall f_4928(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4791)
-static void C_ccall f_4791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4859)
-static void C_ccall f_4859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4866)
-static void C_fcall f_4866(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4882)
-static void C_ccall f_4882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4857)
-static void C_ccall f_4857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4813)
-static void C_ccall f_4813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1343)
-static void C_ccall f_1343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4637)
-static void C_ccall f_4637(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4739)
-static void C_ccall f_4739(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4737)
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4708)
-static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4706)
-static void C_ccall f_4706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1346)
-static void C_ccall f_1346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4478)
-static void C_ccall f_4478(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4595)
-static void C_ccall f_4595(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4593)
-static void C_ccall f_4593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4518)
-static void C_ccall f_4518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4525)
-static void C_fcall f_4525(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4541)
-static void C_ccall f_4541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4516)
-static void C_ccall f_4516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1349)
-static void C_ccall f_1349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4360)
-static void C_ccall f_4360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4463)
-static void C_ccall f_4463(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4395)
-static void C_fcall f_4395(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4415)
-static void C_ccall f_4415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1352)
-static void C_ccall f_1352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4358)
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1429)
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4354)
-static void C_ccall f_4354(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1432)
-static void C_ccall f_1432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1624)
-static void C_ccall f_1624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1627)
-static void C_ccall f_1627(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4137)
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4310)
-static void C_ccall f_4310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4153)
-static void C_fcall f_4153(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4255)
-static void C_ccall f_4255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4186)
-static void C_fcall f_4186(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4222)
-static void C_ccall f_4222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4189)
-static void C_fcall f_4189(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4159)
-static void C_fcall f_4159(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1630)
-static void C_ccall f_1630(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1846)
-static void C_ccall f_1846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1849)
-static void C_ccall f_1849(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1987)
-static void C_ccall f_1987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1990)
-static void C_ccall f_1990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1993)
-static void C_ccall f_1993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1996)
-static void C_ccall f_1996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1999)
-static void C_ccall f_1999(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2002)
-static void C_ccall f_2002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2005)
-static void C_ccall f_2005(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2008)
-static void C_ccall f_2008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2011)
-static void C_ccall f_2011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2014)
-static void C_ccall f_2014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2041)
-static void C_ccall f_2041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2044)
-static void C_ccall f_2044(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2266)
-static void C_ccall f_2266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2269)
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2272)
-static void C_ccall f_2272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2275)
-static void C_ccall f_2275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2278)
-static void C_ccall f_2278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2281)
-static void C_ccall f_2281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2284)
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2287)
-static void C_ccall f_2287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2290)
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2293)
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2296)
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2299)
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2302)
-static void C_ccall f_2302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2305)
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2308)
-static void C_ccall f_2308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2311)
-static void C_ccall f_2311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2314)
-static void C_ccall f_2314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2317)
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2320)
-static void C_ccall f_2320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2323)
-static void C_ccall f_2323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2326)
-static void C_ccall f_2326(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2329)
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2332)
-static void C_ccall f_2332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2335)
-static void C_ccall f_2335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2338)
-static void C_ccall f_2338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2341)
-static void C_ccall f_2341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2344)
-static void C_ccall f_2344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2347)
-static void C_ccall f_2347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2350)
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2353)
-static void C_ccall f_2353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2356)
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2359)
-static void C_ccall f_2359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2362)
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2365)
-static void C_ccall f_2365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2368)
-static void C_ccall f_2368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2371)
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2374)
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2377)
-static void C_ccall f_2377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2380)
-static void C_ccall f_2380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2383)
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2386)
-static void C_ccall f_2386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2389)
-static void C_ccall f_2389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2392)
-static void C_ccall f_2392(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2395)
-static void C_ccall f_2395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2398)
-static void C_ccall f_2398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2401)
-static void C_ccall f_2401(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2404)
-static void C_ccall f_2404(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2407)
-static void C_ccall f_2407(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2410)
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2413)
-static void C_ccall f_2413(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2416)
-static void C_ccall f_2416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2419)
-static void C_ccall f_2419(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2422)
-static void C_ccall f_2422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2425)
-static void C_ccall f_2425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2428)
-static void C_ccall f_2428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2431)
-static void C_ccall f_2431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2434)
-static void C_ccall f_2434(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2437)
-static void C_ccall f_2437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2440)
-static void C_ccall f_2440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2443)
-static void C_ccall f_2443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2446)
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2449)
-static void C_ccall f_2449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2452)
-static void C_ccall f_2452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2455)
-static void C_ccall f_2455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2458)
-static void C_ccall f_2458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2461)
-static void C_ccall f_2461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2464)
-static void C_ccall f_2464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2467)
-static void C_ccall f_2467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2470)
-static void C_ccall f_2470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2473)
-static void C_ccall f_2473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2476)
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2479)
-static void C_ccall f_2479(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2482)
-static void C_ccall f_2482(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2485)
-static void C_ccall f_2485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2488)
-static void C_ccall f_2488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2491)
-static void C_ccall f_2491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2494)
-static void C_ccall f_2494(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2497)
-static void C_ccall f_2497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2500)
-static void C_ccall f_2500(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2503)
-static void C_ccall f_2503(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2506)
-static void C_ccall f_2506(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2509)
-static void C_ccall f_2509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2512)
-static void C_ccall f_2512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2515)
-static void C_ccall f_2515(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2518)
-static void C_ccall f_2518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2521)
-static void C_ccall f_2521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2524)
-static void C_ccall f_2524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2527)
-static void C_ccall f_2527(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2530)
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2533)
-static void C_ccall f_2533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2536)
-static void C_ccall f_2536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2539)
-static void C_ccall f_2539(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2542)
-static void C_ccall f_2542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2545)
-static void C_ccall f_2545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2548)
-static void C_ccall f_2548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2551)
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2554)
-static void C_ccall f_2554(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2557)
-static void C_ccall f_2557(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2560)
-static void C_ccall f_2560(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2563)
-static void C_ccall f_2563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2566)
-static void C_ccall f_2566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2569)
-static void C_ccall f_2569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2572)
-static void C_ccall f_2572(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2575)
-static void C_ccall f_2575(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2578)
-static void C_ccall f_2578(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2581)
-static void C_ccall f_2581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2584)
-static void C_ccall f_2584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2587)
-static void C_ccall f_2587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2590)
-static void C_ccall f_2590(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2593)
-static void C_ccall f_2593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2596)
-static void C_ccall f_2596(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2599)
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2602)
-static void C_ccall f_2602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2605)
-static void C_ccall f_2605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2608)
-static void C_ccall f_2608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2611)
-static void C_ccall f_2611(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2614)
-static void C_ccall f_2614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2617)
-static void C_ccall f_2617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2620)
-static void C_ccall f_2620(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2623)
-static void C_ccall f_2623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2626)
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2629)
-static void C_ccall f_2629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2632)
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2635)
-static void C_ccall f_2635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2638)
-static void C_ccall f_2638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2641)
-static void C_ccall f_2641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2644)
-static void C_ccall f_2644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2647)
-static void C_ccall f_2647(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2650)
-static void C_ccall f_2650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2653)
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2656)
-static void C_ccall f_2656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2659)
-static void C_ccall f_2659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2662)
-static void C_ccall f_2662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2665)
-static void C_ccall f_2665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2668)
-static void C_ccall f_2668(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2671)
-static void C_ccall f_2671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2674)
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2677)
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2680)
-static void C_ccall f_2680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2683)
-static void C_ccall f_2683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2686)
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2689)
-static void C_ccall f_2689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2692)
-static void C_ccall f_2692(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2695)
-static void C_ccall f_2695(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2698)
-static void C_ccall f_2698(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2701)
-static void C_ccall f_2701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2704)
-static void C_ccall f_2704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2707)
-static void C_ccall f_2707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2710)
-static void C_ccall f_2710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2713)
-static void C_ccall f_2713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2716)
-static void C_ccall f_2716(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2719)
-static void C_ccall f_2719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2722)
-static void C_ccall f_2722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2725)
-static void C_ccall f_2725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2728)
-static void C_ccall f_2728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2731)
-static void C_ccall f_2731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2734)
-static void C_ccall f_2734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2737)
-static void C_ccall f_2737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2740)
-static void C_ccall f_2740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2743)
-static void C_ccall f_2743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2746)
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2749)
-static void C_ccall f_2749(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2752)
-static void C_ccall f_2752(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2755)
-static void C_ccall f_2755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2758)
-static void C_ccall f_2758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2761)
-static void C_ccall f_2761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2764)
-static void C_ccall f_2764(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2767)
-static void C_ccall f_2767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2770)
-static void C_ccall f_2770(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2773)
-static void C_ccall f_2773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2776)
-static void C_ccall f_2776(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2779)
-static void C_ccall f_2779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2782)
-static void C_ccall f_2782(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2785)
-static void C_ccall f_2785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2788)
-static void C_ccall f_2788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2791)
-static void C_ccall f_2791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2794)
-static void C_ccall f_2794(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2797)
-static void C_ccall f_2797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2800)
-static void C_ccall f_2800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2803)
-static void C_ccall f_2803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2806)
-static void C_ccall f_2806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2809)
-static void C_ccall f_2809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2812)
-static void C_ccall f_2812(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2815)
-static void C_ccall f_2815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2818)
-static void C_ccall f_2818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2821)
-static void C_ccall f_2821(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2824)
-static void C_ccall f_2824(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2827)
-static void C_ccall f_2827(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2830)
-static void C_ccall f_2830(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2833)
-static void C_ccall f_2833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2836)
-static void C_ccall f_2836(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2839)
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2842)
-static void C_ccall f_2842(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2845)
-static void C_ccall f_2845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2848)
-static void C_ccall f_2848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2851)
-static void C_ccall f_2851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2854)
-static void C_ccall f_2854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2857)
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2860)
-static void C_ccall f_2860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2863)
-static void C_ccall f_2863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2866)
-static void C_ccall f_2866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2869)
-static void C_ccall f_2869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2872)
-static void C_ccall f_2872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2875)
-static void C_ccall f_2875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2878)
-static void C_ccall f_2878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2881)
-static void C_ccall f_2881(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2884)
-static void C_ccall f_2884(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2887)
-static void C_ccall f_2887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2890)
-static void C_ccall f_2890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2893)
-static void C_ccall f_2893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2896)
-static void C_ccall f_2896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2899)
-static void C_ccall f_2899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2902)
-static void C_ccall f_2902(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2905)
-static void C_ccall f_2905(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2908)
-static void C_ccall f_2908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2911)
-static void C_ccall f_2911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2914)
-static void C_ccall f_2914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2917)
-static void C_ccall f_2917(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2920)
-static void C_ccall f_2920(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2923)
-static void C_ccall f_2923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2926)
-static void C_ccall f_2926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2929)
-static void C_ccall f_2929(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2932)
-static void C_ccall f_2932(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2935)
-static void C_ccall f_2935(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2938)
-static void C_ccall f_2938(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2941)
-static void C_ccall f_2941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2944)
-static void C_ccall f_2944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2947)
-static void C_ccall f_2947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2950)
-static void C_ccall f_2950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2953)
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2956)
-static void C_ccall f_2956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2959)
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2962)
-static void C_ccall f_2962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2965)
-static void C_ccall f_2965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2968)
-static void C_ccall f_2968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2971)
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2974)
-static void C_ccall f_2974(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2977)
-static void C_ccall f_2977(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2980)
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2983)
-static void C_ccall f_2983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2986)
-static void C_ccall f_2986(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2989)
-static void C_ccall f_2989(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2992)
-static void C_ccall f_2992(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2995)
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2998)
-static void C_ccall f_2998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3001)
-static void C_ccall f_3001(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3004)
-static void C_ccall f_3004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3007)
-static void C_ccall f_3007(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3010)
-static void C_ccall f_3010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3013)
-static void C_ccall f_3013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3016)
-static void C_ccall f_3016(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3019)
-static void C_ccall f_3019(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3022)
-static void C_ccall f_3022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3025)
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3028)
-static void C_ccall f_3028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3031)
-static void C_ccall f_3031(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3034)
-static void C_ccall f_3034(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3037)
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3040)
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3043)
-static void C_ccall f_3043(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3046)
-static void C_ccall f_3046(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3049)
-static void C_ccall f_3049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3052)
-static void C_ccall f_3052(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3055)
-static void C_ccall f_3055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3058)
-static void C_ccall f_3058(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3061)
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3064)
-static void C_ccall f_3064(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3067)
-static void C_ccall f_3067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3070)
-static void C_ccall f_3070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3073)
-static void C_ccall f_3073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3076)
-static void C_ccall f_3076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3079)
-static void C_ccall f_3079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3082)
-static void C_ccall f_3082(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3085)
-static void C_ccall f_3085(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3088)
-static void C_ccall f_3088(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3091)
-static void C_ccall f_3091(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3094)
-static void C_ccall f_3094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3097)
-static void C_ccall f_3097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3100)
-static void C_ccall f_3100(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3103)
-static void C_ccall f_3103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3106)
-static void C_ccall f_3106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3109)
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3112)
-static void C_ccall f_3112(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3115)
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3118)
-static void C_ccall f_3118(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3121)
-static void C_ccall f_3121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3124)
-static void C_ccall f_3124(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3127)
-static void C_ccall f_3127(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3130)
-static void C_ccall f_3130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3133)
-static void C_ccall f_3133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3136)
-static void C_ccall f_3136(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3139)
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4065)
-static void C_ccall f_4065(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4103)
-static void C_ccall f_4103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3142)
-static void C_ccall f_3142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3145)
-static void C_ccall f_3145(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3148)
-static void C_ccall f_3148(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3151)
-static void C_ccall f_3151(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3154)
-static void C_ccall f_3154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3157)
-static void C_ccall f_3157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3160)
-static void C_ccall f_3160(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3163)
-static void C_ccall f_3163(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3166)
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3909)
-static void C_ccall f_3909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_4041)
-static void C_ccall f_4041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3985)
-static void C_fcall f_3985(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4011)
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3935)
-static void C_fcall f_3935(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3169)
-static void C_ccall f_3169(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3172)
-static void C_ccall f_3172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3175)
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3178)
-static void C_ccall f_3178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3181)
-static void C_ccall f_3181(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3184)
-static void C_ccall f_3184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3187)
-static void C_ccall f_3187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3190)
-static void C_ccall f_3190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3193)
-static void C_ccall f_3193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3196)
-static void C_ccall f_3196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3199)
-static void C_ccall f_3199(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3202)
-static void C_ccall f_3202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3205)
-static void C_ccall f_3205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3208)
-static void C_ccall f_3208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3211)
-static void C_ccall f_3211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3214)
-static void C_ccall f_3214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3217)
-static void C_ccall f_3217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3220)
-static void C_ccall f_3220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3223)
-static void C_ccall f_3223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3226)
-static void C_ccall f_3226(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3229)
-static void C_ccall f_3229(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3232)
-static void C_ccall f_3232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3235)
-static void C_ccall f_3235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3238)
-static void C_ccall f_3238(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3241)
-static void C_ccall f_3241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3244)
-static void C_ccall f_3244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3247)
-static void C_ccall f_3247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3250)
-static void C_ccall f_3250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3253)
-static void C_ccall f_3253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3256)
-static void C_ccall f_3256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3259)
-static void C_ccall f_3259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3262)
-static void C_ccall f_3262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3265)
-static void C_ccall f_3265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3268)
-static void C_ccall f_3268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3271)
-static void C_ccall f_3271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3274)
-static void C_ccall f_3274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3277)
-static void C_ccall f_3277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3280)
-static void C_ccall f_3280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3283)
-static void C_ccall f_3283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3286)
-static void C_ccall f_3286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3289)
-static void C_ccall f_3289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3292)
-static void C_ccall f_3292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3295)
-static void C_ccall f_3295(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3298)
-static void C_ccall f_3298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3301)
-static void C_ccall f_3301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3304)
-static void C_ccall f_3304(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3307)
-static void C_ccall f_3307(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3310)
-static void C_ccall f_3310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3313)
-static void C_ccall f_3313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3316)
-static void C_ccall f_3316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3319)
-static void C_ccall f_3319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3322)
-static void C_ccall f_3322(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3325)
-static void C_ccall f_3325(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3328)
-static void C_ccall f_3328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3331)
-static void C_ccall f_3331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3334)
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3337)
-static void C_ccall f_3337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3340)
-static void C_ccall f_3340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3343)
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3346)
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3349)
-static void C_ccall f_3349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3352)
-static void C_ccall f_3352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3355)
-static void C_ccall f_3355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3358)
-static void C_ccall f_3358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3361)
-static void C_ccall f_3361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3364)
-static void C_ccall f_3364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3367)
-static void C_ccall f_3367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3370)
-static void C_ccall f_3370(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3507)
-static void C_ccall f_3507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3510)
-static void C_ccall f_3510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3513)
-static void C_ccall f_3513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3516)
-static void C_ccall f_3516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3660)
-static void C_ccall f_3660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3663)
-static void C_ccall f_3663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3829)
-static void C_ccall f_3829(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3859)
-static void C_ccall f_3859(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3881)
-static void C_ccall f_3881(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3667)
-static void C_ccall f_3667(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3670)
-static void C_ccall f_3670(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3673)
-static void C_ccall f_3673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3747)
-static void C_ccall f_3747(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3801)
-static void C_ccall f_3801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3776)
-static void C_fcall f_3776(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3773)
-static void C_ccall f_3773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3676)
-static void C_ccall f_3676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3702)
-static void C_ccall f_3702(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3679)
-static void C_ccall f_3679(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3682)
-static void C_ccall f_3682(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3685)
-static void C_ccall f_3685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3688)
-static void C_ccall f_3688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3691)
-static void C_ccall f_3691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3694)
-static void C_ccall f_3694(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3697)
-static void C_ccall f_3697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3700)
-static void C_ccall f_3700(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3518)
-static void C_ccall f_3518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3537)
-static void C_ccall f_3537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3554)
-static void C_ccall f_3554(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3610)
-static void C_ccall f_3610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3606)
-static void C_ccall f_3606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3602)
-static void C_ccall f_3602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3598)
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3372)
-static void C_ccall f_3372(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3394)
-static void C_ccall f_3394(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3460)
-static void C_ccall f_3460(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3458)
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2046)
-static void C_ccall f_2046(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2080)
-static void C_ccall f_2080(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2107)
-static void C_ccall f_2107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2110)
-static void C_ccall f_2110(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2113)
-static void C_ccall f_2113(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2184)
-static void C_ccall f_2184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2180)
-static void C_ccall f_2180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2155)
-static void C_ccall f_2155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2015)
-static void C_ccall f_2015(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1851)
-static void C_fcall f_1851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1857)
-static void C_ccall f_1857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1869)
-static void C_ccall f_1869(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1958)
-static void C_ccall f_1958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1892)
-static void C_fcall f_1892(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1912)
-static void C_ccall f_1912(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1889)
-static void C_ccall f_1889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1632)
-static void C_ccall f_1632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1642)
-static void C_ccall f_1642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1787)
-static void C_ccall f_1787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1734)
-static void C_fcall f_1734(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1749)
-static void C_ccall f_1749(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1731)
-static void C_ccall f_1731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1685)
-static void C_fcall f_1685(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1714)
-static void C_ccall f_1714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1679)
-static void C_ccall f_1679(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1671)
-static void C_ccall f_1671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1663)
-static void C_ccall f_1663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1434)
-static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1581)
-static void C_ccall f_1581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1450)
-static void C_fcall f_1450(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1459)
-static void C_fcall f_1459(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1462)
-static void C_fcall f_1462(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1354)
-static void C_fcall f_1354(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1356)
-static void C_ccall f_1356(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1422)
-static void C_ccall f_1422(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_4866)
-static void C_fcall trf_4866(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4866(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4866(t0,t1);}
-
-C_noret_decl(trf_4525)
-static void C_fcall trf_4525(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4525(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4525(t0,t1);}
-
-C_noret_decl(trf_4395)
-static void C_fcall trf_4395(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4395(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4395(t0,t1);}
-
-C_noret_decl(trf_4153)
-static void C_fcall trf_4153(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4153(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4153(t0,t1);}
-
-C_noret_decl(trf_4186)
-static void C_fcall trf_4186(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4186(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4186(t0,t1);}
-
-C_noret_decl(trf_4189)
-static void C_fcall trf_4189(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4189(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4189(t0,t1);}
-
-C_noret_decl(trf_4159)
-static void C_fcall trf_4159(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4159(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4159(t0,t1);}
-
-C_noret_decl(trf_3985)
-static void C_fcall trf_3985(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3985(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3985(t0,t1);}
-
-C_noret_decl(trf_3935)
-static void C_fcall trf_3935(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3935(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3935(t0,t1);}
-
-C_noret_decl(trf_3776)
-static void C_fcall trf_3776(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3776(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3776(t0,t1);}
-
-C_noret_decl(trf_1851)
-static void C_fcall trf_1851(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1851(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1851(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1892)
-static void C_fcall trf_1892(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1892(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1892(t0,t1);}
-
-C_noret_decl(trf_1734)
-static void C_fcall trf_1734(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1734(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1734(t0,t1);}
-
-C_noret_decl(trf_1685)
-static void C_fcall trf_1685(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1685(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1685(t0,t1,t2);}
-
-C_noret_decl(trf_1450)
-static void C_fcall trf_1450(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1450(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1450(t0,t1);}
-
-C_noret_decl(trf_1459)
-static void C_fcall trf_1459(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1459(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1459(t0,t1);}
-
-C_noret_decl(trf_1462)
-static void C_fcall trf_1462(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1462(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1462(t0,t1);}
-
-C_noret_decl(trf_1354)
-static void C_fcall trf_1354(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1354(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1354(t0,t1,t2,t3);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_platform_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_platform_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("platform_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(13265)){
-C_save(t1);
-C_rereclaim2(13265*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,913);
-lf[0]=C_h_intern(&lf[0],36,"\010compilerdefault-optimization-passes");
-lf[1]=C_h_intern(&lf[1],29,"\010compilerdefault-declarations");
-lf[2]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014always-bound\376\003\000\000\002\376\001\000\000\022\003sysstandard-input\376\003\000\000\002\376\001\000\000\023\003sysstandard-ou"
-"tput\376\003\000\000\002\376\001\000\000\022\003sysstandard-error\376\377\016\376\003\000\000\002\376\003\000\000\002\376\001\000\000\022bound-to-procedure\376\003\000\000\002\376\001\000\000\014\003s"
-"ysfor-each\376\003\000\000\002\376\001\000\000\007\003sysmap\376\003\000\000\002\376\001\000\000\011\003sysprint\376\003\000\000\002\376\001\000\000\012\003syssetter\376\003\000\000\002\376\001\000\000\013\003sys"
-"setslot\376\003\000\000\002\376\001\000\000\020\003sysdynamic-wind\376\003\000\000\002\376\001\000\000\024\003syscall-with-values\376\003\000\000\002\376\001\000\000\017\003syssta"
-"rt-timer\376\003\000\000\002\376\001\000\000\016\003sysstop-timer\376\003\000\000\002\376\001\000\000\007\003sysgcd\376\003\000\000\002\376\001\000\000\007\003syslcm\376\003\000\000\002\376\001\000\000\020\003sys"
-"make-promise\376\003\000\000\002\376\001\000\000\016\003sysstructure\077\376\003\000\000\002\376\001\000\000\010\003sysslot\376\003\000\000\002\376\001\000\000\023\003sysallocate-vec"
-"tor\376\003\000\000\002\376\001\000\000\020\003syslist->vector\376\003\000\000\002\376\001\000\000\015\003sysblock-ref\376\003\000\000\002\376\001\000\000\016\003sysblock-set!\376\003\000\000"
-"\002\376\001\000\000\010\003syslist\376\003\000\000\002\376\001\000\000\010\003syscons\376\003\000\000\002\376\001\000\000\012\003sysappend\376\003\000\000\002\376\001\000\000\012\003sysvector\376\003\000\000\002\376\001\000"
-"\000\031\003sysforeign-char-argument\376\003\000\000\002\376\001\000\000\033\003sysforeign-fixnum-argument\376\003\000\000\002\376\001\000\000\033\003sysfo"
-"reign-flonum-argument\376\003\000\000\002\376\001\000\000\011\003syserror\376\003\000\000\002\376\001\000\000\021\003syspeek-c-string\376\003\000\000\002\376\001\000\000\031\003sy"
-"speek-nonnull-c-string\376\003\000\000\002\376\001\000\000\032\003syspeek-and-free-c-string\376\003\000\000\002\376\001\000\000\042\003syspeek-and"
-"-free-nonnull-c-string\376\003\000\000\002\376\001\000\000\032\003sysforeign-block-argument\376\003\000\000\002\376\001\000\000\033\003sysforeign-"
-"string-argument\376\003\000\000\002\376\001\000\000\034\003sysforeign-pointer-argument\376\003\000\000\002\376\001\000\000\034\003sysforeign-integ"
-"er-argument\376\003\000\000\002\376\001\000\000\042\003syscall-with-current-continuation\376\377\016\376\377\016");
-lf[3]=C_h_intern(&lf[3],39,"\010compilerdefault-debugging-declarations");
-lf[4]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014\004coredeclare\376\003\000\000\002\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\003\000\000\002\376\001\000\000\004uses\376\003\000\000\002\376\001\000\000\010debu"
-"gger\376\377\016\376\377\016\376\003\000\000\002\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\003\000\000\002\376\001\000\000\022bound-to-procedure\376\003\000\000\002\376\001\000\000\024\003syspus"
-"h-debug-frame\376\003\000\000\002\376\001\000\000\023\003syspop-debug-frame\376\003\000\000\002\376\001\000\000\025\003syscheck-debug-entry\376\003\000\000\002\376\001"
-"\000\000\032\003syscheck-debug-assignment\376\003\000\000\002\376\001\000\000\032\003sysregister-debug-lambdas\376\003\000\000\002\376\001\000\000\034\003sysr"
-"egister-debug-variables\376\003\000\000\002\376\001\000\000\016\003sysdebug-call\376\377\016\376\377\016\376\377\016\376\377\016");
-lf[5]=C_h_intern(&lf[5],39,"\010compilerdefault-profiling-declarations");
-lf[6]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014\004coredeclare\376\003\000\000\002\376\003\000\000\002\376\001\000\000\004uses\376\003\000\000\002\376\001\000\000\010profiler\376\377\016\376\003\000\000\002\376\003\000\000\002\376\001\000"
-"\000\022bound-to-procedure\376\003\000\000\002\376\001\000\000\021\003sysprofile-entry\376\003\000\000\002\376\001\000\000\020\003sysprofile-exit\376\377\016\376\377\016\376"
-"\377\016");
-lf[7]=C_h_intern(&lf[7],30,"\010compilerunits-used-by-default");
-lf[8]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007library\376\003\000\000\002\376\001\000\000\004eval\376\377\016");
-lf[9]=C_h_intern(&lf[9],25,"\010compilerwords-per-flonum");
-lf[10]=C_h_intern(&lf[10],24,"\010compilerparameter-limit");
-lf[11]=C_h_intern(&lf[11],21,"small-parameter-limit");
-lf[12]=C_h_intern(&lf[12],27,"\010compilerunlikely-variables");
-lf[13]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007unquote\376\003\000\000\002\376\001\000\000\020unquote-splicing\376\377\016");
-lf[14]=C_h_intern(&lf[14],27,"\010compilereq-inline-operator");
-lf[15]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[16]=C_h_intern(&lf[16],34,"\010compilermembership-test-operators");
-lf[17]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\010C_i_memq\376B\000\000\005C_eqp\376\003\000\000\002\376\003\000\000\002\376B\000\000\012C_u_i_memq\376B\000\000\005C_eqp\376\003\000\000\002\376\003\000\000\002\376B"
-"\000\000\012C_i_member\376B\000\000\012C_i_equalp\376\003\000\000\002\376\003\000\000\002\376B\000\000\010C_i_memv\376B\000\000\010C_i_eqvp\376\377\016");
-lf[18]=C_h_intern(&lf[18],32,"\010compilermembership-unfold-limit");
-lf[19]=C_h_intern(&lf[19],28,"\010compilertarget-include-file");
-lf[20]=C_decode_literal(C_heaptop,"\376B\000\000\011chicken.h");
-lf[21]=C_h_intern(&lf[21],31,"\010compilervalid-compiler-options");
-lf[22]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005-help\376\003\000\000\002\376\001\000\000\001h\376\003\000\000\002\376\001\000\000\004help\376\003\000\000\002\376\001\000\000\007version\376\003\000\000\002\376\001\000\000\007verbose\376\003\000\000\002\376"
-"\001\000\000\014explicit-use\376\003\000\000\002\376\001\000\000\010no-trace\376\003\000\000\002\376\001\000\000\013no-warnings\376\003\000\000\002\376\001\000\000\006unsafe\376\003\000\000\002\376\001\000\000"
-"\005block\376\003\000\000\002\376\001\000\000\014check-syntax\376\003\000\000\002\376\001\000\000\011to-stdout\376\003\000\000\002\376\001\000\000\025no-usual-integrations\376\003"
-"\000\000\002\376\001\000\000\020case-insensitive\376\003\000\000\002\376\001\000\000\016no-lambda-info\376\003\000\000\002\376\001\000\000\007profile\376\003\000\000\002\376\001\000\000\006inlin"
-"e\376\003\000\000\002\376\001\000\000\024keep-shadowed-macros\376\003\000\000\002\376\001\000\000\021ignore-repository\376\003\000\000\002\376\001\000\000\021fixnum-arith"
-"metic\376\003\000\000\002\376\001\000\000\022disable-interrupts\376\003\000\000\002\376\001\000\000\026optimize-leaf-routines\376\003\000\000\002\376\001\000\000\013lambd"
-"a-lift\376\003\000\000\002\376\001\000\000\016compile-syntax\376\003\000\000\002\376\001\000\000\014tag-pointers\376\003\000\000\002\376\001\000\000\022accumulate-profile"
-"\376\003\000\000\002\376\001\000\000\035disable-stack-overflow-checks\376\003\000\000\002\376\001\000\000\020unsafe-libraries\376\003\000\000\002\376\001\000\000\003raw\376\003"
-"\000\000\002\376\001\000\000\036emit-external-prototypes-first\376\003\000\000\002\376\001\000\000\007release\376\003\000\000\002\376\001\000\000\005local\376\003\000\000\002\376\001\000\000\015"
-"inline-global\376\003\000\000\002\376\001\000\000\014analyze-only\376\003\000\000\002\376\001\000\000\007dynamic\376\003\000\000\002\376\001\000\000\012scrutinize\376\003\000\000\002\376\001\000"
-"\000\016no-argc-checks\376\003\000\000\002\376\001\000\000\023no-procedure-checks\376\003\000\000\002\376\001\000\000\017no-bound-checks\376\003\000\000\002\376\001\000\000&"
-"no-procedure-checks-for-usual-bindings\376\003\000\000\002\376\001\000\000\022no-compiler-syntax\376\003\000\000\002\376\001\000\000\027no-p"
-"arentheses-synonyms\376\003\000\000\002\376\001\000\000\020no-symbol-escape\376\003\000\000\002\376\001\000\000\013r5rs-syntax\376\003\000\000\002\376\001\000\000\031emit"
-"-all-import-libraries\376\003\000\000\002\376\001\000\000\012setup-mode\376\003\000\000\002\376\001\000\000\010unboxing\376\377\016");
-lf[23]=C_h_intern(&lf[23],45,"\010compilervalid-compiler-options-with-argument");
-lf[24]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005debug\376\003\000\000\002\376\001\000\000\013output-file\376\003\000\000\002\376\001\000\000\014include-path\376\003\000\000\002\376\001\000\000\011heap-size\376\003\000"
-"\000\002\376\001\000\000\012stack-size\376\003\000\000\002\376\001\000\000\004unit\376\003\000\000\002\376\001\000\000\004uses\376\003\000\000\002\376\001\000\000\015keyword-style\376\003\000\000\002\376\001\000\000\021re"
-"quire-extension\376\003\000\000\002\376\001\000\000\014inline-limit\376\003\000\000\002\376\001\000\000\014profile-name\376\003\000\000\002\376\001\000\000\017disable-war"
-"ning\376\003\000\000\002\376\001\000\000\024parenthesis-synonyms\376\003\000\000\002\376\001\000\000\007prelude\376\003\000\000\002\376\001\000\000\010postlude\376\003\000\000\002\376\001\000\000\010p"
-"rologue\376\003\000\000\002\376\001\000\000\010epilogue\376\003\000\000\002\376\001\000\000\007nursery\376\003\000\000\002\376\001\000\000\006extend\376\003\000\000\002\376\001\000\000\007feature\376\003\000\000\002"
-"\376\001\000\000\005types\376\003\000\000\002\376\001\000\000\023emit-import-library\376\003\000\000\002\376\001\000\000\020emit-inline-file\376\003\000\000\002\376\001\000\000\020stati"
-"c-extension\376\003\000\000\002\376\001\000\000\023consult-inline-file\376\003\000\000\002\376\001\000\000\013heap-growth\376\003\000\000\002\376\001\000\000\016heap-shri"
-"nkage\376\003\000\000\002\376\001\000\000\021heap-initial-size\376\003\000\000\002\376\001\000\000\012ffi-define\376\003\000\000\002\376\001\000\000\020ffi-include-path\376\377"
-"\016");
-lf[25]=C_h_intern(&lf[25],34,"\010compilerdefault-standard-bindings");
-lf[26]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\376\003\000\000\002\376\001\000\000\010boolean\077\376\003\000\000\002\376\001\000\000\005apply\376\003\000\000\002\376\001\000\000\036call-with-current-contin"
-"uation\376\003\000\000\002\376\001\000\000\003eq\077\376\003\000\000\002\376\001\000\000\004eqv\077\376\003\000\000\002\376\001\000\000\006equal\077\376\003\000\000\002\376\001\000\000\005pair\077\376\003\000\000\002\376\001\000\000\004cons\376\003"
-"\000\000\002\376\001\000\000\003car\376\003\000\000\002\376\001\000\000\003cdr\376\003\000\000\002\376\001\000\000\004caar\376\003\000\000\002\376\001\000\000\004cadr\376\003\000\000\002\376\001\000\000\004cdar\376\003\000\000\002\376\001\000\000\004cddr"
-"\376\003\000\000\002\376\001\000\000\005caaar\376\003\000\000\002\376\001\000\000\005caadr\376\003\000\000\002\376\001\000\000\005cadar\376\003\000\000\002\376\001\000\000\005caddr\376\003\000\000\002\376\001\000\000\005cdaar\376\003\000\000\002"
-"\376\001\000\000\005cdadr\376\003\000\000\002\376\001\000\000\005cddar\376\003\000\000\002\376\001\000\000\005cdddr\376\003\000\000\002\376\001\000\000\006caaaar\376\003\000\000\002\376\001\000\000\006caaadr\376\003\000\000\002\376\001\000"
-"\000\006caadar\376\003\000\000\002\376\001\000\000\006caaddr\376\003\000\000\002\376\001\000\000\006cadaar\376\003\000\000\002\376\001\000\000\006cadadr\376\003\000\000\002\376\001\000\000\006caddar\376\003\000\000\002\376\001\000"
-"\000\006cadddr\376\003\000\000\002\376\001\000\000\006cdaaar\376\003\000\000\002\376\001\000\000\006cdaadr\376\003\000\000\002\376\001\000\000\006cdadar\376\003\000\000\002\376\001\000\000\006cdaddr\376\003\000\000\002\376\001\000"
-"\000\006cddaar\376\003\000\000\002\376\001\000\000\006cddadr\376\003\000\000\002\376\001\000\000\006cdddar\376\003\000\000\002\376\001\000\000\006cddddr\376\003\000\000\002\376\001\000\000\010set-car!\376\003\000\000\002\376"
-"\001\000\000\010set-cdr!\376\003\000\000\002\376\001\000\000\005null\077\376\003\000\000\002\376\001\000\000\004list\376\003\000\000\002\376\001\000\000\005list\077\376\003\000\000\002\376\001\000\000\006length\376\003\000\000\002\376\001\000"
-"\000\005zero\077\376\003\000\000\002\376\001\000\000\001*\376\003\000\000\002\376\001\000\000\001-\376\003\000\000\002\376\001\000\000\001+\376\003\000\000\002\376\001\000\000\001/\376\003\000\000\002\376\001\000\000\001-\376\003\000\000\002\376\001\000\000\001>\376\003\000\000\002\376\001"
-"\000\000\001<\376\003\000\000\002\376\001\000\000\002>=\376\003\000\000\002\376\001\000\000\002<=\376\003\000\000\002\376\001\000\000\001=\376\003\000\000\002\376\001\000\000\023current-output-port\376\003\000\000\002\376\001\000\000\022cu"
-"rrent-input-port\376\003\000\000\002\376\001\000\000\012write-char\376\003\000\000\002\376\001\000\000\007newline\376\003\000\000\002\376\001\000\000\005write\376\003\000\000\002\376\001\000\000\007di"
-"splay\376\003\000\000\002\376\001\000\000\006append\376\003\000\000\002\376\001\000\000\016symbol->string\376\003\000\000\002\376\001\000\000\010for-each\376\003\000\000\002\376\001\000\000\003map\376\003\000\000"
-"\002\376\001\000\000\005char\077\376\003\000\000\002\376\001\000\000\015char->integer\376\003\000\000\002\376\001\000\000\015integer->char\376\003\000\000\002\376\001\000\000\013eof-object\077\376\003"
-"\000\000\002\376\001\000\000\015vector-length\376\003\000\000\002\376\001\000\000\015string-length\376\003\000\000\002\376\001\000\000\012string-ref\376\003\000\000\002\376\001\000\000\013string"
-"-set!\376\003\000\000\002\376\001\000\000\012vector-ref\376\003\000\000\002\376\001\000\000\013vector-set!\376\003\000\000\002\376\001\000\000\006char=\077\376\003\000\000\002\376\001\000\000\006char<\077\376\003"
-"\000\000\002\376\001\000\000\006char>\077\376\003\000\000\002\376\001\000\000\007char>=\077\376\003\000\000\002\376\001\000\000\007char<=\077\376\003\000\000\002\376\001\000\000\003gcd\376\003\000\000\002\376\001\000\000\003lcm\376\003\000\000\002\376"
-"\001\000\000\007reverse\376\003\000\000\002\376\001\000\000\007symbol\077\376\003\000\000\002\376\001\000\000\016string->symbol\376\003\000\000\002\376\001\000\000\007number\077\376\003\000\000\002\376\001\000\000\010c"
-"omplex\077\376\003\000\000\002\376\001\000\000\005real\077\376\003\000\000\002\376\001\000\000\010integer\077\376\003\000\000\002\376\001\000\000\011rational\077\376\003\000\000\002\376\001\000\000\004odd\077\376\003\000\000\002\376\001"
-"\000\000\005even\077\376\003\000\000\002\376\001\000\000\011positive\077\376\003\000\000\002\376\001\000\000\011negative\077\376\003\000\000\002\376\001\000\000\006exact\077\376\003\000\000\002\376\001\000\000\010inexact\077"
-"\376\003\000\000\002\376\001\000\000\003max\376\003\000\000\002\376\001\000\000\003min\376\003\000\000\002\376\001\000\000\010quotient\376\003\000\000\002\376\001\000\000\011remainder\376\003\000\000\002\376\001\000\000\006modulo\376"
-"\003\000\000\002\376\001\000\000\005floor\376\003\000\000\002\376\001\000\000\007ceiling\376\003\000\000\002\376\001\000\000\010truncate\376\003\000\000\002\376\001\000\000\005round\376\003\000\000\002\376\001\000\000\016exact-"
-">inexact\376\003\000\000\002\376\001\000\000\016inexact->exact\376\003\000\000\002\376\001\000\000\003exp\376\003\000\000\002\376\001\000\000\003log\376\003\000\000\002\376\001\000\000\003sin\376\003\000\000\002\376\001\000\000"
-"\004expt\376\003\000\000\002\376\001\000\000\004sqrt\376\003\000\000\002\376\001\000\000\003cos\376\003\000\000\002\376\001\000\000\003tan\376\003\000\000\002\376\001\000\000\004asin\376\003\000\000\002\376\001\000\000\004acos\376\003\000\000\002\376\001"
-"\000\000\004atan\376\003\000\000\002\376\001\000\000\016number->string\376\003\000\000\002\376\001\000\000\016string->number\376\003\000\000\002\376\001\000\000\011char-ci=\077\376\003\000\000\002\376"
-"\001\000\000\011char-ci<\077\376\003\000\000\002\376\001\000\000\011char-ci>\077\376\003\000\000\002\376\001\000\000\012char-ci>=\077\376\003\000\000\002\376\001\000\000\012char-ci<=\077\376\003\000\000\002\376\001\000"
-"\000\020char-alphabetic\077\376\003\000\000\002\376\001\000\000\020char-whitespace\077\376\003\000\000\002\376\001\000\000\015char-numeric\077\376\003\000\000\002\376\001\000\000\020cha"
-"r-lower-case\077\376\003\000\000\002\376\001\000\000\020char-upper-case\077\376\003\000\000\002\376\001\000\000\013char-upcase\376\003\000\000\002\376\001\000\000\015char-downc"
-"ase\376\003\000\000\002\376\001\000\000\007string\077\376\003\000\000\002\376\001\000\000\010string=\077\376\003\000\000\002\376\001\000\000\010string>\077\376\003\000\000\002\376\001\000\000\010string<\077\376\003\000\000\002\376"
-"\001\000\000\011string>=\077\376\003\000\000\002\376\001\000\000\011string<=\077\376\003\000\000\002\376\001\000\000\013string-ci=\077\376\003\000\000\002\376\001\000\000\013string-ci<\077\376\003\000\000\002\376"
-"\001\000\000\013string-ci>\077\376\003\000\000\002\376\001\000\000\014string-ci<=\077\376\003\000\000\002\376\001\000\000\014string-ci>=\077\376\003\000\000\002\376\001\000\000\015string-appe"
-"nd\376\003\000\000\002\376\001\000\000\014string->list\376\003\000\000\002\376\001\000\000\014list->string\376\003\000\000\002\376\001\000\000\007vector\077\376\003\000\000\002\376\001\000\000\014vector-"
-">list\376\003\000\000\002\376\001\000\000\014list->vector\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\001\000\000\004read\376\003\000\000\002\376\001\000\000\011read-char\376\003\000\000"
-"\002\376\001\000\000\011substring\376\003\000\000\002\376\001\000\000\014string-fill!\376\003\000\000\002\376\001\000\000\014vector-fill!\376\003\000\000\002\376\001\000\000\013make-string"
-"\376\003\000\000\002\376\001\000\000\013make-vector\376\003\000\000\002\376\001\000\000\017open-input-file\376\003\000\000\002\376\001\000\000\020open-output-file\376\003\000\000\002\376\001\000"
-"\000\024call-with-input-file\376\003\000\000\002\376\001\000\000\025call-with-output-file\376\003\000\000\002\376\001\000\000\020close-input-port\376"
-"\003\000\000\002\376\001\000\000\021close-output-port\376\003\000\000\002\376\001\000\000\006values\376\003\000\000\002\376\001\000\000\020call-with-values\376\003\000\000\002\376\001\000\000\006ve"
-"ctor\376\003\000\000\002\376\001\000\000\012procedure\077\376\003\000\000\002\376\001\000\000\004memq\376\003\000\000\002\376\001\000\000\004memv\376\003\000\000\002\376\001\000\000\006member\376\003\000\000\002\376\001\000\000\004as"
-"sq\376\003\000\000\002\376\001\000\000\004assv\376\003\000\000\002\376\001\000\000\005assoc\376\003\000\000\002\376\001\000\000\011list-tail\376\003\000\000\002\376\001\000\000\010list-ref\376\003\000\000\002\376\001\000\000\003ab"
-"s\376\003\000\000\002\376\001\000\000\013char-ready\077\376\003\000\000\002\376\001\000\000\011peek-char\376\003\000\000\002\376\001\000\000\014list->string\376\003\000\000\002\376\001\000\000\014string-"
-">list\376\377\016");
-lf[27]=C_h_intern(&lf[27],34,"\010compilerdefault-extended-bindings");
-lf[28]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\013bitwise-and\376\003\000\000\002\376\001\000\000\013bitwise-ior\376\003\000\000\002\376\001\000\000\013bitwise-xor\376\003\000\000\002\376\001\000\000\013bitwise"
-"-not\376\003\000\000\002\376\001\000\000\004add1\376\003\000\000\002\376\001\000\000\004sub1\376\003\000\000\002\376\001\000\000\003fx+\376\003\000\000\002\376\001\000\000\003fx-\376\003\000\000\002\376\001\000\000\003fx*\376\003\000\000\002\376\001\000\000"
-"\003fx/\376\003\000\000\002\376\001\000\000\005fxmod\376\003\000\000\002\376\001\000\000\001o\376\003\000\000\002\376\001\000\000\003fx=\376\003\000\000\002\376\001\000\000\003fx>\376\003\000\000\002\376\001\000\000\003fx<\376\003\000\000\002\376\001\000\000\004f"
-"x>=\376\003\000\000\002\376\001\000\000\004fx<=\376\003\000\000\002\376\001\000\000\007fixnum\077\376\003\000\000\002\376\001\000\000\005fxneg\376\003\000\000\002\376\001\000\000\005fxmax\376\003\000\000\002\376\001\000\000\005fxmin\376"
-"\003\000\000\002\376\001\000\000\010identity\376\003\000\000\002\376\001\000\000\003fp+\376\003\000\000\002\376\001\000\000\003fp-\376\003\000\000\002\376\001\000\000\003fp*\376\003\000\000\002\376\001\000\000\003fp/\376\003\000\000\002\376\001\000\000\005f"
-"pmin\376\003\000\000\002\376\001\000\000\005fpmax\376\003\000\000\002\376\001\000\000\005fpneg\376\003\000\000\002\376\001\000\000\003fp>\376\003\000\000\002\376\001\000\000\003fp<\376\003\000\000\002\376\001\000\000\003fp=\376\003\000\000\002\376\001"
-"\000\000\004fp>=\376\003\000\000\002\376\001\000\000\004fp<=\376\003\000\000\002\376\001\000\000\005fxand\376\003\000\000\002\376\001\000\000\005fxnot\376\003\000\000\002\376\001\000\000\005fxior\376\003\000\000\002\376\001\000\000\005fxxo"
-"r\376\003\000\000\002\376\001\000\000\005fxshr\376\003\000\000\002\376\001\000\000\005fxshl\376\003\000\000\002\376\001\000\000\010bit-set\077\376\003\000\000\002\376\001\000\000\007fpfloor\376\003\000\000\002\376\001\000\000\011fpce"
-"iling\376\003\000\000\002\376\001\000\000\012fptruncate\376\003\000\000\002\376\001\000\000\007fpround\376\003\000\000\002\376\001\000\000\005fpsin\376\003\000\000\002\376\001\000\000\005fpcos\376\003\000\000\002\376\001\000"
-"\000\005fptan\376\003\000\000\002\376\001\000\000\006fpasin\376\003\000\000\002\376\001\000\000\006fpacos\376\003\000\000\002\376\001\000\000\006fpatan\376\003\000\000\002\376\001\000\000\007fpatan2\376\003\000\000\002\376\001\000"
-"\000\005fpexp\376\003\000\000\002\376\001\000\000\006fpexpt\376\003\000\000\002\376\001\000\000\005fplog\376\003\000\000\002\376\001\000\000\006fpsqrt\376\003\000\000\002\376\001\000\000\005fpabs\376\003\000\000\002\376\001\000\000\012f"
-"pinteger\077\376\003\000\000\002\376\001\000\000\020arithmetic-shift\376\003\000\000\002\376\001\000\000\004void\376\003\000\000\002\376\001\000\000\014flush-output\376\003\000\000\002\376\001\000\000"
-"\017thread-specific\376\003\000\000\002\376\001\000\000\024thread-specific-set!\376\003\000\000\002\376\001\000\000\011not-pair\077\376\003\000\000\002\376\001\000\000\005atom\077"
-"\376\003\000\000\002\376\001\000\000\012null-list\077\376\003\000\000\002\376\001\000\000\005print\376\003\000\000\002\376\001\000\000\006print*\376\003\000\000\002\376\001\000\000\005error\376\003\000\000\002\376\001\000\000\010cpu-"
-"time\376\003\000\000\002\376\001\000\000\014proper-list\077\376\003\000\000\002\376\001\000\000\007call/cc\376\003\000\000\002\376\001\000\000\011blob-size\376\003\000\000\002\376\001\000\000\025u8vector"
-"->blob/shared\376\003\000\000\002\376\001\000\000\025s8vector->blob/shared\376\003\000\000\002\376\001\000\000\026u16vector->blob/shared\376\003\000\000"
-"\002\376\001\000\000\026s16vector->blob/shared\376\003\000\000\002\376\001\000\000\026u32vector->blob/shared\376\003\000\000\002\376\001\000\000\026s32vector-"
-">blob/shared\376\003\000\000\002\376\001\000\000\026f32vector->blob/shared\376\003\000\000\002\376\001\000\000\026f64vector->blob/shared\376\003\000\000"
-"\002\376\001\000\000\025blob->u8vector/shared\376\003\000\000\002\376\001\000\000\025blob->s8vector/shared\376\003\000\000\002\376\001\000\000\026blob->u16vec"
-"tor/shared\376\003\000\000\002\376\001\000\000\026blob->s16vector/shared\376\003\000\000\002\376\001\000\000\026blob->u32vector/shared\376\003\000\000\002\376"
-"\001\000\000\026blob->s32vector/shared\376\003\000\000\002\376\001\000\000\026blob->f32vector/shared\376\003\000\000\002\376\001\000\000\026blob->f64vec"
-"tor/shared\376\003\000\000\002\376\001\000\000\011block-ref\376\003\000\000\002\376\001\000\000\012block-set!\376\003\000\000\002\376\001\000\000\017number-of-slots\376\003\000\000\002\376"
-"\001\000\000\017substring-index\376\003\000\000\002\376\001\000\000\022substring-index-ci\376\003\000\000\002\376\001\000\000\016hash-table-ref\376\003\000\000\002\376\001\000\000"
-"\004any\077\376\003\000\000\002\376\001\000\000\013read-string\376\003\000\000\002\376\001\000\000\013substring=\077\376\003\000\000\002\376\001\000\000\016substring-ci=\077\376\003\000\000\002\376\001\000\000"
-"\005first\376\003\000\000\002\376\001\000\000\006second\376\003\000\000\002\376\001\000\000\005third\376\003\000\000\002\376\001\000\000\006fourth\376\003\000\000\002\376\001\000\000\024make-record-insta"
-"nce\376\003\000\000\002\376\001\000\000\017u8vector-length\376\003\000\000\002\376\001\000\000\017s8vector-length\376\003\000\000\002\376\001\000\000\020u16vector-length\376"
-"\003\000\000\002\376\001\000\000\020s16vector-length\376\003\000\000\002\376\001\000\000\020u32vector-length\376\003\000\000\002\376\001\000\000\020s32vector-length\376\003\000"
-"\000\002\376\001\000\000\020f32vector-length\376\003\000\000\002\376\001\000\000\020f64vector-length\376\003\000\000\002\376\001\000\000\006setter\376\003\000\000\002\376\001\000\000\014u8vec"
-"tor-ref\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\003\000\000\002\376\001\000\000\015s16vector-ref\376\003\000\000\002"
-"\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vector-ref\376\003\000\000\002\376\001\000\000\015f32vector-ref\376\003\000\000\002\376\001\000\000\015f64vec"
-"tor-ref\376\003\000\000\002\376\001\000\000\016f32vector-set!\376\003\000\000\002\376\001\000\000\016f64vector-set!\376\003\000\000\002\376\001\000\000\015u8vector-set!\376\003"
-"\000\000\002\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\001\000\000\016u16vector-set!\376\003\000\000\002\376\001\000\000\016s16vector-set!\376\003\000\000\002\376\001\000\000\016u"
-"32vector-set!\376\003\000\000\002\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\001\000\000\014locative-ref\376\003\000\000\002\376\001\000\000\015locative-se"
-"t!\376\003\000\000\002\376\001\000\000\020locative->object\376\003\000\000\002\376\001\000\000\011locative\077\376\003\000\000\002\376\001\000\000\012global-ref\376\003\000\000\002\376\001\000\000\015nul"
-"l-pointer\077\376\003\000\000\002\376\001\000\000\017pointer->object\376\003\000\000\002\376\001\000\000\007flonum\077\376\003\000\000\002\376\001\000\000\007finite\077\376\003\000\000\002\376\001\000\000\020a"
-"ddress->pointer\376\003\000\000\002\376\001\000\000\020pointer->address\376\003\000\000\002\376\001\000\000\006printf\376\003\000\000\002\376\001\000\000\007sprintf\376\003\000\000\002\376"
-"\001\000\000\006format\376\377\016");
-lf[29]=C_h_intern(&lf[29],26,"\010compilerinternal-bindings");
-lf[30]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\003sysslot\376\003\000\000\002\376\001\000\000\013\003syssetslot\376\003\000\000\002\376\001\000\000\015\003sysblock-ref\376\003\000\000\002\376\001\000\000\016\003sysbloc"
-"k-set!\376\003\000\000\002\376\001\000\000\042\003syscall-with-current-continuation\376\003\000\000\002\376\001\000\000\010\003syssize\376\003\000\000\002\376\001\000\000\010\003s"
-"ysbyte\376\003\000\000\002\376\001\000\000\013\003syssetbyte\376\003\000\000\002\376\001\000\000\014\003syspointer\077\376\003\000\000\002\376\001\000\000\026\003sysgeneric-structure"
-"\077\376\003\000\000\002\376\001\000\000\016\003sysstructure\077\376\003\000\000\002\376\001\000\000\023\003syscheck-structure\376\003\000\000\002\376\001\000\000\017\003syscheck-exact\376"
-"\003\000\000\002\376\001\000\000\020\003syscheck-number\376\003\000\000\002\376\001\000\000\016\003syscheck-list\376\003\000\000\002\376\001\000\000\016\003syscheck-pair\376\003\000\000\002\376\001"
-"\000\000\020\003syscheck-string\376\003\000\000\002\376\001\000\000\020\003syscheck-symbol\376\003\000\000\002\376\001\000\000\016\003syscheck-char\376\003\000\000\002\376\001\000\000\020\003"
-"syscheck-vector\376\003\000\000\002\376\001\000\000\025\003syscheck-byte-vector\376\003\000\000\002\376\001\000\000\010\003syslist\376\003\000\000\002\376\001\000\000\010\003sysco"
-"ns\376\003\000\000\002\376\001\000\000\024\003syscall-with-values\376\003\000\000\002\376\001\000\000\020\003sysfits-in-int\077\376\003\000\000\002\376\001\000\000\031\003sysfits-in-"
-"unsigned-int\077\376\003\000\000\002\376\001\000\000\033\003sysflonum-in-fixnum-range\077\376\003\000\000\002\376\001\000\000\011\003sysfudge\376\003\000\000\002\376\001\000\000\016\003"
-"sysimmediate\077\376\003\000\000\002\376\001\000\000\021\003sysdirect-return\376\003\000\000\002\376\001\000\000\022\003syscontext-switch\376\003\000\000\002\376\001\000\000\022\003s"
-"ysmake-structure\376\003\000\000\002\376\001\000\000\011\003sysapply\376\003\000\000\002\376\001\000\000\020\003sysapply-values\376\003\000\000\002\376\001\000\000\026\003sysconti"
-"nuation-graft\376\003\000\000\002\376\001\000\000\017\003sysbytevector\077\376\003\000\000\002\376\001\000\000\017\003sysmake-vector\376\003\000\000\002\376\001\000\000\012\003sysset"
-"ter\376\003\000\000\002\376\001\000\000\007\003syscar\376\003\000\000\002\376\001\000\000\007\003syscdr\376\003\000\000\002\376\001\000\000\011\003syspair\077\376\003\000\000\002\376\001\000\000\007\003syseq\077\376\003\000\000\002\376\001"
-"\000\000\011\003syslist\077\376\003\000\000\002\376\001\000\000\013\003sysvector\077\376\003\000\000\002\376\001\000\000\010\003syseqv\077\376\003\000\000\002\376\001\000\000\031\003sysforeign-char-ar"
-"gument\376\003\000\000\002\376\001\000\000\033\003sysforeign-fixnum-argument\376\003\000\000\002\376\001\000\000\033\003sysforeign-flonum-argument"
-"\376\003\000\000\002\376\001\000\000\032\003sysforeign-block-argument\376\003\000\000\002\376\001\000\000\042\003sysforeign-number-vector-argument"
-"\376\003\000\000\002\376\001\000\000\033\003sysforeign-string-argument\376\003\000\000\002\376\001\000\000\034\003sysforeign-pointer-argument\376\003\000\000\002"
-"\376\001\000\000\010\003sysvoid\376\003\000\000\002\376\001\000\000\034\003sysforeign-integer-argument\376\003\000\000\002\376\001\000\000%\003sysforeign-unsigne"
-"d-integer-argument\376\003\000\000\002\376\001\000\000\022\003sysdouble->number\376\003\000\000\002\376\001\000\000\017\003syspeek-fixnum\376\003\000\000\002\376\001\000\000"
-"\014\003syssetislot\376\003\000\000\002\376\001\000\000\020\003syspoke-integer\376\003\000\000\002\376\001\000\000\016\003syspermanent\077\376\003\000\000\002\376\001\000\000\012\003sysval"
-"ues\376\003\000\000\002\376\001\000\000\017\003syspoke-double\376\003\000\000\002\376\001\000\000\021\003sysintern-symbol\376\003\000\000\002\376\001\000\000\017\003sysmake-symbol"
-"\376\003\000\000\002\376\001\000\000\021\003sysnull-pointer\077\376\003\000\000\002\376\001\000\000\015\003syspeek-byte\376\377\016");
-lf[31]=C_h_intern(&lf[31],30,"\010compilernon-foldable-bindings");
-lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006vector\376\003\000\000\002\376\001\000\000\004cons\376\003\000\000\002\376\001\000\000\004list\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\001\000\000\013make-vecto"
-"r\376\003\000\000\002\376\001\000\000\013make-string\376\003\000\000\002\376\001\000\000\016string->symbol\376\003\000\000\002\376\001\000\000\006values\376\003\000\000\002\376\001\000\000\022current-"
-"input-port\376\003\000\000\002\376\001\000\000\023current-output-port\376\003\000\000\002\376\001\000\000\011read-char\376\003\000\000\002\376\001\000\000\012write-char\376\003"
-"\000\000\002\376\001\000\000\006printf\376\003\000\000\002\376\001\000\000\007fprintf\376\003\000\000\002\376\001\000\000\006format\376\003\000\000\002\376\001\000\000\005apply\376\003\000\000\002\376\001\000\000\036call-wit"
-"h-current-continuation\376\003\000\000\002\376\001\000\000\010set-car!\376\003\000\000\002\376\001\000\000\010set-cdr!\376\003\000\000\002\376\001\000\000\012write-char\376\003"
-"\000\000\002\376\001\000\000\007newline\376\003\000\000\002\376\001\000\000\005write\376\003\000\000\002\376\001\000\000\007display\376\003\000\000\002\376\001\000\000\011peek-char\376\003\000\000\002\376\001\000\000\013char"
-"-ready\077\376\003\000\000\002\376\001\000\000\004read\376\003\000\000\002\376\001\000\000\011read-char\376\003\000\000\002\376\001\000\000\010for-each\376\003\000\000\002\376\001\000\000\003map\376\003\000\000\002\376\001\000\000"
-"\013string-set!\376\003\000\000\002\376\001\000\000\013vector-set!\376\003\000\000\002\376\001\000\000\014string-fill!\376\003\000\000\002\376\001\000\000\014vector-fill!\376\003\000"
-"\000\002\376\001\000\000\017open-input-file\376\003\000\000\002\376\001\000\000\020open-output-file\376\003\000\000\002\376\001\000\000\020close-input-port\376\003\000\000\002\376"
-"\001\000\000\021close-output-port\376\003\000\000\002\376\001\000\000\024call-with-input-port\376\003\000\000\002\376\001\000\000\025call-with-output-po"
-"rt\376\003\000\000\002\376\001\000\000\020call-with-values\376\003\000\000\002\376\001\000\000\004eval\376\003\000\000\002\376\001\000\000\010\003sysslot\376\003\000\000\002\376\001\000\000\013\003syssetslo"
-"t\376\003\000\000\002\376\001\000\000\042\003syscall-with-current-continuation\376\003\000\000\002\376\001\000\000\011\003sysfudge\376\003\000\000\002\376\001\000\000\014flush-"
-"output\376\003\000\000\002\376\001\000\000\005print\376\003\000\000\002\376\001\000\000\004void\376\003\000\000\002\376\001\000\000\025u8vector->blob/shared\376\003\000\000\002\376\001\000\000\025s8ve"
-"ctor->blob/shared\376\003\000\000\002\376\001\000\000\026u16vector->blob/shared\376\003\000\000\002\376\001\000\000\026s16vector->blob/share"
-"d\376\003\000\000\002\376\001\000\000\026u32vector->blob/shared\376\003\000\000\002\376\001\000\000\026f32vector->blob/shared\376\003\000\000\002\376\001\000\000\026f64ve"
-"ctor->blob/shared\376\003\000\000\002\376\001\000\000\026s32vector->blob/shared\376\003\000\000\002\376\001\000\000\013read-string\376\003\000\000\002\376\001\000\000\014"
-"read-string!\376\003\000\000\002\376\001\000\000\001o\376\003\000\000\002\376\001\000\000\020address->pointer\376\003\000\000\002\376\001\000\000\020pointer->address\376\003\000\000\002"
-"\376\001\000\000\022\003sysmake-structure\376\003\000\000\002\376\001\000\000\006print*\376\003\000\000\002\376\001\000\000\017\003sysmake-vector\376\003\000\000\002\376\001\000\000\011\003sysap"
-"ply\376\003\000\000\002\376\001\000\000\014\003syssetislot\376\003\000\000\002\376\001\000\000\015\003sysblock-ref\376\003\000\000\002\376\001\000\000\010\003sysbyte\376\003\000\000\002\376\001\000\000\013\003sys"
-"setbyte\376\003\000\000\002\376\001\000\000\017u8vector-length\376\003\000\000\002\376\001\000\000\017s8vector-length\376\003\000\000\002\376\001\000\000\020u16vector-len"
-"gth\376\003\000\000\002\376\001\000\000\020s16vector-length\376\003\000\000\002\376\001\000\000\020u32vector-length\376\003\000\000\002\376\001\000\000\020s32vector-lengt"
-"h\376\003\000\000\002\376\001\000\000\020f32vector-length\376\003\000\000\002\376\001\000\000\020f64vector-length\376\003\000\000\002\376\001\000\000\020\003sysapply-values\376"
-"\003\000\000\002\376\001\000\000\012\003syssetter\376\003\000\000\002\376\001\000\000\006setter\376\003\000\000\002\376\001\000\000\016f32vector-set!\376\003\000\000\002\376\001\000\000\016f64vector-s"
-"et!\376\003\000\000\002\376\001\000\000\014u8vector-ref\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\003\000\000\002\376\001\000\000\015"
-"s16vector-ref\376\003\000\000\002\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vector-ref\376\003\000\000\002\376\001\000\000\015u8vector-se"
-"t!\376\003\000\000\002\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\001\000\000\016u16vector-set!\376\003\000\000\002\376\001\000\000\016s16vector-set!\376\003\000\000\002\376\001"
-"\000\000\016u32vector-set!\376\003\000\000\002\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\001\000\000\021\003sysintern-symbol\376\003\000\000\002\376\001\000\000\017\003s"
-"ysmake-symbol\376\003\000\000\002\376\001\000\000\024make-record-instance\376\003\000\000\002\376\001\000\000\005error\376\003\000\000\002\376\001\000\000\010cpu-time\376\003\000\000"
-"\002\376\001\000\000\016\003sysblock-set!\376\377\016");
-lf[33]=C_h_intern(&lf[33],26,"\010compilerfoldable-bindings");
-lf[34]=C_h_intern(&lf[34],6,"fixnum");
-lf[35]=C_h_intern(&lf[35],11,"number-type");
-lf[36]=C_h_intern(&lf[36],6,"unsafe");
-lf[37]=C_h_intern(&lf[37],4,"node");
-lf[38]=C_h_intern(&lf[38],11,"\004coreinline");
-lf[39]=C_h_intern(&lf[39],9,"\004corecall");
-lf[40]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[41]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[42]=C_h_intern(&lf[42],20,"\004coreinline_allocate");
-lf[43]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[44]=C_h_intern(&lf[44],14,"\010compilerqnode");
-lf[45]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
-lf[46]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[47]=C_h_intern(&lf[47],5,"quote");
-lf[48]=C_h_intern(&lf[48],13,"\004corevariable");
-lf[49]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[50]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\000\376\377\016");
-lf[51]=C_h_intern(&lf[51],5,"cons*");
-lf[52]=C_h_intern(&lf[52],6,"append");
-lf[53]=C_h_intern(&lf[53],7,"butlast");
-lf[54]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[55]=C_h_intern(&lf[55],9,"\004coreproc");
-lf[56]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\007C_apply\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[57]=C_h_intern(&lf[57],6,"values");
-lf[58]=C_h_intern(&lf[58],10,"\003sysvalues");
-lf[59]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_apply_values\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[60]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[61]=C_h_intern(&lf[61],7,"\003sysget");
-lf[62]=C_h_intern(&lf[62],18,"\010compilerintrinsic");
-lf[63]=C_h_intern(&lf[63],4,"last");
-lf[64]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[65]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_slot\376\377\016");
-lf[66]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_vector_ref\376\377\016");
-lf[67]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[68]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[69]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[70]=C_h_intern(&lf[70],6,"vector");
-lf[71]=C_h_intern(&lf[71],12,"\010compilerget");
-lf[72]=C_h_intern(&lf[72],14,"rest-parameter");
-lf[73]=C_h_intern(&lf[73],30,"call-with-current-continuation");
-lf[74]=C_h_intern(&lf[74],16,"\010compilerrewrite");
-lf[75]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[76]=C_h_intern(&lf[76],11,"\004corelambda");
-lf[77]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[78]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[79]=C_h_intern(&lf[79],3,"let");
-lf[80]=C_h_intern(&lf[80],16,"\010compilervarnode");
-lf[81]=C_h_intern(&lf[81],6,"gensym");
-lf[82]=C_h_intern(&lf[82],2,"f_");
-lf[83]=C_h_intern(&lf[83],18,"\010compilerdebugging");
-lf[84]=C_h_intern(&lf[84],1,"o");
-lf[85]=C_decode_literal(C_heaptop,"\376B\000\000)removing single-valued `call-with-values\047");
-lf[86]=C_h_intern(&lf[86],1,"r");
-lf[87]=C_h_intern(&lf[87],5,"value");
-lf[88]=C_h_intern(&lf[88],14,"\004coreundefined");
-lf[89]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
-lf[90]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[91]=C_h_intern(&lf[91],13,"list-tabulate");
-lf[92]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[93]=C_h_intern(&lf[93],16,"inline-transient");
-lf[94]=C_h_intern(&lf[94],8,"assigned");
-lf[95]=C_h_intern(&lf[95],10,"references");
-lf[96]=C_h_intern(&lf[96],30,"\010compilerdecompose-lambda-list");
-lf[97]=C_h_intern(&lf[97],18,"substring-index-ci");
-lf[98]=C_h_intern(&lf[98],22,"\003syssubstring-index-ci");
-lf[99]=C_h_intern(&lf[99],15,"substring-index");
-lf[100]=C_h_intern(&lf[100],19,"\003syssubstring-index");
-lf[101]=C_h_intern(&lf[101],14,"substring-ci=\077");
-lf[102]=C_h_intern(&lf[102],18,"\003syssubstring-ci=\077");
-lf[103]=C_h_intern(&lf[103],11,"substring=\077");
-lf[104]=C_h_intern(&lf[104],15,"\003syssubstring=\077");
-lf[105]=C_h_intern(&lf[105],11,"read-string");
-lf[106]=C_h_intern(&lf[106],20,"\003sysread-string/port");
-lf[107]=C_h_intern(&lf[107],18,"\003sysstandard-input");
-lf[108]=C_h_intern(&lf[108],10,"write-char");
-lf[109]=C_h_intern(&lf[109],19,"\003syswrite-char/port");
-lf[110]=C_h_intern(&lf[110],19,"\003sysstandard-output");
-lf[111]=C_h_intern(&lf[111],9,"read-char");
-lf[112]=C_h_intern(&lf[112],18,"\003sysread-char/port");
-lf[113]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_bit_setp");
-lf[114]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_bit_setp");
-lf[115]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[116]=C_h_intern(&lf[116],8,"bit-set\077");
-lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[118]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_anyp\376\377\016");
-lf[119]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[120]=C_h_intern(&lf[120],6,"global");
-lf[121]=C_h_intern(&lf[121],4,"any\077");
-lf[122]=C_h_intern(&lf[122],8,"\003sysvoid");
-lf[123]=C_h_intern(&lf[123],19,"\003sysundefined-value");
-lf[124]=C_h_intern(&lf[124],4,"void");
-lf[125]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\003car\376\001\000\000\010set-car!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\003cdr\376\001\000\000\010set-cdr!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016has"
-"h-table-ref\376\001\000\000\017hash-table-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\011block-ref\376\001\000\000\012block-set!\376\003\000\000\002\376\003\000\000\002"
-"\376\001\000\000\014locative-ref\376\001\000\000\015locative-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014u8vector-ref\376\001\000\000\015u8vector-set!"
-"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\001\000\000\016u1"
-"6vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015s16vector-ref\376\001\000\000\016s16vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015u32vec"
-"tor-ref\376\001\000\000\016u32vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015s32vector-ref\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\003"
-"\000\000\002\376\001\000\000\015f32vector-ref\376\001\000\000\016f32vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015f64vector-ref\376\001\000\000\016f64vect"
-"or-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016pointer-u8-ref\376\001\000\000\017pointer-u8-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016pointer-s"
-"8-ref\376\001\000\000\017pointer-s8-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\017pointer-u16-ref\376\001\000\000\020pointer-u16-set!\376\003\000\000"
-"\002\376\003\000\000\002\376\001\000\000\017pointer-s16-ref\376\001\000\000\020pointer-s16-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\017pointer-u32-ref\376\001\000"
-"\000\020pointer-u32-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\017pointer-s32-ref\376\001\000\000\020pointer-s32-set!\376\003\000\000\002\376\003\000\000\002\376"
-"\001\000\000\017pointer-f32-ref\376\001\000\000\020pointer-f32-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\017pointer-f64-ref\376\001\000\000\020point"
-"er-f64-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\012string-ref\376\001\000\000\013string-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\012global-ref\376\001\000"
-"\000\013global-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\012vector-ref\376\001\000\000\013vector-set!\376\377\016");
-lf[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[127]=C_h_intern(&lf[127],10,"\003syssetter");
-lf[128]=C_h_intern(&lf[128],7,"call/cc");
-lf[129]=C_h_intern(&lf[129],20,"thread-specific-set!");
-lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_setslot");
-lf[131]=C_h_intern(&lf[131],15,"thread-specific");
-lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[133]=C_h_intern(&lf[133],15,"\003sysmake-vector");
-lf[134]=C_h_intern(&lf[134],11,"make-vector");
-lf[135]=C_h_intern(&lf[135],22,"f64vector->blob/shared");
-lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[137]=C_h_intern(&lf[137],22,"f32vector->blob/shared");
-lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[139]=C_h_intern(&lf[139],22,"s32vector->blob/shared");
-lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[141]=C_h_intern(&lf[141],22,"u32vector->blob/shared");
-lf[142]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[143]=C_h_intern(&lf[143],22,"s16vector->blob/shared");
-lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[145]=C_h_intern(&lf[145],22,"u16vector->blob/shared");
-lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[147]=C_h_intern(&lf[147],21,"s8vector->blob/shared");
-lf[148]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[149]=C_h_intern(&lf[149],21,"u8vector->blob/shared");
-lf[150]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[151]=C_h_intern(&lf[151],10,"null-list\077");
-lf[152]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_null_list_p");
-lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
-lf[154]=C_h_intern(&lf[154],5,"atom\077");
-lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
-lf[156]=C_h_intern(&lf[156],9,"not-pair\077");
-lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
-lf[158]=C_h_intern(&lf[158],16,"f64vector-length");
-lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_64vector_length");
-lf[160]=C_h_intern(&lf[160],16,"f32vector-length");
-lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
-lf[162]=C_h_intern(&lf[162],16,"s32vector-length");
-lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
-lf[164]=C_h_intern(&lf[164],16,"u32vector-length");
-lf[165]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
-lf[166]=C_h_intern(&lf[166],16,"s16vector-length");
-lf[167]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
-lf[168]=C_h_intern(&lf[168],16,"u16vector-length");
-lf[169]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
-lf[170]=C_h_intern(&lf[170],15,"s8vector-length");
-lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
-lf[172]=C_h_intern(&lf[172],15,"u8vector-length");
-lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
-lf[174]=C_h_intern(&lf[174],14,"f64vector-set!");
-lf[175]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f64vector_set");
-lf[176]=C_h_intern(&lf[176],14,"f32vector-set!");
-lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f32vector_set");
-lf[178]=C_h_intern(&lf[178],14,"s32vector-set!");
-lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_set");
-lf[180]=C_h_intern(&lf[180],14,"u32vector-set!");
-lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_set");
-lf[182]=C_h_intern(&lf[182],14,"s16vector-set!");
-lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_set");
-lf[184]=C_h_intern(&lf[184],14,"u16vector-set!");
-lf[185]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_set");
-lf[186]=C_h_intern(&lf[186],13,"s8vector-set!");
-lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_set");
-lf[188]=C_h_intern(&lf[188],13,"u8vector-set!");
-lf[189]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_set");
-lf[190]=C_h_intern(&lf[190],13,"s32vector-ref");
-lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_s32vector_ref");
-lf[192]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_ref");
-lf[193]=C_h_intern(&lf[193],13,"u32vector-ref");
-lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_u32vector_ref");
-lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_ref");
-lf[196]=C_h_intern(&lf[196],13,"f64vector-ref");
-lf[197]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f64vector_ref");
-lf[198]=C_h_intern(&lf[198],13,"f32vector-ref");
-lf[199]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f32vector_ref");
-lf[200]=C_h_intern(&lf[200],13,"s16vector-ref");
-lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_ref");
-lf[202]=C_h_intern(&lf[202],13,"u16vector-ref");
-lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_ref");
-lf[204]=C_h_intern(&lf[204],12,"s8vector-ref");
-lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_ref");
-lf[206]=C_h_intern(&lf[206],12,"u8vector-ref");
-lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_ref");
-lf[208]=C_h_intern(&lf[208],9,"blob-size");
-lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
-lf[210]=C_h_intern(&lf[210],17,"\003sysdirect-return");
-lf[211]=C_decode_literal(C_heaptop,"\376B\000\000\017C_direct_return");
-lf[212]=C_h_intern(&lf[212],37,"\003sysforeign-unsigned-integer-argument");
-lf[213]=C_decode_literal(C_heaptop,"\376B\000\000&C_i_foreign_unsigned_integer_argumentp");
-lf[214]=C_h_intern(&lf[214],28,"\003sysforeign-integer-argument");
-lf[215]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_integer_argumentp");
-lf[216]=C_h_intern(&lf[216],28,"\003sysforeign-pointer-argument");
-lf[217]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_pointer_argumentp");
-lf[218]=C_h_intern(&lf[218],27,"\003sysforeign-string-argument");
-lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_string_argumentp");
-lf[220]=C_h_intern(&lf[220],34,"\003sysforeign-number-vector-argument");
-lf[221]=C_decode_literal(C_heaptop,"\376B\000\000#C_i_foreign_number_vector_argumentp");
-lf[222]=C_h_intern(&lf[222],26,"\003sysforeign-block-argument");
-lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\033C_i_foreign_block_argumentp");
-lf[224]=C_h_intern(&lf[224],27,"\003sysforeign-flonum-argument");
-lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_flonum_argumentp");
-lf[226]=C_h_intern(&lf[226],25,"\003sysforeign-char-argument");
-lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\032C_i_foreign_char_argumentp");
-lf[228]=C_h_intern(&lf[228],27,"\003sysforeign-fixnum-argument");
-lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_fixnum_argumentp");
-lf[230]=C_h_intern(&lf[230],13,"locative-set!");
-lf[231]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_locative_set");
-lf[232]=C_h_intern(&lf[232],16,"locative->object");
-lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_locative_to_object");
-lf[234]=C_h_intern(&lf[234],14,"\003sysimmediate\077");
-lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\006C_immp");
-lf[236]=C_h_intern(&lf[236],13,"null-pointer\077");
-lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_null_pointerp");
-lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
-lf[239]=C_h_intern(&lf[239],17,"\003sysnull-pointer\077");
-lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
-lf[241]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
-lf[242]=C_h_intern(&lf[242],14,"\003syspermanent\077");
-lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\014C_permanentp");
-lf[244]=C_h_intern(&lf[244],27,"\003sysflonum-in-fixnum-range\077");
-lf[245]=C_decode_literal(C_heaptop,"\376B\000\000\032C_flonum_in_fixnum_range_p");
-lf[246]=C_h_intern(&lf[246],25,"\003sysfits-in-unsigned-int\077");
-lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fits_in_unsigned_int_p");
-lf[248]=C_h_intern(&lf[248],16,"\003sysfits-in-int\077");
-lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fits_in_int_p");
-lf[250]=C_h_intern(&lf[250],9,"\003sysfudge");
-lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\007C_fudge");
-lf[252]=C_h_intern(&lf[252],11,"string-ci=\077");
-lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_string_ci_equal_p");
-lf[254]=C_h_intern(&lf[254],8,"string=\077");
-lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_string_equal_p");
-lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_string_equal_p");
-lf[257]=C_h_intern(&lf[257],18,"\003sysdouble->number");
-lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\022C_double_to_number");
-lf[259]=C_h_intern(&lf[259],15,"\003syspoke-double");
-lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\015C_poke_double");
-lf[261]=C_h_intern(&lf[261],16,"\003syspoke-integer");
-lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\016C_poke_integer");
-lf[263]=C_h_intern(&lf[263],12,"\003syssetislot");
-lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_set_i_slot");
-lf[265]=C_h_intern(&lf[265],15,"pointer->object");
-lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\023C_pointer_to_object");
-lf[267]=C_h_intern(&lf[267],13,"\003syspeek-byte");
-lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\013C_peek_byte");
-lf[269]=C_h_intern(&lf[269],15,"\003syspeek-fixnum");
-lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\015C_peek_fixnum");
-lf[271]=C_h_intern(&lf[271],11,"\003syssetbyte");
-lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\011C_setbyte");
-lf[273]=C_h_intern(&lf[273],8,"\003sysbyte");
-lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subbyte");
-lf[275]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[276]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\033C_i_fixnum_arithmetic_shift\376\377\016");
-lf[277]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[278]=C_decode_literal(C_heaptop,"\376B\000\000\026C_a_i_arithmetic_shift");
-lf[279]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[280]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
-lf[281]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_shift_left\376\377\016");
-lf[282]=C_h_intern(&lf[282],20,"\010compilerbig-fixnum\077");
-lf[283]=C_h_intern(&lf[283],16,"arithmetic-shift");
-lf[284]=C_h_intern(&lf[284],5,"fxior");
-lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
-lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
-lf[287]=C_h_intern(&lf[287],5,"fxand");
-lf[288]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
-lf[289]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
-lf[290]=C_h_intern(&lf[290],5,"fxxor");
-lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
-lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
-lf[293]=C_h_intern(&lf[293],5,"fxneg");
-lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_negate");
-lf[295]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_fixnum_negate");
-lf[296]=C_h_intern(&lf[296],5,"fxshr");
-lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\024C_fixnum_shift_right");
-lf[298]=C_h_intern(&lf[298],5,"fxshl");
-lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_shift_left");
-lf[300]=C_h_intern(&lf[300],3,"fx-");
-lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_difference");
-lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_fixnum_difference");
-lf[303]=C_h_intern(&lf[303],3,"fx+");
-lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
-lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
-lf[306]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_set_i_slot\376\377\016");
-lf[307]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[308]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
-lf[309]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[310]=C_h_intern(&lf[310],19,"\010compilerimmediate\077");
-lf[311]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
-lf[312]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[313]=C_h_intern(&lf[313],11,"\003syssetslot");
-lf[314]=C_h_intern(&lf[314],16,"pointer->address");
-lf[315]=C_decode_literal(C_heaptop,"\376B\000\000\030C_a_i_pointer_to_address");
-lf[316]=C_h_intern(&lf[316],16,"address->pointer");
-lf[317]=C_decode_literal(C_heaptop,"\376B\000\000\030C_a_i_address_to_pointer");
-lf[318]=C_h_intern(&lf[318],6,"string");
-lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_string");
-lf[320]=C_h_intern(&lf[320],18,"\003sysmake-structure");
-lf[321]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_record");
-lf[322]=C_h_intern(&lf[322],10,"\003sysvector");
-lf[323]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
-lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
-lf[325]=C_h_intern(&lf[325],8,"\003syslist");
-lf[326]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
-lf[327]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
-lf[328]=C_h_intern(&lf[328],4,"list");
-lf[329]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
-lf[330]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
-lf[331]=C_h_intern(&lf[331],8,"\003syscons");
-lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
-lf[333]=C_h_intern(&lf[333],4,"cons");
-lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
-lf[335]=C_h_intern(&lf[335],7,"fpround");
-lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
-lf[337]=C_h_intern(&lf[337],9,"fpceiling");
-lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
-lf[339]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
-lf[340]=C_h_intern(&lf[340],10,"fptruncate");
-lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
-lf[342]=C_h_intern(&lf[342],5,"fpabs");
-lf[343]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_abs");
-lf[344]=C_h_intern(&lf[344],6,"fpsqrt");
-lf[345]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_sqrt");
-lf[346]=C_h_intern(&lf[346],5,"fplog");
-lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_log");
-lf[348]=C_h_intern(&lf[348],6,"fpexpt");
-lf[349]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_expt");
-lf[350]=C_h_intern(&lf[350],5,"fpexp");
-lf[351]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_exp");
-lf[352]=C_h_intern(&lf[352],7,"fpatan2");
-lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_atan2");
-lf[354]=C_h_intern(&lf[354],6,"fpatan");
-lf[355]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_atan");
-lf[356]=C_h_intern(&lf[356],6,"fpacos");
-lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_acos");
-lf[358]=C_h_intern(&lf[358],6,"fpasin");
-lf[359]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_asin");
-lf[360]=C_h_intern(&lf[360],5,"fptan");
-lf[361]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_tan");
-lf[362]=C_h_intern(&lf[362],5,"fpcos");
-lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_cos");
-lf[364]=C_h_intern(&lf[364],5,"fpsin");
-lf[365]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_sin");
-lf[366]=C_h_intern(&lf[366],5,"round");
-lf[367]=C_h_intern(&lf[367],6,"flonum");
-lf[368]=C_h_intern(&lf[368],8,"truncate");
-lf[369]=C_h_intern(&lf[369],7,"ceiling");
-lf[370]=C_h_intern(&lf[370],5,"floor");
-lf[371]=C_h_intern(&lf[371],7,"fpfloor");
-lf[372]=C_h_intern(&lf[372],4,"odd\077");
-lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_oddp");
-lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_oddp");
-lf[375]=C_h_intern(&lf[375],5,"even\077");
-lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_evenp");
-lf[377]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_evenp");
-lf[378]=C_h_intern(&lf[378],9,"remainder");
-lf[379]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
-lf[380]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
-lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
-lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
-lf[383]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
-lf[384]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
-lf[385]=C_h_intern(&lf[385],15,"\003sysmake-symbol");
-lf[386]=C_decode_literal(C_heaptop,"\376B\000\000\015C_make_symbol");
-lf[387]=C_h_intern(&lf[387],17,"\003sysintern-symbol");
-lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_symbol");
-lf[389]=C_h_intern(&lf[389],18,"\003syscontext-switch");
-lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\020C_context_switch");
-lf[391]=C_h_intern(&lf[391],14,"return-to-host");
-lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\020C_return_to_host");
-lf[393]=C_h_intern(&lf[393],23,"\003sysensure-heap-reserve");
-lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\025C_ensure_heap_reserve");
-lf[395]=C_h_intern(&lf[395],19,"\003sysallocate-vector");
-lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\021C_allocate_vector");
-lf[397]=C_h_intern(&lf[397],34,"\003syscall-with-current-continuation");
-lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\011C_call_cc");
-lf[399]=C_h_intern(&lf[399],14,"number->string");
-lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\022C_number_to_string");
-lf[401]=C_h_intern(&lf[401],14,"string->number");
-lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_number");
-lf[403]=C_h_intern(&lf[403],14,"exact->inexact");
-lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\022C_exact_to_inexact");
-lf[405]=C_h_intern(&lf[405],2,"<=");
-lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\021C_less_or_equal_p");
-lf[407]=C_h_intern(&lf[407],2,">=");
-lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\024C_greater_or_equal_p");
-lf[409]=C_h_intern(&lf[409],1,"<");
-lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\007C_lessp");
-lf[411]=C_h_intern(&lf[411],1,">");
-lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\012C_greaterp");
-lf[413]=C_h_intern(&lf[413],1,"=");
-lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\011C_nequalp");
-lf[415]=C_h_intern(&lf[415],1,"/");
-lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\010C_divide");
-lf[417]=C_h_intern(&lf[417],1,"+");
-lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\006C_plus");
-lf[419]=C_h_intern(&lf[419],1,"-");
-lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\007C_minus");
-lf[421]=C_h_intern(&lf[421],1,"*");
-lf[422]=C_decode_literal(C_heaptop,"\376B\000\000\007C_times");
-lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_less_or_equalp");
-lf[424]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_greater_or_equalp");
-lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_lessp");
-lf[426]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_greaterp");
-lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_nequalp");
-lf[428]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_divide");
-lf[429]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
-lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
-lf[431]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_times");
-lf[432]=C_h_intern(&lf[432],4,"argv");
-lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\012C_get_argv");
-lf[434]=C_h_intern(&lf[434],3,"lcm");
-lf[435]=C_h_intern(&lf[435],3,"gcd");
-lf[436]=C_h_intern(&lf[436],8,"identity");
-lf[437]=C_h_intern(&lf[437],7,"\003syslcm");
-lf[438]=C_h_intern(&lf[438],7,"\003sysgcd");
-lf[439]=C_h_intern(&lf[439],5,"\003sys=");
-lf[440]=C_h_intern(&lf[440],6,"\003sys>=");
-lf[441]=C_h_intern(&lf[441],16,"\003syslist->vector");
-lf[442]=C_h_intern(&lf[442],12,"list->vector");
-lf[443]=C_h_intern(&lf[443],16,"\003sysvector->list");
-lf[444]=C_h_intern(&lf[444],12,"vector->list");
-lf[445]=C_h_intern(&lf[445],11,"vector-set!");
-lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_set");
-lf[447]=C_h_intern(&lf[447],12,"list->string");
-lf[448]=C_h_intern(&lf[448],16,"\003syslist->string");
-lf[449]=C_h_intern(&lf[449],12,"string->list");
-lf[450]=C_h_intern(&lf[450],16,"\003sysstring->list");
-lf[451]=C_h_intern(&lf[451],13,"string-append");
-lf[452]=C_h_intern(&lf[452],17,"\003sysstring-append");
-lf[453]=C_h_intern(&lf[453],9,"substring");
-lf[454]=C_h_intern(&lf[454],13,"\003syssubstring");
-lf[455]=C_h_intern(&lf[455],20,"make-record-instance");
-lf[456]=C_h_intern(&lf[456],14,"\003sysblock-set!");
-lf[457]=C_h_intern(&lf[457],10,"block-set!");
-lf[458]=C_h_intern(&lf[458],3,"map");
-lf[459]=C_h_intern(&lf[459],7,"\003sysmap");
-lf[460]=C_h_intern(&lf[460],8,"for-each");
-lf[461]=C_h_intern(&lf[461],12,"\003sysfor-each");
-lf[462]=C_h_intern(&lf[462],6,"setter");
-lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
-lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
-lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
-lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
-lf[467]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
-lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
-lf[469]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
-lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
-lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_equalp");
-lf[473]=C_h_intern(&lf[473],14,"\003syscheck-char");
-lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_char_2");
-lf[475]=C_h_intern(&lf[475],19,"\003syscheck-structure");
-lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_check_structure_2");
-lf[477]=C_h_intern(&lf[477],16,"\003syscheck-vector");
-lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_vector_2");
-lf[479]=C_h_intern(&lf[479],21,"\003syscheck-byte-vector");
-lf[480]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_check_bytevector_2");
-lf[481]=C_h_intern(&lf[481],16,"\003syscheck-string");
-lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_string_2");
-lf[483]=C_h_intern(&lf[483],16,"\003syscheck-symbol");
-lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_symbol_2");
-lf[485]=C_h_intern(&lf[485],14,"\003syscheck-pair");
-lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_pair_2");
-lf[487]=C_h_intern(&lf[487],14,"\003syscheck-list");
-lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_list_2");
-lf[489]=C_h_intern(&lf[489],16,"\003syscheck-number");
-lf[490]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_number_2");
-lf[491]=C_h_intern(&lf[491],15,"\003syscheck-exact");
-lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_check_exact_2");
-lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_char");
-lf[494]=C_decode_literal(C_heaptop,"\376B\000\000\023C_i_check_structure");
-lf[495]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_vector");
-lf[496]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_check_bytevector");
-lf[497]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_string");
-lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_symbol");
-lf[499]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_pair");
-lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_list");
-lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_number");
-lf[502]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_check_exact");
-lf[503]=C_h_intern(&lf[503],14,"inexact->exact");
-lf[504]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_inexact_to_exact");
-lf[505]=C_h_intern(&lf[505],13,"string-length");
-lf[506]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_string_length");
-lf[507]=C_h_intern(&lf[507],17,"\003sysvector-length");
-lf[508]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
-lf[509]=C_h_intern(&lf[509],13,"vector-length");
-lf[510]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
-lf[511]=C_h_intern(&lf[511],13,"integer->char");
-lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\020C_make_character");
-lf[513]=C_decode_literal(C_heaptop,"\376B\000\000\007C_unfix");
-lf[514]=C_h_intern(&lf[514],13,"char->integer");
-lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
-lf[516]=C_decode_literal(C_heaptop,"\376B\000\000\020C_character_code");
-lf[517]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
-lf[518]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
-lf[519]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
-lf[520]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
-lf[521]=C_h_intern(&lf[521],9,"negative\077");
-lf[522]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_negativep");
-lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_negativep");
-lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
-lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
-lf[526]=C_h_intern(&lf[526],9,"positive\077");
-lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_positivep");
-lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_positivep");
-lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
-lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
-lf[531]=C_h_intern(&lf[531],5,"zero\077");
-lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_zerop");
-lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_zerop");
-lf[534]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[535]=C_h_intern(&lf[535],4,"atan");
-lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_atan2");
-lf[537]=C_h_intern(&lf[537],4,"sqrt");
-lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_sqrt");
-lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_atan");
-lf[540]=C_h_intern(&lf[540],4,"acos");
-lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_acos");
-lf[542]=C_h_intern(&lf[542],4,"asin");
-lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_asin");
-lf[544]=C_h_intern(&lf[544],3,"log");
-lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_log");
-lf[546]=C_h_intern(&lf[546],3,"tan");
-lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_tan");
-lf[548]=C_h_intern(&lf[548],3,"cos");
-lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_cos");
-lf[550]=C_h_intern(&lf[550],3,"sin");
-lf[551]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_sin");
-lf[552]=C_h_intern(&lf[552],3,"exp");
-lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_exp");
-lf[554]=C_h_intern(&lf[554],5,"fpneg");
-lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_flonum_negate");
-lf[556]=C_h_intern(&lf[556],3,"fp/");
-lf[557]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_quotient");
-lf[558]=C_h_intern(&lf[558],3,"fp*");
-lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_times");
-lf[560]=C_h_intern(&lf[560],3,"fp-");
-lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\027C_a_i_flonum_difference");
-lf[562]=C_h_intern(&lf[562],3,"fp+");
-lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_plus");
-lf[564]=C_h_intern(&lf[564],11,"bitwise-not");
-lf[565]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_not");
-lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
-lf[567]=C_h_intern(&lf[567],11,"bitwise-ior");
-lf[568]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
-lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
-lf[570]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_ior");
-lf[571]=C_h_intern(&lf[571],11,"bitwise-and");
-lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
-lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
-lf[574]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_and");
-lf[575]=C_h_intern(&lf[575],11,"bitwise-xor");
-lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
-lf[577]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
-lf[578]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_xor");
-lf[579]=C_h_intern(&lf[579],3,"abs");
-lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_abs");
-lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
-lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
-lf[583]=C_h_intern(&lf[583],8,"set-cdr!");
-lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_cdr");
-lf[585]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_cdr");
-lf[586]=C_h_intern(&lf[586],8,"set-car!");
-lf[587]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_car");
-lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_car");
-lf[589]=C_h_intern(&lf[589],6,"member");
-lf[590]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_member");
-lf[591]=C_h_intern(&lf[591],5,"assoc");
-lf[592]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_assoc");
-lf[593]=C_h_intern(&lf[593],4,"memq");
-lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
-lf[595]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
-lf[596]=C_h_intern(&lf[596],4,"assq");
-lf[597]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assq");
-lf[598]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_assq");
-lf[599]=C_h_intern(&lf[599],4,"memv");
-lf[600]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memv");
-lf[601]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
-lf[602]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
-lf[603]=C_h_intern(&lf[603],4,"assv");
-lf[604]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assv");
-lf[605]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assq");
-lf[606]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_assq");
-lf[607]=C_h_intern(&lf[607],15,"number-of-slots");
-lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
-lf[609]=C_h_intern(&lf[609],9,"block-ref");
-lf[610]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[611]=C_h_intern(&lf[611],15,"\003sysbytevector\077");
-lf[612]=C_decode_literal(C_heaptop,"\376B\000\000\015C_bytevectorp");
-lf[613]=C_h_intern(&lf[613],14,"\003sysstructure\077");
-lf[614]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_structurep");
-lf[615]=C_h_intern(&lf[615],9,"list-tail");
-lf[616]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_list_tail");
-lf[617]=C_h_intern(&lf[617],13,"char-downcase");
-lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_downcase");
-lf[619]=C_h_intern(&lf[619],11,"char-upcase");
-lf[620]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_i_char_upcase");
-lf[621]=C_h_intern(&lf[621],16,"char-lower-case\077");
-lf[622]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_lower_casep");
-lf[623]=C_h_intern(&lf[623],16,"char-upper-case\077");
-lf[624]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_upper_casep");
-lf[625]=C_h_intern(&lf[625],16,"char-whitespace\077");
-lf[626]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_whitespacep");
-lf[627]=C_h_intern(&lf[627],16,"char-alphabetic\077");
-lf[628]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_alphabeticp");
-lf[629]=C_h_intern(&lf[629],13,"char-numeric\077");
-lf[630]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_numericp");
-lf[631]=C_h_intern(&lf[631],5,"fpmin");
-lf[632]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_min");
-lf[633]=C_h_intern(&lf[633],5,"fpmax");
-lf[634]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_max");
-lf[635]=C_h_intern(&lf[635],5,"fxmin");
-lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_min");
-lf[637]=C_h_intern(&lf[637],5,"fxmax");
-lf[638]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_max");
-lf[639]=C_h_intern(&lf[639],4,"fp<=");
-lf[640]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
-lf[641]=C_h_intern(&lf[641],4,"fp>=");
-lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
-lf[643]=C_h_intern(&lf[643],3,"fp<");
-lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
-lf[645]=C_h_intern(&lf[645],3,"fp>");
-lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
-lf[647]=C_h_intern(&lf[647],3,"fp=");
-lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\017C_flonum_equalp");
-lf[649]=C_h_intern(&lf[649],4,"fx<=");
-lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
-lf[651]=C_h_intern(&lf[651],4,"fx>=");
-lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
-lf[653]=C_h_intern(&lf[653],3,"fx<");
-lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
-lf[655]=C_h_intern(&lf[655],3,"fx>");
-lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
-lf[657]=C_h_intern(&lf[657],3,"fx=");
-lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[659]=C_h_intern(&lf[659],5,"fxmod");
-lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
-lf[661]=C_h_intern(&lf[661],3,"fx/");
-lf[662]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_divide");
-lf[663]=C_h_intern(&lf[663],3,"fx*");
-lf[664]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_times");
-lf[665]=C_h_intern(&lf[665],5,"fxnot");
-lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
-lf[667]=C_h_intern(&lf[667],8,"\003syssize");
-lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
-lf[669]=C_h_intern(&lf[669],13,"\003sysblock-ref");
-lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_block_ref");
-lf[671]=C_h_intern(&lf[671],8,"\003sysslot");
-lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[673]=C_h_intern(&lf[673],7,"char<=\077");
-lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
-lf[675]=C_h_intern(&lf[675],7,"char>=\077");
-lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
-lf[677]=C_h_intern(&lf[677],6,"char<\077");
-lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
-lf[679]=C_h_intern(&lf[679],6,"char>\077");
-lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
-lf[681]=C_h_intern(&lf[681],6,"char=\077");
-lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[683]=C_h_intern(&lf[683],10,"vector-ref");
-lf[684]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_ref");
-lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[686]=C_h_intern(&lf[686],11,"string-set!");
-lf[687]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_set");
-lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\014C_setsubchar");
-lf[689]=C_h_intern(&lf[689],10,"string-ref");
-lf[690]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_ref");
-lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subchar");
-lf[692]=C_h_intern(&lf[692],11,"eof-object\077");
-lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\006C_eofp");
-lf[694]=C_h_intern(&lf[694],12,"proper-list\077");
-lf[695]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
-lf[696]=C_h_intern(&lf[696],5,"list\077");
-lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
-lf[698]=C_h_intern(&lf[698],8,"inexact\077");
-lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_inexactp");
-lf[700]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_inexactp");
-lf[701]=C_decode_literal(C_heaptop,"\376B\000\000\012C_nfixnump");
-lf[702]=C_h_intern(&lf[702],6,"exact\077");
-lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_exactp");
-lf[704]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_exactp");
-lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
-lf[706]=C_h_intern(&lf[706],22,"\003sysgeneric-structure\077");
-lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\014C_structurep");
-lf[708]=C_h_intern(&lf[708],8,"pointer\077");
-lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_safe_pointerp");
-lf[710]=C_h_intern(&lf[710],12,"\003syspointer\077");
-lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\015C_anypointerp");
-lf[712]=C_h_intern(&lf[712],10,"fpinteger\077");
-lf[713]=C_decode_literal(C_heaptop,"\376B\000\000\020C_u_i_fpintegerp");
-lf[714]=C_h_intern(&lf[714],7,"finite\077");
-lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_finitep");
-lf[716]=C_h_intern(&lf[716],7,"fixnum\077");
-lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
-lf[718]=C_h_intern(&lf[718],7,"flonum\077");
-lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_flonump");
-lf[720]=C_h_intern(&lf[720],8,"integer\077");
-lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_integerp");
-lf[722]=C_h_intern(&lf[722],5,"real\077");
-lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
-lf[724]=C_h_intern(&lf[724],9,"rational\077");
-lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_rationalp");
-lf[726]=C_h_intern(&lf[726],8,"complex\077");
-lf[727]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
-lf[728]=C_h_intern(&lf[728],7,"number\077");
-lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
-lf[730]=C_h_intern(&lf[730],8,"boolean\077");
-lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\012C_booleanp");
-lf[732]=C_h_intern(&lf[732],5,"port\077");
-lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_portp");
-lf[734]=C_h_intern(&lf[734],10,"procedure\077");
-lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_closurep");
-lf[736]=C_h_intern(&lf[736],9,"\003syspair\077");
-lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
-lf[738]=C_h_intern(&lf[738],5,"pair\077");
-lf[739]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
-lf[740]=C_h_intern(&lf[740],11,"\003sysvector\077");
-lf[741]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
-lf[742]=C_h_intern(&lf[742],7,"vector\077");
-lf[743]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
-lf[744]=C_h_intern(&lf[744],7,"symbol\077");
-lf[745]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_symbolp");
-lf[746]=C_h_intern(&lf[746],9,"locative\077");
-lf[747]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_locativep");
-lf[748]=C_h_intern(&lf[748],7,"string\077");
-lf[749]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_stringp");
-lf[750]=C_h_intern(&lf[750],5,"char\077");
-lf[751]=C_decode_literal(C_heaptop,"\376B\000\000\007C_charp");
-lf[752]=C_h_intern(&lf[752],3,"not");
-lf[753]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_not");
-lf[754]=C_h_intern(&lf[754],6,"length");
-lf[755]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_length");
-lf[756]=C_h_intern(&lf[756],9,"\003sysnull\077");
-lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
-lf[758]=C_h_intern(&lf[758],5,"null\077");
-lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
-lf[760]=C_h_intern(&lf[760],8,"list-ref");
-lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_list_ref");
-lf[762]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_list_ref");
-lf[763]=C_h_intern(&lf[763],8,"\003syseqv\077");
-lf[764]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
-lf[765]=C_h_intern(&lf[765],4,"eqv\077");
-lf[766]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
-lf[767]=C_h_intern(&lf[767],7,"\003syseq\077");
-lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[769]=C_h_intern(&lf[769],3,"eq\077");
-lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
-lf[771]=C_h_intern(&lf[771],3,"cdr");
-lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
-lf[773]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[774]=C_h_intern(&lf[774],6,"cddddr");
-lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cddddr");
-lf[776]=C_h_intern(&lf[776],5,"cdddr");
-lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_cdddr");
-lf[778]=C_h_intern(&lf[778],4,"cddr");
-lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cddr");
-lf[780]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddddr");
-lf[781]=C_h_intern(&lf[781],6,"cdddar");
-lf[782]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdddar");
-lf[783]=C_h_intern(&lf[783],6,"cddadr");
-lf[784]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddadr");
-lf[785]=C_h_intern(&lf[785],6,"cddaar");
-lf[786]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddaar");
-lf[787]=C_h_intern(&lf[787],6,"cdaddr");
-lf[788]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaddr");
-lf[789]=C_h_intern(&lf[789],6,"cdadar");
-lf[790]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdadar");
-lf[791]=C_h_intern(&lf[791],6,"cdaadr");
-lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaadr");
-lf[793]=C_h_intern(&lf[793],6,"cdaaar");
-lf[794]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaaar");
-lf[795]=C_h_intern(&lf[795],6,"cadddr");
-lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
-lf[797]=C_h_intern(&lf[797],6,"caddar");
-lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caddar");
-lf[799]=C_h_intern(&lf[799],6,"cadadr");
-lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadadr");
-lf[801]=C_h_intern(&lf[801],6,"cadaar");
-lf[802]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadaar");
-lf[803]=C_h_intern(&lf[803],6,"caaddr");
-lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaddr");
-lf[805]=C_h_intern(&lf[805],6,"caadar");
-lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caadar");
-lf[807]=C_h_intern(&lf[807],6,"caaaar");
-lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaaar");
-lf[809]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdddr");
-lf[810]=C_h_intern(&lf[810],5,"cddar");
-lf[811]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cddar");
-lf[812]=C_h_intern(&lf[812],5,"cdadr");
-lf[813]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdadr");
-lf[814]=C_h_intern(&lf[814],5,"cdaar");
-lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdaar");
-lf[816]=C_h_intern(&lf[816],5,"caddr");
-lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
-lf[818]=C_h_intern(&lf[818],5,"cadar");
-lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cadar");
-lf[820]=C_h_intern(&lf[820],5,"caaar");
-lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caaar");
-lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cddr");
-lf[823]=C_h_intern(&lf[823],4,"cdar");
-lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cdar");
-lf[825]=C_h_intern(&lf[825],4,"caar");
-lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_caar");
-lf[827]=C_h_intern(&lf[827],22,"\003syscontinuation-graft");
-lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\024C_continuation_graft");
-lf[829]=C_h_intern(&lf[829],12,"locative-ref");
-lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\016C_locative_ref");
-lf[831]=C_h_intern(&lf[831],8,"cpu-time");
-lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\012C_cpu_time");
-lf[833]=C_h_intern(&lf[833],20,"\003syscall-with-values");
-lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
-lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
-lf[836]=C_h_intern(&lf[836],16,"call-with-values");
-lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
-lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
-lf[839]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
-lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
-lf[841]=C_h_intern(&lf[841],6,"fourth");
-lf[842]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
-lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
-lf[844]=C_h_intern(&lf[844],5,"third");
-lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
-lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
-lf[847]=C_h_intern(&lf[847],6,"second");
-lf[848]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
-lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
-lf[850]=C_h_intern(&lf[850],5,"first");
-lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
-lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
-lf[853]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
-lf[854]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
-lf[855]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
-lf[856]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
-lf[857]=C_h_intern(&lf[857],4,"cadr");
-lf[858]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
-lf[859]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
-lf[860]=C_h_intern(&lf[860],7,"\003syscdr");
-lf[861]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
-lf[862]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_cdr");
-lf[863]=C_h_intern(&lf[863],7,"\003syscar");
-lf[864]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
-lf[865]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
-lf[866]=C_h_intern(&lf[866],3,"car");
-lf[867]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
-lf[868]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
-lf[869]=C_h_intern(&lf[869],9,"\003sysapply");
-lf[870]=C_h_intern(&lf[870],5,"apply");
-lf[871]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012C_i_equalp\376\377\016");
-lf[872]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[873]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
-lf[874]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[875]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[876]=C_h_intern(&lf[876],6,"equal\077");
-lf[877]=C_h_intern(&lf[877],4,"sub1");
-lf[878]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_decrease");
-lf[879]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_decrease");
-lf[880]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
-lf[881]=C_h_intern(&lf[881],4,"add1");
-lf[882]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_increase");
-lf[883]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_increase");
-lf[884]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
-lf[885]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
-lf[886]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[887]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
-lf[888]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[889]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[890]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012C_quotient\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[891]=C_h_intern(&lf[891],8,"quotient");
-lf[892]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[893]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
-lf[894]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
-lf[895]=C_h_intern(&lf[895],19,"\010compilerfold-inner");
-lf[896]=C_h_intern(&lf[896],6,"remove");
-lf[897]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\021C_u_fixnum_negate\376\377\016");
-lf[898]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[899]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_negate\376\377\016");
-lf[900]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[901]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[902]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\025C_u_fixnum_difference\376\377\016");
-lf[903]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_difference\376\377\016");
-lf[904]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[905]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[906]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[907]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_shift_left\376\377\016");
-lf[908]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_fixnum_times\376\377\016");
-lf[909]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
-lf[910]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
-lf[911]=C_h_intern(&lf[911],15,"lset-difference");
-lf[912]=C_h_intern(&lf[912],10,"lset-union");
-C_register_lf2(lf,913,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1311,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k1309 */
-static void C_ccall f_1311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1311,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1314,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k1312 in k1309 */
-static void C_ccall f_1314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1314,2,t0,t1);}
-t2=C_set_block_item(lf[0] /* default-optimization-passes */,0,C_fix(3));
-t3=C_mutate((C_word*)lf[1]+1 /* (set! default-declarations ...) */,lf[2]);
-t4=C_mutate((C_word*)lf[3]+1 /* (set! default-debugging-declarations ...) */,lf[4]);
-t5=C_mutate((C_word*)lf[5]+1 /* (set! default-profiling-declarations ...) */,lf[6]);
-t6=C_mutate((C_word*)lf[7]+1 /* (set! units-used-by-default ...) */,lf[8]);
-t7=C_set_block_item(lf[9] /* words-per-flonum */,0,C_fix(4));
-t8=C_set_block_item(lf[10] /* parameter-limit */,0,C_fix(1024));
-t9=C_set_block_item(lf[11] /* small-parameter-limit */,0,C_fix(128));
-t10=C_mutate((C_word*)lf[12]+1 /* (set! unlikely-variables ...) */,lf[13]);
-t11=C_mutate((C_word*)lf[14]+1 /* (set! eq-inline-operator ...) */,lf[15]);
-t12=C_mutate((C_word*)lf[16]+1 /* (set! membership-test-operators ...) */,lf[17]);
-t13=C_set_block_item(lf[18] /* membership-unfold-limit */,0,C_fix(20));
-t14=C_mutate((C_word*)lf[19]+1 /* (set! target-include-file ...) */,lf[20]);
-t15=C_mutate((C_word*)lf[21]+1 /* (set! valid-compiler-options ...) */,lf[22]);
-t16=C_mutate((C_word*)lf[23]+1 /* (set! valid-compiler-options-with-argument ...) */,lf[24]);
-t17=C_mutate((C_word*)lf[25]+1 /* (set! default-standard-bindings ...) */,lf[26]);
-t18=C_mutate((C_word*)lf[27]+1 /* (set! default-extended-bindings ...) */,lf[28]);
-t19=C_mutate((C_word*)lf[29]+1 /* (set! internal-bindings ...) */,lf[30]);
-t20=C_mutate((C_word*)lf[31]+1 /* (set! non-foldable-bindings ...) */,lf[32]);
-t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1337,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t22=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4964,a[2]=t21,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 195 lset-union");
-((C_proc5)C_retrieve_symbol_proc(lf[912]))(5,*((C_word*)lf[912]+1),t22,*((C_word*)lf[769]+1),*((C_word*)lf[25]+1),*((C_word*)lf[27]+1));}
-
-/* k4962 in k1312 in k1309 */
-static void C_ccall f_4964(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-platform.scm: 193 lset-difference");
-((C_proc5)C_retrieve_symbol_proc(lf[911]))(5,*((C_word*)lf[911]+1),((C_word*)t0)[2],*((C_word*)lf[769]+1),t1,*((C_word*)lf[31]+1));}
-
-/* k1335 in k1312 in k1309 */
-static void C_ccall f_1337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1337,2,t0,t1);}
-t2=C_mutate((C_word*)lf[33]+1 /* (set! foldable-bindings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1340,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 201 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t3,lf[417],C_fix(19),C_fix(0),lf[909],lf[910],C_SCHEME_FALSE);}
-
-/* k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1340,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4787,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 203 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[421],C_fix(8),t3);}
-
-/* a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4787(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4787,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4791,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4928,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 212 remove");
-((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t6,t7,t5);}
-
-/* a4927 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4928(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4928,3,t0,t1,t2);}
-t3=t2;
-t4=C_slot(t3,C_fix(1));
-t5=C_eqp(lf[47],t4);
-if(C_truep(t5)){
-t6=t2;
-t7=C_slot(t6,C_fix(2));
-t8=C_i_car(t7);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(C_fix(1),t8));}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4791,2,t0,t1);}
-if(C_truep(C_i_nullp(t1))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4813,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 217 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(0));}
-else{
-t2=C_i_cdr(t1);
-if(C_truep(C_i_nullp(t2))){
-t3=C_i_car(t1);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[905],t4));}
-else{
-t3=C_eqp(C_retrieve(lf[35]),lf[34]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4857,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4859,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 225 fold-inner");
-((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t4,t5,t1);}
-else{
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}}}
-
-/* a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4859,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4866,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=t3;
-t6=C_slot(t5,C_fix(1));
-t7=C_eqp(lf[47],t6);
-if(C_truep(t7)){
-t8=t3;
-t9=C_slot(t8,C_fix(2));
-t10=C_i_car(t9);
-t11=t4;
-f_4866(t11,C_eqp(C_fix(2),t10));}
-else{
-t8=t4;
-f_4866(t8,C_SCHEME_FALSE);}}
-
-/* k4864 in a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4866(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4866,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4882,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 228 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(1));}
-else{
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[908],t2));}}
-
-/* k4880 in k4864 in a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4882,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[907],t2));}
-
-/* k4855 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4857,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[906],t2));}
-
-/* k4811 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4813,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[904],t2));}
-
-/* k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1343,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4637,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 233 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[419],C_fix(8),t3);}
-
-/* a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4637(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[16],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4637,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_nullp(t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
-else{
-t6=C_i_cdr(t5);
-t7=C_i_nullp(t6);
-t8=(C_truep(t7)?C_eqp(C_retrieve(lf[35]),lf[34]):C_SCHEME_FALSE);
-if(C_truep(t8)){
-if(C_truep(C_retrieve(lf[36]))){
-t9=t5;
-t10=C_a_i_record(&a,4,lf[37],lf[38],lf[897],t9);
-t11=C_a_i_list(&a,2,t4,t10);
-t12=t1;
-t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[37],lf[39],lf[898],t11));}
-else{
-t9=t5;
-t10=C_a_i_record(&a,4,lf[37],lf[38],lf[899],t9);
-t11=C_a_i_list(&a,2,t4,t10);
-t12=t1;
-t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[37],lf[39],lf[900],t11));}}
-else{
-t9=C_i_car(t5);
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4737,a[2]=t1,a[3]=t4,a[4]=t9,tmp=(C_word)a,a+=5,tmp);
-t11=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4739,tmp=(C_word)a,a+=2,tmp);
-t12=C_i_cdr(t5);
-C_trace("c-platform.scm: 253 remove");
-((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t10,t11,t12);}}}
-
-/* a4738 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4739(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4739,3,t0,t1,t2);}
-t3=t2;
-t4=C_slot(t3,C_fix(1));
-t5=C_eqp(lf[47],t4);
-if(C_truep(t5)){
-t6=t2;
-t7=C_slot(t6,C_fix(2));
-t8=C_i_car(t7);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(t8,C_fix(0)));}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4737,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=C_eqp(C_retrieve(lf[35]),lf[34]);
-if(C_truep(t3)){
-t4=C_i_length(t2);
-if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4706,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4708,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 264 fold-inner");
-((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t5,t6,t2);}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* a4707 in k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4708,4,t0,t1,t2,t3);}
-t4=(C_truep(C_retrieve(lf[36]))?lf[902]:lf[903]);
-t5=C_a_i_list(&a,2,t2,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[38],t4,t5));}
-
-/* k4704 in k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4706,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[901],t2));}
-
-/* k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1346,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4478,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 271 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[415],C_fix(8),t3);}
-
-/* a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4478(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4478,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-if(C_truep(C_fixnum_greater_or_equal_p(t6,C_fix(2)))){
-t7=C_i_car(t5);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4593,a[2]=t1,a[3]=t4,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4595,tmp=(C_word)a,a+=2,tmp);
-t10=C_i_cdr(t5);
-C_trace("c-platform.scm: 280 remove");
-((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t8,t9,t10);}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}
-
-/* a4594 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4595(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4595,3,t0,t1,t2);}
-t3=t2;
-t4=C_slot(t3,C_fix(1));
-t5=C_eqp(lf[47],t4);
-if(C_truep(t5)){
-t6=t2;
-t7=C_slot(t6,C_fix(2));
-t8=C_i_car(t7);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(C_fix(1),t8));}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4593,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=C_eqp(C_retrieve(lf[35]),lf[34]);
-if(C_truep(t3)){
-t4=C_i_length(t2);
-if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4516,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4518,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 291 fold-inner");
-((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t5,t6,t2);}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4518,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4525,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=t3;
-t6=C_slot(t5,C_fix(1));
-t7=C_eqp(lf[47],t6);
-if(C_truep(t7)){
-t8=t3;
-t9=C_slot(t8,C_fix(2));
-t10=C_i_car(t9);
-t11=t4;
-f_4525(t11,C_eqp(C_fix(2),t10));}
-else{
-t8=t4;
-f_4525(t8,C_SCHEME_FALSE);}}
-
-/* k4523 in a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4525(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4525,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4541,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 294 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(1));}
-else{
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[894],t2));}}
-
-/* k4539 in k4523 in a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4541,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[893],t2));}
-
-/* k4514 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4516,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[892],t2));}
-
-/* k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1349,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4360,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 298 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[891],C_fix(8),t3);}
-
-/* a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[8],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4360,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(2));
-if(C_truep(t7)){
-t8=C_eqp(lf[34],C_retrieve(lf[35]));
-if(C_truep(t8)){
-t9=C_i_cadr(t5);
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4395,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t11=C_slot(t9,C_fix(1));
-t12=C_eqp(lf[47],t11);
-if(C_truep(t12)){
-t13=C_slot(t9,C_fix(2));
-t14=C_i_car(t13);
-t15=t10;
-f_4395(t15,C_eqp(C_fix(2),t14));}
-else{
-t13=t10;
-f_4395(t13,C_SCHEME_FALSE);}}
-else{
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4463,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t10=C_a_i_record(&a,4,lf[37],lf[55],lf[890],C_SCHEME_END_OF_LIST);
-C_trace("c-platform.scm: 318 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),t9,t10,t4,t5);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k4461 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4463(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4463,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[889],t1));}
-
-/* k4393 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4395(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4395,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4415,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-platform.scm: 314 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,C_fix(1));}
-else{
-t2=((C_word*)t0)[4];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[887],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[888],t4));}}
-
-/* k4413 in k4393 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4415,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[885],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[886],t4));}
-
-/* k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1352(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1352,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1354,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1429,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4358,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 338 op1");
-f_1354(t4,lf[882],lf[883],lf[884]);}
-
-/* k4356 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-platform.scm: 338 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[2],lf[881],C_fix(8),t1);}
-
-/* k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1429,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1432,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4354,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 339 op1");
-f_1354(t3,lf[878],lf[879],lf[880]);}
-
-/* k4352 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4354(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-platform.scm: 339 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[2],lf[877],C_fix(8),t1);}
-
-/* k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1432,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1434,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1624,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 359 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[765],C_fix(8),t2);}
-
-/* k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1624,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1627,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 360 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[763],C_fix(8),((C_word*)t0)[2]);}
-
-/* k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1627(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1627,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1630,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4137,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 362 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[876],C_fix(8),t3);}
-
-/* a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[11],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4137,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(2));
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=C_i_cadr(t5);
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4153,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t11=C_slot(t8,C_fix(1));
-t12=C_eqp(lf[48],t11);
-if(C_truep(t12)){
-t13=C_slot(t9,C_fix(1));
-t14=C_eqp(lf[48],t13);
-if(C_truep(t14)){
-t15=C_slot(t8,C_fix(2));
-t16=C_slot(t9,C_fix(2));
-if(C_truep(C_i_equalp(t15,t16))){
-t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4310,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 374 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t17,C_SCHEME_TRUE);}
-else{
-t17=t10;
-f_4153(t17,C_SCHEME_FALSE);}}
-else{
-t15=t10;
-f_4153(t15,C_SCHEME_FALSE);}}
-else{
-t13=t10;
-f_4153(t13,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k4308 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4310,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_4153(t3,C_a_i_record(&a,4,lf[37],lf[39],lf[875],t2));}
-
-/* k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4153(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4153,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4159,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4186,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[2],C_fix(1));
-t5=C_eqp(lf[47],t4);
-if(C_truep(t5)){
-t6=C_slot(((C_word*)t0)[2],C_fix(2));
-t7=C_i_car(t6);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4255,a[2]=t7,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 377 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t8,t7);}
-else{
-t6=t3;
-f_4186(t6,C_SCHEME_FALSE);}}}
-
-/* k4253 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_4186(t3,t2);}
-else{
-t2=((C_word*)t0)[3];
-f_4186(t2,C_i_symbolp(((C_word*)t0)[2]));}}
-
-/* k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4186(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4186,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4189,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_4189(t3,t1);}
-else{
-t3=C_slot(((C_word*)t0)[2],C_fix(1));
-t4=C_eqp(lf[47],t3);
-if(C_truep(t4)){
-t5=C_slot(((C_word*)t0)[2],C_fix(2));
-t6=C_i_car(t5);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4222,a[2]=t6,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 380 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t7,t6);}
-else{
-t5=t2;
-f_4189(t5,C_SCHEME_FALSE);}}}
-
-/* k4220 in k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-f_4189(t2,(C_truep(t1)?t1:C_i_symbolp(((C_word*)t0)[2])));}
-
-/* k4187 in k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4189(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4189,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[873],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-f_4159(t5,C_a_i_record(&a,4,lf[37],lf[39],lf[874],t4));}
-else{
-t2=((C_word*)t0)[2];
-f_4159(t2,C_SCHEME_FALSE);}}
-
-/* k4157 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_4159(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4159,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[3];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[871],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[2],t3);
-t5=((C_word*)t0)[4];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[872],t4));}}
-
-/* k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1630(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1630,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1632,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1846,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 417 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[870],C_fix(8),t2);}
-
-/* k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1846,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1849,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 418 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[869],C_fix(8),((C_word*)t0)[2]);}
-
-/* k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1849(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1849,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1851,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1987,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 448 rewrite-c..r");
-f_1851(t3,lf[866],lf[867],lf[868],C_fix(0));}
-
-/* k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1987,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 449 rewrite-c..r");
-f_1851(t2,lf[863],lf[864],lf[865],C_fix(0));}
-
-/* k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1990,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1993,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 450 rewrite-c..r");
-f_1851(t2,lf[860],lf[861],lf[862],C_fix(0));}
-
-/* k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1993(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1993,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1996,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 451 rewrite-c..r");
-f_1851(t2,lf[857],lf[858],lf[859],C_fix(1));}
-
-/* k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1996,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 452 rewrite-c..r");
-f_1851(t2,lf[816],lf[855],lf[856],C_fix(2));}
-
-/* k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1999(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1999,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 453 rewrite-c..r");
-f_1851(t2,lf[795],lf[853],lf[854],C_fix(3));}
-
-/* k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2002,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2005,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 454 rewrite-c..r");
-f_1851(t2,lf[850],lf[851],lf[852],C_fix(0));}
-
-/* k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2005(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2005,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 455 rewrite-c..r");
-f_1851(t2,lf[847],lf[848],lf[849],C_fix(1));}
-
-/* k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2008,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2011,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 456 rewrite-c..r");
-f_1851(t2,lf[844],lf[845],lf[846],C_fix(2));}
-
-/* k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2011,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2014,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 457 rewrite-c..r");
-f_1851(t2,lf[841],lf[842],lf[843],C_fix(3));}
-
-/* k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2014(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2014,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2015,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2041,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 464 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[57],C_fix(8),t2);}
-
-/* k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2041,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2044,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 465 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[58],C_fix(8),((C_word*)t0)[2]);}
-
-/* k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2044(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2044,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2046,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2266,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 496 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[836],C_fix(8),t2);}
-
-/* k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2266,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 497 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[833],C_fix(8),((C_word*)t0)[2]);}
-
-/* k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2272,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 499 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[57],C_fix(13),lf[840],C_SCHEME_TRUE);}
-
-/* k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2275,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 500 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[58],C_fix(13),lf[839],C_SCHEME_TRUE);}
-
-/* k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2275,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2278,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 501 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[836],C_fix(13),lf[838],C_SCHEME_FALSE);}
-
-/* k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2278,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2281,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 502 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[836],C_fix(13),lf[837],C_SCHEME_TRUE);}
-
-/* k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2281(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2281,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 503 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[833],C_fix(13),lf[835],C_SCHEME_FALSE);}
-
-/* k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 504 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[833],C_fix(13),lf[834],C_SCHEME_TRUE);}
-
-/* k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2287,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 505 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[831],C_fix(13),lf[832],C_SCHEME_TRUE);}
-
-/* k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 506 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[829],C_fix(13),lf[830],C_SCHEME_TRUE);}
-
-/* k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 507 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[827],C_fix(13),lf[828],C_SCHEME_TRUE);}
-
-/* k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2299,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 509 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[825],C_fix(2),C_fix(1),lf[826],C_SCHEME_FALSE);}
-
-/* k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2299,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2302,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 510 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[823],C_fix(2),C_fix(1),lf[824],C_SCHEME_FALSE);}
-
-/* k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2302,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 511 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[778],C_fix(2),C_fix(1),lf[822],C_SCHEME_FALSE);}
-
-/* k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2305,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2308,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 512 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[820],C_fix(2),C_fix(1),lf[821],C_SCHEME_FALSE);}
-
-/* k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2308,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2311,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 513 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[818],C_fix(2),C_fix(1),lf[819],C_SCHEME_FALSE);}
-
-/* k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2311,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2314,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 514 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[816],C_fix(2),C_fix(1),lf[817],C_SCHEME_FALSE);}
-
-/* k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 515 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[814],C_fix(2),C_fix(1),lf[815],C_SCHEME_FALSE);}
-
-/* k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2317,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2320,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 516 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[812],C_fix(2),C_fix(1),lf[813],C_SCHEME_FALSE);}
-
-/* k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2320,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2323,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 517 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[810],C_fix(2),C_fix(1),lf[811],C_SCHEME_FALSE);}
-
-/* k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2323,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2326,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 518 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[776],C_fix(2),C_fix(1),lf[809],C_SCHEME_FALSE);}
-
-/* k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2326(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2326,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 519 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[807],C_fix(2),C_fix(1),lf[808],C_SCHEME_FALSE);}
-
-/* k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2329,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2332,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 520 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[805],C_fix(2),C_fix(1),lf[806],C_SCHEME_FALSE);}
-
-/* k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2332,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2335,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 521 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[803],C_fix(2),C_fix(1),lf[804],C_SCHEME_FALSE);}
-
-/* k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2335,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2338,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 522 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[801],C_fix(2),C_fix(1),lf[802],C_SCHEME_FALSE);}
-
-/* k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2338,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2341,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 523 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[799],C_fix(2),C_fix(1),lf[800],C_SCHEME_FALSE);}
-
-/* k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2341,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2344,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 524 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[797],C_fix(2),C_fix(1),lf[798],C_SCHEME_FALSE);}
-
-/* k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2344,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2347,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 525 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[795],C_fix(2),C_fix(1),lf[796],C_SCHEME_FALSE);}
-
-/* k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2350,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 526 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[793],C_fix(2),C_fix(1),lf[794],C_SCHEME_FALSE);}
-
-/* k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2350,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2353,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 527 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[791],C_fix(2),C_fix(1),lf[792],C_SCHEME_FALSE);}
-
-/* k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2353,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2356,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 528 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[789],C_fix(2),C_fix(1),lf[790],C_SCHEME_FALSE);}
-
-/* k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2356,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2359,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 529 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[787],C_fix(2),C_fix(1),lf[788],C_SCHEME_FALSE);}
-
-/* k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2362,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 530 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[785],C_fix(2),C_fix(1),lf[786],C_SCHEME_FALSE);}
-
-/* k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2362,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2365,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 531 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[783],C_fix(2),C_fix(1),lf[784],C_SCHEME_FALSE);}
-
-/* k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2365,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2368,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 532 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[781],C_fix(2),C_fix(1),lf[782],C_SCHEME_FALSE);}
-
-/* k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2368,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 533 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[774],C_fix(2),C_fix(1),lf[780],C_SCHEME_FALSE);}
-
-/* k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2371,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2374,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 535 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[778],C_fix(2),C_fix(1),lf[779],C_SCHEME_TRUE);}
-
-/* k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2377,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 536 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[776],C_fix(2),C_fix(1),lf[777],C_SCHEME_TRUE);}
-
-/* k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2377(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2377,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2380,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 537 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[774],C_fix(2),C_fix(1),lf[775],C_SCHEME_TRUE);}
-
-/* k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2380(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2380,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2383,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 539 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[771],C_fix(7),C_fix(1),lf[773],C_fix(1),C_SCHEME_FALSE);}
-
-/* k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2383,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2386,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 540 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[771],C_fix(2),C_fix(1),lf[772],C_SCHEME_TRUE);}
-
-/* k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2386,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2389,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 542 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[769],C_fix(1),C_fix(2),lf[770]);}
-
-/* k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2389(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2389,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2392,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 543 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[767],C_fix(1),C_fix(2),lf[768]);}
-
-/* k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2392,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2395,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 544 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[765],C_fix(1),C_fix(2),lf[766]);}
-
-/* k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2395,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2398,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 545 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[763],C_fix(1),C_fix(2),lf[764]);}
-
-/* k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2398,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2401,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 547 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[760],C_fix(2),C_fix(2),lf[762],C_SCHEME_FALSE);}
-
-/* k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2401(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2401,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2404,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 548 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[760],C_fix(2),C_fix(2),lf[761],C_SCHEME_TRUE);}
-
-/* k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2404(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2404,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2407,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 549 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[758],C_fix(2),C_fix(1),lf[759],C_SCHEME_TRUE);}
-
-/* k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2407(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2407,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2410,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 550 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[756],C_fix(2),C_fix(1),lf[757],C_SCHEME_TRUE);}
-
-/* k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2410,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2413,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 551 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[754],C_fix(2),C_fix(1),lf[755],C_SCHEME_TRUE);}
-
-/* k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2413(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2413,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2416,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 552 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[752],C_fix(2),C_fix(1),lf[753],C_SCHEME_TRUE);}
-
-/* k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2416,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2419,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 553 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[750],C_fix(2),C_fix(1),lf[751],C_SCHEME_TRUE);}
-
-/* k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2419(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2419,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2422,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 554 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[748],C_fix(2),C_fix(1),lf[749],C_SCHEME_TRUE);}
-
-/* k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2422,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2425,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 555 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[746],C_fix(2),C_fix(1),lf[747],C_SCHEME_TRUE);}
-
-/* k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2425,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2428,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 556 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[744],C_fix(2),C_fix(1),lf[745],C_SCHEME_TRUE);}
-
-/* k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2428,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2431,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 557 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[742],C_fix(2),C_fix(1),lf[743],C_SCHEME_TRUE);}
-
-/* k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2431,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2434,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 558 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[740],C_fix(2),C_fix(1),lf[741],C_SCHEME_TRUE);}
-
-/* k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2434(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2434,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2437,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 559 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[738],C_fix(2),C_fix(1),lf[739],C_SCHEME_TRUE);}
-
-/* k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2437(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2437,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2440,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 560 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[736],C_fix(2),C_fix(1),lf[737],C_SCHEME_TRUE);}
-
-/* k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2440,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2443,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 561 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[734],C_fix(2),C_fix(1),lf[735],C_SCHEME_TRUE);}
-
-/* k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2443,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2446,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 562 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[732],C_fix(2),C_fix(1),lf[733],C_SCHEME_TRUE);}
-
-/* k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2446,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2449,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 563 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[730],C_fix(2),C_fix(1),lf[731],C_SCHEME_TRUE);}
-
-/* k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2449,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2452,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 564 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[728],C_fix(2),C_fix(1),lf[729],C_SCHEME_TRUE);}
-
-/* k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2452,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2455,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 565 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[726],C_fix(2),C_fix(1),lf[727],C_SCHEME_TRUE);}
-
-/* k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2455,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2458,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 566 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[724],C_fix(2),C_fix(1),lf[725],C_SCHEME_TRUE);}
-
-/* k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2458,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2461,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 567 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[722],C_fix(2),C_fix(1),lf[723],C_SCHEME_TRUE);}
-
-/* k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2461,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2464,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 568 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[720],C_fix(2),C_fix(1),lf[721],C_SCHEME_TRUE);}
-
-/* k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2464,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2467,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 569 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[718],C_fix(2),C_fix(1),lf[719],C_SCHEME_TRUE);}
-
-/* k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2467,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2470,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 570 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[716],C_fix(2),C_fix(1),lf[717],C_SCHEME_TRUE);}
-
-/* k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2470,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2473,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 571 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[714],C_fix(2),C_fix(1),lf[715],C_SCHEME_FALSE);}
-
-/* k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2473(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2473,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2476,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 572 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[712],C_fix(2),C_fix(1),lf[713],C_SCHEME_FALSE);}
-
-/* k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2476,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2479,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 573 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[710],C_fix(2),C_fix(1),lf[711],C_SCHEME_TRUE);}
-
-/* k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2479(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2479,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2482,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 574 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[708],C_fix(2),C_fix(1),lf[709],C_SCHEME_TRUE);}
-
-/* k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2482(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2482,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2485,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 575 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[706],C_fix(2),C_fix(1),lf[707],C_SCHEME_TRUE);}
-
-/* k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2485,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2488,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 576 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[705],C_SCHEME_FALSE);}
-
-/* k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2491,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 577 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[704],C_SCHEME_TRUE);}
-
-/* k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2491,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2494,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 578 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[703],C_SCHEME_FALSE);}
-
-/* k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2494(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2494,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2497,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 579 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[701],C_SCHEME_FALSE);}
-
-/* k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2497,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2500,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 580 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[700],C_SCHEME_TRUE);}
-
-/* k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2500(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2500,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2503,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 581 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[699],C_SCHEME_FALSE);}
-
-/* k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2503(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2503,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2506,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 582 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[696],C_fix(2),C_fix(1),lf[697],C_SCHEME_TRUE);}
-
-/* k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2506(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2506,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2509,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 583 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[694],C_fix(2),C_fix(1),lf[695],C_SCHEME_TRUE);}
-
-/* k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2509,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2512,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 584 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[692],C_fix(2),C_fix(1),lf[693],C_SCHEME_TRUE);}
-
-/* k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2512,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2515,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 585 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[689],C_fix(2),C_fix(2),lf[691],C_SCHEME_FALSE);}
-
-/* k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2515(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2515,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2518,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 586 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[689],C_fix(2),C_fix(2),lf[690],C_SCHEME_TRUE);}
-
-/* k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2518,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2521,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 587 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[686],C_fix(2),C_fix(3),lf[688],C_SCHEME_FALSE);}
-
-/* k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2521,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2524,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 588 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[686],C_fix(2),C_fix(3),lf[687],C_SCHEME_TRUE);}
-
-/* k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2524,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2527,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 589 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[683],C_fix(2),C_fix(2),lf[685],C_SCHEME_FALSE);}
-
-/* k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2527(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2527,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2530,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 590 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[683],C_fix(2),C_fix(2),lf[684],C_SCHEME_TRUE);}
-
-/* k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2533,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 591 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[681],C_fix(2),C_fix(2),lf[682],C_SCHEME_TRUE);}
-
-/* k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2533,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2536,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 592 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[679],C_fix(2),C_fix(2),lf[680],C_SCHEME_TRUE);}
-
-/* k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2536,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2539,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 593 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[677],C_fix(2),C_fix(2),lf[678],C_SCHEME_TRUE);}
-
-/* k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2539(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2539,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2542,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 594 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[675],C_fix(2),C_fix(2),lf[676],C_SCHEME_TRUE);}
-
-/* k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2542,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2545,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 595 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[673],C_fix(2),C_fix(2),lf[674],C_SCHEME_TRUE);}
-
-/* k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2545,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 596 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[671],C_fix(2),C_fix(2),lf[672],C_SCHEME_TRUE);}
-
-/* k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2548,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 597 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[669],C_fix(2),C_fix(2),lf[670],C_SCHEME_TRUE);}
-
-/* k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2554,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 598 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[667],C_fix(2),C_fix(1),lf[668],C_SCHEME_TRUE);}
-
-/* k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2554(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2554,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2557,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 599 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[665],C_fix(2),C_fix(1),lf[666],C_SCHEME_TRUE);}
-
-/* k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2557(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2557,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2560,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 600 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[663],C_fix(2),C_fix(2),lf[664],C_SCHEME_TRUE);}
-
-/* k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2560(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2560,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2563,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 601 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[661],C_fix(2),C_fix(2),lf[662],C_SCHEME_FALSE);}
-
-/* k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2563,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2566,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 602 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[659],C_fix(2),C_fix(2),lf[660],C_SCHEME_FALSE);}
-
-/* k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2566,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2569,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 603 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[657],C_fix(2),C_fix(2),lf[658],C_SCHEME_TRUE);}
-
-/* k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2569,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2572,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 604 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[655],C_fix(2),C_fix(2),lf[656],C_SCHEME_TRUE);}
-
-/* k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2572(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2572,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2575,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 605 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[653],C_fix(2),C_fix(2),lf[654],C_SCHEME_TRUE);}
-
-/* k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2575(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2575,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2578,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 606 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[651],C_fix(2),C_fix(2),lf[652],C_SCHEME_TRUE);}
-
-/* k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2578(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2578,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2581,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 607 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[649],C_fix(2),C_fix(2),lf[650],C_SCHEME_TRUE);}
-
-/* k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2581,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2584,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 608 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[647],C_fix(2),C_fix(2),lf[648],C_SCHEME_FALSE);}
-
-/* k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2584,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2587,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 609 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[645],C_fix(2),C_fix(2),lf[646],C_SCHEME_FALSE);}
-
-/* k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2587,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2590,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 610 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[643],C_fix(2),C_fix(2),lf[644],C_SCHEME_FALSE);}
-
-/* k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2590(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2590,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2593,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 611 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[641],C_fix(2),C_fix(2),lf[642],C_SCHEME_FALSE);}
-
-/* k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2593,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2596,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 612 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[639],C_fix(2),C_fix(2),lf[640],C_SCHEME_FALSE);}
-
-/* k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2596(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2596,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2599,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 613 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[637],C_fix(2),C_fix(2),lf[638],C_SCHEME_FALSE);}
-
-/* k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2599(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2599,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2602,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 614 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[635],C_fix(2),C_fix(2),lf[636],C_SCHEME_FALSE);}
-
-/* k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2602,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2605,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 615 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[633],C_fix(2),C_fix(2),lf[634],C_SCHEME_FALSE);}
-
-/* k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2605,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2608,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 616 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[631],C_fix(2),C_fix(2),lf[632],C_SCHEME_FALSE);}
-
-/* k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2608,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2611,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 617 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[629],C_fix(2),C_fix(1),lf[630],C_SCHEME_TRUE);}
-
-/* k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2611(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2611,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2614,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 618 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[627],C_fix(2),C_fix(1),lf[628],C_SCHEME_TRUE);}
-
-/* k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2614,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2617,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 619 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[625],C_fix(2),C_fix(1),lf[626],C_SCHEME_TRUE);}
-
-/* k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2617,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2620,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 620 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[623],C_fix(2),C_fix(1),lf[624],C_SCHEME_TRUE);}
-
-/* k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2620(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2620,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2623,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 621 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[621],C_fix(2),C_fix(1),lf[622],C_SCHEME_TRUE);}
-
-/* k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2623,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2626,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 622 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[619],C_fix(2),C_fix(1),lf[620],C_SCHEME_TRUE);}
-
-/* k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2626,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2629,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 623 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[617],C_fix(2),C_fix(1),lf[618],C_SCHEME_TRUE);}
-
-/* k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2629,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2632,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 624 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[615],C_fix(2),C_fix(2),lf[616],C_SCHEME_TRUE);}
-
-/* k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2632,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2635,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 625 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[613],C_fix(2),C_fix(2),lf[614],C_SCHEME_TRUE);}
-
-/* k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2635,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2638,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 626 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[611],C_fix(2),C_fix(2),lf[612],C_SCHEME_TRUE);}
-
-/* k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2638,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2641,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 627 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[609],C_fix(2),C_fix(2),lf[610],C_SCHEME_FALSE);}
-
-/* k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2641,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2644,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 628 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[607],C_fix(2),C_fix(1),lf[608],C_SCHEME_FALSE);}
-
-/* k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2644,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2647,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 630 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[603],C_fix(14),lf[34],C_fix(2),lf[605],lf[606]);}
-
-/* k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2647(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2647,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2650,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 631 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[603],C_fix(2),C_fix(2),lf[604],C_SCHEME_TRUE);}
-
-/* k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2650,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2653,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 632 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[599],C_fix(14),lf[34],C_fix(2),lf[601],lf[602]);}
-
-/* k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2653,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2656,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 633 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[599],C_fix(2),C_fix(2),lf[600],C_SCHEME_TRUE);}
-
-/* k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2656,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2659,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 634 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[596],C_fix(17),C_fix(2),lf[597],lf[598]);}
-
-/* k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2659,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2662,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 635 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[593],C_fix(17),C_fix(2),lf[594],lf[595]);}
-
-/* k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2662,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2665,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 636 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[591],C_fix(2),C_fix(2),lf[592],C_SCHEME_TRUE);}
-
-/* k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2665,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2668,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 637 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[589],C_fix(2),C_fix(2),lf[590],C_SCHEME_TRUE);}
-
-/* k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2668(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2668,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2671,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 639 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[586],C_fix(4),lf[313],C_fix(0));}
-
-/* k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2671,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2674,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 640 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[583],C_fix(4),lf[313],C_fix(1));}
-
-/* k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2674,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2677,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 641 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[586],C_fix(17),C_fix(2),lf[587],lf[588]);}
-
-/* k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2677,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2680,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 642 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[583],C_fix(17),C_fix(2),lf[584],lf[585]);}
-
-/* k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2680,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2683,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 644 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[579],C_fix(14),lf[34],C_fix(1),lf[581],lf[582]);}
-
-/* k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2683,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2686,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 645 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[579],C_fix(16),C_fix(1),lf[580],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2686,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2689,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 647 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[575],C_fix(21),C_fix(0),lf[576],lf[577],lf[578],*((C_word*)lf[9]+1));}
-
-/* k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2689,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2692,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 648 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[571],C_fix(21),C_fix(-1),lf[572],lf[573],lf[574],*((C_word*)lf[9]+1));}
-
-/* k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2692(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2692,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2695,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 649 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[567],C_fix(21),C_fix(0),lf[568],lf[569],lf[570],*((C_word*)lf[9]+1));}
-
-/* k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2695(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2695,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2698,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 651 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[564],C_fix(22),C_fix(1),lf[565],C_SCHEME_TRUE,*((C_word*)lf[9]+1),lf[566]);}
-
-/* k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2698(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2698,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2701,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 653 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[562],C_fix(16),C_fix(2),lf[563],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2701,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2704,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 654 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[560],C_fix(16),C_fix(2),lf[561],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2704,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2707,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 655 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[558],C_fix(16),C_fix(2),lf[559],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2707,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2710,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 656 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[556],C_fix(16),C_fix(2),lf[557],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2710,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2713,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 657 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[554],C_fix(16),C_fix(1),lf[555],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2713,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2716,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 659 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[552],C_fix(16),C_fix(1),lf[553],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2716(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2716,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2719,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 660 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[550],C_fix(16),C_fix(1),lf[551],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2719,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2722,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 661 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[548],C_fix(16),C_fix(1),lf[549],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2725,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 662 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[546],C_fix(16),C_fix(1),lf[547],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2725,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2728,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 663 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[544],C_fix(16),C_fix(1),lf[545],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2728,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2731,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 664 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[542],C_fix(16),C_fix(1),lf[543],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2731,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2734,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 665 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[540],C_fix(16),C_fix(1),lf[541],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2734,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2737,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 666 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[535],C_fix(16),C_fix(1),lf[539],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2737,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2740,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 667 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[537],C_fix(16),C_fix(1),lf[538],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2740,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2743,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 668 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[535],C_fix(16),C_fix(2),lf[536],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-
-/* k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2743,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2746,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 670 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(5),lf[534],C_fix(0),lf[34]);}
-
-/* k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2746,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2749,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 671 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(2),C_fix(1),lf[533],C_SCHEME_TRUE);}
-
-/* k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2749(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2749,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2752,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 672 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(2),C_fix(1),lf[532],C_SCHEME_FALSE);}
-
-/* k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2752(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2752,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2755,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 673 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(5),lf[530],C_fix(0),lf[34]);}
-
-/* k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2755,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2758,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 674 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(5),lf[529],C_fix(0),lf[367]);}
-
-/* k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2758,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2761,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 675 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(2),C_fix(1),lf[528],C_SCHEME_TRUE);}
-
-/* k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2761,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2764,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 676 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(2),C_fix(1),lf[527],C_SCHEME_FALSE);}
-
-/* k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2764(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2764,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2767,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 677 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(5),lf[525],C_fix(0),lf[34]);}
-
-/* k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2767,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2770,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 678 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(5),lf[524],C_fix(0),lf[367]);}
-
-/* k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2770(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2770,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2773,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 679 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(2),C_fix(1),lf[523],C_SCHEME_TRUE);}
-
-/* k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2773(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2773,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2776,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 680 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(2),C_fix(1),lf[522],C_SCHEME_FALSE);}
-
-/* k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2776(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2776,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2779,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 682 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[509],C_fix(6),lf[519],lf[520],C_SCHEME_FALSE);}
-
-/* k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2779,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2782,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 683 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[505],C_fix(6),lf[517],lf[518],C_SCHEME_FALSE);}
-
-/* k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2782(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2782,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2785,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 684 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[514],C_fix(6),lf[515],lf[516],C_SCHEME_TRUE);}
-
-/* k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2785,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2788,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 685 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[511],C_fix(6),lf[512],lf[513],C_SCHEME_TRUE);}
-
-/* k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2788(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2788,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2791,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 687 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[509],C_fix(2),C_fix(1),lf[510],C_SCHEME_TRUE);}
-
-/* k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2791,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2794,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 688 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[507],C_fix(2),C_fix(1),lf[508],C_SCHEME_TRUE);}
-
-/* k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2794(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2794,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2797,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 689 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[505],C_fix(2),C_fix(1),lf[506],C_SCHEME_TRUE);}
-
-/* k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2797,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2800,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 690 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[503],C_fix(2),C_fix(1),lf[504],C_SCHEME_TRUE);}
-
-/* k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2800(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2800,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2803,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 692 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[491],C_fix(2),C_fix(1),lf[502],C_SCHEME_TRUE);}
-
-/* k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2803,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2806,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 693 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[489],C_fix(2),C_fix(1),lf[501],C_SCHEME_TRUE);}
-
-/* k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2806,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2809,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 694 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[487],C_fix(2),C_fix(1),lf[500],C_SCHEME_TRUE);}
-
-/* k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2809,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2812,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 695 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[485],C_fix(2),C_fix(1),lf[499],C_SCHEME_TRUE);}
-
-/* k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2812(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2812,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2815,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 696 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[483],C_fix(2),C_fix(1),lf[498],C_SCHEME_TRUE);}
-
-/* k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2815,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2818,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 697 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[481],C_fix(2),C_fix(1),lf[497],C_SCHEME_TRUE);}
-
-/* k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2818,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2821,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 698 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[479],C_fix(2),C_fix(1),lf[496],C_SCHEME_TRUE);}
-
-/* k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2821(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2821,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2824,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 699 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[477],C_fix(2),C_fix(1),lf[495],C_SCHEME_TRUE);}
-
-/* k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2824(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2824,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2827,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 700 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[475],C_fix(2),C_fix(2),lf[494],C_SCHEME_TRUE);}
-
-/* k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2827(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2827,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2830,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 701 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[473],C_fix(2),C_fix(1),lf[493],C_SCHEME_TRUE);}
-
-/* k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2830(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2830,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2833,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 702 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[491],C_fix(2),C_fix(2),lf[492],C_SCHEME_TRUE);}
-
-/* k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2833,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2836,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 703 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[489],C_fix(2),C_fix(2),lf[490],C_SCHEME_TRUE);}
-
-/* k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2836(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2836,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2839,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 704 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[487],C_fix(2),C_fix(2),lf[488],C_SCHEME_TRUE);}
-
-/* k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2839,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2842,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 705 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[485],C_fix(2),C_fix(2),lf[486],C_SCHEME_TRUE);}
-
-/* k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2842(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2842,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2845,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 706 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[483],C_fix(2),C_fix(2),lf[484],C_SCHEME_TRUE);}
-
-/* k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2845(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2845,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2848,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 707 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[481],C_fix(2),C_fix(2),lf[482],C_SCHEME_TRUE);}
-
-/* k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2848(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2848,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2851,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 708 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[479],C_fix(2),C_fix(2),lf[480],C_SCHEME_TRUE);}
-
-/* k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2851,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 709 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[477],C_fix(2),C_fix(2),lf[478],C_SCHEME_TRUE);}
-
-/* k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2854,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2857,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 710 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[475],C_fix(2),C_fix(3),lf[476],C_SCHEME_TRUE);}
-
-/* k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2857,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2860,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 711 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[473],C_fix(2),C_fix(2),lf[474],C_SCHEME_TRUE);}
-
-/* k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2860,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2863,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 713 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[413],C_fix(9),lf[471],lf[472],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2866,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 714 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[411],C_fix(9),lf[469],lf[470],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-
-/* k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2866,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2869,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 715 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[409],C_fix(9),lf[467],lf[468],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-
-/* k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2869,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2872,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 716 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[407],C_fix(9),lf[465],lf[466],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-
-/* k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2872,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2875,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 717 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[405],C_fix(9),lf[463],lf[464],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-
-/* k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2875(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2875,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2878,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 719 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[462],C_fix(11),C_fix(1),lf[127],C_SCHEME_TRUE);}
-
-/* k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2878,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2881,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 720 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[460],C_fix(11),C_fix(2),lf[461],C_SCHEME_TRUE);}
-
-/* k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2881(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2881,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2884,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 721 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[458],C_fix(11),C_fix(2),lf[459],C_SCHEME_TRUE);}
-
-/* k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2884(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2884,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2887,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 722 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[457],C_fix(11),C_fix(3),lf[313],C_SCHEME_TRUE);}
-
-/* k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2887,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2890,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 723 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[456],C_fix(11),C_fix(3),lf[313],C_SCHEME_FALSE);}
-
-/* k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2890,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2893,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 724 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[455],C_fix(11),C_SCHEME_FALSE,lf[320],C_SCHEME_FALSE);}
-
-/* k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2896,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 725 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[453],C_fix(11),C_fix(3),lf[454],C_SCHEME_FALSE);}
-
-/* k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2899,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 726 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[451],C_fix(11),C_fix(2),lf[452],C_SCHEME_FALSE);}
-
-/* k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2899,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2902,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 727 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[449],C_fix(11),C_fix(1),lf[450],C_SCHEME_TRUE);}
-
-/* k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2902(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2902,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2905,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 728 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[447],C_fix(11),C_fix(1),lf[448],C_SCHEME_TRUE);}
-
-/* k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2905(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2905,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2908,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 730 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[445],C_fix(11),C_fix(3),lf[313],C_SCHEME_FALSE);}
-
-/* k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2908,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2911,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 731 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[445],C_fix(2),C_fix(3),lf[446],C_SCHEME_TRUE);}
-
-/* k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2911,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2914,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 733 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[443],C_fix(11),C_fix(1),lf[444],C_SCHEME_TRUE);}
-
-/* k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2914,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2917,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 734 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[441],C_fix(11),C_fix(1),lf[442],C_SCHEME_TRUE);}
-
-/* k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2917(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2917,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2920,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 735 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[440],C_fix(11),C_fix(2),lf[407],C_SCHEME_TRUE);}
-
-/* k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2920(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2920,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2923,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 736 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[439],C_fix(11),C_fix(2),lf[413],C_SCHEME_TRUE);}
-
-/* k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2923,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2926,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 738 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[435],C_fix(12),lf[438],C_SCHEME_TRUE,C_fix(2));}
-
-/* k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2926,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2929,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 739 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[434],C_fix(12),lf[437],C_SCHEME_TRUE,C_fix(2));}
-
-/* k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2929(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2929,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2932,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 740 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[436],C_fix(12),C_SCHEME_FALSE,C_SCHEME_TRUE,C_fix(1));}
-
-/* k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2932(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2932,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2935,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 742 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[435],C_fix(18),C_fix(0));}
-
-/* k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2935(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2935,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2938,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 743 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[434],C_fix(18),C_fix(1));}
-
-/* k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2938(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2938,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2941,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 744 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[328],C_fix(18),C_SCHEME_END_OF_LIST);}
-
-/* k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2941,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2944,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 746 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[432],C_fix(13),lf[433],C_SCHEME_TRUE);}
-
-/* k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2944(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2944,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2947,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 748 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[421],C_fix(16),C_fix(2),lf[431],C_SCHEME_TRUE,C_fix(4));}
-
-/* k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2947(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2947,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2950,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 749 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[417],C_fix(16),C_fix(2),lf[430],C_SCHEME_TRUE,C_fix(4));}
-
-/* k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2950,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2953,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 750 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[419],C_fix(16),C_fix(2),lf[429],C_SCHEME_TRUE,C_fix(4));}
-
-/* k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2953,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2956,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 751 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[415],C_fix(16),C_fix(2),lf[428],C_SCHEME_TRUE,C_fix(4));}
-
-/* k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2956,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 752 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[413],C_fix(17),C_fix(2),lf[427]);}
-
-/* k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2962,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 753 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[411],C_fix(17),C_fix(2),lf[426]);}
-
-/* k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2965,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 754 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[409],C_fix(17),C_fix(2),lf[425]);}
-
-/* k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2965,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2968,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 755 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[407],C_fix(17),C_fix(2),lf[424]);}
-
-/* k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2968,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 756 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[405],C_fix(17),C_fix(2),lf[423]);}
-
-/* k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2971,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2974,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 758 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[421],C_fix(13),lf[422],C_SCHEME_TRUE);}
-
-/* k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2974(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2974,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2977,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 759 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[419],C_fix(13),lf[420],C_SCHEME_TRUE);}
-
-/* k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2977(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2977,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2980,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 760 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[417],C_fix(13),lf[418],C_SCHEME_TRUE);}
-
-/* k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2980,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2983,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 761 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[415],C_fix(13),lf[416],C_SCHEME_TRUE);}
-
-/* k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2983,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2986,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 762 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[413],C_fix(13),lf[414],C_SCHEME_TRUE);}
-
-/* k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2986(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2986,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2989,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 763 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[411],C_fix(13),lf[412],C_SCHEME_TRUE);}
-
-/* k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2989(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2989,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2992,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 764 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[409],C_fix(13),lf[410],C_SCHEME_TRUE);}
-
-/* k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2992(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2992,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2995,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 765 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[407],C_fix(13),lf[408],C_SCHEME_TRUE);}
-
-/* k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2995,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2998,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 766 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[405],C_fix(13),lf[406],C_SCHEME_TRUE);}
-
-/* k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2998,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3001,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 768 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[403],C_fix(13),lf[404],C_SCHEME_TRUE);}
-
-/* k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3001(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3001,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3004,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 769 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[401],C_fix(13),lf[402],C_SCHEME_TRUE);}
-
-/* k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3004,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3007,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 770 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[399],C_fix(13),lf[400],C_SCHEME_TRUE);}
-
-/* k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3007(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3007,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3010,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 771 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[397],C_fix(13),lf[398],C_SCHEME_TRUE);}
-
-/* k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3010,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3013,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 772 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[395],C_fix(13),lf[396],C_SCHEME_TRUE);}
-
-/* k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3013,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3016,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 773 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[393],C_fix(13),lf[394],C_SCHEME_TRUE);}
-
-/* k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3016(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3016,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3019,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 774 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[391],C_fix(13),lf[392],C_SCHEME_TRUE);}
-
-/* k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3019(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3019,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3022,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 775 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[389],C_fix(13),lf[390],C_SCHEME_TRUE);}
-
-/* k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3022,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3025,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 776 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[387],C_fix(13),lf[388],C_SCHEME_TRUE);}
-
-/* k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3025,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3028,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 777 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[385],C_fix(13),lf[386],C_SCHEME_TRUE);}
-
-/* k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3028,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3031,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 779 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[375],C_fix(14),lf[34],C_fix(1),lf[383],lf[384]);}
-
-/* k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3031(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3031,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3034,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 780 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[372],C_fix(14),lf[34],C_fix(1),lf[381],lf[382]);}
-
-/* k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3034(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3034,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3037,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 781 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[378],C_fix(14),lf[34],C_fix(2),lf[379],lf[380]);}
-
-/* k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3037,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3040,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 783 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[375],C_fix(2),C_fix(1),lf[377],C_SCHEME_TRUE);}
-
-/* k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3043,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 784 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[375],C_fix(2),C_fix(1),lf[376],C_SCHEME_FALSE);}
-
-/* k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3043(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3043,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3046,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 785 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[372],C_fix(2),C_fix(1),lf[374],C_SCHEME_TRUE);}
-
-/* k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3046(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3046,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3049,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 786 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[372],C_fix(2),C_fix(1),lf[373],C_SCHEME_FALSE);}
-
-/* k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3049,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 788 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[370],C_fix(15),lf[367],lf[34],lf[371],C_SCHEME_FALSE);}
-
-/* k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3052(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3052,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3055,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 789 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[369],C_fix(15),lf[367],lf[34],lf[337],C_SCHEME_FALSE);}
-
-/* k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3055,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3058,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 790 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[368],C_fix(15),lf[367],lf[34],lf[340],C_SCHEME_FALSE);}
-
-/* k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3058(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3058,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3061,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 791 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[366],C_fix(15),lf[367],lf[34],lf[335],C_SCHEME_FALSE);}
-
-/* k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3061,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3064,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 793 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[364],C_fix(16),C_fix(1),lf[365],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3064(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3064,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3067,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 794 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[362],C_fix(16),C_fix(1),lf[363],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3067,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3070,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 795 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[360],C_fix(16),C_fix(1),lf[361],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3070,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3073,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 796 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[358],C_fix(16),C_fix(1),lf[359],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3073,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3076,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 797 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[356],C_fix(16),C_fix(1),lf[357],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3076,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3079,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 798 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[354],C_fix(16),C_fix(1),lf[355],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3079(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3079,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3082,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 799 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[352],C_fix(16),C_fix(2),lf[353],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3082(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3082,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3085,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 800 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[350],C_fix(16),C_fix(1),lf[351],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3085(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3085,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3088,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 801 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[348],C_fix(16),C_fix(2),lf[349],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3088(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3088,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 802 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[346],C_fix(16),C_fix(1),lf[347],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3091(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3091,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3094,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 803 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[344],C_fix(16),C_fix(1),lf[345],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3094,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3097,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 804 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[342],C_fix(16),C_fix(1),lf[343],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3097,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3100,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 805 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[340],C_fix(16),C_fix(1),lf[341],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3100(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3100,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3103,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 806 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[335],C_fix(16),C_fix(1),lf[339],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3103,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 807 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[337],C_fix(16),C_fix(1),lf[338],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3106,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3109,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 808 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[335],C_fix(16),C_fix(1),lf[336],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3109,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3112,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 810 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[333],C_fix(16),C_fix(2),lf[334],C_SCHEME_TRUE,C_fix(3));}
-
-/* k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3112(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3112,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 811 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[331],C_fix(16),C_fix(2),lf[332],C_SCHEME_TRUE,C_fix(3));}
-
-/* k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3118,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 812 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[328],C_fix(16),C_SCHEME_FALSE,lf[329],C_SCHEME_TRUE,lf[330]);}
-
-/* k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3118(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3118,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3121,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 813 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[325],C_fix(16),C_SCHEME_FALSE,lf[326],C_SCHEME_TRUE,lf[327]);}
-
-/* k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3121,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3124,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 814 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[70],C_fix(16),C_SCHEME_FALSE,lf[324],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3124(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3124,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3127,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 815 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[322],C_fix(16),C_SCHEME_FALSE,lf[323],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3127(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3127,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3130,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 816 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[320],C_fix(16),C_SCHEME_FALSE,lf[321],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3130,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3133,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 817 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[318],C_fix(16),C_SCHEME_FALSE,lf[319],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3133,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3136,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 818 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[316],C_fix(16),C_fix(1),lf[317],C_SCHEME_FALSE,C_fix(2));}
-
-/* k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3136(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3136,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3139,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 819 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[314],C_fix(16),C_fix(1),lf[315],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4065,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 821 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[313],C_fix(8),t3);}
-
-/* a4064 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4065(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[21],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_4065,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(3));
-if(C_truep(t7)){
-t8=C_i_caddr(t5);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4103,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t10=C_slot(t8,C_fix(1));
-t11=C_eqp(lf[47],t10);
-if(C_truep(t11)){
-t12=C_slot(t8,C_fix(2));
-t13=C_i_car(t12);
-C_trace("c-platform.scm: 834 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t9,t13);}
-else{
-t12=t5;
-t13=C_a_i_record(&a,4,lf[37],lf[38],lf[311],t12);
-t14=C_a_i_list(&a,2,t4,t13);
-t15=t1;
-t16=t15;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_a_i_record(&a,4,lf[37],lf[39],lf[312],t14));}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k4101 in a4064 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4103,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[306],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[307],t4));}
-else{
-t2=((C_word*)t0)[4];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[308],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[309],t4));}}
-
-/* k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3142,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3145,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 839 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[303],C_fix(17),C_fix(2),lf[304],lf[305]);}
-
-/* k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3145(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3145,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3148,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 840 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[300],C_fix(17),C_fix(2),lf[301],lf[302]);}
-
-/* k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3148(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3148,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3151,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 841 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[298],C_fix(17),C_fix(2),lf[299]);}
-
-/* k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3151(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3151,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3154,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 842 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[296],C_fix(17),C_fix(2),lf[297]);}
-
-/* k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3154,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3157,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 843 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[293],C_fix(17),C_fix(1),lf[294],lf[295]);}
-
-/* k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3157,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3160,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 844 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[290],C_fix(17),C_fix(2),lf[291],lf[292]);}
-
-/* k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3160(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3160,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3163,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 845 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[287],C_fix(17),C_fix(2),lf[288],lf[289]);}
-
-/* k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3163(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3163,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3166,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 846 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[284],C_fix(17),C_fix(2),lf[285],lf[286]);}
-
-/* k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3166,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3169,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3909,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 848 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[283],C_fix(8),t3);}
-
-/* a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[14],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3909,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(2),t6);
-if(C_truep(t7)){
-t8=C_i_cadr(t5);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3935,a[2]=t5,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t10=C_slot(t8,C_fix(1));
-t11=C_eqp(lf[47],t10);
-if(C_truep(t11)){
-t12=C_eqp(C_retrieve(lf[35]),lf[34]);
-if(C_truep(t12)){
-t13=C_slot(t8,C_fix(2));
-t14=C_i_car(t13);
-if(C_truep(t14)){
-t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3985,a[2]=t8,a[3]=t9,a[4]=t5,a[5]=t14,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnump(t14))){
-t16=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4041,a[2]=t15,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 863 big-fixnum?");
-((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t16,t14);}
-else{
-t16=t15;
-f_3985(t16,C_SCHEME_FALSE);}}
-else{
-t15=t9;
-f_3935(t15,C_SCHEME_FALSE);}}
-else{
-t13=t9;
-f_3935(t13,C_SCHEME_FALSE);}}
-else{
-t12=t9;
-f_3935(t12,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k4039 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_3985(t2,C_i_not(t1));}
-
-/* k3983 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_3985(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3985,NULL,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[5],C_fix(0)))){
-t2=C_i_car(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=C_fixnum_negate(((C_word*)t0)[5]);
-C_trace("c-platform.scm: 867 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,t4);}
-else{
-t2=C_i_car(((C_word*)t0)[4]);
-t3=C_a_i_list(&a,2,t2,((C_word*)t0)[2]);
-t4=((C_word*)t0)[3];
-f_3935(t4,C_a_i_record(&a,4,lf[37],lf[38],lf[281],t3));}}
-else{
-t2=((C_word*)t0)[3];
-f_3935(t2,C_SCHEME_FALSE);}}
-
-/* k4009 in k3983 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4011,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_3935(t3,C_a_i_record(&a,4,lf[37],lf[38],lf[280],t2));}
-
-/* k3933 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_3935(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3935,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=C_a_i_list(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[37],lf[39],lf[275],t3));}
-else{
-t2=C_eqp(C_retrieve(lf[35]),lf[34]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-t4=C_a_i_record(&a,4,lf[37],lf[38],lf[276],t3);
-t5=C_a_i_list(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[37],lf[39],lf[277],t5));}
-else{
-t3=C_a_i_list(&a,2,lf[278],*((C_word*)lf[9]+1));
-t4=((C_word*)t0)[2];
-t5=C_a_i_record(&a,4,lf[37],lf[42],t3,t4);
-t6=C_a_i_list(&a,2,((C_word*)t0)[4],t5);
-t7=((C_word*)t0)[3];
-t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[279],t6));}}}
-
-/* k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3169(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3169,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3172,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 876 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[273],C_fix(17),C_fix(2),lf[274]);}
-
-/* k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3172,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3175,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 877 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[271],C_fix(17),C_fix(3),lf[272]);}
-
-/* k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3175,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3178,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 878 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[269],C_fix(17),C_fix(2),lf[270]);}
-
-/* k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3178,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3181,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 879 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[267],C_fix(17),C_fix(2),lf[268]);}
-
-/* k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3181(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3181,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3184,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 880 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[265],C_fix(17),C_fix(2),lf[266]);}
-
-/* k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3184,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3187,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 881 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[263],C_fix(17),C_fix(3),lf[264]);}
-
-/* k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3187,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3190,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 882 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[261],C_fix(17),C_fix(3),lf[262]);}
-
-/* k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3190,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3193,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 883 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[259],C_fix(17),C_fix(3),lf[260]);}
-
-/* k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3193,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3196,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 884 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[257],C_fix(17),C_fix(1),lf[258]);}
-
-/* k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3196,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3199,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 885 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[254],C_fix(17),C_fix(2),lf[255],lf[256]);}
-
-/* k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3199(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3199,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3202,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 886 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[252],C_fix(17),C_fix(2),lf[253]);}
-
-/* k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3202,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3205,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 887 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[250],C_fix(17),C_fix(1),lf[251]);}
-
-/* k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3205,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3208,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 888 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[248],C_fix(17),C_fix(1),lf[249]);}
-
-/* k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3208,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3211,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 889 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[246],C_fix(17),C_fix(1),lf[247]);}
-
-/* k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3211,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3214,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 890 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[244],C_fix(17),C_fix(1),lf[245]);}
-
-/* k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3214(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3214,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3217,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 891 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[242],C_fix(17),C_fix(1),lf[243]);}
-
-/* k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3217,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3220,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 892 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[239],C_fix(17),C_fix(1),lf[240],lf[241]);}
-
-/* k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3220,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3223,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 893 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[236],C_fix(17),C_fix(1),lf[237],lf[238]);}
-
-/* k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3223,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3226,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 894 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[234],C_fix(17),C_fix(1),lf[235]);}
-
-/* k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3226(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3226,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3229,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 895 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[232],C_fix(17),C_fix(1),lf[233]);}
-
-/* k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3229(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3229,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3232,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 896 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[230],C_fix(17),C_fix(2),lf[231]);}
-
-/* k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3232(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3232,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3235,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 897 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[228],C_fix(17),C_fix(1),lf[229]);}
-
-/* k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3235,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3238,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 898 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[226],C_fix(17),C_fix(1),lf[227]);}
-
-/* k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3238(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3238,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3241,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 899 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[224],C_fix(17),C_fix(1),lf[225]);}
-
-/* k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3241,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3244,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 900 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[222],C_fix(17),C_fix(1),lf[223]);}
-
-/* k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3244,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3247,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 901 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[220],C_fix(17),C_fix(2),lf[221]);}
-
-/* k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3247,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3250,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 902 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[218],C_fix(17),C_fix(1),lf[219]);}
-
-/* k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3250,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3253,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 903 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[216],C_fix(17),C_fix(1),lf[217]);}
-
-/* k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3253,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3256,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 904 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[214],C_fix(17),C_fix(1),lf[215]);}
-
-/* k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3256,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3259,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 905 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[212],C_fix(17),C_fix(1),lf[213]);}
-
-/* k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3259,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3262,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 906 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[210],C_fix(17),C_fix(2),lf[211]);}
-
-/* k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3262,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3265,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 908 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[208],C_fix(2),C_fix(1),lf[209],C_SCHEME_FALSE);}
-
-/* k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3265,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3268,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 910 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[206],C_fix(2),C_fix(2),lf[207],C_SCHEME_FALSE);}
-
-/* k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3268,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3271,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 911 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[204],C_fix(2),C_fix(2),lf[205],C_SCHEME_FALSE);}
-
-/* k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3271,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3274,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 912 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[202],C_fix(2),C_fix(2),lf[203],C_SCHEME_FALSE);}
-
-/* k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3274,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3277,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 913 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[200],C_fix(2),C_fix(2),lf[201],C_SCHEME_FALSE);}
-
-/* k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3277,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3280,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 915 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[198],C_fix(16),C_fix(2),lf[199],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3280,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3283,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 916 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[196],C_fix(16),C_fix(2),lf[197],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-
-/* k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3286,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 918 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[193],C_fix(22),C_fix(2),lf[194],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[195]);}
-
-/* k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3286,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3289,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 919 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[190],C_fix(22),C_fix(2),lf[191],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[192]);}
-
-/* k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3289,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3292,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 921 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[188],C_fix(2),C_fix(3),lf[189],C_SCHEME_FALSE);}
-
-/* k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3292,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3295,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 922 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[186],C_fix(2),C_fix(3),lf[187],C_SCHEME_FALSE);}
-
-/* k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3295(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3295,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3298,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 923 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[184],C_fix(2),C_fix(3),lf[185],C_SCHEME_FALSE);}
-
-/* k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3298,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3301,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 924 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[182],C_fix(2),C_fix(3),lf[183],C_SCHEME_FALSE);}
-
-/* k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3301(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3301,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3304,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 925 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[180],C_fix(2),C_fix(3),lf[181],C_SCHEME_FALSE);}
-
-/* k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3304(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3304,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3307,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 926 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[178],C_fix(2),C_fix(3),lf[179],C_SCHEME_FALSE);}
-
-/* k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3307(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3307,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3310,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 927 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[176],C_fix(2),C_fix(3),lf[177],C_SCHEME_FALSE);}
-
-/* k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3310,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3313,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 928 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[174],C_fix(2),C_fix(3),lf[175],C_SCHEME_FALSE);}
-
-/* k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3313,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3316,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 930 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[172],C_fix(2),C_fix(1),lf[173],C_SCHEME_FALSE);}
-
-/* k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3316,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3319,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 931 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[170],C_fix(2),C_fix(1),lf[171],C_SCHEME_FALSE);}
-
-/* k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3319,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3322,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 932 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[168],C_fix(2),C_fix(1),lf[169],C_SCHEME_FALSE);}
-
-/* k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3322(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3322,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3325,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 933 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[166],C_fix(2),C_fix(1),lf[167],C_SCHEME_FALSE);}
-
-/* k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3325(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3325,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3328,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 934 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[164],C_fix(2),C_fix(1),lf[165],C_SCHEME_FALSE);}
-
-/* k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3328(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3328,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3331,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 935 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[162],C_fix(2),C_fix(1),lf[163],C_SCHEME_FALSE);}
-
-/* k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3331,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3334,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 936 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[160],C_fix(2),C_fix(1),lf[161],C_SCHEME_FALSE);}
-
-/* k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3334,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3337,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 937 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[158],C_fix(2),C_fix(1),lf[159],C_SCHEME_FALSE);}
-
-/* k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3337,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3340,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 939 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[156],C_fix(17),C_fix(1),lf[157]);}
-
-/* k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3340,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 940 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[154],C_fix(17),C_fix(1),lf[155]);}
-
-/* k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3343,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 941 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[151],C_fix(17),C_fix(1),lf[152],lf[153]);}
-
-/* k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3346,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 943 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[149],C_fix(7),C_fix(1),lf[150],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3349,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 944 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[147],C_fix(7),C_fix(1),lf[148],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3352(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3352,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3355,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 945 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[145],C_fix(7),C_fix(1),lf[146],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3358,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 946 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[143],C_fix(7),C_fix(1),lf[144],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3358,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3361,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 947 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[141],C_fix(7),C_fix(1),lf[142],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3361,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3364,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 948 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[139],C_fix(7),C_fix(1),lf[140],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3364,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3367,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 949 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[137],C_fix(7),C_fix(1),lf[138],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3367,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3370,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 950 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[135],C_fix(7),C_fix(1),lf[136],C_fix(1),C_SCHEME_FALSE);}
-
-/* k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3370(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3370,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3372,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3507,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 978 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[134],C_fix(8),t2);}
-
-/* k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3507,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3510,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 979 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[133],C_fix(8),((C_word*)t0)[2]);}
-
-/* k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3510,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3513,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 981 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[131],C_fix(7),C_fix(1),lf[132],C_fix(10),C_SCHEME_FALSE);}
-
-/* k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3513,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 982 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[129],C_fix(20),C_fix(2),lf[130],C_fix(10),C_SCHEME_FALSE);}
-
-/* k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3516,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3518,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3660,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 1004 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[73],C_fix(8),t2);}
-
-/* k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3660,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3663,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1005 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[128],C_fix(8),((C_word*)t0)[2]);}
-
-/* k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3663,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3667,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3829,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 1035 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[127],C_fix(8),t3);}
-
-/* a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3829(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[5],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3829,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(1),t6);
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=C_slot(t8,C_fix(1));
-t10=C_eqp(lf[48],t9);
-if(C_truep(t10)){
-t11=C_slot(t8,C_fix(2));
-t12=C_i_car(t11);
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3859,a[2]=t1,a[3]=t4,a[4]=t12,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t13,t12,lf[62]);}
-else{
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k3857 in a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3859(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3859,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_assq(((C_word*)t0)[4],lf[125]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3881,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cdr(t2);
-C_trace("c-platform.scm: 1047 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t3,t4);}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k3879 in k3857 in a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3881(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3881,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[126],t2));}
-
-/* k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3667(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3667,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3670,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1049 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[124],C_fix(3),lf[123]);}
-
-/* k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3670(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3670,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3673,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1050 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[122],C_fix(3),lf[123]);}
-
-/* k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3673,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3676,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3747,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 1052 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[121],C_fix(8),t3);}
-
-/* a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3747(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[13],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3747,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(1),t6);
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3773,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3776,a[2]=t1,a[3]=t4,a[4]=t8,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
-t11=C_slot(t8,C_fix(1));
-t12=C_eqp(lf[48],t11);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3801,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
-t14=C_slot(t8,C_fix(2));
-t15=C_i_car(t14);
-C_trace("c-platform.scm: 1061 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t13,t2,t15,lf[120]);}
-else{
-t13=t10;
-f_3776(t13,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k3799 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_3776(t2,C_i_not(t1));}
-
-/* k3774 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_3776(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3776,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("c-platform.scm: 1062 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),((C_word*)t0)[5],C_SCHEME_TRUE);}
-else{
-t2=C_a_i_list(&a,1,((C_word*)t0)[4]);
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[118],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[119],t4));}}
-
-/* k3771 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3773(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3773,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[117],t2));}
-
-/* k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3676,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3679,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3702,tmp=(C_word)a,a+=2,tmp);
-C_trace("c-platform.scm: 1067 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[116],C_fix(8),t3);}
-
-/* a3701 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3702(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[19],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3702,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(2),t6);
-if(C_truep(t7)){
-t8=C_eqp(C_retrieve(lf[35]),lf[34]);
-t9=(C_truep(t8)?C_a_i_list(&a,1,lf[113]):C_a_i_list(&a,1,lf[114]));
-t10=t5;
-t11=C_a_i_record(&a,4,lf[37],lf[38],t9,t10);
-t12=C_a_i_list(&a,2,t4,t11);
-t13=t1;
-t14=t13;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_a_i_record(&a,4,lf[37],lf[39],lf[115],t12));}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3679(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3679,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3682,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1079 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[111],C_fix(23),C_fix(0),lf[112],lf[107]);}
-
-/* k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3682(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3682,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3685,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1080 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[108],C_fix(23),C_fix(1),lf[109],lf[110]);}
-
-/* k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3685,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3688,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1081 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[105],C_fix(23),C_fix(1),lf[106],lf[107]);}
-
-/* k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3688,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3691,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1082 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[103],C_fix(23),C_fix(2),lf[104],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
-
-/* k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3691(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3691,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3694,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1083 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[101],C_fix(23),C_fix(2),lf[102],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
-
-/* k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3694(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3694,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3697,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1084 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[99],C_fix(23),C_fix(2),lf[100],C_fix(0));}
-
-/* k3695 in k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3697,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3700,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 1085 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[97],C_fix(23),C_fix(2),lf[98],C_fix(0));}
-
-/* k3698 in k3695 in k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3700(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3518,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(1),t6);
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=C_slot(t8,C_fix(1));
-t10=C_eqp(lf[48],t9);
-if(C_truep(t10)){
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3537,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
-t12=C_slot(t8,C_fix(2));
-t13=C_i_car(t12);
-C_trace("c-platform.scm: 990 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t11,t2,t13,lf[87]);}
-else{
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3537(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3537,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=C_slot(t2,C_fix(1));
-t4=C_eqp(lf[76],t3);
-if(C_truep(t4)){
-t5=t1;
-t6=C_slot(t5,C_fix(2));
-t7=C_i_caddr(t6);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3554,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 993 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[96]))(4,*((C_word*)lf[96]+1),((C_word*)t0)[2],t7,t8);}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3554(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3554,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t3,C_fix(2));
-if(C_truep(t5)){
-t6=(C_truep(t4)?t4:C_i_cadr(((C_word*)t0)[5]));
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3610,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("c-platform.scm: 998 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t7,((C_word*)t0)[2],t6,lf[95]);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3610,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3606,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-platform.scm: 999 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[94]);}}
-
-/* k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3606,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3602,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-platform.scm: 1000 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[93]);}}
-
-/* k3600 in k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3602,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3598,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("c-platform.scm: 1003 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_SCHEME_FALSE);}}
-
-/* k3596 in k3600 in k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[92],t2));}
-
-/* rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3372(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3372,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-if(C_truep(C_i_pairp(t5))){
-t7=C_i_car(t5);
-t8=C_slot(t7,C_fix(1));
-t9=C_eqp(lf[47],t8);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3394,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 960 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[81]))(2,*((C_word*)lf[81]+1),t10);}
-else{
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}
-
-/* k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3394(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3394,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],C_fix(2));
-t3=C_i_car(t2);
-if(C_truep(C_fixnump(t3))){
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(32)))){
-t4=C_i_cdr(((C_word*)t0)[4]);
-t5=C_i_pairp(t4);
-t6=(C_truep(t5)?C_i_cadr(((C_word*)t0)[4]):C_a_i_record(&a,4,lf[37],lf[88],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));
-t7=C_a_i_list(&a,1,t1);
-t8=C_fixnum_increase(t3);
-t9=C_a_i_list(&a,2,lf[89],t8);
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3458,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=t9,tmp=(C_word)a,a+=7,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3460,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("c-platform.scm: 977 list-tabulate");
-((C_proc4)C_retrieve_symbol_proc(lf[91]))(4,*((C_word*)lf[91]+1),t10,t3,t11);}
-else{
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* a3459 in k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3460(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3460,3,t0,t1,t2);}
-C_trace("c-platform.scm: 977 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t1,((C_word*)t0)[2]);}
-
-/* k3456 in k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
-t2=C_a_i_record(&a,4,lf[37],lf[42],((C_word*)t0)[6],t1);
-t3=C_a_i_list(&a,2,((C_word*)t0)[5],t2);
-t4=C_a_i_record(&a,4,lf[37],lf[39],lf[90],t3);
-t5=C_a_i_list(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[37],lf[79],((C_word*)t0)[2],t5));}
-
-/* rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2046(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_2046,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(C_fix(2),t6);
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=C_i_cadr(t5);
-t10=C_slot(t8,C_fix(1));
-t11=C_eqp(lf[48],t10);
-if(C_truep(t11)){
-t12=C_slot(t9,C_fix(1));
-t13=C_eqp(lf[48],t12);
-if(C_truep(t13)){
-t14=C_slot(t9,C_fix(2));
-t15=C_i_car(t14);
-if(C_truep(t15)){
-t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2080,a[2]=t1,a[3]=t8,a[4]=t4,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 477 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t16,t2,t15,lf[87]);}
-else{
-t16=t1;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_FALSE);}}
-else{
-t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_SCHEME_FALSE);}}
-else{
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2080(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2080,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=C_slot(t2,C_fix(1));
-t4=C_eqp(lf[76],t3);
-if(C_truep(t4)){
-t5=t1;
-t6=C_slot(t5,C_fix(2));
-t7=C_i_caddr(t6);
-if(C_truep(C_i_listp(t7))){
-t8=t1;
-t9=C_slot(t8,C_fix(2));
-t10=C_i_caddr(t9);
-t11=C_i_length(t10);
-t12=C_eqp(C_fix(2),t11);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2107,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("c-platform.scm: 482 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[81]))(2,*((C_word*)lf[81]+1),t13);}
-else{
-t13=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_SCHEME_FALSE);}}
-else{
-t8=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2107,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2110,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-C_trace("c-platform.scm: 483 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[81]))(3,*((C_word*)lf[81]+1),t2,lf[86]);}
-
-/* k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2110(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2110,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2113,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-t4=C_slot(t3,C_fix(2));
-C_trace("c-platform.scm: 484 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[83]))(5,*((C_word*)lf[83]+1),t2,lf[84],lf[85],t4);}
-
-/* k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2113(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2113,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2184,a[2]=((C_word*)t0)[7],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-platform.scm: 489 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[81]))(3,*((C_word*)lf[81]+1),t3,lf[82]);}
-
-/* k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2184,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[8]);
-t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("c-platform.scm: 492 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t4,((C_word*)t0)[8]);}
-
-/* k2178 in k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2180,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[8],((C_word*)t0)[7],t1);
-t3=C_a_i_record(&a,4,lf[37],lf[39],lf[77],t2);
-t4=C_a_i_list(&a,1,t3);
-t5=C_a_i_record(&a,4,lf[37],lf[76],((C_word*)t0)[6],t4);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2155,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 495 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t6,((C_word*)t0)[2]);}
-
-/* k2153 in k2178 in k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2155,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_record(&a,4,lf[37],lf[39],lf[78],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[79],((C_word*)t0)[2],t4));}
-
-/* rvalues in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_2015(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_2015,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(1));
-if(C_truep(t7)){
-t8=C_a_i_cons(&a,2,t4,t5);
-t9=t1;
-t10=t9;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_record(&a,4,lf[37],lf[39],lf[75],t8));}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1851(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1851,NULL,5,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1857,a[2]=t3,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-platform.scm: 422 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t1,t2,C_fix(8),t6);}
-
-/* a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_1857,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(1));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1869,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
-C_trace("c-platform.scm: 429 call-with-current-continuation");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t1,t8);}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1869(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[18],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1869,3,t0,t1,t2);}
-t3=C_i_car(((C_word*)t0)[7]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1889,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1892,a[2]=t4,a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t1,a[9]=((C_word*)t0)[6],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-t6=C_slot(t3,C_fix(1));
-t7=C_eqp(lf[48],t6);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1958,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t9=C_slot(t3,C_fix(2));
-t10=C_i_car(t9);
-C_trace("c-platform.scm: 437 get");
-((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t8,((C_word*)t0)[2],t10,lf[72]);}
-else{
-t8=t5;
-f_1892(t8,C_SCHEME_FALSE);}}
-
-/* k1956 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_1892(t2,C_eqp(lf[70],t1));}
-
-/* k1890 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1892(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1892,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_truep(C_retrieve(lf[36]))?lf[65]:lf[66]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1912,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t2,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 443 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,((C_word*)t0)[7]);}
-else{
-t2=(C_truep(C_retrieve(lf[36]))?((C_word*)t0)[6]:C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=C_a_i_list(&a,1,((C_word*)t0)[6]);
-t4=((C_word*)t0)[5];
-t5=C_a_i_record(&a,4,lf[37],lf[38],t3,t4);
-t6=C_a_i_list(&a,2,((C_word*)t0)[9],t5);
-t7=((C_word*)t0)[8];
-t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[68],t6));}
-else{
-if(C_truep(((C_word*)t0)[4])){
-t3=C_a_i_list(&a,1,((C_word*)t0)[4]);
-t4=((C_word*)t0)[5];
-t5=C_a_i_record(&a,4,lf[37],lf[38],t3,t4);
-t6=C_a_i_list(&a,2,((C_word*)t0)[9],t5);
-t7=((C_word*)t0)[8];
-t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[69],t6));}
-else{
-C_trace("c-platform.scm: 446 return");
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_SCHEME_FALSE);}}}}
-
-/* k1910 in k1890 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1912(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1912,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_record(&a,4,lf[37],lf[38],((C_word*)t0)[4],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[67],t4));}
-
-/* k1887 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1889,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[64],t2));}
-
-/* rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_1632,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1642,a[2]=t4,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_trace("c-platform.scm: 395 last");
-((C_proc3)C_retrieve_symbol_proc(lf[63]))(3,*((C_word*)lf[63]+1),t6,t5);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1642,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[4]);
-t3=t1;
-t4=C_slot(t3,C_fix(1));
-t5=C_eqp(lf[47],t4);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1663,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t7=C_i_car(((C_word*)t0)[4]);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1671,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1731,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 402 butlast");
-((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t9,((C_word*)t0)[4]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1734,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t7=C_slot(t2,C_fix(1));
-t8=C_eqp(lf[48],t7);
-if(C_truep(t8)){
-t9=C_i_length(((C_word*)t0)[4]);
-t10=C_eqp(C_fix(2),t9);
-if(C_truep(t10)){
-t11=C_slot(t2,C_fix(2));
-t12=C_i_car(t11);
-if(C_truep((C_truep(C_eqp(t12,lf[57]))?C_SCHEME_TRUE:(C_truep(C_eqp(t12,lf[58]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1787,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t13,t12,lf[62]);}
-else{
-t13=t6;
-f_1734(t13,C_SCHEME_FALSE);}}
-else{
-t11=t6;
-f_1734(t11,C_SCHEME_FALSE);}}
-else{
-t9=t6;
-f_1734(t9,C_SCHEME_FALSE);}}}
-
-/* k1785 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1787,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_record(&a,4,lf[37],lf[55],lf[59],C_SCHEME_END_OF_LIST);
-t3=C_i_cadr(((C_word*)t0)[4]);
-t4=C_a_i_list(&a,3,t2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-f_1734(t5,C_a_i_record(&a,4,lf[37],lf[39],lf[60],t4));}
-else{
-t2=((C_word*)t0)[2];
-f_1734(t2,C_SCHEME_FALSE);}}
-
-/* k1732 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1734(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1734,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1749,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=C_a_i_record(&a,4,lf[37],lf[55],lf[56],C_SCHEME_END_OF_LIST);
-C_trace("c-platform.scm: 415 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k1747 in k1732 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1749(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1749,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[54],t1));}
-
-/* k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1731,2,t0,t1);}
-t2=C_i_cdr(t1);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1679,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t8=((C_word*)t0)[2];
-t9=C_slot(t8,C_fix(2));
-t10=C_i_car(t9);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1685,a[2]=t4,a[3]=t12,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t14=((C_word*)t12)[1];
-f_1685(t14,t7,t10);}
-
-/* loop433 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1685(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1685,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[44]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1714,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g449450");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1712 in loop433 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1714,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop433446");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_1685(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop433446");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_1685(t6,((C_word*)t0)[3],t5);}}
-
-/* k1677 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1679(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-platform.scm: 402 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[52]+1)))(4,*((C_word*)lf[52]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k1669 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("c-platform.scm: 400 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k1661 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1663,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[50],t1));}
-
-/* eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[11],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_1434,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(2));
-if(C_truep(t7)){
-t8=C_i_car(t5);
-t9=C_i_cadr(t5);
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1450,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t11=C_slot(t8,C_fix(1));
-t12=C_eqp(lf[48],t11);
-if(C_truep(t12)){
-t13=C_slot(t9,C_fix(1));
-t14=C_eqp(lf[48],t13);
-if(C_truep(t14)){
-t15=C_slot(t8,C_fix(2));
-t16=C_slot(t9,C_fix(2));
-if(C_truep(C_i_equalp(t15,t16))){
-t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1581,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-C_trace("c-platform.scm: 351 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t17,C_SCHEME_TRUE);}
-else{
-t17=t10;
-f_1450(t17,C_SCHEME_FALSE);}}
-else{
-t15=t10;
-f_1450(t15,C_SCHEME_FALSE);}}
-else{
-t13=t10;
-f_1450(t13,C_SCHEME_FALSE);}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k1579 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1581,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_1450(t3,C_a_i_record(&a,4,lf[37],lf[39],lf[49],t2));}
-
-/* k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1450(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1450,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1459,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[2],C_fix(1));
-t4=C_eqp(lf[47],t3);
-if(C_truep(t4)){
-t5=C_slot(((C_word*)t0)[2],C_fix(2));
-t6=C_i_car(t5);
-t7=C_i_flonump(t6);
-t8=t2;
-f_1459(t8,C_i_not(t7));}
-else{
-t5=t2;
-f_1459(t5,C_SCHEME_FALSE);}}}
-
-/* k1457 in k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1459(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1459,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1462,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_1462(t3,t1);}
-else{
-t3=C_slot(((C_word*)t0)[2],C_fix(1));
-t4=C_eqp(lf[47],t3);
-if(C_truep(t4)){
-t5=C_slot(((C_word*)t0)[2],C_fix(2));
-t6=C_i_car(t5);
-t7=C_i_flonump(t6);
-t8=t2;
-f_1462(t8,C_i_not(t7));}
-else{
-t5=t2;
-f_1462(t5,C_SCHEME_FALSE);}}}
-
-/* k1460 in k1457 in k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1462(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1462,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=C_a_i_record(&a,4,lf[37],lf[38],lf[45],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[46],t4));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* op1 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_fcall f_1354(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1354,NULL,4,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1356,a[2]=t4,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp));}
-
-/* f_1356 in op1 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
-static void C_ccall f_1356(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word ab[19],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_1356,6,t0,t1,t2,t3,t4,t5);}
-t6=C_i_length(t5);
-t7=C_eqp(t6,C_fix(1));
-if(C_truep(t7)){
-t8=C_eqp(lf[34],C_retrieve(lf[35]));
-if(C_truep(t8)){
-if(C_truep(C_retrieve(lf[36]))){
-t9=((C_word*)t0)[4];
-t10=C_a_i_list(&a,1,t9);
-t11=t5;
-t12=C_a_i_record(&a,4,lf[37],lf[38],t10,t11);
-t13=C_a_i_list(&a,2,t4,t12);
-t14=t1;
-t15=t14;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,C_a_i_record(&a,4,lf[37],lf[39],lf[40],t13));}
-else{
-t9=((C_word*)t0)[3];
-t10=C_a_i_list(&a,1,t9);
-t11=t5;
-t12=C_a_i_record(&a,4,lf[37],lf[38],t10,t11);
-t13=C_a_i_list(&a,2,t4,t12);
-t14=t1;
-t15=t14;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,C_a_i_record(&a,4,lf[37],lf[39],lf[41],t13));}}
-else{
-t9=C_a_i_list(&a,2,((C_word*)t0)[2],C_fix(4));
-t10=C_i_car(t5);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1422,a[2]=t1,a[3]=t4,a[4]=t9,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
-C_trace("c-platform.scm: 337 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t11,C_fix(1));}}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-
-/* k1420 */
-static void C_ccall f_1422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1422,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_record(&a,4,lf[37],lf[42],((C_word*)t0)[4],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[43],t4));}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[512] = {
-{"toplevel:c_platform_scm",(void*)C_platform_toplevel},
-{"f_1311:c_platform_scm",(void*)f_1311},
-{"f_1314:c_platform_scm",(void*)f_1314},
-{"f_4964:c_platform_scm",(void*)f_4964},
-{"f_1337:c_platform_scm",(void*)f_1337},
-{"f_1340:c_platform_scm",(void*)f_1340},
-{"f_4787:c_platform_scm",(void*)f_4787},
-{"f_4928:c_platform_scm",(void*)f_4928},
-{"f_4791:c_platform_scm",(void*)f_4791},
-{"f_4859:c_platform_scm",(void*)f_4859},
-{"f_4866:c_platform_scm",(void*)f_4866},
-{"f_4882:c_platform_scm",(void*)f_4882},
-{"f_4857:c_platform_scm",(void*)f_4857},
-{"f_4813:c_platform_scm",(void*)f_4813},
-{"f_1343:c_platform_scm",(void*)f_1343},
-{"f_4637:c_platform_scm",(void*)f_4637},
-{"f_4739:c_platform_scm",(void*)f_4739},
-{"f_4737:c_platform_scm",(void*)f_4737},
-{"f_4708:c_platform_scm",(void*)f_4708},
-{"f_4706:c_platform_scm",(void*)f_4706},
-{"f_1346:c_platform_scm",(void*)f_1346},
-{"f_4478:c_platform_scm",(void*)f_4478},
-{"f_4595:c_platform_scm",(void*)f_4595},
-{"f_4593:c_platform_scm",(void*)f_4593},
-{"f_4518:c_platform_scm",(void*)f_4518},
-{"f_4525:c_platform_scm",(void*)f_4525},
-{"f_4541:c_platform_scm",(void*)f_4541},
-{"f_4516:c_platform_scm",(void*)f_4516},
-{"f_1349:c_platform_scm",(void*)f_1349},
-{"f_4360:c_platform_scm",(void*)f_4360},
-{"f_4463:c_platform_scm",(void*)f_4463},
-{"f_4395:c_platform_scm",(void*)f_4395},
-{"f_4415:c_platform_scm",(void*)f_4415},
-{"f_1352:c_platform_scm",(void*)f_1352},
-{"f_4358:c_platform_scm",(void*)f_4358},
-{"f_1429:c_platform_scm",(void*)f_1429},
-{"f_4354:c_platform_scm",(void*)f_4354},
-{"f_1432:c_platform_scm",(void*)f_1432},
-{"f_1624:c_platform_scm",(void*)f_1624},
-{"f_1627:c_platform_scm",(void*)f_1627},
-{"f_4137:c_platform_scm",(void*)f_4137},
-{"f_4310:c_platform_scm",(void*)f_4310},
-{"f_4153:c_platform_scm",(void*)f_4153},
-{"f_4255:c_platform_scm",(void*)f_4255},
-{"f_4186:c_platform_scm",(void*)f_4186},
-{"f_4222:c_platform_scm",(void*)f_4222},
-{"f_4189:c_platform_scm",(void*)f_4189},
-{"f_4159:c_platform_scm",(void*)f_4159},
-{"f_1630:c_platform_scm",(void*)f_1630},
-{"f_1846:c_platform_scm",(void*)f_1846},
-{"f_1849:c_platform_scm",(void*)f_1849},
-{"f_1987:c_platform_scm",(void*)f_1987},
-{"f_1990:c_platform_scm",(void*)f_1990},
-{"f_1993:c_platform_scm",(void*)f_1993},
-{"f_1996:c_platform_scm",(void*)f_1996},
-{"f_1999:c_platform_scm",(void*)f_1999},
-{"f_2002:c_platform_scm",(void*)f_2002},
-{"f_2005:c_platform_scm",(void*)f_2005},
-{"f_2008:c_platform_scm",(void*)f_2008},
-{"f_2011:c_platform_scm",(void*)f_2011},
-{"f_2014:c_platform_scm",(void*)f_2014},
-{"f_2041:c_platform_scm",(void*)f_2041},
-{"f_2044:c_platform_scm",(void*)f_2044},
-{"f_2266:c_platform_scm",(void*)f_2266},
-{"f_2269:c_platform_scm",(void*)f_2269},
-{"f_2272:c_platform_scm",(void*)f_2272},
-{"f_2275:c_platform_scm",(void*)f_2275},
-{"f_2278:c_platform_scm",(void*)f_2278},
-{"f_2281:c_platform_scm",(void*)f_2281},
-{"f_2284:c_platform_scm",(void*)f_2284},
-{"f_2287:c_platform_scm",(void*)f_2287},
-{"f_2290:c_platform_scm",(void*)f_2290},
-{"f_2293:c_platform_scm",(void*)f_2293},
-{"f_2296:c_platform_scm",(void*)f_2296},
-{"f_2299:c_platform_scm",(void*)f_2299},
-{"f_2302:c_platform_scm",(void*)f_2302},
-{"f_2305:c_platform_scm",(void*)f_2305},
-{"f_2308:c_platform_scm",(void*)f_2308},
-{"f_2311:c_platform_scm",(void*)f_2311},
-{"f_2314:c_platform_scm",(void*)f_2314},
-{"f_2317:c_platform_scm",(void*)f_2317},
-{"f_2320:c_platform_scm",(void*)f_2320},
-{"f_2323:c_platform_scm",(void*)f_2323},
-{"f_2326:c_platform_scm",(void*)f_2326},
-{"f_2329:c_platform_scm",(void*)f_2329},
-{"f_2332:c_platform_scm",(void*)f_2332},
-{"f_2335:c_platform_scm",(void*)f_2335},
-{"f_2338:c_platform_scm",(void*)f_2338},
-{"f_2341:c_platform_scm",(void*)f_2341},
-{"f_2344:c_platform_scm",(void*)f_2344},
-{"f_2347:c_platform_scm",(void*)f_2347},
-{"f_2350:c_platform_scm",(void*)f_2350},
-{"f_2353:c_platform_scm",(void*)f_2353},
-{"f_2356:c_platform_scm",(void*)f_2356},
-{"f_2359:c_platform_scm",(void*)f_2359},
-{"f_2362:c_platform_scm",(void*)f_2362},
-{"f_2365:c_platform_scm",(void*)f_2365},
-{"f_2368:c_platform_scm",(void*)f_2368},
-{"f_2371:c_platform_scm",(void*)f_2371},
-{"f_2374:c_platform_scm",(void*)f_2374},
-{"f_2377:c_platform_scm",(void*)f_2377},
-{"f_2380:c_platform_scm",(void*)f_2380},
-{"f_2383:c_platform_scm",(void*)f_2383},
-{"f_2386:c_platform_scm",(void*)f_2386},
-{"f_2389:c_platform_scm",(void*)f_2389},
-{"f_2392:c_platform_scm",(void*)f_2392},
-{"f_2395:c_platform_scm",(void*)f_2395},
-{"f_2398:c_platform_scm",(void*)f_2398},
-{"f_2401:c_platform_scm",(void*)f_2401},
-{"f_2404:c_platform_scm",(void*)f_2404},
-{"f_2407:c_platform_scm",(void*)f_2407},
-{"f_2410:c_platform_scm",(void*)f_2410},
-{"f_2413:c_platform_scm",(void*)f_2413},
-{"f_2416:c_platform_scm",(void*)f_2416},
-{"f_2419:c_platform_scm",(void*)f_2419},
-{"f_2422:c_platform_scm",(void*)f_2422},
-{"f_2425:c_platform_scm",(void*)f_2425},
-{"f_2428:c_platform_scm",(void*)f_2428},
-{"f_2431:c_platform_scm",(void*)f_2431},
-{"f_2434:c_platform_scm",(void*)f_2434},
-{"f_2437:c_platform_scm",(void*)f_2437},
-{"f_2440:c_platform_scm",(void*)f_2440},
-{"f_2443:c_platform_scm",(void*)f_2443},
-{"f_2446:c_platform_scm",(void*)f_2446},
-{"f_2449:c_platform_scm",(void*)f_2449},
-{"f_2452:c_platform_scm",(void*)f_2452},
-{"f_2455:c_platform_scm",(void*)f_2455},
-{"f_2458:c_platform_scm",(void*)f_2458},
-{"f_2461:c_platform_scm",(void*)f_2461},
-{"f_2464:c_platform_scm",(void*)f_2464},
-{"f_2467:c_platform_scm",(void*)f_2467},
-{"f_2470:c_platform_scm",(void*)f_2470},
-{"f_2473:c_platform_scm",(void*)f_2473},
-{"f_2476:c_platform_scm",(void*)f_2476},
-{"f_2479:c_platform_scm",(void*)f_2479},
-{"f_2482:c_platform_scm",(void*)f_2482},
-{"f_2485:c_platform_scm",(void*)f_2485},
-{"f_2488:c_platform_scm",(void*)f_2488},
-{"f_2491:c_platform_scm",(void*)f_2491},
-{"f_2494:c_platform_scm",(void*)f_2494},
-{"f_2497:c_platform_scm",(void*)f_2497},
-{"f_2500:c_platform_scm",(void*)f_2500},
-{"f_2503:c_platform_scm",(void*)f_2503},
-{"f_2506:c_platform_scm",(void*)f_2506},
-{"f_2509:c_platform_scm",(void*)f_2509},
-{"f_2512:c_platform_scm",(void*)f_2512},
-{"f_2515:c_platform_scm",(void*)f_2515},
-{"f_2518:c_platform_scm",(void*)f_2518},
-{"f_2521:c_platform_scm",(void*)f_2521},
-{"f_2524:c_platform_scm",(void*)f_2524},
-{"f_2527:c_platform_scm",(void*)f_2527},
-{"f_2530:c_platform_scm",(void*)f_2530},
-{"f_2533:c_platform_scm",(void*)f_2533},
-{"f_2536:c_platform_scm",(void*)f_2536},
-{"f_2539:c_platform_scm",(void*)f_2539},
-{"f_2542:c_platform_scm",(void*)f_2542},
-{"f_2545:c_platform_scm",(void*)f_2545},
-{"f_2548:c_platform_scm",(void*)f_2548},
-{"f_2551:c_platform_scm",(void*)f_2551},
-{"f_2554:c_platform_scm",(void*)f_2554},
-{"f_2557:c_platform_scm",(void*)f_2557},
-{"f_2560:c_platform_scm",(void*)f_2560},
-{"f_2563:c_platform_scm",(void*)f_2563},
-{"f_2566:c_platform_scm",(void*)f_2566},
-{"f_2569:c_platform_scm",(void*)f_2569},
-{"f_2572:c_platform_scm",(void*)f_2572},
-{"f_2575:c_platform_scm",(void*)f_2575},
-{"f_2578:c_platform_scm",(void*)f_2578},
-{"f_2581:c_platform_scm",(void*)f_2581},
-{"f_2584:c_platform_scm",(void*)f_2584},
-{"f_2587:c_platform_scm",(void*)f_2587},
-{"f_2590:c_platform_scm",(void*)f_2590},
-{"f_2593:c_platform_scm",(void*)f_2593},
-{"f_2596:c_platform_scm",(void*)f_2596},
-{"f_2599:c_platform_scm",(void*)f_2599},
-{"f_2602:c_platform_scm",(void*)f_2602},
-{"f_2605:c_platform_scm",(void*)f_2605},
-{"f_2608:c_platform_scm",(void*)f_2608},
-{"f_2611:c_platform_scm",(void*)f_2611},
-{"f_2614:c_platform_scm",(void*)f_2614},
-{"f_2617:c_platform_scm",(void*)f_2617},
-{"f_2620:c_platform_scm",(void*)f_2620},
-{"f_2623:c_platform_scm",(void*)f_2623},
-{"f_2626:c_platform_scm",(void*)f_2626},
-{"f_2629:c_platform_scm",(void*)f_2629},
-{"f_2632:c_platform_scm",(void*)f_2632},
-{"f_2635:c_platform_scm",(void*)f_2635},
-{"f_2638:c_platform_scm",(void*)f_2638},
-{"f_2641:c_platform_scm",(void*)f_2641},
-{"f_2644:c_platform_scm",(void*)f_2644},
-{"f_2647:c_platform_scm",(void*)f_2647},
-{"f_2650:c_platform_scm",(void*)f_2650},
-{"f_2653:c_platform_scm",(void*)f_2653},
-{"f_2656:c_platform_scm",(void*)f_2656},
-{"f_2659:c_platform_scm",(void*)f_2659},
-{"f_2662:c_platform_scm",(void*)f_2662},
-{"f_2665:c_platform_scm",(void*)f_2665},
-{"f_2668:c_platform_scm",(void*)f_2668},
-{"f_2671:c_platform_scm",(void*)f_2671},
-{"f_2674:c_platform_scm",(void*)f_2674},
-{"f_2677:c_platform_scm",(void*)f_2677},
-{"f_2680:c_platform_scm",(void*)f_2680},
-{"f_2683:c_platform_scm",(void*)f_2683},
-{"f_2686:c_platform_scm",(void*)f_2686},
-{"f_2689:c_platform_scm",(void*)f_2689},
-{"f_2692:c_platform_scm",(void*)f_2692},
-{"f_2695:c_platform_scm",(void*)f_2695},
-{"f_2698:c_platform_scm",(void*)f_2698},
-{"f_2701:c_platform_scm",(void*)f_2701},
-{"f_2704:c_platform_scm",(void*)f_2704},
-{"f_2707:c_platform_scm",(void*)f_2707},
-{"f_2710:c_platform_scm",(void*)f_2710},
-{"f_2713:c_platform_scm",(void*)f_2713},
-{"f_2716:c_platform_scm",(void*)f_2716},
-{"f_2719:c_platform_scm",(void*)f_2719},
-{"f_2722:c_platform_scm",(void*)f_2722},
-{"f_2725:c_platform_scm",(void*)f_2725},
-{"f_2728:c_platform_scm",(void*)f_2728},
-{"f_2731:c_platform_scm",(void*)f_2731},
-{"f_2734:c_platform_scm",(void*)f_2734},
-{"f_2737:c_platform_scm",(void*)f_2737},
-{"f_2740:c_platform_scm",(void*)f_2740},
-{"f_2743:c_platform_scm",(void*)f_2743},
-{"f_2746:c_platform_scm",(void*)f_2746},
-{"f_2749:c_platform_scm",(void*)f_2749},
-{"f_2752:c_platform_scm",(void*)f_2752},
-{"f_2755:c_platform_scm",(void*)f_2755},
-{"f_2758:c_platform_scm",(void*)f_2758},
-{"f_2761:c_platform_scm",(void*)f_2761},
-{"f_2764:c_platform_scm",(void*)f_2764},
-{"f_2767:c_platform_scm",(void*)f_2767},
-{"f_2770:c_platform_scm",(void*)f_2770},
-{"f_2773:c_platform_scm",(void*)f_2773},
-{"f_2776:c_platform_scm",(void*)f_2776},
-{"f_2779:c_platform_scm",(void*)f_2779},
-{"f_2782:c_platform_scm",(void*)f_2782},
-{"f_2785:c_platform_scm",(void*)f_2785},
-{"f_2788:c_platform_scm",(void*)f_2788},
-{"f_2791:c_platform_scm",(void*)f_2791},
-{"f_2794:c_platform_scm",(void*)f_2794},
-{"f_2797:c_platform_scm",(void*)f_2797},
-{"f_2800:c_platform_scm",(void*)f_2800},
-{"f_2803:c_platform_scm",(void*)f_2803},
-{"f_2806:c_platform_scm",(void*)f_2806},
-{"f_2809:c_platform_scm",(void*)f_2809},
-{"f_2812:c_platform_scm",(void*)f_2812},
-{"f_2815:c_platform_scm",(void*)f_2815},
-{"f_2818:c_platform_scm",(void*)f_2818},
-{"f_2821:c_platform_scm",(void*)f_2821},
-{"f_2824:c_platform_scm",(void*)f_2824},
-{"f_2827:c_platform_scm",(void*)f_2827},
-{"f_2830:c_platform_scm",(void*)f_2830},
-{"f_2833:c_platform_scm",(void*)f_2833},
-{"f_2836:c_platform_scm",(void*)f_2836},
-{"f_2839:c_platform_scm",(void*)f_2839},
-{"f_2842:c_platform_scm",(void*)f_2842},
-{"f_2845:c_platform_scm",(void*)f_2845},
-{"f_2848:c_platform_scm",(void*)f_2848},
-{"f_2851:c_platform_scm",(void*)f_2851},
-{"f_2854:c_platform_scm",(void*)f_2854},
-{"f_2857:c_platform_scm",(void*)f_2857},
-{"f_2860:c_platform_scm",(void*)f_2860},
-{"f_2863:c_platform_scm",(void*)f_2863},
-{"f_2866:c_platform_scm",(void*)f_2866},
-{"f_2869:c_platform_scm",(void*)f_2869},
-{"f_2872:c_platform_scm",(void*)f_2872},
-{"f_2875:c_platform_scm",(void*)f_2875},
-{"f_2878:c_platform_scm",(void*)f_2878},
-{"f_2881:c_platform_scm",(void*)f_2881},
-{"f_2884:c_platform_scm",(void*)f_2884},
-{"f_2887:c_platform_scm",(void*)f_2887},
-{"f_2890:c_platform_scm",(void*)f_2890},
-{"f_2893:c_platform_scm",(void*)f_2893},
-{"f_2896:c_platform_scm",(void*)f_2896},
-{"f_2899:c_platform_scm",(void*)f_2899},
-{"f_2902:c_platform_scm",(void*)f_2902},
-{"f_2905:c_platform_scm",(void*)f_2905},
-{"f_2908:c_platform_scm",(void*)f_2908},
-{"f_2911:c_platform_scm",(void*)f_2911},
-{"f_2914:c_platform_scm",(void*)f_2914},
-{"f_2917:c_platform_scm",(void*)f_2917},
-{"f_2920:c_platform_scm",(void*)f_2920},
-{"f_2923:c_platform_scm",(void*)f_2923},
-{"f_2926:c_platform_scm",(void*)f_2926},
-{"f_2929:c_platform_scm",(void*)f_2929},
-{"f_2932:c_platform_scm",(void*)f_2932},
-{"f_2935:c_platform_scm",(void*)f_2935},
-{"f_2938:c_platform_scm",(void*)f_2938},
-{"f_2941:c_platform_scm",(void*)f_2941},
-{"f_2944:c_platform_scm",(void*)f_2944},
-{"f_2947:c_platform_scm",(void*)f_2947},
-{"f_2950:c_platform_scm",(void*)f_2950},
-{"f_2953:c_platform_scm",(void*)f_2953},
-{"f_2956:c_platform_scm",(void*)f_2956},
-{"f_2959:c_platform_scm",(void*)f_2959},
-{"f_2962:c_platform_scm",(void*)f_2962},
-{"f_2965:c_platform_scm",(void*)f_2965},
-{"f_2968:c_platform_scm",(void*)f_2968},
-{"f_2971:c_platform_scm",(void*)f_2971},
-{"f_2974:c_platform_scm",(void*)f_2974},
-{"f_2977:c_platform_scm",(void*)f_2977},
-{"f_2980:c_platform_scm",(void*)f_2980},
-{"f_2983:c_platform_scm",(void*)f_2983},
-{"f_2986:c_platform_scm",(void*)f_2986},
-{"f_2989:c_platform_scm",(void*)f_2989},
-{"f_2992:c_platform_scm",(void*)f_2992},
-{"f_2995:c_platform_scm",(void*)f_2995},
-{"f_2998:c_platform_scm",(void*)f_2998},
-{"f_3001:c_platform_scm",(void*)f_3001},
-{"f_3004:c_platform_scm",(void*)f_3004},
-{"f_3007:c_platform_scm",(void*)f_3007},
-{"f_3010:c_platform_scm",(void*)f_3010},
-{"f_3013:c_platform_scm",(void*)f_3013},
-{"f_3016:c_platform_scm",(void*)f_3016},
-{"f_3019:c_platform_scm",(void*)f_3019},
-{"f_3022:c_platform_scm",(void*)f_3022},
-{"f_3025:c_platform_scm",(void*)f_3025},
-{"f_3028:c_platform_scm",(void*)f_3028},
-{"f_3031:c_platform_scm",(void*)f_3031},
-{"f_3034:c_platform_scm",(void*)f_3034},
-{"f_3037:c_platform_scm",(void*)f_3037},
-{"f_3040:c_platform_scm",(void*)f_3040},
-{"f_3043:c_platform_scm",(void*)f_3043},
-{"f_3046:c_platform_scm",(void*)f_3046},
-{"f_3049:c_platform_scm",(void*)f_3049},
-{"f_3052:c_platform_scm",(void*)f_3052},
-{"f_3055:c_platform_scm",(void*)f_3055},
-{"f_3058:c_platform_scm",(void*)f_3058},
-{"f_3061:c_platform_scm",(void*)f_3061},
-{"f_3064:c_platform_scm",(void*)f_3064},
-{"f_3067:c_platform_scm",(void*)f_3067},
-{"f_3070:c_platform_scm",(void*)f_3070},
-{"f_3073:c_platform_scm",(void*)f_3073},
-{"f_3076:c_platform_scm",(void*)f_3076},
-{"f_3079:c_platform_scm",(void*)f_3079},
-{"f_3082:c_platform_scm",(void*)f_3082},
-{"f_3085:c_platform_scm",(void*)f_3085},
-{"f_3088:c_platform_scm",(void*)f_3088},
-{"f_3091:c_platform_scm",(void*)f_3091},
-{"f_3094:c_platform_scm",(void*)f_3094},
-{"f_3097:c_platform_scm",(void*)f_3097},
-{"f_3100:c_platform_scm",(void*)f_3100},
-{"f_3103:c_platform_scm",(void*)f_3103},
-{"f_3106:c_platform_scm",(void*)f_3106},
-{"f_3109:c_platform_scm",(void*)f_3109},
-{"f_3112:c_platform_scm",(void*)f_3112},
-{"f_3115:c_platform_scm",(void*)f_3115},
-{"f_3118:c_platform_scm",(void*)f_3118},
-{"f_3121:c_platform_scm",(void*)f_3121},
-{"f_3124:c_platform_scm",(void*)f_3124},
-{"f_3127:c_platform_scm",(void*)f_3127},
-{"f_3130:c_platform_scm",(void*)f_3130},
-{"f_3133:c_platform_scm",(void*)f_3133},
-{"f_3136:c_platform_scm",(void*)f_3136},
-{"f_3139:c_platform_scm",(void*)f_3139},
-{"f_4065:c_platform_scm",(void*)f_4065},
-{"f_4103:c_platform_scm",(void*)f_4103},
-{"f_3142:c_platform_scm",(void*)f_3142},
-{"f_3145:c_platform_scm",(void*)f_3145},
-{"f_3148:c_platform_scm",(void*)f_3148},
-{"f_3151:c_platform_scm",(void*)f_3151},
-{"f_3154:c_platform_scm",(void*)f_3154},
-{"f_3157:c_platform_scm",(void*)f_3157},
-{"f_3160:c_platform_scm",(void*)f_3160},
-{"f_3163:c_platform_scm",(void*)f_3163},
-{"f_3166:c_platform_scm",(void*)f_3166},
-{"f_3909:c_platform_scm",(void*)f_3909},
-{"f_4041:c_platform_scm",(void*)f_4041},
-{"f_3985:c_platform_scm",(void*)f_3985},
-{"f_4011:c_platform_scm",(void*)f_4011},
-{"f_3935:c_platform_scm",(void*)f_3935},
-{"f_3169:c_platform_scm",(void*)f_3169},
-{"f_3172:c_platform_scm",(void*)f_3172},
-{"f_3175:c_platform_scm",(void*)f_3175},
-{"f_3178:c_platform_scm",(void*)f_3178},
-{"f_3181:c_platform_scm",(void*)f_3181},
-{"f_3184:c_platform_scm",(void*)f_3184},
-{"f_3187:c_platform_scm",(void*)f_3187},
-{"f_3190:c_platform_scm",(void*)f_3190},
-{"f_3193:c_platform_scm",(void*)f_3193},
-{"f_3196:c_platform_scm",(void*)f_3196},
-{"f_3199:c_platform_scm",(void*)f_3199},
-{"f_3202:c_platform_scm",(void*)f_3202},
-{"f_3205:c_platform_scm",(void*)f_3205},
-{"f_3208:c_platform_scm",(void*)f_3208},
-{"f_3211:c_platform_scm",(void*)f_3211},
-{"f_3214:c_platform_scm",(void*)f_3214},
-{"f_3217:c_platform_scm",(void*)f_3217},
-{"f_3220:c_platform_scm",(void*)f_3220},
-{"f_3223:c_platform_scm",(void*)f_3223},
-{"f_3226:c_platform_scm",(void*)f_3226},
-{"f_3229:c_platform_scm",(void*)f_3229},
-{"f_3232:c_platform_scm",(void*)f_3232},
-{"f_3235:c_platform_scm",(void*)f_3235},
-{"f_3238:c_platform_scm",(void*)f_3238},
-{"f_3241:c_platform_scm",(void*)f_3241},
-{"f_3244:c_platform_scm",(void*)f_3244},
-{"f_3247:c_platform_scm",(void*)f_3247},
-{"f_3250:c_platform_scm",(void*)f_3250},
-{"f_3253:c_platform_scm",(void*)f_3253},
-{"f_3256:c_platform_scm",(void*)f_3256},
-{"f_3259:c_platform_scm",(void*)f_3259},
-{"f_3262:c_platform_scm",(void*)f_3262},
-{"f_3265:c_platform_scm",(void*)f_3265},
-{"f_3268:c_platform_scm",(void*)f_3268},
-{"f_3271:c_platform_scm",(void*)f_3271},
-{"f_3274:c_platform_scm",(void*)f_3274},
-{"f_3277:c_platform_scm",(void*)f_3277},
-{"f_3280:c_platform_scm",(void*)f_3280},
-{"f_3283:c_platform_scm",(void*)f_3283},
-{"f_3286:c_platform_scm",(void*)f_3286},
-{"f_3289:c_platform_scm",(void*)f_3289},
-{"f_3292:c_platform_scm",(void*)f_3292},
-{"f_3295:c_platform_scm",(void*)f_3295},
-{"f_3298:c_platform_scm",(void*)f_3298},
-{"f_3301:c_platform_scm",(void*)f_3301},
-{"f_3304:c_platform_scm",(void*)f_3304},
-{"f_3307:c_platform_scm",(void*)f_3307},
-{"f_3310:c_platform_scm",(void*)f_3310},
-{"f_3313:c_platform_scm",(void*)f_3313},
-{"f_3316:c_platform_scm",(void*)f_3316},
-{"f_3319:c_platform_scm",(void*)f_3319},
-{"f_3322:c_platform_scm",(void*)f_3322},
-{"f_3325:c_platform_scm",(void*)f_3325},
-{"f_3328:c_platform_scm",(void*)f_3328},
-{"f_3331:c_platform_scm",(void*)f_3331},
-{"f_3334:c_platform_scm",(void*)f_3334},
-{"f_3337:c_platform_scm",(void*)f_3337},
-{"f_3340:c_platform_scm",(void*)f_3340},
-{"f_3343:c_platform_scm",(void*)f_3343},
-{"f_3346:c_platform_scm",(void*)f_3346},
-{"f_3349:c_platform_scm",(void*)f_3349},
-{"f_3352:c_platform_scm",(void*)f_3352},
-{"f_3355:c_platform_scm",(void*)f_3355},
-{"f_3358:c_platform_scm",(void*)f_3358},
-{"f_3361:c_platform_scm",(void*)f_3361},
-{"f_3364:c_platform_scm",(void*)f_3364},
-{"f_3367:c_platform_scm",(void*)f_3367},
-{"f_3370:c_platform_scm",(void*)f_3370},
-{"f_3507:c_platform_scm",(void*)f_3507},
-{"f_3510:c_platform_scm",(void*)f_3510},
-{"f_3513:c_platform_scm",(void*)f_3513},
-{"f_3516:c_platform_scm",(void*)f_3516},
-{"f_3660:c_platform_scm",(void*)f_3660},
-{"f_3663:c_platform_scm",(void*)f_3663},
-{"f_3829:c_platform_scm",(void*)f_3829},
-{"f_3859:c_platform_scm",(void*)f_3859},
-{"f_3881:c_platform_scm",(void*)f_3881},
-{"f_3667:c_platform_scm",(void*)f_3667},
-{"f_3670:c_platform_scm",(void*)f_3670},
-{"f_3673:c_platform_scm",(void*)f_3673},
-{"f_3747:c_platform_scm",(void*)f_3747},
-{"f_3801:c_platform_scm",(void*)f_3801},
-{"f_3776:c_platform_scm",(void*)f_3776},
-{"f_3773:c_platform_scm",(void*)f_3773},
-{"f_3676:c_platform_scm",(void*)f_3676},
-{"f_3702:c_platform_scm",(void*)f_3702},
-{"f_3679:c_platform_scm",(void*)f_3679},
-{"f_3682:c_platform_scm",(void*)f_3682},
-{"f_3685:c_platform_scm",(void*)f_3685},
-{"f_3688:c_platform_scm",(void*)f_3688},
-{"f_3691:c_platform_scm",(void*)f_3691},
-{"f_3694:c_platform_scm",(void*)f_3694},
-{"f_3697:c_platform_scm",(void*)f_3697},
-{"f_3700:c_platform_scm",(void*)f_3700},
-{"f_3518:c_platform_scm",(void*)f_3518},
-{"f_3537:c_platform_scm",(void*)f_3537},
-{"f_3554:c_platform_scm",(void*)f_3554},
-{"f_3610:c_platform_scm",(void*)f_3610},
-{"f_3606:c_platform_scm",(void*)f_3606},
-{"f_3602:c_platform_scm",(void*)f_3602},
-{"f_3598:c_platform_scm",(void*)f_3598},
-{"f_3372:c_platform_scm",(void*)f_3372},
-{"f_3394:c_platform_scm",(void*)f_3394},
-{"f_3460:c_platform_scm",(void*)f_3460},
-{"f_3458:c_platform_scm",(void*)f_3458},
-{"f_2046:c_platform_scm",(void*)f_2046},
-{"f_2080:c_platform_scm",(void*)f_2080},
-{"f_2107:c_platform_scm",(void*)f_2107},
-{"f_2110:c_platform_scm",(void*)f_2110},
-{"f_2113:c_platform_scm",(void*)f_2113},
-{"f_2184:c_platform_scm",(void*)f_2184},
-{"f_2180:c_platform_scm",(void*)f_2180},
-{"f_2155:c_platform_scm",(void*)f_2155},
-{"f_2015:c_platform_scm",(void*)f_2015},
-{"f_1851:c_platform_scm",(void*)f_1851},
-{"f_1857:c_platform_scm",(void*)f_1857},
-{"f_1869:c_platform_scm",(void*)f_1869},
-{"f_1958:c_platform_scm",(void*)f_1958},
-{"f_1892:c_platform_scm",(void*)f_1892},
-{"f_1912:c_platform_scm",(void*)f_1912},
-{"f_1889:c_platform_scm",(void*)f_1889},
-{"f_1632:c_platform_scm",(void*)f_1632},
-{"f_1642:c_platform_scm",(void*)f_1642},
-{"f_1787:c_platform_scm",(void*)f_1787},
-{"f_1734:c_platform_scm",(void*)f_1734},
-{"f_1749:c_platform_scm",(void*)f_1749},
-{"f_1731:c_platform_scm",(void*)f_1731},
-{"f_1685:c_platform_scm",(void*)f_1685},
-{"f_1714:c_platform_scm",(void*)f_1714},
-{"f_1679:c_platform_scm",(void*)f_1679},
-{"f_1671:c_platform_scm",(void*)f_1671},
-{"f_1663:c_platform_scm",(void*)f_1663},
-{"f_1434:c_platform_scm",(void*)f_1434},
-{"f_1581:c_platform_scm",(void*)f_1581},
-{"f_1450:c_platform_scm",(void*)f_1450},
-{"f_1459:c_platform_scm",(void*)f_1459},
-{"f_1462:c_platform_scm",(void*)f_1462},
-{"f_1354:c_platform_scm",(void*)f_1354},
-{"f_1356:c_platform_scm",(void*)f_1356},
-{"f_1422:c_platform_scm",(void*)f_1422},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/chicken-syntax.c b/bootstrap/chicken-syntax.c
deleted file mode 100644
index 89a20216..00000000
--- a/bootstrap/chicken-syntax.c
+++ /dev/null
@@ -1,16556 +0,0 @@
-/* Generated from chicken-syntax.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:31
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: chicken-syntax.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file chicken-syntax.c
- unit: chicken_syntax
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-
-static C_TLS C_word lf[255];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,28),40,97,50,51,57,55,32,102,111,114,109,50,50,48,49,32,114,50,50,48,50,32,99,50,50,48,51,41,0,0,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,52),40,97,50,52,48,55,32,105,110,112,117,116,50,49,55,48,50,49,56,51,32,114,101,110,97,109,101,50,49,55,57,50,49,56,52,32,99,111,109,112,97,114,101,50,49,54,55,50,49,56,53,41,0,0,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,52),40,97,50,52,54,51,32,105,110,112,117,116,50,49,49,56,50,49,51,49,32,114,101,110,97,109,101,50,49,50,55,50,49,51,50,32,99,111,109,112,97,114,101,50,49,49,53,50,49,51,51,41,0,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,25),40,97,50,54,50,57,32,120,50,49,48,53,32,114,50,49,48,54,32,99,50,49,48,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,28),40,97,50,54,53,52,32,102,111,114,109,50,48,57,56,32,114,50,48,57,57,32,99,50,49,48,48,41,0,0,0,0};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,28),40,97,50,54,55,54,32,102,111,114,109,50,48,57,48,32,114,50,48,57,49,32,99,50,48,57,50,41,0,0,0,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,28),40,97,50,55,49,51,32,102,111,114,109,50,48,55,54,32,114,50,48,55,55,32,99,50,48,55,56,41,0,0,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,37),40,108,111,111,112,32,115,50,48,51,50,32,100,50,48,51,51,32,99,115,50,48,51,52,32,101,120,112,111,114,116,115,50,48,51,53,41,0,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,28),40,97,50,56,49,55,32,102,111,114,109,50,48,50,51,32,114,50,48,50,52,32,99,50,48,50,53,41,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,47),40,108,111,111,112,32,120,115,49,57,57,56,32,118,97,114,115,49,57,57,57,32,98,115,50,48,48,48,32,118,97,108,115,50,48,48,49,32,114,101,115,116,50,48,48,50,41,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,28),40,97,51,48,57,56,32,102,111,114,109,49,57,56,57,32,114,49,57,57,48,32,99,49,57,57,49,41,0,0,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,40),40,108,111,111,112,32,120,115,49,57,54,50,32,118,97,114,115,49,57,54,51,32,118,97,108,115,49,57,54,52,32,114,101,115,116,49,57,54,53,41};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,28),40,97,51,51,50,57,32,102,111,114,109,49,57,53,51,32,114,49,57,53,52,32,99,49,57,53,53,41,0,0,0,0};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,115,108,111,116,115,49,57,50,50,32,105,49,57,50,51,41,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,7),40,103,49,57,49,53,41,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,57,57,32,103,49,57,48,57,49,57,49,51,41,0,0,0,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,55,50,32,103,49,56,56,50,49,56,56,54,41,0,0,0,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,28),40,97,51,53,50,57,32,102,111,114,109,49,56,53,51,32,114,49,56,53,52,32,99,49,56,53,53,41,0,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,7),40,103,49,56,48,54,41,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,57,48,32,103,49,56,48,48,49,56,48,52,41,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,20),40,112,97,114,115,101,45,99,108,97,117,115,101,32,99,49,55,54,53,41,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,50,54,32,103,49,56,51,54,49,56,52,48,41,0,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,28),40,97,52,48,48,48,32,102,111,114,109,49,55,53,48,32,114,49,55,53,49,32,99,49,55,53,50,41,0,0,0,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,28),40,97,52,52,50,51,32,102,111,114,109,49,55,51,53,32,114,49,55,51,54,32,99,49,55,51,55,41,0,0,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,28),40,97,52,54,51,55,32,102,111,114,109,49,55,48,57,32,114,49,55,49,48,32,99,49,55,49,49,41,0,0,0,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,56,51,41,0,0,0,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,103,101,110,118,97,114,115,32,110,49,53,56,49,41,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,52,56,57,50,41,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,30),40,108,111,111,112,49,54,56,48,32,103,49,54,57,48,49,54,57,53,32,103,49,54,57,49,49,54,57,54,41,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,27),40,98,117,105,108,100,32,118,97,114,115,50,49,54,53,50,32,118,114,101,115,116,49,54,53,51,41,0,0,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,27),40,97,52,57,48,50,32,118,97,114,115,49,49,54,52,56,32,118,97,114,115,50,49,54,52,57,41,0,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,34),40,97,52,56,54,48,32,118,97,114,115,49,54,51,48,32,97,114,103,99,49,54,51,49,32,114,101,115,116,49,54,51,50,41,0,0,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,22),40,97,52,56,53,48,32,99,49,54,50,56,32,98,111,100,121,49,54,50,57,41,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,34),40,97,53,50,50,53,32,118,97,114,115,49,54,48,56,32,97,114,103,99,49,54,48,57,32,114,101,115,116,49,54,49,48,41,0,0,0,0,0,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,56,57,32,103,49,53,57,57,49,54,48,51,41,0,0,0,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,28),40,97,52,55,51,57,32,102,111,114,109,49,53,55,55,32,114,49,53,55,56,32,99,49,53,55,57,41,0,0,0,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,27),40,108,111,111,112,32,97,114,103,115,49,53,53,53,32,118,97,114,100,101,102,115,49,53,53,54,41,0,0,0,0,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,28),40,97,53,50,56,55,32,102,111,114,109,49,53,51,56,32,114,49,53,51,57,32,99,49,53,52,48,41,0,0,0,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,28),40,97,53,54,48,49,32,102,111,114,109,49,53,49,57,32,114,49,53,50,48,32,99,49,53,50,49,41,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,58),40,114,101,99,117,114,32,118,97,114,115,49,51,55,49,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,55,50,32,100,101,102,115,49,51,55,51,32,110,101,120,116,45,103,117,121,49,51,55,52,41,0,0,0,0,0,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,72),40,109,97,107,101,45,100,101,102,97,117,108,116,45,112,114,111,99,115,32,118,97,114,115,49,51,54,53,32,98,111,100,121,45,112,114,111,99,49,51,54,54,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,54,55,32,100,101,102,115,49,51,54,56,41};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,48),40,114,101,99,117,114,32,118,97,114,115,49,51,56,55,32,100,101,102,97,117,108,116,101,114,115,49,51,56,56,32,110,111,110,45,100,101,102,97,117,108,116,115,49,51,56,57,41};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,61),40,109,97,107,101,45,105,102,45,116,114,101,101,32,118,97,114,115,49,51,56,49,32,100,101,102,97,117,108,116,101,114,115,49,51,56,50,32,98,111,100,121,45,112,114,111,99,49,51,56,51,32,114,101,115,116,49,51,56,52,41,0,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,31),40,112,114,101,102,105,120,45,115,121,109,32,112,114,101,102,105,120,49,52,50,54,32,115,121,109,49,52,50,55,41,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,15),40,103,49,52,57,56,32,118,97,114,49,53,48,48,41,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,56,50,32,103,49,52,57,50,49,52,57,54,41,0,0,0,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,53,54,32,103,49,52,54,54,49,52,55,48,41,0,0,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,13),40,103,49,52,52,55,32,118,49,52,52,57,41,0,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,51,49,32,103,49,52,52,49,49,52,52,53,41,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,48,52,32,103,49,52,49,52,49,52,49,56,41,0,0,0,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,28),40,97,53,56,50,54,32,102,111,114,109,49,51,53,52,32,114,49,51,53,53,32,99,49,51,53,54,41,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,7),40,103,49,51,51,55,41,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,50,49,32,103,49,51,51,49,49,51,51,53,41,0,0,0,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,51,48,56,41,0,0,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,28),40,97,54,52,49,57,32,102,111,114,109,49,50,57,51,32,114,49,50,57,52,32,99,49,50,57,53,41,0,0,0,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,13),40,102,111,108,100,32,98,115,49,50,54,53,41,0,0,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,28),40,97,54,54,49,57,32,102,111,114,109,49,50,53,55,32,114,49,50,53,56,32,99,49,50,53,57,41,0,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,28),40,113,117,111,116,105,102,121,45,112,114,111,99,32,120,115,49,50,51,51,32,105,100,49,50,51,52,41,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,28),40,97,54,55,56,50,32,102,111,114,109,49,50,50,56,32,114,49,50,50,57,32,99,49,50,51,48,41,0,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,28),40,97,54,56,56,55,32,102,111,114,109,49,50,49,56,32,114,49,50,49,57,32,99,49,50,50,48,41,0,0,0,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,8),40,108,111,111,107,117,112,41};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,7),40,103,49,50,48,48,41,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,56,52,32,103,49,49,57,52,49,49,57,56,41,0,0,0,0};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,54,49,32,103,49,49,55,49,49,49,55,53,41,0,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,14),40,103,49,49,53,50,32,118,98,49,49,53,52,41,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,51,54,32,103,49,49,52,54,49,49,53,48,41,0,0,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,49,50,32,103,49,49,50,50,49,49,50,54,41,0,0,0,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,103,49,48,57,56,32,118,49,49,48,48,41,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,56,50,32,103,49,48,57,50,49,48,57,54,41,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,53,55,32,103,49,48,54,55,49,48,55,49,41,0,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,28),40,97,54,57,55,48,32,102,111,114,109,49,48,52,54,32,114,49,48,52,55,32,99,49,48,52,56,41,0,0,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,20),40,102,111,108,100,32,118,98,105,110,100,105,110,103,115,49,48,51,53,41,0,0,0,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,28),40,97,55,51,52,49,32,102,111,114,109,49,48,50,55,32,114,49,48,50,56,32,99,49,48,50,57,41,0,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,20),40,97,112,112,101,110,100,42,32,105,108,56,54,49,32,108,56,54,50,41,0,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,19),40,109,97,112,42,32,112,114,111,99,56,54,51,32,108,56,54,52,41,0,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,13),40,108,111,111,107,117,112,32,118,57,51,54,41,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,11),40,103,57,56,51,32,118,57,56,53,41,0,0,0,0,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,54,55,32,103,57,55,55,57,56,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,35),40,102,111,108,100,32,108,108,105,115,116,115,57,53,50,32,101,120,112,115,57,53,51,32,108,108,105,115,116,115,50,57,53,52,41,0,0,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,48,50,32,103,49,48,49,50,49,48,49,54,41,0,0,0,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,108,105,115,116,115,57,51,57,32,97,99,99,57,52,48,41,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,11),40,103,57,50,57,32,118,57,51,49,41,0,0,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,49,51,32,103,57,50,51,57,50,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,108,105,115,116,115,56,57,56,32,97,99,99,56,57,57,41,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,55,53,32,103,56,56,53,56,56,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,25),40,97,55,52,49,51,32,102,111,114,109,56,53,50,32,114,56,53,51,32,99,56,53,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,18),40,97,55,57,54,50,32,103,56,52,49,56,52,50,56,52,51,41,0,0,0,0,0,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,25),40,97,55,57,51,56,32,102,111,114,109,56,50,56,32,114,56,50,57,32,99,56,51,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,55,57,54,32,103,56,48,54,56,49,49,32,103,56,48,55,56,49,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,54,57,32,103,55,55,57,55,56,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,25),40,97,55,57,56,48,32,102,111,114,109,55,52,54,32,114,55,52,55,32,99,55,52,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,25),40,97,56,50,48,56,32,102,111,114,109,55,51,56,32,114,55,51,57,32,99,55,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,25),40,97,56,50,54,49,32,102,111,114,109,55,51,48,32,114,55,51,49,32,99,55,51,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,12),40,103,55,49,56,32,97,50,55,50,49,41,0,0,0,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,57,56,32,103,55,48,56,55,49,51,32,103,55,48,57,55,49,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,55,49,32,103,54,56,49,54,56,54,32,103,54,56,50,54,56,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,52,52,32,103,54,53,52,54,53,57,32,103,54,53,53,54,54,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,6),40,103,54,51,50,41,0,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,54,49,54,32,103,54,50,54,54,51,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,6),40,103,54,48,55,41,0,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,57,49,32,103,54,48,49,54,48,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,54,55,32,103,53,55,55,53,56,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,52,51,32,103,53,53,51,53,53,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,25),40,97,56,51,48,54,32,102,111,114,109,53,51,49,32,114,53,51,50,32,99,53,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,115,115,53,48,51,41,0,0,0,0};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,25),40,97,56,55,57,50,32,102,111,114,109,52,56,53,32,114,52,56,54,32,99,52,56,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,52,53,51,32,103,52,54,51,52,54,56,32,103,52,54,52,52,54,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,52,50,48,32,103,52,51,48,52,51,53,32,103,52,51,49,52,51,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,56,55,32,103,51,57,55,52,48,50,32,103,51,57,56,52,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,53,52,32,103,51,54,52,51,54,57,32,103,51,54,53,51,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,50,52,32,103,51,51,52,51,51,57,32,103,51,51,53,51,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,110,51,53,48,41,0,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,50,55,52,32,103,50,56,52,50,56,57,32,103,50,56,53,50,57,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,51,48,49,32,103,51,49,49,51,49,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,6),40,103,50,54,48,41,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,52,52,32,103,50,53,52,50,53,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,6),40,103,50,51,53,41,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,49,57,32,103,50,50,57,50,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,57,53,32,103,50,48,53,50,48,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,25),40,97,56,57,49,51,32,102,111,114,109,49,56,54,32,114,49,56,55,32,99,49,56,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,25),40,97,57,53,57,57,32,102,111,114,109,49,54,56,32,114,49,54,57,32,99,49,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,25),40,97,57,55,51,54,32,102,111,114,109,49,52,54,32,114,49,52,55,32,99,49,52,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,7),40,97,57,56,56,50,41,0};
-static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,22),40,100,111,108,111,111,112,49,51,53,32,120,49,51,57,32,120,115,49,52,48,41,0,0};
-static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,7),40,97,57,56,56,55,41,0};
-static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,7),40,97,57,57,50,48,41,0};
-static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,7),40,97,57,56,55,54,41,0};
-static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,25),40,97,57,56,53,48,32,102,111,114,109,49,49,52,32,114,49,49,53,32,99,49,49,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,25),40,97,57,57,51,57,32,102,111,114,109,49,48,55,32,114,49,48,56,32,99,49,48,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,22),40,97,57,57,53,55,32,102,111,114,109,57,55,32,114,57,56,32,99,57,57,41,0,0};
-static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,23),40,97,49,48,48,53,54,32,102,111,114,109,54,55,32,114,54,56,32,99,54,57,41,0};
-static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,22),40,109,97,112,115,108,111,116,115,32,115,108,111,116,115,52,55,32,105,52,56,41,0,0};
-static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,20),40,97,49,48,49,57,57,32,120,50,57,32,114,51,48,32,99,51,49,41,0,0,0,0};
-static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,22),40,97,49,48,54,52,54,32,102,111,114,109,57,32,114,49,48,32,99,49,49,41,0,0};
-static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,20),40,97,49,48,55,53,52,32,102,111,114,109,49,32,114,50,32,99,51,41,0,0,0,0};
-static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-C_noret_decl(C_chicken_syntax_toplevel)
-C_externexport void C_ccall C_chicken_syntax_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2259)
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2263)
-static void C_ccall f_2263(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10755)
-static void C_ccall f_10755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10759)
-static void C_ccall f_10759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10766)
-static void C_ccall f_10766(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10753)
-static void C_ccall f_10753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2266)
-static void C_ccall f_2266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10647)
-static void C_ccall f_10647(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10738)
-static void C_ccall f_10738(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10745)
-static void C_ccall f_10745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10660)
-static void C_ccall f_10660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10645)
-static void C_ccall f_10645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2269)
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10200)
-static void C_ccall f_10200(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10204)
-static void C_ccall f_10204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10213)
-static void C_ccall f_10213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10216)
-static void C_ccall f_10216(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10222)
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10225)
-static void C_ccall f_10225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10228)
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10231)
-static void C_ccall f_10231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10641)
-static void C_ccall f_10641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10601)
-static void C_ccall f_10601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10633)
-static void C_ccall f_10633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10593)
-static void C_ccall f_10593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10549)
-static void C_ccall f_10549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10260)
-static void C_fcall f_10260(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10270)
-static void C_ccall f_10270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10537)
-static void C_ccall f_10537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10273)
-static void C_ccall f_10273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10533)
-static void C_ccall f_10533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10276)
-static void C_ccall f_10276(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10323)
-static void C_fcall f_10323(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10287)
-static void C_ccall f_10287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10258)
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10254)
-static void C_ccall f_10254(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10198)
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2272)
-static void C_ccall f_2272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10057)
-static void C_ccall f_10057(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10061)
-static void C_ccall f_10061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10064)
-static void C_ccall f_10064(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10067)
-static void C_ccall f_10067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10103)
-static void C_ccall f_10103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10118)
-static void C_fcall f_10118(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10172)
-static void C_ccall f_10172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10133)
-static void C_ccall f_10133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10096)
-static void C_ccall f_10096(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10055)
-static void C_ccall f_10055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2275)
-static void C_ccall f_2275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9958)
-static void C_ccall f_9958(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9962)
-static void C_ccall f_9962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9965)
-static void C_ccall f_9965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9968)
-static void C_ccall f_9968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10047)
-static void C_ccall f_10047(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9956)
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2278)
-static void C_ccall f_2278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9940)
-static void C_ccall f_9940(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9948)
-static void C_ccall f_9948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9938)
-static void C_ccall f_9938(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2281)
-static void C_ccall f_2281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9851)
-static void C_ccall f_9851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9855)
-static void C_ccall f_9855(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9858)
-static void C_ccall f_9858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9861)
-static void C_ccall f_9861(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9927)
-static void C_ccall f_9927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9864)
-static void C_ccall f_9864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9877)
-static void C_ccall f_9877(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9921)
-static void C_ccall f_9921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9888)
-static void C_ccall f_9888(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9896)
-static void C_ccall f_9896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9898)
-static void C_fcall f_9898(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9915)
-static void C_ccall f_9915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9883)
-static void C_ccall f_9883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9875)
-static void C_ccall f_9875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9871)
-static void C_ccall f_9871(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9849)
-static void C_ccall f_9849(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2284)
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9737)
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9741)
-static void C_ccall f_9741(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9750)
-static void C_ccall f_9750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9753)
-static void C_ccall f_9753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9756)
-static void C_fcall f_9756(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9816)
-static void C_ccall f_9816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9791)
-static void C_ccall f_9791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9735)
-static void C_ccall f_9735(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2287)
-static void C_ccall f_2287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9600)
-static void C_ccall f_9600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9604)
-static void C_ccall f_9604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9616)
-static void C_ccall f_9616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9619)
-static void C_ccall f_9619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9622)
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9669)
-static void C_ccall f_9669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9598)
-static void C_ccall f_9598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2290)
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8914)
-static void C_ccall f_8914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8918)
-static void C_ccall f_8918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9561)
-static void C_fcall f_9561(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9590)
-static void C_ccall f_9590(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8927)
-static void C_ccall f_8927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9517)
-static void C_fcall f_9517(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9555)
-static void C_ccall f_9555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9544)
-static void C_fcall f_9544(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9552)
-static void C_ccall f_9552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8930)
-static void C_ccall f_8930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9473)
-static void C_fcall f_9473(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9511)
-static void C_ccall f_9511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9500)
-static void C_fcall f_9500(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9508)
-static void C_ccall f_9508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8933)
-static void C_ccall f_8933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8936)
-static void C_ccall f_8936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8939)
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9438)
-static void C_fcall f_9438(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9467)
-static void C_ccall f_9467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9387)
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9389)
-static void C_fcall f_9389(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9422)
-static void C_ccall f_9422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9402)
-static void C_fcall f_9402(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9298)
-static void C_ccall f_9298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9365)
-static void C_fcall f_9365(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9379)
-static void C_ccall f_9379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9310)
-static void C_ccall f_9310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9312)
-static void C_fcall f_9312(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9345)
-static void C_ccall f_9345(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9325)
-static void C_fcall f_9325(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9306)
-static void C_ccall f_9306(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9302)
-static void C_ccall f_9302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8950)
-static void C_ccall f_8950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9234)
-static void C_fcall f_9234(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9247)
-static void C_fcall f_9247(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9154)
-static void C_ccall f_9154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9172)
-static void C_fcall f_9172(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9185)
-static void C_fcall f_9185(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9162)
-static void C_ccall f_9162(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9158)
-static void C_ccall f_9158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9150)
-static void C_ccall f_9150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9142)
-static void C_ccall f_9142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9074)
-static void C_fcall f_9074(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9087)
-static void C_fcall f_9087(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8994)
-static void C_ccall f_8994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9012)
-static void C_fcall f_9012(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9025)
-static void C_fcall f_9025(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9002)
-static void C_ccall f_9002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8998)
-static void C_ccall f_8998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8990)
-static void C_ccall f_8990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8912)
-static void C_ccall f_8912(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2293)
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8793)
-static void C_ccall f_8793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8797)
-static void C_ccall f_8797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8803)
-static void C_ccall f_8803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8904)
-static void C_ccall f_8904(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8809)
-static void C_ccall f_8809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8812)
-static void C_ccall f_8812(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8815)
-static void C_ccall f_8815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8855)
-static void C_fcall f_8855(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8878)
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8885)
-static void C_ccall f_8885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8892)
-static void C_ccall f_8892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8868)
-static void C_ccall f_8868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8818)
-static void C_ccall f_8818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8791)
-static void C_ccall f_8791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2296)
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8307)
-static void C_ccall f_8307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8311)
-static void C_ccall f_8311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8320)
-static void C_ccall f_8320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8323)
-static void C_ccall f_8323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8326)
-static void C_ccall f_8326(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8754)
-static void C_fcall f_8754(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8783)
-static void C_ccall f_8783(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8329)
-static void C_ccall f_8329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8719)
-static void C_fcall f_8719(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8748)
-static void C_ccall f_8748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8332)
-static void C_ccall f_8332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8675)
-static void C_fcall f_8675(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8713)
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8702)
-static void C_fcall f_8702(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8710)
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8335)
-static void C_ccall f_8335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8631)
-static void C_fcall f_8631(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8669)
-static void C_ccall f_8669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8658)
-static void C_fcall f_8658(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8666)
-static void C_ccall f_8666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8338)
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8582)
-static void C_fcall f_8582(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8615)
-static void C_ccall f_8615(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8595)
-static void C_fcall f_8595(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8527)
-static void C_ccall f_8527(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8533)
-static void C_fcall f_8533(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8566)
-static void C_ccall f_8566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8546)
-static void C_fcall f_8546(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8531)
-static void C_ccall f_8531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8349)
-static void C_ccall f_8349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8423)
-static void C_fcall f_8423(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8436)
-static void C_fcall f_8436(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8454)
-static C_word C_fcall f_8454(C_word *a,C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_8421)
-static void C_ccall f_8421(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8417)
-static void C_ccall f_8417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8397)
-static void C_ccall f_8397(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8305)
-static void C_ccall f_8305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2299)
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8262)
-static void C_ccall f_8262(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8266)
-static void C_ccall f_8266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8273)
-static void C_ccall f_8273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8293)
-static void C_ccall f_8293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8297)
-static void C_ccall f_8297(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8260)
-static void C_ccall f_8260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2302)
-static void C_ccall f_2302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8209)
-static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8213)
-static void C_ccall f_8213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8220)
-static void C_ccall f_8220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8248)
-static void C_ccall f_8248(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8252)
-static void C_ccall f_8252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8207)
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2305)
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7981)
-static void C_ccall f_7981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7985)
-static void C_ccall f_7985(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7994)
-static void C_ccall f_7994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8166)
-static void C_fcall f_8166(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8195)
-static void C_ccall f_8195(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8063)
-static void C_ccall f_8063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8096)
-static void C_fcall f_8096(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8109)
-static void C_fcall f_8109(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8094)
-static void C_ccall f_8094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8090)
-static void C_ccall f_8090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7979)
-static void C_ccall f_7979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2308)
-static void C_ccall f_2308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7939)
-static void C_ccall f_7939(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7943)
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7963)
-static void C_ccall f_7963(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7971)
-static void C_ccall f_7971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7946)
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7953)
-static void C_ccall f_7953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7957)
-static void C_ccall f_7957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7937)
-static void C_ccall f_7937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2311)
-static void C_ccall f_2311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7414)
-static void C_ccall f_7414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7418)
-static void C_ccall f_7418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7427)
-static void C_ccall f_7427(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7430)
-static void C_ccall f_7430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7900)
-static void C_fcall f_7900(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7929)
-static void C_ccall f_7929(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7505)
-static void C_ccall f_7505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7860)
-static void C_fcall f_7860(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7873)
-static void C_ccall f_7873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7508)
-static void C_ccall f_7508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7812)
-static void C_fcall f_7812(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7854)
-static void C_ccall f_7854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7839)
-static void C_fcall f_7839(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7851)
-static void C_ccall f_7851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7847)
-static void C_ccall f_7847(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7511)
-static void C_ccall f_7511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7766)
-static void C_fcall f_7766(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7799)
-static void C_ccall f_7799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7806)
-static void C_ccall f_7806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7523)
-static void C_ccall f_7523(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7726)
-static void C_fcall f_7726(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7530)
-static void C_ccall f_7530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7532)
-static void C_fcall f_7532(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7720)
-static void C_ccall f_7720(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7604)
-static void C_fcall f_7604(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7686)
-static void C_ccall f_7686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7643)
-static void C_ccall f_7643(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7623)
-static void C_ccall f_7623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7556)
-static void C_fcall f_7556(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7594)
-static void C_ccall f_7594(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7583)
-static void C_fcall f_7583(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7591)
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7550)
-static void C_ccall f_7550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7554)
-static void C_ccall f_7554(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7512)
-static void C_ccall f_7512(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7463)
-static void C_fcall f_7463(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7486)
-static void C_ccall f_7486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7490)
-static void C_ccall f_7490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7432)
-static void C_fcall f_7432(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7453)
-static void C_ccall f_7453(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7412)
-static void C_ccall f_7412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2314)
-static void C_ccall f_2314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7342)
-static void C_ccall f_7342(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7346)
-static void C_ccall f_7346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7355)
-static void C_ccall f_7355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7358)
-static void C_ccall f_7358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7363)
-static void C_fcall f_7363(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7400)
-static void C_ccall f_7400(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7381)
-static void C_ccall f_7381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7340)
-static void C_ccall f_7340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2317)
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6971)
-static void C_ccall f_6971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6975)
-static void C_ccall f_6975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6984)
-static void C_ccall f_6984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6987)
-static void C_ccall f_6987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7298)
-static void C_fcall f_7298(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7296)
-static void C_ccall f_7296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6990)
-static void C_ccall f_6990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7246)
-static void C_fcall f_7246(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7288)
-static void C_ccall f_7288(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7273)
-static void C_fcall f_7273(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7285)
-static void C_ccall f_7285(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7281)
-static void C_ccall f_7281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6993)
-static void C_ccall f_6993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7206)
-static void C_fcall f_7206(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7013)
-static void C_ccall f_7013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7027)
-static void C_fcall f_7027(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7200)
-static void C_ccall f_7200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7054)
-static void C_fcall f_7054(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7152)
-static void C_fcall f_7152(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7082)
-static void C_ccall f_7082(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7096)
-static void C_fcall f_7096(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7123)
-static C_word C_fcall f_7123(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_7090)
-static void C_ccall f_7090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7086)
-static void C_ccall f_7086(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7021)
-static void C_ccall f_7021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7025)
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7017)
-static void C_ccall f_7017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6994)
-static C_word C_fcall f_6994(C_word t0,C_word t1);
-C_noret_decl(f_6969)
-static void C_ccall f_6969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2320)
-static void C_ccall f_2320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6965)
-static void C_ccall f_6965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6888)
-static void C_ccall f_6888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6892)
-static void C_ccall f_6892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6895)
-static void C_ccall f_6895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6898)
-static void C_ccall f_6898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6933)
-static void C_ccall f_6933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6886)
-static void C_ccall f_6886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2323)
-static void C_ccall f_2323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6783)
-static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6787)
-static void C_ccall f_6787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6874)
-static void C_ccall f_6874(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6870)
-static void C_ccall f_6870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6789)
-static void C_fcall f_6789(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6793)
-static void C_ccall f_6793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6850)
-static void C_ccall f_6850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6802)
-static void C_fcall f_6802(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6824)
-static void C_ccall f_6824(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6814)
-static void C_fcall f_6814(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6805)
-static void C_ccall f_6805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6781)
-static void C_ccall f_6781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2326)
-static void C_ccall f_2326(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6620)
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6624)
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6633)
-static void C_ccall f_6633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6636)
-static void C_ccall f_6636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6641)
-static void C_fcall f_6641(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6686)
-static void C_ccall f_6686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6753)
-static void C_ccall f_6753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6715)
-static void C_ccall f_6715(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6655)
-static void C_ccall f_6655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6659)
-static void C_ccall f_6659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6618)
-static void C_ccall f_6618(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2329)
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6420)
-static void C_ccall f_6420(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6424)
-static void C_ccall f_6424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6433)
-static void C_ccall f_6433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6436)
-static void C_ccall f_6436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6439)
-static void C_ccall f_6439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6442)
-static void C_ccall f_6442(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6445)
-static void C_ccall f_6445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6452)
-static void C_ccall f_6452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6470)
-static void C_fcall f_6470(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6486)
-static void C_ccall f_6486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6492)
-static void C_ccall f_6492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6552)
-static void C_fcall f_6552(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6579)
-static C_word C_fcall f_6579(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_6546)
-static void C_ccall f_6546(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6542)
-static void C_ccall f_6542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6534)
-static void C_ccall f_6534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6530)
-static void C_ccall f_6530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6499)
-static void C_ccall f_6499(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6468)
-static void C_ccall f_6468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6418)
-static void C_ccall f_6418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2332)
-static void C_ccall f_2332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6414)
-static void C_ccall f_6414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6410)
-static void C_ccall f_6410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5827)
-static void C_ccall f_5827(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5831)
-static void C_ccall f_5831(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5843)
-static void C_ccall f_5843(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5846)
-static void C_ccall f_5846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5849)
-static void C_ccall f_5849(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6149)
-static void C_ccall f_6149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6152)
-static void C_ccall f_6152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6361)
-static void C_fcall f_6361(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6390)
-static void C_ccall f_6390(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6155)
-static void C_ccall f_6155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6317)
-static void C_fcall f_6317(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6355)
-static void C_ccall f_6355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6344)
-static void C_fcall f_6344(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6352)
-static void C_ccall f_6352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6171)
-static void C_ccall f_6171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6282)
-static void C_fcall f_6282(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6311)
-static void C_ccall f_6311(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6174)
-static void C_ccall f_6174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6177)
-static void C_ccall f_6177(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6180)
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6238)
-static void C_fcall f_6238(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6276)
-static void C_ccall f_6276(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6265)
-static void C_fcall f_6265(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6273)
-static void C_ccall f_6273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6183)
-static void C_ccall f_6183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6186)
-static void C_ccall f_6186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6189)
-static void C_ccall f_6189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6196)
-static void C_ccall f_6196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6156)
-static void C_fcall f_6156(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6168)
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6164)
-static void C_ccall f_6164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5948)
-static void C_fcall f_5948(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5954)
-static void C_fcall f_5954(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6142)
-static void C_ccall f_6142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6130)
-static void C_ccall f_6130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6114)
-static void C_ccall f_6114(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6078)
-static void C_ccall f_6078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6028)
-static void C_ccall f_6028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6016)
-static void C_ccall f_6016(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5851)
-static void C_fcall f_5851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5859)
-static void C_ccall f_5859(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5863)
-static void C_ccall f_5863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5867)
-static void C_ccall f_5867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5869)
-static void C_fcall f_5869(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5922)
-static void C_ccall f_5922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5938)
-static void C_ccall f_5938(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5934)
-static void C_ccall f_5934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5890)
-static void C_ccall f_5890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5825)
-static void C_ccall f_5825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2335)
-static void C_ccall f_2335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5817)
-static void C_ccall f_5817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5813)
-static void C_ccall f_5813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5809)
-static void C_ccall f_5809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5602)
-static void C_ccall f_5602(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5606)
-static void C_ccall f_5606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5609)
-static void C_ccall f_5609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5612)
-static void C_ccall f_5612(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5619)
-static void C_ccall f_5619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5769)
-static void C_ccall f_5769(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5654)
-static void C_ccall f_5654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5730)
-static void C_ccall f_5730(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5742)
-static void C_ccall f_5742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5714)
-static void C_ccall f_5714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5600)
-static void C_ccall f_5600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2338)
-static void C_ccall f_2338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5592)
-static void C_ccall f_5592(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5288)
-static void C_ccall f_5288(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5292)
-static void C_ccall f_5292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5304)
-static void C_ccall f_5304(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5307)
-static void C_ccall f_5307(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5310)
-static void C_ccall f_5310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5313)
-static void C_ccall f_5313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5316)
-static void C_ccall f_5316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5319)
-static void C_ccall f_5319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5340)
-static void C_fcall f_5340(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5568)
-static void C_ccall f_5568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5430)
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5449)
-static void C_ccall f_5449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5406)
-static void C_ccall f_5406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5338)
-static void C_ccall f_5338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5286)
-static void C_ccall f_5286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2341)
-static void C_ccall f_2341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5278)
-static void C_ccall f_5278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5274)
-static void C_ccall f_5274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5270)
-static void C_ccall f_5270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5266)
-static void C_ccall f_5266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4740)
-static void C_ccall f_4740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4744)
-static void C_ccall f_4744(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4781)
-static void C_ccall f_4781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5189)
-static void C_fcall f_5189(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5226)
-static void C_ccall f_5226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5230)
-static void C_ccall f_5230(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5183)
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4784)
-static void C_ccall f_4784(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4787)
-static void C_ccall f_4787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4790)
-static void C_ccall f_4790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4793)
-static void C_ccall f_4793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4796)
-static void C_ccall f_4796(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4799)
-static void C_ccall f_4799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4802)
-static void C_ccall f_4802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4805)
-static void C_ccall f_4805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4808)
-static void C_ccall f_4808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4811)
-static void C_ccall f_4811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4814)
-static void C_ccall f_4814(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4825)
-static void C_ccall f_4825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4851)
-static void C_ccall f_4851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4861)
-static void C_ccall f_4861(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4865)
-static void C_ccall f_4865(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4879)
-static void C_fcall f_4879(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4903)
-static void C_ccall f_4903(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4979)
-static void C_fcall f_4979(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5127)
-static void C_ccall f_5127(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5047)
-static void C_ccall f_5047(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5066)
-static void C_ccall f_5066(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5036)
-static void C_ccall f_5036(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5004)
-static void C_ccall f_5004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4907)
-static void C_ccall f_4907(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4930)
-static void C_fcall f_4930(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4963)
-static void C_ccall f_4963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4943)
-static void C_fcall f_4943(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4924)
-static void C_ccall f_4924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4893)
-static void C_ccall f_4893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4901)
-static void C_ccall f_4901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4887)
-static void C_ccall f_4887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4849)
-static void C_ccall f_4849(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4746)
-static void C_fcall f_4746(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4752)
-static void C_fcall f_4752(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4778)
-static void C_ccall f_4778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4766)
-static void C_ccall f_4766(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4770)
-static void C_ccall f_4770(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4738)
-static void C_ccall f_4738(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2344)
-static void C_ccall f_2344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4638)
-static void C_ccall f_4638(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4642)
-static void C_ccall f_4642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4707)
-static void C_ccall f_4707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4722)
-static void C_ccall f_4722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4657)
-static void C_ccall f_4657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4680)
-static void C_ccall f_4680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4692)
-static void C_ccall f_4692(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4636)
-static void C_ccall f_4636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2347)
-static void C_ccall f_2347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4632)
-static void C_ccall f_4632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4628)
-static void C_ccall f_4628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4424)
-static void C_ccall f_4424(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4428)
-static void C_ccall f_4428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4431)
-static void C_ccall f_4431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4434)
-static void C_ccall f_4434(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4437)
-static void C_ccall f_4437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4448)
-static void C_ccall f_4448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4476)
-static void C_ccall f_4476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4568)
-static void C_ccall f_4568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4422)
-static void C_ccall f_4422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2350)
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4414)
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4410)
-static void C_ccall f_4410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4001)
-static void C_ccall f_4001(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4005)
-static void C_ccall f_4005(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4008)
-static void C_ccall f_4008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4011)
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4014)
-static void C_ccall f_4014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4017)
-static void C_ccall f_4017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4020)
-static void C_ccall f_4020(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4023)
-static void C_ccall f_4023(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4026)
-static void C_ccall f_4026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4235)
-static void C_ccall f_4235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4275)
-static void C_ccall f_4275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4309)
-static void C_fcall f_4309(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4338)
-static void C_ccall f_4338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4283)
-static void C_ccall f_4283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4279)
-static void C_ccall f_4279(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4028)
-static void C_fcall f_4028(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4152)
-static void C_fcall f_4152(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4179)
-static C_word C_fcall f_4179(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_4150)
-static void C_ccall f_4150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4146)
-static void C_ccall f_4146(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4138)
-static void C_ccall f_4138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4119)
-static void C_ccall f_4119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4089)
-static void C_ccall f_4089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4070)
-static void C_ccall f_4070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3999)
-static void C_ccall f_3999(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2353)
-static void C_ccall f_2353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3530)
-static void C_ccall f_3530(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3534)
-static void C_ccall f_3534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3549)
-static void C_ccall f_3549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3552)
-static void C_ccall f_3552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3555)
-static void C_ccall f_3555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3558)
-static void C_ccall f_3558(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3561)
-static void C_ccall f_3561(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3567)
-static void C_ccall f_3567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3570)
-static void C_ccall f_3570(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3938)
-static void C_fcall f_3938(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3967)
-static void C_ccall f_3967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3573)
-static void C_ccall f_3573(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3891)
-static void C_fcall f_3891(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3918)
-static C_word C_fcall f_3918(C_word t0,C_word t1);
-C_noret_decl(f_3889)
-static void C_ccall f_3889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3885)
-static void C_ccall f_3885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3602)
-static void C_fcall f_3602(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3628)
-static void C_fcall f_3628(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3664)
-static void C_fcall f_3664(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3644)
-static void C_ccall f_3644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3640)
-static void C_ccall f_3640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3600)
-static void C_ccall f_3600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3596)
-static void C_ccall f_3596(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3528)
-static void C_ccall f_3528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2356)
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3520)
-static void C_ccall f_3520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3330)
-static void C_ccall f_3330(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3334)
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3337)
-static void C_ccall f_3337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3340)
-static void C_ccall f_3340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3343)
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3346)
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3355)
-static void C_fcall f_3355(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3458)
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3486)
-static void C_ccall f_3486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3480)
-static void C_ccall f_3480(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3461)
-static void C_ccall f_3461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3365)
-static void C_ccall f_3365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3368)
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3440)
-static void C_ccall f_3440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3417)
-static void C_ccall f_3417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3374)
-static void C_ccall f_3374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3385)
-static void C_ccall f_3385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3405)
-static void C_ccall f_3405(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3328)
-static void C_ccall f_3328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2359)
-static void C_ccall f_2359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3320)
-static void C_ccall f_3320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3099)
-static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3103)
-static void C_ccall f_3103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3106)
-static void C_ccall f_3106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3109)
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3112)
-static void C_ccall f_3112(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3115)
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3124)
-static void C_fcall f_3124(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_3243)
-static void C_ccall f_3243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3271)
-static void C_ccall f_3271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3304)
-static void C_ccall f_3304(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3277)
-static void C_ccall f_3277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3265)
-static void C_ccall f_3265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3246)
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3134)
-static void C_ccall f_3134(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3137)
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3233)
-static void C_ccall f_3233(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3198)
-static void C_ccall f_3198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3143)
-static void C_ccall f_3143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3166)
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3186)
-static void C_ccall f_3186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3097)
-static void C_ccall f_3097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2362)
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2818)
-static void C_ccall f_2818(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2822)
-static void C_ccall f_2822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2825)
-static void C_ccall f_2825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2828)
-static void C_ccall f_2828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2831)
-static void C_ccall f_2831(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2834)
-static void C_ccall f_2834(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2837)
-static void C_ccall f_2837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2846)
-static void C_fcall f_2846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2992)
-static void C_fcall f_2992(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2995)
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3004)
-static void C_ccall f_3004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3029)
-static void C_ccall f_3029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3054)
-static void C_ccall f_3054(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3076)
-static void C_ccall f_3076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11150)
-static void C_ccall f11150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11146)
-static void C_ccall f11146(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3061)
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3048)
-static void C_ccall f_3048(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3044)
-static void C_ccall f_3044(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3023)
-static void C_ccall f_3023(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3019)
-static void C_ccall f_3019(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2986)
-static void C_ccall f_2986(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2856)
-static void C_fcall f_2856(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2863)
-static void C_ccall f_2863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2971)
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2959)
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2955)
-static void C_ccall f_2955(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2891)
-static void C_ccall f_2891(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2919)
-static void C_ccall f_2919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2931)
-static void C_ccall f_2931(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2915)
-static void C_ccall f_2915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2816)
-static void C_ccall f_2816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2365)
-static void C_ccall f_2365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2714)
-static void C_ccall f_2714(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2718)
-static void C_ccall f_2718(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2724)
-static void C_ccall f_2724(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2808)
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2769)
-static void C_ccall f_2769(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2781)
-static void C_ccall f_2781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2712)
-static void C_ccall f_2712(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2368)
-static void C_ccall f_2368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2677)
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2681)
-static void C_ccall f_2681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2688)
-static void C_ccall f_2688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2700)
-static void C_ccall f_2700(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2704)
-static void C_ccall f_2704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2675)
-static void C_ccall f_2675(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2371)
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2655)
-static void C_ccall f_2655(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2663)
-static void C_ccall f_2663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2667)
-static void C_ccall f_2667(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2653)
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2374)
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2630)
-static void C_ccall f_2630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2634)
-static void C_ccall f_2634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2628)
-static void C_ccall f_2628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2377)
-static void C_ccall f_2377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2464)
-static void C_ccall f_2464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2474)
-static void C_fcall f_2474(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2498)
-static void C_ccall f_2498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2548)
-static void C_fcall f_2548(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2561)
-static void C_ccall f_2561(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2514)
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2530)
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2484)
-static void C_ccall f_2484(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2462)
-static void C_ccall f_2462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2380)
-static void C_ccall f_2380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2408)
-static void C_ccall f_2408(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2447)
-static void C_ccall f_2447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2418)
-static void C_ccall f_2418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2431)
-static void C_ccall f_2431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2406)
-static void C_ccall f_2406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2383)
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2398)
-static void C_ccall f_2398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2396)
-static void C_ccall f_2396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2386)
-static void C_ccall f_2386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2389)
-static void C_ccall f_2389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2392)
-static void C_ccall f_2392(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_10260)
-static void C_fcall trf_10260(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10260(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10260(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10323)
-static void C_fcall trf_10323(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10323(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10323(t0,t1);}
-
-C_noret_decl(trf_10118)
-static void C_fcall trf_10118(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10118(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10118(t0,t1);}
-
-C_noret_decl(trf_9898)
-static void C_fcall trf_9898(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9898(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9898(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9756)
-static void C_fcall trf_9756(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9756(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9756(t0,t1);}
-
-C_noret_decl(trf_9561)
-static void C_fcall trf_9561(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9561(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9561(t0,t1,t2);}
-
-C_noret_decl(trf_9517)
-static void C_fcall trf_9517(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9517(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9517(t0,t1,t2);}
-
-C_noret_decl(trf_9544)
-static void C_fcall trf_9544(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9544(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9544(t0,t1);}
-
-C_noret_decl(trf_9473)
-static void C_fcall trf_9473(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9473(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9473(t0,t1,t2);}
-
-C_noret_decl(trf_9500)
-static void C_fcall trf_9500(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9500(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9500(t0,t1);}
-
-C_noret_decl(trf_9438)
-static void C_fcall trf_9438(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9438(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9438(t0,t1,t2);}
-
-C_noret_decl(trf_9389)
-static void C_fcall trf_9389(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9389(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9389(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9402)
-static void C_fcall trf_9402(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9402(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9402(t0,t1);}
-
-C_noret_decl(trf_9365)
-static void C_fcall trf_9365(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9365(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9365(t0,t1,t2);}
-
-C_noret_decl(trf_9312)
-static void C_fcall trf_9312(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9312(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9312(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9325)
-static void C_fcall trf_9325(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9325(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9325(t0,t1);}
-
-C_noret_decl(trf_9234)
-static void C_fcall trf_9234(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9234(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9234(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9247)
-static void C_fcall trf_9247(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9247(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9247(t0,t1);}
-
-C_noret_decl(trf_9172)
-static void C_fcall trf_9172(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9172(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9172(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9185)
-static void C_fcall trf_9185(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9185(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9185(t0,t1);}
-
-C_noret_decl(trf_9074)
-static void C_fcall trf_9074(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9074(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9074(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9087)
-static void C_fcall trf_9087(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9087(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9087(t0,t1);}
-
-C_noret_decl(trf_9012)
-static void C_fcall trf_9012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9012(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9012(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9025)
-static void C_fcall trf_9025(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9025(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9025(t0,t1);}
-
-C_noret_decl(trf_8855)
-static void C_fcall trf_8855(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8855(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8855(t0,t1,t2);}
-
-C_noret_decl(trf_8754)
-static void C_fcall trf_8754(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8754(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8754(t0,t1,t2);}
-
-C_noret_decl(trf_8719)
-static void C_fcall trf_8719(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8719(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8719(t0,t1,t2);}
-
-C_noret_decl(trf_8675)
-static void C_fcall trf_8675(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8675(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8675(t0,t1,t2);}
-
-C_noret_decl(trf_8702)
-static void C_fcall trf_8702(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8702(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8702(t0,t1);}
-
-C_noret_decl(trf_8631)
-static void C_fcall trf_8631(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8631(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8631(t0,t1,t2);}
-
-C_noret_decl(trf_8658)
-static void C_fcall trf_8658(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8658(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8658(t0,t1);}
-
-C_noret_decl(trf_8582)
-static void C_fcall trf_8582(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8582(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8582(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8595)
-static void C_fcall trf_8595(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8595(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8595(t0,t1);}
-
-C_noret_decl(trf_8533)
-static void C_fcall trf_8533(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8533(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8533(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8546)
-static void C_fcall trf_8546(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8546(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8546(t0,t1);}
-
-C_noret_decl(trf_8423)
-static void C_fcall trf_8423(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8423(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8423(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8436)
-static void C_fcall trf_8436(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8436(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8436(t0,t1);}
-
-C_noret_decl(trf_8166)
-static void C_fcall trf_8166(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8166(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8166(t0,t1,t2);}
-
-C_noret_decl(trf_8096)
-static void C_fcall trf_8096(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8096(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8096(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8109)
-static void C_fcall trf_8109(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8109(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8109(t0,t1);}
-
-C_noret_decl(trf_7900)
-static void C_fcall trf_7900(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7900(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7900(t0,t1,t2);}
-
-C_noret_decl(trf_7860)
-static void C_fcall trf_7860(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7860(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7860(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7812)
-static void C_fcall trf_7812(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7812(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7812(t0,t1,t2);}
-
-C_noret_decl(trf_7839)
-static void C_fcall trf_7839(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7839(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7839(t0,t1,t2);}
-
-C_noret_decl(trf_7766)
-static void C_fcall trf_7766(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7766(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7766(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7726)
-static void C_fcall trf_7726(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7726(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7726(t0,t1,t2);}
-
-C_noret_decl(trf_7532)
-static void C_fcall trf_7532(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7532(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_7532(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_7604)
-static void C_fcall trf_7604(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7604(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7604(t0,t1);}
-
-C_noret_decl(trf_7556)
-static void C_fcall trf_7556(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7556(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7556(t0,t1,t2);}
-
-C_noret_decl(trf_7583)
-static void C_fcall trf_7583(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7583(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7583(t0,t1,t2);}
-
-C_noret_decl(trf_7463)
-static void C_fcall trf_7463(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7463(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7463(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7432)
-static void C_fcall trf_7432(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7432(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7432(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7363)
-static void C_fcall trf_7363(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7363(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7363(t0,t1,t2);}
-
-C_noret_decl(trf_7298)
-static void C_fcall trf_7298(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7298(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7298(t0,t1,t2);}
-
-C_noret_decl(trf_7246)
-static void C_fcall trf_7246(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7246(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7246(t0,t1,t2);}
-
-C_noret_decl(trf_7273)
-static void C_fcall trf_7273(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7273(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7273(t0,t1,t2);}
-
-C_noret_decl(trf_7206)
-static void C_fcall trf_7206(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7206(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7206(t0,t1,t2);}
-
-C_noret_decl(trf_7027)
-static void C_fcall trf_7027(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7027(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7027(t0,t1,t2);}
-
-C_noret_decl(trf_7054)
-static void C_fcall trf_7054(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7054(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7054(t0,t1,t2);}
-
-C_noret_decl(trf_7152)
-static void C_fcall trf_7152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7152(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7152(t0,t1,t2);}
-
-C_noret_decl(trf_7096)
-static void C_fcall trf_7096(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7096(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7096(t0,t1,t2);}
-
-C_noret_decl(trf_6789)
-static void C_fcall trf_6789(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6789(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6789(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6802)
-static void C_fcall trf_6802(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6802(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6802(t0,t1);}
-
-C_noret_decl(trf_6814)
-static void C_fcall trf_6814(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6814(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6814(t0,t1);}
-
-C_noret_decl(trf_6641)
-static void C_fcall trf_6641(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6641(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6641(t0,t1,t2);}
-
-C_noret_decl(trf_6470)
-static void C_fcall trf_6470(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6470(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6470(t0,t1,t2);}
-
-C_noret_decl(trf_6552)
-static void C_fcall trf_6552(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6552(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6552(t0,t1,t2);}
-
-C_noret_decl(trf_6361)
-static void C_fcall trf_6361(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6361(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6361(t0,t1,t2);}
-
-C_noret_decl(trf_6317)
-static void C_fcall trf_6317(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6317(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6317(t0,t1,t2);}
-
-C_noret_decl(trf_6344)
-static void C_fcall trf_6344(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6344(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6344(t0,t1,t2);}
-
-C_noret_decl(trf_6282)
-static void C_fcall trf_6282(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6282(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6282(t0,t1,t2);}
-
-C_noret_decl(trf_6238)
-static void C_fcall trf_6238(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6238(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6238(t0,t1,t2);}
-
-C_noret_decl(trf_6265)
-static void C_fcall trf_6265(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6265(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6265(t0,t1,t2);}
-
-C_noret_decl(trf_6156)
-static void C_fcall trf_6156(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6156(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6156(t0,t1,t2);}
-
-C_noret_decl(trf_5948)
-static void C_fcall trf_5948(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5948(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5948(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5954)
-static void C_fcall trf_5954(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5954(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_5954(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_5851)
-static void C_fcall trf_5851(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5851(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5851(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5869)
-static void C_fcall trf_5869(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5869(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5869(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5340)
-static void C_fcall trf_5340(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5340(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5340(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5189)
-static void C_fcall trf_5189(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5189(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5189(t0,t1,t2);}
-
-C_noret_decl(trf_4879)
-static void C_fcall trf_4879(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4879(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4879(t0,t1);}
-
-C_noret_decl(trf_4979)
-static void C_fcall trf_4979(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4979(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4979(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4930)
-static void C_fcall trf_4930(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4930(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4930(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4943)
-static void C_fcall trf_4943(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4943(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4943(t0,t1);}
-
-C_noret_decl(trf_4746)
-static void C_fcall trf_4746(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4746(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4746(t0,t1,t2);}
-
-C_noret_decl(trf_4752)
-static void C_fcall trf_4752(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4752(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4752(t0,t1,t2);}
-
-C_noret_decl(trf_4309)
-static void C_fcall trf_4309(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4309(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4309(t0,t1,t2);}
-
-C_noret_decl(trf_4028)
-static void C_fcall trf_4028(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4028(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4028(t0,t1,t2);}
-
-C_noret_decl(trf_4152)
-static void C_fcall trf_4152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4152(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4152(t0,t1,t2);}
-
-C_noret_decl(trf_3938)
-static void C_fcall trf_3938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3938(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3938(t0,t1,t2);}
-
-C_noret_decl(trf_3891)
-static void C_fcall trf_3891(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3891(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3891(t0,t1,t2);}
-
-C_noret_decl(trf_3602)
-static void C_fcall trf_3602(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3602(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3602(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3628)
-static void C_fcall trf_3628(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3628(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3628(t0,t1);}
-
-C_noret_decl(trf_3664)
-static void C_fcall trf_3664(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3664(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3664(t0,t1);}
-
-C_noret_decl(trf_3355)
-static void C_fcall trf_3355(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3355(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_3355(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_3124)
-static void C_fcall trf_3124(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3124(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_3124(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_2846)
-static void C_fcall trf_2846(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2846(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2846(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2992)
-static void C_fcall trf_2992(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2992(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2992(t0,t1);}
-
-C_noret_decl(trf_2856)
-static void C_fcall trf_2856(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2856(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2856(t0,t1);}
-
-C_noret_decl(trf_2474)
-static void C_fcall trf_2474(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2474(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2474(t0,t1);}
-
-C_noret_decl(trf_2548)
-static void C_fcall trf_2548(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2548(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2548(t0,t1);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_chicken_syntax_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_chicken_syntax_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("chicken_syntax_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(3380)){
-C_save(t1);
-C_rereclaim2(3380*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,255);
-lf[0]=C_h_intern(&lf[0],29,"\003syschicken-macro-environment");
-lf[1]=C_h_intern(&lf[1],17,"register-feature!");
-lf[2]=C_h_intern(&lf[2],6,"srfi-8");
-lf[3]=C_h_intern(&lf[3],7,"srfi-16");
-lf[4]=C_h_intern(&lf[4],7,"srfi-26");
-lf[5]=C_h_intern(&lf[5],7,"srfi-31");
-lf[6]=C_h_intern(&lf[6],7,"srfi-15");
-lf[7]=C_h_intern(&lf[7],7,"srfi-11");
-lf[8]=C_h_intern(&lf[8],16,"\003sysmacro-subset");
-lf[9]=C_h_intern(&lf[9],29,"\003sysdefault-macro-environment");
-lf[10]=C_h_intern(&lf[10],28,"\003sysextend-macro-environment");
-lf[11]=C_h_intern(&lf[11],12,"define-macro");
-lf[12]=C_h_intern(&lf[12],12,"syntax-error");
-lf[13]=C_decode_literal(C_heaptop,"\376B\000\000<`define-macro\047 is not supported - please use `define-syntax\047");
-lf[14]=C_h_intern(&lf[14],18,"\003syser-transformer");
-lf[15]=C_h_intern(&lf[15],19,"let-compiler-syntax");
-lf[16]=C_h_intern(&lf[16],24,"\004corelet-compiler-syntax");
-lf[17]=C_h_intern(&lf[17],25,"\003syssyntax-rules-mismatch");
-lf[18]=C_h_intern(&lf[18],9,"\003syslist\077");
-lf[19]=C_h_intern(&lf[19],22,"define-compiler-syntax");
-lf[20]=C_h_intern(&lf[20],27,"\004coredefine-compiler-syntax");
-lf[21]=C_h_intern(&lf[21],6,"lambda");
-lf[22]=C_h_intern(&lf[22],3,"use");
-lf[23]=C_h_intern(&lf[23],22,"\004corerequire-extension");
-lf[24]=C_h_intern(&lf[24],16,"\003syscheck-syntax");
-lf[25]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[26]=C_h_intern(&lf[26],22,"define-compiled-syntax");
-lf[27]=C_h_intern(&lf[27],10,"\003sysappend");
-lf[28]=C_h_intern(&lf[28],13,"define-syntax");
-lf[29]=C_h_intern(&lf[29],17,"define-for-syntax");
-lf[30]=C_h_intern(&lf[30],6,"define");
-lf[31]=C_h_intern(&lf[31],16,"begin-for-syntax");
-lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[33]=C_h_intern(&lf[33],3,"rec");
-lf[34]=C_h_intern(&lf[34],6,"letrec");
-lf[35]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[36]=C_h_intern(&lf[36],16,"define-extension");
-lf[37]=C_h_intern(&lf[37],22,"chicken-compile-shared");
-lf[38]=C_h_intern(&lf[38],9,"compiling");
-lf[39]=C_h_intern(&lf[39],4,"name");
-lf[40]=C_h_intern(&lf[40],4,"unit");
-lf[41]=C_h_intern(&lf[41],5,"quote");
-lf[42]=C_h_intern(&lf[42],7,"provide");
-lf[43]=C_h_intern(&lf[43],4,"else");
-lf[44]=C_h_intern(&lf[44],3,"not");
-lf[45]=C_h_intern(&lf[45],11,"cond-expand");
-lf[46]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\007unquote\376\003\000\000\002\376\001\000\000\006%begin\376\377\016\376\377\016");
-lf[47]=C_h_intern(&lf[47],4,"cdar");
-lf[48]=C_h_intern(&lf[48],6,"append");
-lf[49]=C_decode_literal(C_heaptop,"\376B\000\000\030invalid clause specifier");
-lf[50]=C_h_intern(&lf[50],4,"caar");
-lf[51]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid clause syntax");
-lf[52]=C_h_intern(&lf[52],6,"export");
-lf[53]=C_h_intern(&lf[53],7,"dynamic");
-lf[54]=C_h_intern(&lf[54],6,"static");
-lf[55]=C_h_intern(&lf[55],5,"begin");
-lf[56]=C_h_intern(&lf[56],7,"declare");
-lf[57]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\001\000\000\001_");
-lf[58]=C_h_intern(&lf[58],5,"apply");
-lf[59]=C_h_intern(&lf[59],4,"cute");
-lf[60]=C_h_intern(&lf[60],6,"gensym");
-lf[61]=C_h_intern(&lf[61],7,"reverse");
-lf[62]=C_h_intern(&lf[62],5,"<...>");
-lf[63]=C_h_intern(&lf[63],2,"<>");
-lf[64]=C_h_intern(&lf[64],3,"let");
-lf[65]=C_h_intern(&lf[65],19,"\003sysprimitive-alias");
-lf[66]=C_h_intern(&lf[66],3,"cut");
-lf[67]=C_h_intern(&lf[67],18,"getter-with-setter");
-lf[68]=C_h_intern(&lf[68],18,"define-record-type");
-lf[69]=C_h_intern(&lf[69],18,"\003sysmake-structure");
-lf[70]=C_h_intern(&lf[70],14,"\003sysstructure\077");
-lf[71]=C_h_intern(&lf[71],15,"\000record-setters");
-lf[72]=C_h_intern(&lf[72],12,"\003sysfeatures");
-lf[73]=C_h_intern(&lf[73],19,"\003syscheck-structure");
-lf[74]=C_h_intern(&lf[74],10,"\004corecheck");
-lf[75]=C_h_intern(&lf[75],13,"\003sysblock-ref");
-lf[76]=C_h_intern(&lf[76],14,"\003sysblock-set!");
-lf[77]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[78]=C_h_intern(&lf[78],3,"car");
-lf[79]=C_h_intern(&lf[79],1,"y");
-lf[80]=C_h_intern(&lf[80],1,"x");
-lf[81]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\000\000\000\002\376\001\000\000\010variable\376\377\001\000\000\000\001\376\003\000\000\002\376\001\000\000\010variable\376\001\000"
-"\000\001_");
-lf[82]=C_h_intern(&lf[82],4,"memv");
-lf[83]=C_h_intern(&lf[83],14,"condition-case");
-lf[84]=C_h_intern(&lf[84],9,"condition");
-lf[85]=C_h_intern(&lf[85],8,"\003sysslot");
-lf[86]=C_h_intern(&lf[86],10,"\003syssignal");
-lf[87]=C_h_intern(&lf[87],4,"cond");
-lf[88]=C_h_intern(&lf[88],17,"handle-exceptions");
-lf[89]=C_h_intern(&lf[89],3,"and");
-lf[90]=C_h_intern(&lf[90],4,"kvar");
-lf[91]=C_h_intern(&lf[91],5,"exvar");
-lf[92]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[93]=C_h_intern(&lf[93],30,"call-with-current-continuation");
-lf[94]=C_h_intern(&lf[94],22,"with-exception-handler");
-lf[95]=C_h_intern(&lf[95],10,"\003sysvalues");
-lf[96]=C_h_intern(&lf[96],9,"\003sysapply");
-lf[97]=C_h_intern(&lf[97],20,"\003syscall-with-values");
-lf[98]=C_h_intern(&lf[98],4,"args");
-lf[99]=C_h_intern(&lf[99],1,"k");
-lf[100]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[101]=C_h_intern(&lf[101],21,"define-record-printer");
-lf[102]=C_h_intern(&lf[102],27,"\003sysregister-record-printer");
-lf[103]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[104]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[105]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[106]=C_h_intern(&lf[106],2,">=");
-lf[107]=C_h_intern(&lf[107],3,"cdr");
-lf[108]=C_h_intern(&lf[108],3,"eq\077");
-lf[109]=C_h_intern(&lf[109],11,"case-lambda");
-lf[110]=C_h_intern(&lf[110],6,"length");
-lf[111]=C_h_intern(&lf[111],9,"split-at!");
-lf[112]=C_h_intern(&lf[112],4,"take");
-lf[113]=C_h_intern(&lf[113],4,"list");
-lf[114]=C_h_intern(&lf[114],11,"lambda-list");
-lf[115]=C_h_intern(&lf[115],25,"\003sysdecompose-lambda-list");
-lf[116]=C_h_intern(&lf[116],10,"fold-right");
-lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012\004corecheck\376\003\000\000\002\376\003\000\000\002\376\001\000\000\011\003syserror\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreimmutable\376\003\000\000\002\376\003"
-"\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376B\000\0000no matching clause in call to \047case-lambda\047 form\376\377\016\376\377\016\376\377\016"
-"\376\377\016");
-lf[118]=C_h_intern(&lf[118],2,"if");
-lf[119]=C_h_intern(&lf[119],4,"lvar");
-lf[120]=C_h_intern(&lf[120],4,"rvar");
-lf[121]=C_h_intern(&lf[121],3,"min");
-lf[122]=C_h_intern(&lf[122],7,"require");
-lf[123]=C_h_intern(&lf[123],6,"srfi-1");
-lf[124]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[125]=C_h_intern(&lf[125],5,"null\077");
-lf[126]=C_h_intern(&lf[126],14,"let-optionals*");
-lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[128]=C_h_intern(&lf[128],14,"\004coreimmutable");
-lf[129]=C_h_intern(&lf[129],9,"\003syserror");
-lf[130]=C_h_intern(&lf[130],4,"tmp2");
-lf[131]=C_h_intern(&lf[131],3,"tmp");
-lf[132]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\004list\376\001\000\000\001_");
-lf[133]=C_h_intern(&lf[133],8,"optional");
-lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[136]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
-lf[137]=C_h_intern(&lf[137],13,"let-optionals");
-lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[139]=C_h_intern(&lf[139],14,"string->symbol");
-lf[140]=C_h_intern(&lf[140],13,"string-append");
-lf[141]=C_h_intern(&lf[141],14,"symbol->string");
-lf[142]=C_h_intern(&lf[142],4,"let*");
-lf[143]=C_decode_literal(C_heaptop,"\376B\000\000\004def-");
-lf[144]=C_h_intern(&lf[144],5,"%rest");
-lf[145]=C_h_intern(&lf[145],4,"body");
-lf[146]=C_h_intern(&lf[146],4,"cadr");
-lf[147]=C_decode_literal(C_heaptop,"\376B\000\000\001%");
-lf[148]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[149]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000");
-lf[150]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[151]=C_h_intern(&lf[151],6,"select");
-lf[152]=C_h_intern(&lf[152],8,"\003syseqv\077");
-lf[153]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[154]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[155]=C_h_intern(&lf[155],2,"or");
-lf[156]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
-lf[157]=C_h_intern(&lf[157],8,"and-let*");
-lf[158]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000\376\001\000\000\001_");
-lf[159]=C_h_intern(&lf[159],13,"define-inline");
-lf[160]=C_decode_literal(C_heaptop,"\376B\000\000*invalid substitution form - must be lambda");
-lf[161]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[162]=C_h_intern(&lf[162],18,"\004coredefine-inline");
-lf[163]=C_h_intern(&lf[163],8,"list-ref");
-lf[164]=C_h_intern(&lf[164],9,"nth-value");
-lf[165]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[166]=C_h_intern(&lf[166],13,"letrec-values");
-lf[167]=C_h_intern(&lf[167],9,"\004coreset!");
-lf[168]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[169]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\004list\376\001\000\000\001_");
-lf[170]=C_h_intern(&lf[170],11,"let*-values");
-lf[171]=C_h_intern(&lf[171],10,"let-values");
-lf[172]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\004list\376\001\000\000\001_");
-lf[173]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\004list\376\001\000\000\001_");
-lf[174]=C_h_intern(&lf[174],13,"define-values");
-lf[175]=C_h_intern(&lf[175],11,"set!-values");
-lf[176]=C_h_intern(&lf[176],19,"\003sysregister-export");
-lf[177]=C_h_intern(&lf[177],18,"\003syscurrent-module");
-lf[178]=C_h_intern(&lf[178],12,"\003sysfor-each");
-lf[179]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\001\000\000\010variable\376\377\001\000\000\000\000\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[180]=C_h_intern(&lf[180],14,"\004coreundefined");
-lf[181]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\001\000\000\010variable\376\377\001\000\000\000\000\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[182]=C_h_intern(&lf[182],6,"unless");
-lf[183]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[184]=C_h_intern(&lf[184],4,"when");
-lf[185]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[186]=C_h_intern(&lf[186],12,"parameterize");
-lf[187]=C_h_intern(&lf[187],16,"\003sysdynamic-wind");
-lf[188]=C_h_intern(&lf[188],1,"t");
-lf[189]=C_h_intern(&lf[189],8,"\003syslist");
-lf[190]=C_h_intern(&lf[190],4,"swap");
-lf[191]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[192]=C_h_intern(&lf[192],9,"eval-when");
-lf[193]=C_h_intern(&lf[193],10,"\000compiling");
-lf[194]=C_h_intern(&lf[194],19,"\004corecompiletimetoo");
-lf[195]=C_h_intern(&lf[195],20,"\004corecompiletimeonly");
-lf[196]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[197]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid situation specifier");
-lf[199]=C_h_intern(&lf[199],4,"load");
-lf[200]=C_h_intern(&lf[200],7,"compile");
-lf[201]=C_h_intern(&lf[201],4,"eval");
-lf[202]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[203]=C_h_intern(&lf[203],9,"fluid-let");
-lf[204]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\001\000\000\001_");
-lf[205]=C_h_intern(&lf[205],6,"ensure");
-lf[206]=C_h_intern(&lf[206],11,"\000type-error");
-lf[207]=C_h_intern(&lf[207],15,"\003syssignal-hook");
-lf[208]=C_decode_literal(C_heaptop,"\376B\000\000\033argument has incorrect type");
-lf[209]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\003");
-lf[210]=C_h_intern(&lf[210],6,"assert");
-lf[211]=C_h_intern(&lf[211],16,"\003sysstrip-syntax");
-lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\020assertion failed");
-lf[213]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[214]=C_h_intern(&lf[214],7,"include");
-lf[215]=C_h_intern(&lf[215],27,"\003syscurrent-source-filename");
-lf[216]=C_h_intern(&lf[216],4,"read");
-lf[217]=C_h_intern(&lf[217],20,"with-input-from-file");
-lf[218]=C_h_intern(&lf[218],5,"print");
-lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\014; including ");
-lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\004 ...");
-lf[221]=C_h_intern(&lf[221],12,"load-verbose");
-lf[222]=C_h_intern(&lf[222],28,"\003sysresolve-include-filename");
-lf[223]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006string\376\377\016");
-lf[224]=C_h_intern(&lf[224],12,"\004coredeclare");
-lf[225]=C_h_intern(&lf[225],4,"time");
-lf[226]=C_h_intern(&lf[226],15,"\003sysstart-timer");
-lf[227]=C_h_intern(&lf[227],14,"\003sysstop-timer");
-lf[228]=C_h_intern(&lf[228],17,"\003sysdisplay-times");
-lf[229]=C_h_intern(&lf[229],7,"receive");
-lf[230]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\013lambda-list\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[231]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[232]=C_h_intern(&lf[232],13,"define-record");
-lf[233]=C_h_intern(&lf[233],3,"val");
-lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
-lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
-lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\005-set!");
-lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\001\077");
-lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\005make-");
-lf[239]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\002\376\001\000\000\006symbol\376\377\001\000\000\000\000");
-lf[240]=C_h_intern(&lf[240],1,"r");
-lf[241]=C_h_intern(&lf[241],7,"unquote");
-lf[242]=C_h_intern(&lf[242],4,"head");
-lf[243]=C_h_intern(&lf[243],4,"form");
-lf[244]=C_h_intern(&lf[244],16,"unquote-splicing");
-lf[245]=C_h_intern(&lf[245],10,"quasiquote");
-lf[246]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[247]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[248]=C_h_intern(&lf[248],15,"define-constant");
-lf[249]=C_h_intern(&lf[249],20,"\004coredefine-constant");
-lf[250]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[251]=C_h_intern(&lf[251],21,"\003sysmacro-environment");
-lf[252]=C_h_intern(&lf[252],11,"\003sysprovide");
-lf[253]=C_h_intern(&lf[253],19,"chicken-more-macros");
-lf[254]=C_h_intern(&lf[254],14,"chicken-syntax");
-C_register_lf2(lf,255,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2259,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 35 ##sys#provide */
-t3=*((C_word*)lf[252]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[253],lf[254]);}
-
-/* k2257 */
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2259,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2263,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 43 ##sys#macro-environment */
-t3=*((C_word*)lf[251]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k2261 in k2257 */
-static void C_ccall f_2263(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2263,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2266,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10753,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10755,a[2]=((C_word)li134),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 48 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a10754 in k2261 in k2257 */
-static void C_ccall f_10755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10755,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10759,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 50 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[248],t2,lf[250]);}
-
-/* k10757 in a10754 in k2261 in k2257 */
-static void C_ccall f_10759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10759,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10766,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k10764 in k10757 in a10754 in k2261 in k2257 */
-static void C_ccall f_10766(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10766,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[249],t1));}
-
-/* k10751 in k2261 in k2257 */
-static void C_ccall f_10753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 45 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[248],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2264 in k2261 in k2257 */
-static void C_ccall f_2266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2266,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10645,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10647,a[2]=((C_word)li133),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 56 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a10646 in k2264 in k2261 in k2257 */
-static void C_ccall f_10647(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10647,5,t0,t1,t2,t3,t4);}
-t5=C_i_cadr(t2);
-if(C_truep(C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10660,a[2]=t1,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 60 ##sys#check-syntax */
-t7=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[159],t2,lf[246]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10738,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 65 ##sys#check-syntax */
-t7=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[159],t2,lf[247]);}}
-
-/* k10736 in a10646 in k2264 in k2261 in k2257 */
-static void C_ccall f_10738(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10738,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10745,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k10743 in k10736 in a10646 in k2264 in k2261 in k2257 */
-static void C_ccall f_10745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10745,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[162],t1));}
-
-/* k10658 in a10646 in k2264 in k2261 in k2257 */
-static void C_ccall f_10660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[66],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10660,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[3]);
-t3=C_a_i_cons(&a,2,lf[21],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[41],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[240],t5);
-t7=C_a_i_list(&a,2,lf[241],t6);
-t8=C_a_i_cons(&a,2,lf[242],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,lf[107],t8);
-t10=C_a_i_list(&a,2,lf[241],t9);
-t11=C_a_i_cons(&a,2,lf[243],C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,lf[107],t11);
-t13=C_a_i_list(&a,2,lf[244],t12);
-t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,t10,t14);
-t16=C_a_i_cons(&a,2,t7,t15);
-t17=C_a_i_list(&a,2,lf[245],t16);
-t18=C_a_i_cons(&a,2,t17,C_SCHEME_END_OF_LIST);
-t19=C_a_i_cons(&a,2,t2,t18);
-t20=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,C_a_i_cons(&a,2,lf[162],t19));}
-
-/* k10643 in k2264 in k2261 in k2257 */
-static void C_ccall f_10645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 53 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[159],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2272,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10200,a[2]=((C_word)li132),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 70 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10200(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10200,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10204,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 72 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[232],t2,lf[239]);}
-
-/* k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10204,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10213,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 75 symbol->string */
-t5=*((C_word*)lf[141]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10213,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10216,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 76 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-
-/* k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10216(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10216,2,t0,t1);}
-t2=C_i_memq(lf[71],*((C_word*)lf[72]+1));
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 78 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-
-/* k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10222,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10225,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 79 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-
-/* k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10225,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 80 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
-
-/* k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10231,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 81 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10231,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10601,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10641,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 84 string-append */
-t4=*((C_word*)lf[140]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[238],((C_word*)t0)[2]);}
-
-/* k10639 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 84 string->symbol */
-t2=*((C_word*)lf[139]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10601,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[10],t2);
-t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[7],a[10]=t1,a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[9],a[13]=t3,tmp=(C_word)a,a+=14,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);}
-
-/* k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[40],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10633,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
-t3=C_a_i_cons(&a,2,lf[69],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[11],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[9],t8);
-t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_10549,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t9,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10593,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 87 string-append */
-t12=*((C_word*)lf[140]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,((C_word*)t0)[2],lf[237]);}
-
-/* k10591 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 87 string->symbol */
-t2=*((C_word*)lf[139]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[59],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10549,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[41],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[80],t5);
-t7=C_a_i_cons(&a,2,lf[70],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t2,t8);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[11],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,t1,t11);
-t13=C_a_i_cons(&a,2,((C_word*)t0)[10],t12);
-t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10254,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t13,tmp=(C_word)a,a+=6,tmp);
-t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10258,a[2]=t14,tmp=(C_word)a,a+=3,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10260,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t17,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[12],a[11]=((C_word)li131),tmp=(C_word)a,a+=12,tmp));
-t19=((C_word*)t17)[1];
-f_10260(t19,t15,((C_word*)t0)[2],C_fix(1));}
-
-/* mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_10260(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10260,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=t2;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t3,a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],tmp=(C_word)a,a+=14,tmp);
-t6=C_slot(t2,C_fix(0));
-/* chicken-syntax.scm: 92 symbol->string */
-t7=*((C_word*)lf[141]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}}
-
-/* k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10270,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_10273,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10537,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 93 string-append */
-t4=*((C_word*)lf[140]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,((C_word*)t0)[2],lf[235],t1,lf[236]);}
-
-/* k10535 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10537(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 93 string->symbol */
-t2=*((C_word*)lf[139]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10273,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10276,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10533,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 94 string-append */
-t4=*((C_word*)lf[140]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],lf[234],((C_word*)t0)[2]);}
-
-/* k10531 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 94 string->symbol */
-t2=*((C_word*)lf[139]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10276(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word ab[124],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10276,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[80],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[80],t6);
-t8=C_a_i_cons(&a,2,lf[73],t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,lf[74],t9);
-t11=C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[11],t11);
-t13=C_a_i_cons(&a,2,lf[80],t12);
-t14=C_a_i_cons(&a,2,lf[76],t13);
-t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
-t16=C_a_i_cons(&a,2,t10,t15);
-t17=C_a_i_cons(&a,2,t3,t16);
-t18=C_a_i_cons(&a,2,((C_word*)t0)[10],t17);
-t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
-t20=C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
-t21=C_a_i_cons(&a,2,((C_word*)t0)[8],t20);
-t22=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t21,a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t23=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
-t24=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t25=C_a_i_cons(&a,2,((C_word*)t0)[12],t24);
-t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
-t27=C_a_i_cons(&a,2,lf[80],t26);
-t28=C_a_i_cons(&a,2,lf[73],t27);
-t29=C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
-t30=C_a_i_cons(&a,2,lf[74],t29);
-t31=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t32=C_a_i_cons(&a,2,lf[80],t31);
-t33=C_a_i_cons(&a,2,lf[75],t32);
-t34=C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
-t35=C_a_i_cons(&a,2,t30,t34);
-t36=C_a_i_cons(&a,2,t23,t35);
-t37=C_a_i_cons(&a,2,((C_word*)t0)[10],t36);
-t38=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t39=C_a_i_cons(&a,2,t37,t38);
-t40=t22;
-f_10323(t40,C_a_i_cons(&a,2,((C_word*)t0)[2],t39));}
-else{
-t23=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
-t24=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t25=C_a_i_cons(&a,2,((C_word*)t0)[12],t24);
-t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
-t27=C_a_i_cons(&a,2,lf[80],t26);
-t28=C_a_i_cons(&a,2,lf[73],t27);
-t29=C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
-t30=C_a_i_cons(&a,2,lf[74],t29);
-t31=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t32=C_a_i_cons(&a,2,lf[80],t31);
-t33=C_a_i_cons(&a,2,lf[75],t32);
-t34=C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
-t35=C_a_i_cons(&a,2,t30,t34);
-t36=C_a_i_cons(&a,2,t23,t35);
-t37=t22;
-f_10323(t37,C_a_i_cons(&a,2,((C_word*)t0)[10],t36));}}
-
-/* k10321 in k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_10323(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10323,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[8],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10287,a[2]=t7,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t9=C_slot(((C_word*)t0)[4],C_fix(1));
-t10=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* chicken-syntax.scm: 113 mapslots */
-t11=((C_word*)((C_word*)t0)[2])[1];
-f_10260(t11,t8,t9,t10);}
-
-/* k10285 in k10321 in k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10287,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k10256 in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k10252 in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10254(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10254,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k10196 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 68 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[232],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2275,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10055,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10057,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 118 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10057(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10057,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10061,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 120 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-
-/* k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10061,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10064,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 121 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10064(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10064,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10067,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 122 ##sys#check-syntax */
-t3=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[229],((C_word*)t0)[4],lf[231]);}
-
-/* k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10067,2,t0,t1);}
-t2=C_i_cddr(((C_word*)t0)[5]);
-if(C_truep(C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10096,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cdr(((C_word*)t0)[5]);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10103,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 126 ##sys#check-syntax */
-t4=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[229],((C_word*)t0)[5],lf[230]);}}
-
-/* k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10103,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[5]);
-t3=C_i_caddr(((C_word*)t0)[5]);
-t4=C_i_cdddr(((C_word*)t0)[5]);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10118,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(t2))){
-t6=C_i_cdr(t2);
-t7=t5;
-f_10118(t7,C_i_nullp(t6));}
-else{
-t6=t5;
-f_10118(t6,C_SCHEME_FALSE);}}
-
-/* k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_10118(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10118,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[7]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t2,t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10133,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}
-else{
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[2],t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10172,a[2]=((C_word*)t0)[5],a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t6=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}}
-
-/* k10170 in k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10172,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[97],t5));}
-
-/* k10131 in k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10133,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k10094 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10096(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10096,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=C_a_i_cons(&a,2,lf[189],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[97],t5));}
-
-/* k10053 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 115 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[229],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2275,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2278,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9956,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9958,a[2]=((C_word)li129),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 138 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9958(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9958,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9962,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 140 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[188]);}
-
-/* k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 141 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-
-/* k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9965,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9968,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 142 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k9966 in k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9968,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[226],C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10047,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t4=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k10045 in k9966 in k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_10047(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[54],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10047,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=C_a_i_cons(&a,2,lf[227],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[228],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,lf[95],t7);
-t9=C_a_i_cons(&a,2,lf[96],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t6,t10);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[5],t11);
-t13=C_a_i_cons(&a,2,((C_word*)t0)[6],t12);
-t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,t3,t14);
-t16=C_a_i_cons(&a,2,lf[97],t15);
-t17=C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST);
-t18=C_a_i_cons(&a,2,((C_word*)t0)[4],t17);
-t19=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,C_a_i_cons(&a,2,((C_word*)t0)[2],t18));}
-
-/* k9954 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 136 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[225],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2278,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2281,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9938,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9940,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 153 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a9939 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9940(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9940,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9948,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k9946 in a9939 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9948,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[224],t1));}
-
-/* k9936 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9938(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 151 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[56],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2281(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2281,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9849,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9851,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 159 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9851,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9855,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 161 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[214],t2,lf[223]);}
-
-/* k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9855(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9855,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9858,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-/* chicken-syntax.scm: 162 ##sys#resolve-include-filename */
-t4=*((C_word*)lf[222]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_TRUE);}
-
-/* k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9858,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9861,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 163 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-
-/* k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9861(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9861,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9864,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9927,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 164 load-verbose */
-t4=*((C_word*)lf[221]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k9925 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* chicken-syntax.scm: 164 print */
-t2=*((C_word*)lf[218]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[219],((C_word*)t0)[2],lf[220]);}
-else{
-t2=((C_word*)t0)[3];
-f_9864(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9864,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9871,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9875,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9877,a[2]=((C_word*)t0)[2],a[3]=((C_word)li126),tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 166 with-input-from-file */
-t5=*((C_word*)lf[217]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,((C_word*)t0)[2],t4);}
-
-/* a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9877(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9877,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9883,a[2]=t3,a[3]=t5,a[4]=((C_word)li122),tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9888,a[2]=((C_word)li124),tmp=(C_word)a,a+=3,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9921,a[2]=t5,a[3]=t3,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
-/* ##sys#dynamic-wind */
-t9=*((C_word*)lf[187]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t1,t6,t7,t8);}
-
-/* a9920 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9921,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[215]+1));
-t3=C_mutate((C_word*)lf[215]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9888(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9888,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9896,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 169 read */
-t3=*((C_word*)lf[216]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9896,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9898,a[2]=t3,a[3]=((C_word)li123),tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_9898(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* doloop135 in k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9898(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9898,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_eofp(t2))){
-/* chicken-syntax.scm: 172 reverse */
-t4=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9915,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 169 read */
-t5=*((C_word*)lf[216]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k9913 in doloop135 in k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9915,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9898(t3,((C_word*)t0)[2],t1,t2);}
-
-/* a9882 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9883,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[215]+1));
-t3=C_mutate((C_word*)lf[215]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* k9873 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9875(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9869 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9871(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9871,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k9847 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9849(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 157 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[214],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9735,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9737,a[2]=((C_word)li121),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 176 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9737,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9741,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 178 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[210],t2,lf[213]);}
-
-/* k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9741(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9741,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9750,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 181 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
-
-/* k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9750,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9753,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 182 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-
-/* k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9753,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9756,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=C_eqp(C_SCHEME_END_OF_LIST,((C_word*)t0)[2]);
-if(C_truep(t3)){
-t4=C_a_i_cons(&a,2,lf[212],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[41],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=t2;
-f_9756(t7,C_a_i_cons(&a,2,lf[128],t6));}
-else{
-t4=t2;
-f_9756(t4,C_i_car(((C_word*)t0)[2]));}}
-
-/* k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9756(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9756,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[74],t2);
-t4=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9791,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t4,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t6=C_i_length(((C_word*)t0)[3]);
-if(C_truep(C_fixnum_greaterp(t6,C_fix(1)))){
-t7=C_i_cdr(((C_word*)t0)[3]);
-/* ##sys#append */
-t8=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,t7,C_SCHEME_END_OF_LIST);}
-else{
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9816,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 192 ##sys#strip-syntax */
-t8=*((C_word*)lf[211]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[6]);}}
-
-/* k9814 in k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9816,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
-
-/* k9789 in k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9791,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=C_a_i_cons(&a,2,lf[129],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
-
-/* k9733 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9735(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 174 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[210],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2287,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9598,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9600,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 197 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9600,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9604,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 199 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[205],t2,lf[209]);}
-
-/* k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9604,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=C_i_cdddr(((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9616,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 203 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[131]);}
-
-/* k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9616,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 204 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9619,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9622,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 205 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k9620 in k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[56],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9622,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,lf[74],t7);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9669,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=t1,a[6]=t8,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-/* ##sys#append */
-t10=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-else{
-t10=C_a_i_cons(&a,2,lf[208],C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,lf[41],t10);
-t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=C_a_i_cons(&a,2,lf[128],t12);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,lf[41],t14);
-t16=C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
-t17=C_a_i_cons(&a,2,((C_word*)t0)[6],t16);
-t18=C_a_i_cons(&a,2,t13,t17);
-/* ##sys#append */
-t19=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t19+1)))(4,t19,t9,t18,C_SCHEME_END_OF_LIST);}}
-
-/* k9667 in k9620 in k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9669,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[206],t1);
-t3=C_a_i_cons(&a,2,lf[207],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
-
-/* k9596 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 194 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[205],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8912,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8914,a[2]=((C_word)li119),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 218 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8914,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8918,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 220 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[203],t2,lf[204]);}
-
-/* k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8918,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8927,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9561,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li118),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_9561(t12,t8,t2);}
-
-/* loop195 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9561(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9561,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9590,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g211212 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9588 in loop195 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9590(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9590,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop195208 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9561(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop195208 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9561(t6,((C_word*)t0)[3],t5);}}
-
-/* k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8927,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8930,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9517,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li117),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_9517(t10,t6,((C_word*)t0)[3]);}
-
-/* loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9517(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9517,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9544,a[2]=((C_word*)t0)[5],a[3]=((C_word)li116),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9555,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g235236 */
-t6=t3;
-f_9544(t6,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9553 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9555,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop219232 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9517(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop219232 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9517(t6,((C_word*)t0)[3],t5);}}
-
-/* g235 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9544(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9544,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9552,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 224 gensym */
-t3=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9550 in g235 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 224 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8930,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8933,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9473,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li115),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_9473(t10,t6,((C_word*)t0)[3]);}
-
-/* loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9473(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9473,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9500,a[2]=((C_word*)t0)[5],a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9511,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g260261 */
-t6=t3;
-f_9500(t6,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9509 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9511,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop244257 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9473(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop244257 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9473(t6,((C_word*)t0)[3],t5);}}
-
-/* g260 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9500(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9500,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9508,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 225 gensym */
-t3=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9506 in g260 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 225 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8933,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8936,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 226 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8936(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8936,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8939,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 227 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8939,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8950,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9298,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9387,a[2]=((C_word*)t0)[4],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9438,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li113),tmp=(C_word)a,a+=6,tmp));
-t16=((C_word*)t14)[1];
-f_9438(t16,t12,((C_word*)t0)[2]);}
-
-/* loop301 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9438(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9438,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9467,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g317318 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9465 in loop301 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9467,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop301314 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9438(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop301314 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9438(t6,((C_word*)t0)[3],t5);}}
-
-/* k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9387,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9389,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_9389(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9389(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9389,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9422,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g294295 */
-t10=t6;
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9420 in loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9422,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_9402(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_9402(t5,t4);}}
-
-/* k9400 in k9420 in loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9402(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop274288 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9389(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9298,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9302,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9306,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9310,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-t9=C_i_length(((C_word*)t0)[2]);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9365,a[2]=t11,a[3]=((C_word)li111),tmp=(C_word)a,a+=4,tmp));
-t13=((C_word*)t11)[1];
-f_9365(t13,t8,t9);}
-
-/* loop in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9365(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_9365,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_fix(0));
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9379,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=C_fixnum_difference(t2,C_fix(1));
-/* chicken-syntax.scm: 233 loop */
-t7=t4;
-t8=t5;
-t1=t7;
-t2=t8;
-goto loop;}}
-
-/* k9377 in loop in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9379,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,C_SCHEME_FALSE,t1));}
-
-/* k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9310,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9312,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_9312(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9312(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9312,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9345,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g344345 */
-t10=t6;
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9343 in loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9345(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9345,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_9325(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_9325(t5,t4);}}
-
-/* k9323 in k9343 in loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9325(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop324338 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9312(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k9304 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9306(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9300 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8950,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9150,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9154,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9234,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_9234(t11,t7,((C_word*)t0)[4],((C_word*)t0)[5]);}
-
-/* loop354 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9234(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9234,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=C_slot(t2,C_fix(0));
-t7=C_slot(t3,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,lf[167],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9247,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t13=t12;
-f_9247(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
-else{
-t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t14=t12;
-f_9247(t14,t13);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9245 in loop354 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9247(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop354368 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9234(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9154,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9158,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9162,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9172,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li108),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_9172(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop387 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9172(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9172,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=C_slot(t2,C_fix(0));
-t7=C_slot(t3,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,lf[167],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9185,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t13=t12;
-f_9185(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
-else{
-t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t14=t12;
-f_9185(t14,t13);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9183 in loop387 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9185(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop387401 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9172(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k9160 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9162(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9162,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
-
-/* k9156 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9150,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9142,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t3,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9142,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8990,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t3,a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8994,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9074,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word)li107),tmp=(C_word)a,a+=6,tmp));
-t13=((C_word*)t11)[1];
-f_9074(t13,t9,((C_word*)t0)[2],((C_word*)t0)[4]);}
-
-/* loop420 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9074(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9074,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=C_slot(t2,C_fix(0));
-t7=C_slot(t3,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,lf[167],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9087,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t13=t12;
-f_9087(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
-else{
-t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t14=t12;
-f_9087(t14,t13);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9085 in loop420 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9087(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop420434 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9074(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8994,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8998,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9002,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9012,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_9012(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop453 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9012(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9012,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=C_slot(t2,C_fix(0));
-t7=C_slot(t3,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,lf[167],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9025,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t13=t12;
-f_9025(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
-else{
-t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t14=t12;
-f_9025(t14,t13);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k9023 in loop453 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_9025(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop453467 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_9012(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k9000 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_9002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9002,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
-
-/* k8996 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8988 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8990,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=C_a_i_cons(&a,2,lf[187],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
-
-/* k8910 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8912(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 216 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[203],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8791,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8793,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 251 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8793,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8797,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 253 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[192],t2,lf[202]);}
-
-/* k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8797,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8803,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 255 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-
-/* k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8803,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8904,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8904(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8904,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 257 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[201]);}
-
-/* k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8809,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8812,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 258 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[200]);}
-
-/* k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8812(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8812,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8815,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 259 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[199]);}
-
-/* k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8815,2,t0,t1);}
-t2=C_SCHEME_FALSE;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8818,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t7,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8855,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t5,a[7]=t7,a[8]=t3,a[9]=t10,a[10]=((C_word)li104),tmp=(C_word)a,a+=11,tmp));
-t12=((C_word*)t10)[1];
-f_8855(t12,t8,((C_word*)t0)[2]);}
-
-/* loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8855(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8855,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8868,a[2]=t1,a[3]=((C_word*)t0)[9],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_8878,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=t2,a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 266 c */
-t6=((C_word*)t0)[5];
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,((C_word*)t0)[2]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8878,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_set_block_item(((C_word*)t0)[12],0,C_SCHEME_TRUE);
-t3=C_slot(((C_word*)t0)[11],C_fix(1));
-/* chicken-syntax.scm: 270 loop */
-t4=((C_word*)((C_word*)t0)[10])[1];
-f_8855(t4,((C_word*)t0)[9],t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 267 c */
-t3=((C_word*)t0)[5];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k8883 in k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8885,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_TRUE);
-t3=C_slot(((C_word*)t0)[9],C_fix(1));
-/* chicken-syntax.scm: 270 loop */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_8855(t4,((C_word*)t0)[7],t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8892,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 268 c */
-t3=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k8890 in k8883 in k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-t2=C_set_block_item(((C_word*)t0)[6],0,C_SCHEME_TRUE);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-/* chicken-syntax.scm: 270 loop */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_8855(t4,((C_word*)t0)[3],t3);}
-else{
-t2=C_i_car(((C_word*)t0)[5]);
-/* chicken-syntax.scm: 269 ##sys#error */
-t3=*((C_word*)lf[129]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],lf[198],t2);}}
-
-/* k8866 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8868(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* chicken-syntax.scm: 270 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8855(t3,((C_word*)t0)[2],t2);}
-
-/* k8816 in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8818,2,t0,t1);}
-if(C_truep(C_i_memq(lf[193],*((C_word*)lf[72]+1)))){
-t2=(C_truep(((C_word*)((C_word*)t0)[6])[1])?((C_word*)((C_word*)t0)[5])[1]:C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[194],t3));}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[195],t3));}
-else{
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(((C_word*)((C_word*)t0)[5])[1])?((C_word*)t0)[4]:lf[196]));}}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(((C_word*)((C_word*)t0)[2])[1])?((C_word*)t0)[4]:lf[197]));}}
-
-/* k8789 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 249 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[192],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2299,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8305,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8307,a[2]=((C_word)li103),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 282 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8307,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8311,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 284 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[186],t2,lf[191]);}
-
-/* k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8311,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8320,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 287 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[190]);}
-
-/* k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8320,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 288 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8323,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8326,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 289 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8326(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8326,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8754,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li102),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_8754(t10,t6,((C_word*)t0)[2]);}
-
-/* loop543 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8754(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8754,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8783,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g559560 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8781 in loop543 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8783(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8783,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop543556 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8754(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop543556 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8754(t6,((C_word*)t0)[3],t5);}}
-
-/* k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8329,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8332,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8719,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li101),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_8719(t10,t6,((C_word*)t0)[2]);}
-
-/* loop567 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8719(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8719,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8748,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g583584 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8746 in loop567 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8748,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop567580 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8719(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop567580 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8719(t6,((C_word*)t0)[3],t5);}}
-
-/* k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8332,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8335,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8675,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li100),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_8675(t10,t6,((C_word*)t0)[3]);}
-
-/* loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8675(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8675,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8702,a[2]=((C_word*)t0)[5],a[3]=((C_word)li99),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8713,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g607608 */
-t6=t3;
-f_8702(t6,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8711 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8713,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop591604 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8675(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop591604 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8675(t6,((C_word*)t0)[3],t5);}}
-
-/* g607 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8702(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8702,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8710,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 292 gensym */
-t3=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k8708 in g607 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 292 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8335,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8338,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8631,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li98),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_8631(t10,t6,((C_word*)t0)[3]);}
-
-/* loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8631(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8631,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8658,a[2]=((C_word*)t0)[5],a[3]=((C_word)li97),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8669,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g632633 */
-t6=t3;
-f_8658(t6,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8667 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8669,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop616629 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8631(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop616629 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8631(t6,((C_word*)t0)[3],t5);}}
-
-/* g632 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8658(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8658,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8666,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 293 gensym */
-t3=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k8664 in g632 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 293 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8338,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8349,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8527,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8582,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li96),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_8582(t11,t7,((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8582(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8582,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8615,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g664665 */
-t10=t6;
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k8613 in loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8615(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8615,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8595,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_8595(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_8595(t5,t4);}}
-
-/* k8593 in k8613 in loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8595(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop644658 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8582(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8527(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8527,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8531,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8533,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li95),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_8533(t10,t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8533(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8533,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8566,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g691692 */
-t10=t6;
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k8564 in loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8566,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8546,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_8546(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_8546(t5,t4);}}
-
-/* k8544 in k8564 in loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8546(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop671685 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8533(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k8529 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 294 ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8349,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8417,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8421,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8423,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[6],a[6]=((C_word)li94),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_8423(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8423(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[54],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8423,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8454,a[2]=((C_word*)t0)[5],a[3]=((C_word)li93),tmp=(C_word)a,a+=4,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-t9=f_8454(C_a_i(&a,39),t6,t7,t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8436,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t10,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t12=t11;
-f_8436(t12,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t10));}
-else{
-t12=C_mutate(((C_word *)((C_word*)t0)[2])+1,t10);
-t13=t11;
-f_8436(t13,t12);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k8434 in loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8436(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop698712 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8423(t5,((C_word*)t0)[2],t3,t4);}
-
-/* g718 in loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_8454(C_word *a,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_stack_check;
-t3=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[188],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t1,t7);
-t9=C_a_i_cons(&a,2,lf[188],C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t2,t9);
-t11=C_a_i_cons(&a,2,lf[167],t10);
-t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=C_a_i_cons(&a,2,t8,t12);
-t14=C_a_i_cons(&a,2,t6,t13);
-return(C_a_i_cons(&a,2,((C_word*)t0)[2],t14));}
-
-/* k8419 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8421(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8415 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8417,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8397,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t6,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* ##sys#append */
-t8=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k8395 in k8415 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8397(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8397,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=C_a_i_cons(&a,2,lf[187],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[5],t8);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[4],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[3],t11);
-t13=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_cons(&a,2,((C_word*)t0)[4],t12));}
-
-/* k8303 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 280 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[186],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2299,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2302,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8260,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8262,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 307 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8262(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8262,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8266,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 309 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[184],t2,lf[185]);}
-
-/* k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8266,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8273,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 310 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8273,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8293,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 311 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-
-/* k8291 in k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8293,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8297,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k8295 in k8291 in k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8297(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8297,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k8258 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 305 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[184],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2302,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8207,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8209,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 315 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8209,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8213,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 317 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[182],t2,lf[183]);}
-
-/* k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8213,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8220,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 318 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8220,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8248,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 320 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[55]);}
-
-/* k8246 in k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8248(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8248,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8252,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k8250 in k8246 in k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8252,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k8205 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 313 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[182],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2305,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2308,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7979,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7981,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 324 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7981,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7985,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 326 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[175],t2,lf[181]);}
-
-/* k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7985(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7985,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7994,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 329 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[21]);}
-
-/* k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7994,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
-t4=C_a_i_cons(&a,2,t1,t3);
-t5=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t6);
-t8=C_a_i_cons(&a,2,t1,t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t4,t9);
-t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_a_i_cons(&a,2,lf[97],t10));}
-else{
-t2=C_i_cdr(((C_word*)t0)[4]);
-if(C_truep(C_i_nullp(t2))){
-t3=C_i_car(((C_word*)t0)[4]);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[167],t5));}
-else{
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8063,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8166,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li89),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_8166(t11,t7,((C_word*)t0)[4]);}}}
-
-/* loop769 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8166(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8166,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[60]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8195,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g785786 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8193 in loop769 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8195(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8195,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop769782 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8166(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop769782 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8166(t6,((C_word*)t0)[3],t5);}}
-
-/* k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8063,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8090,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8094,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8096,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word)li88),tmp=(C_word)a,a+=6,tmp));
-t14=((C_word*)t12)[1];
-f_8096(t14,t10,((C_word*)t0)[2],t1);}
-
-/* loop796 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8096(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8096,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=C_slot(t2,C_fix(0));
-t7=C_slot(t3,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,lf[167],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8109,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t13=t12;
-f_8109(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
-else{
-t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
-t14=t12;
-f_8109(t14,t13);}}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k8107 in loop796 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_8109(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop796810 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8096(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k8092 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8088 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_8090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8090,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[97],t5));}
-
-/* k7977 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7979(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 322 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[175],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2308,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7937,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7939,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 348 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7939(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7939,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7943,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 350 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[174],t2,lf[179]);}
-
-/* k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7943,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7963,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp);
-t4=C_i_cadr(((C_word*)t0)[3]);
-/* for-each */
-t5=*((C_word*)lf[178]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t2,t3,t4);}
-
-/* a7962 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7963(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7963,3,t0,t1,t2);}
-t3=*((C_word*)lf[176]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7971,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 351 ##sys#current-module */
-t5=*((C_word*)lf[177]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k7969 in a7962 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g844845 */
-t2=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7946,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7953,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 352 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[175]);}
-
-/* k7951 in k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7953,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7957,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k7955 in k7951 in k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7957,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k7935 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 346 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[174],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2311,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7412,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7414,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 356 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7414,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7418,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 358 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[171],t2,lf[173]);}
-
-/* k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7418,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7427,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 361 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-
-/* k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7427(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7427,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7430,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 362 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7430,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7432,a[2]=t3,a[3]=((C_word)li73),tmp=(C_word)a,a+=4,tmp));
-t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7463,a[2]=t5,a[3]=((C_word)li74),tmp=(C_word)a,a+=4,tmp));
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7505,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],tmp=(C_word)a,a+=10,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7900,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li84),tmp=(C_word)a,a+=6,tmp));
-t16=((C_word*)t14)[1];
-f_7900(t16,t12,((C_word*)t0)[3]);}
-
-/* loop875 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7900(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7900,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7929,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g891892 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7927 in loop875 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7929(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7929,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop875888 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7900(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop875888 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7900(t6,((C_word*)t0)[3],t5);}}
-
-/* k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7505,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7508,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7860,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li83),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_7860(t6,t2,t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7860(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7860,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7873,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_listp(t4))){
-/* chicken-syntax.scm: 378 append */
-t6=*((C_word*)lf[48]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,t3);}
-else{
-if(C_truep(C_i_pairp(t4))){
-/* chicken-syntax.scm: 379 append* */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_7432(t6,t5,t4,t3);}
-else{
-t6=C_a_i_cons(&a,2,t4,t3);
-t7=C_i_cdr(t2);
-/* chicken-syntax.scm: 381 loop */
-t10=t1;
-t11=t7;
-t12=t6;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}}}}
-
-/* k7871 in loop in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 381 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7860(t3,((C_word*)t0)[2],t2,t1);}
-
-/* k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7508,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7511,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7812,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li82),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_7812(t10,t6,t1);}
-
-/* loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7812(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7812,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7839,a[2]=((C_word*)t0)[5],a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7854,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g929930 */
-t6=t3;
-f_7839(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7852 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7854,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop913926 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7812(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop913926 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7812(t6,((C_word*)t0)[3],t5);}}
-
-/* g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7839(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7839,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7847,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7851,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 382 gensym */
-t5=*((C_word*)lf[60]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k7849 in g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 382 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7845 in g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7847(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7847,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7511,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7512,a[2]=t1,a[3]=((C_word)li75),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7523,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t2,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7766,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li80),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_7766(t7,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
-
-/* loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7766(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7766,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-/* chicken-syntax.scm: 386 reverse */
-t4=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-else{
-t4=C_i_car(t2);
-if(C_truep(C_i_pairp(t4))){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7806,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 390 map* */
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_7463(t6,t5,((C_word*)t0)[2],t4);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7799,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 389 lookup */
-t6=((C_word*)t0)[2];
-f_7512(3,t6,t5,t4);}}}
-
-/* k7797 in loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7799,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 391 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7766(t4,((C_word*)t0)[2],t3,t2);}
-
-/* k7804 in loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7806,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 391 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7766(t4,((C_word*)t0)[2],t3,t2);}
-
-/* k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7523(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7523,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7530,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7726,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li79),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_7726(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1002 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7726(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7726,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_cadr(t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop10021015 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop10021015 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7530,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7532,a[2]=((C_word*)t0)[5],a[3]=t3,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word)li78),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_7532(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7532(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7532,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(C_i_nullp(t2))){
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7550,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7556,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[5],a[6]=((C_word)li77),tmp=(C_word)a,a+=7,tmp));
-t13=((C_word*)t11)[1];
-f_7556(t13,t9,((C_word*)t0)[4]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7604,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=t2,a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-t6=C_i_car(t4);
-if(C_truep(C_i_pairp(t6))){
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7720,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 397 cdar */
-t8=*((C_word*)lf[47]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t4);}
-else{
-t7=t5;
-f_7604(t7,C_SCHEME_FALSE);}}}
-
-/* k7718 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7720(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_7604(t2,C_i_nullp(t1));}
-
-/* k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7604(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7604,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7643,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 398 caar */
-t3=*((C_word*)lf[50]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-else{
-t2=C_i_car(((C_word*)t0)[8]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[2],t4);
-t6=C_i_car(((C_word*)t0)[4]);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7686,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word*)t0)[2],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-t8=C_i_cdr(((C_word*)t0)[5]);
-t9=C_i_cdr(((C_word*)t0)[8]);
-t10=C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 403 fold */
-t11=((C_word*)((C_word*)t0)[3])[1];
-f_7532(t11,t7,t8,t9,t10);}}
-
-/* k7684 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7686,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,lf[97],t6));}
-
-/* k7641 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7643(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7643,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[7]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t1,t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7623,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t7=C_i_cdr(((C_word*)t0)[4]);
-t8=C_i_cdr(((C_word*)t0)[7]);
-t9=C_i_cdr(((C_word*)t0)[3]);
-/* chicken-syntax.scm: 399 fold */
-t10=((C_word*)((C_word*)t0)[2])[1];
-f_7532(t10,t6,t7,t8,t9);}
-
-/* k7621 in k7641 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7623,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7556(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7556,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[5],a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7594,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g983984 */
-t6=t3;
-f_7583(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7592 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7594(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7594,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop967980 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7556(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop967980 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7556(t6,((C_word*)t0)[3],t5);}}
-
-/* g983 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7583(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7583,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7591,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 396 lookup */
-t4=((C_word*)t0)[2];
-f_7512(3,t4,t3,t2);}
-
-/* k7589 in g983 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7591,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,((C_word*)t0)[2],t1));}
-
-/* k7548 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7550(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7550,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7554,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k7552 in k7548 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7554(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7554,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* lookup in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7512(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7512,3,t0,t1,t2);}
-t3=C_i_assq(t2,((C_word*)t0)[2]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cdr(t3));}
-
-/* map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7463(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7463,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep(C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7486,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t5=C_i_car(t3);
-/* chicken-syntax.scm: 371 proc */
-t6=t2;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-/* chicken-syntax.scm: 370 proc */
-t4=t2;
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}}}
-
-/* k7484 in map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7490,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 371 map* */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7463(t4,t2,((C_word*)t0)[2],t3);}
-
-/* k7488 in k7484 in map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7490,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* append* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7432(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7432,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_pairp(t2))){
-t4=C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7453,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_i_cdr(t2);
-/* chicken-syntax.scm: 367 append* */
-t8=t5;
-t9=t6;
-t10=t3;
-t1=t8;
-t2=t9;
-t3=t10;
-goto loop;}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,t2,t3));}}
-
-/* k7451 in append* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7453(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7453,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k7410 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 354 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[171],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7340,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7342,a[2]=((C_word)li72),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 407 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7342(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7342,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7346,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 409 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[170],t2,lf[172]);}
-
-/* k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7346,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7355,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 412 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-
-/* k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7358,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 413 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[171]);}
-
-/* k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7358,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7363,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li71),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_7363(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7363(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7363,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7381,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
-else{
-t3=C_i_car(t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7400,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t6=C_i_cdr(t2);
-/* chicken-syntax.scm: 418 fold */
-t9=t5;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}}
-
-/* k7398 in fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7400(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7400,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k7379 in fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7381,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k7338 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 405 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[170],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2317,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6969,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6971,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 422 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6971,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6975,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 424 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[166],t2,lf[169]);}
-
-/* k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6975,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6984,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 427 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-
-/* k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6984,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6987,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 428 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6987,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7296,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7298,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_7298(t11,t7,((C_word*)t0)[3]);}
-
-/* loop1057 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7298(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7298,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop10571070 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop10571070 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7294 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[27]+1),t1);}
-
-/* k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6990,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6993,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7246,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li68),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_7246(t10,t6,t1);}
-
-/* loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7246(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7246,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7273,a[2]=((C_word*)t0)[5],a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7288,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g10981099 */
-t6=t3;
-f_7273(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7286 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7288(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7288,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10821095 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7246(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10821095 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7246(t6,((C_word*)t0)[3],t5);}}
-
-/* g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7273(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7273,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7281,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7285,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 430 gensym */
-t5=*((C_word*)lf[60]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k7283 in g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7285(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 430 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7279 in g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7281(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7281,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6993(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6993,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6994,a[2]=t1,a[3]=((C_word)li60),tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7013,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7206,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li66),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_7206(t11,t7,((C_word*)t0)[2]);}
-
-/* loop1112 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7206(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7206,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_a_i_list(&a,2,t3,lf[168]);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop11121125 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop11121125 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7013,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7017,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7021,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7027,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word)li65),tmp=(C_word)a,a+=8,tmp));
-t11=((C_word*)t9)[1];
-f_7027(t11,t7,((C_word*)t0)[2]);}
-
-/* loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7027(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7027,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7054,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li64),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7200,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g11521153 */
-t6=t3;
-f_7054(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7198 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7200,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11361149 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7027(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11361149 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7027(t6,((C_word*)t0)[3],t5);}}
-
-/* g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7054(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7054,NULL,3,t0,t1,t2);}
-t3=C_i_cadr(t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7082,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t6,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-t12=C_i_car(t2);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7152,a[2]=t8,a[3]=t14,a[4]=t10,a[5]=((C_word*)t0)[2],a[6]=((C_word)li63),tmp=(C_word)a,a+=7,tmp));
-t16=((C_word*)t14)[1];
-f_7152(t16,t11,t12);}
-
-/* loop1161 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7152(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7152,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=f_6994(((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop11611174 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop11611174 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7082(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7082,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7086,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7090,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_i_car(((C_word*)t0)[3]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7096,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li62),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_7096(t12,t7,t8);}
-
-/* loop1184 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_7096(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(16);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7096,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7123,a[2]=((C_word*)t0)[5],a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_7123(C_a_i(&a,9),t3,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop11841197 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop11841197 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g1200 in loop1184 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_7123(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_stack_check;
-t2=f_6994(((C_word*)t0)[2],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t1,t3);
-return(C_a_i_cons(&a,2,lf[167],t4));}
-
-/* k7088 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k7084 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7086(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7086,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[97],t5));}
-
-/* k7019 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7021,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7025,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k7023 in k7019 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7015 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_7017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7017,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* lookup in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_6994(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=C_i_assq(t1,((C_word*)t0)[2]);
-return(C_i_cdr(t2));}
-
-/* k6967 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 420 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[166],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2320,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6965,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 443 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[163]);}
-
-/* k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6965,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[163],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6886,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6888,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 444 ##sys#er-transformer */
-t6=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6888,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6892,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 446 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[164],t2,lf[165]);}
-
-/* k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6892,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6895,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 447 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-
-/* k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6895(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6895,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6898,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 448 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k6896 in k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6898,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
-t5=C_a_i_cons(&a,2,t1,t4);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6933,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 451 r */
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[163]);}
-
-/* k6931 in k6896 in k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6933,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[6]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,t1,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[3],t9);
-t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_a_i_cons(&a,2,lf[97],t10));}
-
-/* k6884 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 441 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[164],((C_word*)t0)[2],t1);}
-
-/* k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2323,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2326,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6781,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6783,a[2]=((C_word)li58),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 455 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6783,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6787,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 457 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-
-/* k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6787,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6789,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li57),tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6870,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6874,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=C_i_cdr(((C_word*)t0)[2]);
-/* chicken-syntax.scm: 471 quotify-proc */
-t6=t2;
-f_6789(t6,t4,t5,lf[159]);}
-
-/* k6872 in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6874(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k6868 in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6870(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6870,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[162],t1));}
-
-/* quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6789(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6789,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 460 ##sys#check-syntax */
-t5=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,t3,t2,lf[161]);}
-
-/* k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6793,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[5]);
-t3=C_i_pairp(t2);
-t4=(C_truep(t3)?C_i_car(t2):t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6802,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(t2))){
-t6=C_i_cdr(t2);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6850,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t8=C_i_cdr(((C_word*)t0)[5]);
-/* ##sys#append */
-t9=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
-else{
-t6=t5;
-f_6802(t6,C_i_cadr(((C_word*)t0)[5]));}}
-
-/* k6848 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6850,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-f_6802(t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6802(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6802,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6805,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_pairp(t1);
-t4=C_i_not(t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6814,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_6814(t6,t4);}
-else{
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6824,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=C_i_car(t1);
-/* chicken-syntax.scm: 466 c */
-t8=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
-
-/* k6822 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6824(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_6814(t2,C_i_not(t1));}
-
-/* k6812 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6814(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6814,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* chicken-syntax.scm: 467 syntax-error */
-t2=*((C_word*)lf[12]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],lf[159],lf[160],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]));}}
-
-/* k6803 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6805,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k6779 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 453 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[159],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2326(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2326,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6618,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6620,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 475 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6620,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6624,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 477 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[157],t2,lf[158]);}
-
-/* k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6633,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 480 r */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
-
-/* k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6633,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6636,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 481 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6636,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6641,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li55),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_6641(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6641(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word *a;
-loop:
-a=C_alloc(16);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6641,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6655,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 484 r */
-t4=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-else{
-t3=C_i_car(t2);
-t4=C_i_cdr(t2);
-if(C_truep(C_i_pairp(t3))){
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6715,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 488 fold */
-t17=t7;
-t18=t4;
-t1=t17;
-t2=t18;
-goto loop;}
-else{
-t6=C_i_car(t3);
-t7=C_i_cadr(t3);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6753,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t10,a[5]=((C_word*)t0)[4],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 492 fold */
-t17=t11;
-t18=t4;
-t1=t17;
-t2=t18;
-goto loop;}}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6686,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 487 fold */
-t17=t5;
-t18=t4;
-t1=t17;
-t2=t18;
-goto loop;}}}
-
-/* k6684 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6686,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k6751 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6753,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
-
-/* k6713 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6715(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6715,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k6653 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6655,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6659,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k6657 in k6653 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6659,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k6616 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6618(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 473 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[157],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2329,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2332,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6418,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6420,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 496 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6420(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6420,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6424,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 498 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[151],t2,lf[156]);}
-
-/* k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6424,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[5]);
-t3=C_i_cddr(((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6433,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 501 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[131]);}
-
-/* k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6433,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6436,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 502 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6436,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 503 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
-
-/* k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6442,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 504 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[155]);}
-
-/* k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6442(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6442,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6445,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 505 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-
-/* k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6445,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6452,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 506 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6452,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6468,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6470,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=t7,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word)li53),tmp=(C_word)a,a+=10,tmp));
-t9=((C_word*)t7)[1];
-f_6470(t9,t5,((C_word*)t0)[2]);}
-
-/* expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6470(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6470,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6486,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t3,a[10]=((C_word*)t0)[8],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 512 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[151],t3,lf[153]);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[154]);}}
-
-/* k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6492,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-t3=C_i_car(((C_word*)t0)[9]);
-/* chicken-syntax.scm: 513 c */
-t4=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
-
-/* k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6492,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6499,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[7]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6542,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6546,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_i_car(((C_word*)t0)[7]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6552,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li52),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_6552(t12,t7,t8);}}
-
-/* loop1321 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6552(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(16);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6552,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6579,a[2]=((C_word*)t0)[5],a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_6579(C_a_i(&a,9),t3,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop13211334 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop13211334 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g1337 in loop1321 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_6579(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
-return(C_a_i_cons(&a,2,lf[152],t3));}
-
-/* k6544 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6546(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6542,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6534,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t4=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k6532 in k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6534,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6530,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 518 expand */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_6470(t4,t3,((C_word*)t0)[2]);}
-
-/* k6528 in k6532 in k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6530,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k6497 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6499(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6499,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k6466 in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6468,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k6416 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 494 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[151],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2332,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2335,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6414,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 599 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-
-/* k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6414,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[78],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6410,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 600 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-
-/* k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6410,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[107],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5825,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5827,a[2]=((C_word)li50),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 601 ##sys#er-transformer */
-t7=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-
-/* a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5827(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5827,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5831,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 603 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[137],t2,lf[150]);}
-
-/* k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5831(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5831,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=C_i_cdddr(((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5843,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 607 r */
-t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[118]);}
-
-/* k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5843(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5843,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5846,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 608 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5846,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5849,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 609 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5849(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5849,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5851,a[2]=t1,a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp));
-t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5948,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word)li42),tmp=(C_word)a,a+=6,tmp));
-t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6149,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t5,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=t1,a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 647 ##sys#check-syntax */
-t9=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,lf[137],((C_word*)t0)[2],lf[149]);}
-
-/* k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6149,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6152,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 648 ##sys#check-syntax */
-t3=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[137],((C_word*)t0)[8],lf[148]);}
-
-/* k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6152(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6152,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6155,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6361,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_6361(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1404 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6361(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6361,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6390,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g14201421 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6388 in loop1404 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6390(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6390,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14041417 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6361(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14041417 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6361(t6,((C_word*)t0)[3],t5);}}
-
-/* k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6155,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6156,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6171,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=t1,a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6317,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=t2,a[6]=((C_word*)t0)[5],a[7]=((C_word)li48),tmp=(C_word)a,a+=8,tmp));
-t11=((C_word*)t9)[1];
-f_6317(t11,t7,t1);}
-
-/* loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6317(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6317,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6344,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li47),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6355,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g14471448 */
-t6=t3;
-f_6344(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6353 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6355,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14311444 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6317(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14311444 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6317(t6,((C_word*)t0)[3],t5);}}
-
-/* g1447 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6344(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6344,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6352,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 656 prefix-sym */
-f_6156(t3,lf[147],t2);}
-
-/* k6350 in g1447 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6352(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 656 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6171,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6174,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6282,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li46),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_6282(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1456 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6282(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6282,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6311,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g14721473 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6309 in loop1456 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6311(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6311,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14561469 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6282(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14561469 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6282(t6,((C_word*)t0)[3],t5);}}
-
-/* k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6174,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6177,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 660 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[145]);}
-
-/* k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6177(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6177,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 663 r */
-t3=((C_word*)t0)[7];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[144]);}
-
-/* k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6180,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6183,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t1,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6238,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[7],a[7]=((C_word)li45),tmp=(C_word)a,a+=8,tmp));
-t10=((C_word*)t8)[1];
-f_6238(t10,t6,((C_word*)t0)[12]);}
-
-/* loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6238(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6238,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6265,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li44),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6276,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g14981499 */
-t6=t3;
-f_6265(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6274 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6276(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6276,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14821495 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6238(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14821495 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6238(t6,((C_word*)t0)[3],t5);}}
-
-/* g1498 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6265(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6265,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6273,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 665 prefix-sym */
-f_6156(t3,lf[143],t2);}
-
-/* k6271 in g1498 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 665 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6183,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6186,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 668 make-default-procs */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5851(t3,t2,((C_word*)t0)[4],((C_word*)t0)[8],t1,((C_word*)t0)[2]);}
-
-/* k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6186,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6189,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 670 make-if-tree */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_5948(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[7],((C_word*)t0)[11]);}
-
-/* k6187 in k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6189,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6196,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 673 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[142]);}
-
-/* k6194 in k6187 in k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6196,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[7]);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[4]);
-t9=C_a_i_cons(&a,2,t3,t8);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t9,t10);
-t12=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_cons(&a,2,t1,t11));}
-
-/* prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_6156(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6156,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6164,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6168,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 651 symbol->string */
-t6=*((C_word*)lf[141]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-
-/* k6166 in prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 651 string-append */
-t2=*((C_word*)lf[140]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k6162 in prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 651 string->symbol */
-t2=*((C_word*)lf[139]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5948(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5948,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5954,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t5,a[8]=((C_word)li41),tmp=(C_word)a,a+=9,tmp));
-t9=((C_word*)t7)[1];
-f_5954(t9,t1,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5954(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5954,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(C_i_nullp(t2))){
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6028,a[2]=t4,a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 635 r */
-t6=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[125]);}
-else{
-t5=C_i_car(t2);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[125],t6);
-t8=C_i_car(t3);
-t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6142,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=t1,a[9]=t7,a[10]=((C_word*)t0)[3],a[11]=t5,a[12]=((C_word*)t0)[7],a[13]=t8,tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 640 reverse */
-t10=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t4);}}
-
-/* k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6142,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
-t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 641 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-
-/* k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6130,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
-t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6114,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t5,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 642 r */
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[107]);}
-
-/* k6112 in k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6114(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6114,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[13],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[12],t6);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6078,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=t7,tmp=(C_word)a,a+=8,tmp);
-t9=C_i_cdr(((C_word*)t0)[6]);
-t10=C_i_cdr(((C_word*)t0)[5]);
-t11=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
-/* chicken-syntax.scm: 643 recur */
-t12=((C_word*)((C_word*)t0)[2])[1];
-f_5954(t12,t8,t9,t10,t11);}
-
-/* k6076 in k6112 in k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6078,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
-
-/* k6026 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6028,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[74],t4);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6016,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 636 reverse */
-t7=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[2]);}
-
-/* k6014 in k6026 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_6016(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6016,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=C_a_i_cons(&a,2,lf[138],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[41],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[128],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t6,t7);
-t9=C_a_i_cons(&a,2,lf[129],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t2,t10);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[4],t11);
-t13=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_cons(&a,2,((C_word*)t0)[2],t12));}
-
-/* make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5851,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5859,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 615 reverse */
-t7=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}
-
-/* k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5859(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5859,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5863,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 616 reverse */
-t3=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5867,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 617 reverse */
-t3=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5867,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5869,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li39),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_5869(t5,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5869(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5869,NULL,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_nullp(t2))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_END_OF_LIST);}
-else{
-t6=C_i_cdr(t2);
-t7=C_i_car(t3);
-t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5922,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t1,a[7]=t7,a[8]=((C_word*)t0)[3],a[9]=t5,tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 622 reverse */
-t9=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t6);}}
-
-/* k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5922(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5922,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5934,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5938,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 623 reverse */
-t4=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k5936 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5938(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5938,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[3]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
-
-/* k5932 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5934,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[7],t6);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5890,a[2]=t7,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t9=C_i_cdr(((C_word*)t0)[5]);
-t10=C_i_cdr(((C_word*)t0)[4]);
-t11=C_i_car(((C_word*)t0)[5]);
-/* chicken-syntax.scm: 624 recur */
-t12=((C_word*)((C_word*)t0)[3])[1];
-f_5869(t12,t8,((C_word*)t0)[2],t9,t10,t11);}
-
-/* k5888 in k5932 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5890,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k5823 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 597 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[137],((C_word*)t0)[2],t1);}
-
-/* k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2335,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2338,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5817,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 693 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
-
-/* k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5817,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[125],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5813,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 694 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-
-/* k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5813,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[78],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 695 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-
-/* k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5809,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[107],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5600,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5602,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 696 ##sys#er-transformer */
-t8=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}
-
-/* a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5602(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5602,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5606,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 698 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[133],t2,lf[136]);}
-
-/* k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5606,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5609,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 699 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-
-/* k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5609,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5612,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 700 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5612(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5612,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 701 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5619,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[6]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5769,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t5,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 702 r */
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[125]);}
-
-/* k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5769(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5769,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_i_cddr(((C_word*)t0)[7]);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5654,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_i_nullp(t4))){
-t6=t5;
-f_5654(2,t6,C_SCHEME_FALSE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=t5;
-f_5654(2,t7,C_i_car(t4));}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[129]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[135],t4);}}}
-
-/* k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5654,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5730,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 704 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
-
-/* k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5730(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5730,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5742,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 704 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-
-/* k5740 in k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5742,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[74],t6);
-t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5714,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t7,a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 705 r */
-t9=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,lf[78]);}
-
-/* k5712 in k5740 in k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[60],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5714,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,lf[134],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[41],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[128],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t7,t8);
-t10=C_a_i_cons(&a,2,lf[129],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,t3,t11);
-t13=C_a_i_cons(&a,2,((C_word*)t0)[8],t12);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[7],t13);
-t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
-t16=C_a_i_cons(&a,2,((C_word*)t0)[6],t15);
-t17=C_a_i_cons(&a,2,((C_word*)t0)[5],t16);
-t18=C_a_i_cons(&a,2,((C_word*)t0)[7],t17);
-t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
-t20=C_a_i_cons(&a,2,((C_word*)t0)[4],t19);
-t21=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,C_a_i_cons(&a,2,((C_word*)t0)[2],t20));}
-
-/* k5598 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5600(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 691 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[133],((C_word*)t0)[2],t1);}
-
-/* k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2338,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2341,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5592,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 728 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
-
-/* k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5592(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5592,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[125],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5286,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5288,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 729 ##sys#er-transformer */
-t6=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5288(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5288,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5292,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 731 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[126],t2,lf[132]);}
-
-/* k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5292,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=C_i_cdddr(((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5304,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 735 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
-
-/* k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5304(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5304,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5307,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 736 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
-
-/* k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5307(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5307,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5310,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 737 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
-
-/* k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5310,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5313,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 738 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-
-/* k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5313,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5316,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 739 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5316,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5319,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 740 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-
-/* k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5319,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5338,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5340,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[8],a[10]=((C_word)li36),tmp=(C_word)a,a+=11,tmp));
-t9=((C_word*)t7)[1];
-f_5340(t9,t5,t1,((C_word*)t0)[2]);}
-
-/* loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5340(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5340,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[74],t6);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5406,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=t7,a[5]=t2,a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* ##sys#append */
-t9=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}
-else{
-t4=C_i_car(t3);
-if(C_truep(C_i_pairp(t4))){
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5430,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[8],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 751 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[130]);}
-else{
-t5=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t4,t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5568,a[2]=((C_word*)t0)[8],a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t9=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}}}
-
-/* k5566 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5568,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k5428 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word ab[77],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[11]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=C_i_cadr(((C_word*)t0)[11]);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[8],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t5,t8);
-t10=C_a_i_cons(&a,2,t4,t9);
-t11=C_a_i_cons(&a,2,((C_word*)t0)[7],t10);
-t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=C_a_i_cons(&a,2,t2,t12);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,((C_word*)t0)[9],t14);
-t16=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
-t17=C_a_i_cons(&a,2,lf[41],t16);
-t18=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t19=C_a_i_cons(&a,2,((C_word*)t0)[6],t18);
-t20=C_a_i_cons(&a,2,t19,C_SCHEME_END_OF_LIST);
-t21=C_a_i_cons(&a,2,t17,t20);
-t22=C_a_i_cons(&a,2,t15,t21);
-t23=C_a_i_cons(&a,2,((C_word*)t0)[7],t22);
-t24=C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
-t25=C_a_i_cons(&a,2,t1,t24);
-t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
-t27=C_a_i_cons(&a,2,t13,t26);
-t28=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5449,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t27,tmp=(C_word)a,a+=5,tmp);
-t29=C_i_cdr(((C_word*)t0)[3]);
-/* chicken-syntax.scm: 758 loop */
-t30=((C_word*)((C_word*)t0)[2])[1];
-f_5340(t30,t28,t1,t29);}
-
-/* k5447 in k5428 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5449,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k5404 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5406,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=C_a_i_cons(&a,2,lf[127],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[41],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[128],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t7,t8);
-t10=C_a_i_cons(&a,2,lf[129],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,t3,t11);
-t13=C_a_i_cons(&a,2,((C_word*)t0)[4],t12);
-t14=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_a_i_cons(&a,2,((C_word*)t0)[2],t13));}
-
-/* k5336 in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5338,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k5284 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 726 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[126],((C_word*)t0)[2],t1);}
-
-/* k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2341,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5278,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 766 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[106]);}
-
-/* k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5278,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[106],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5274,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 767 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-
-/* k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5274,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[78],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 768 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-
-/* k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5270,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[107],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5266,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 769 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[108]);}
-
-/* k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5266,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[108],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4738,a[2]=t6,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4740,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 770 ##sys#er-transformer */
-t9=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-
-/* a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4740,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4744,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 772 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[109],t2,lf[124]);}
-
-/* k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4744(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4744,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4746,a[2]=((C_word*)t0)[4],a[3]=((C_word)li26),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4781,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 778 require */
-t4=*((C_word*)lf[122]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[123]);}
-
-/* k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4781,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4784,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5183,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_i_cdr(((C_word*)t0)[3]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5189,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word)li34),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_5189(t12,t7,t8);}
-
-/* loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_5189(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5189,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5230,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=C_i_car(t4);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5226,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 780 ##sys#decompose-lambda-list */
-t7=*((C_word*)lf[115]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t3,t5,t6);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* a5225 in loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5226,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-
-/* k5228 in loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5230(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5230,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15891602 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5189(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15891602 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5189(t6,((C_word*)t0)[3],t5);}}
-
-/* k5181 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[121]+1),t1);}
-
-/* k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4784(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4784,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4787,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 784 genvars */
-t3=((C_word*)t0)[2];
-f_4746(t3,t2,t1);}
-
-/* k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4787,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4790,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 785 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[120]);}
-
-/* k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4790,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 786 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[119]);}
-
-/* k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4793,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4796,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 787 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4796(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4796,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4799,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 788 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4799,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4802,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 789 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[106]);}
-
-/* k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4802,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4805,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 790 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[108]);}
-
-/* k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4805,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4808,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 791 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
-
-/* k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4808,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_4811,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 792 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-
-/* k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4811,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_4814,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-/* chicken-syntax.scm: 793 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-
-/* k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4814(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4814,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4825,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-/* chicken-syntax.scm: 794 append */
-t3=*((C_word*)lf[48]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[8],((C_word*)t0)[14]);}
-
-/* k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4825,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[15],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[110],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[14],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4849,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=t1,a[5]=((C_word*)t0)[13],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-t8=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_4851,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word)li32),tmp=(C_word)a,a+=14,tmp);
-t9=C_i_cdr(((C_word*)t0)[2]);
-/* chicken-syntax.scm: 796 fold-right */
-t10=*((C_word*)lf[116]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t7,t8,lf[117],t9);}
-
-/* a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4851,4,t0,t1,t2,t3);}
-t4=C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4861,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=t3,a[14]=((C_word*)t0)[12],a[15]=((C_word)li31),tmp=(C_word)a,a+=16,tmp);
-/* chicken-syntax.scm: 798 ##sys#decompose-lambda-list */
-t6=*((C_word*)lf[115]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t4,t5);}
-
-/* a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4861(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4861,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_4865,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t4,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=t2,a[14]=((C_word*)t0)[12],a[15]=t1,a[16]=((C_word*)t0)[13],a[17]=((C_word*)t0)[14],a[18]=t3,tmp=(C_word)a,a+=19,tmp);
-t6=C_i_car(((C_word*)t0)[9]);
-/* chicken-syntax.scm: 801 ##sys#check-syntax */
-t7=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[109],t6,lf[114]);}
-
-/* k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4865(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4865,2,t0,t1);}
-t2=C_fixnum_difference(((C_word*)t0)[18],((C_word*)t0)[17]);
-t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4879,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[18],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[17],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(((C_word*)t0)[10])){
-t4=C_eqp(t2,C_fix(0));
-if(C_truep(t4)){
-t5=t3;
-f_4879(t5,C_SCHEME_TRUE);}
-else{
-t5=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=t3;
-f_4879(t7,C_a_i_cons(&a,2,((C_word*)t0)[3],t6));}}
-else{
-t4=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=t3;
-f_4879(t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}}
-
-/* k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4879(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4879,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4887,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=t1,a[5]=((C_word*)t0)[15],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4893,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word)li27),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4903,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word)li30),tmp=(C_word)a,a+=11,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t2,t3,t4);}
-
-/* a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4903(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4903,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4907,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4979,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[7],a[9]=((C_word)li29),tmp=(C_word)a,a+=10,tmp));
-t8=((C_word*)t6)[1];
-f_4979(t8,t4,t3,((C_word*)t0)[2]);}
-
-/* build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4979(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4979,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-if(C_truep(((C_word*)t0)[8])){
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5004,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t8=C_i_cdr(((C_word*)t0)[6]);
-/* ##sys#append */
-t9=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
-else{
-t4=C_i_cddr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cadr(((C_word*)t0)[6]));}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5036,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_i_cdr(((C_word*)t0)[6]);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}}}
-else{
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5047,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5127,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 816 gensym */
-t6=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k5125 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5127(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 816 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k5045 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5047(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5047,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[8]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t2,t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t1,t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,t6,t11);
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5066,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
-t14=C_i_cdr(((C_word*)t0)[8]);
-if(C_truep(C_i_pairp(t14))){
-t15=C_i_cdr(((C_word*)t0)[8]);
-/* chicken-syntax.scm: 820 build */
-t16=((C_word*)((C_word*)t0)[2])[1];
-f_4979(t16,t13,t15,t1);}
-else{
-/* chicken-syntax.scm: 821 build */
-t15=((C_word*)((C_word*)t0)[2])[1];
-f_4979(t15,t13,C_SCHEME_END_OF_LIST,t1);}}
-
-/* k5064 in k5045 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5066(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5066,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k5034 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5036(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5036,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k5002 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_5004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5004,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4907(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4907,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)t0)[5]))){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4924,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4930,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li28),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_4930(t10,t6,((C_word*)t0)[5],((C_word*)t0)[2]);}}
-
-/* loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4930(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4930,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[113]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4963,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g17001701 */
-t10=t6;
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k4961 in loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4963,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4943,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_4943(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_4943(t5,t4);}}
-
-/* k4941 in k4961 in loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4943(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop16801694 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_4930(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k4922 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4924,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* a4892 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4901,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 809 take */
-t3=*((C_word*)lf[112]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4899 in a4892 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 809 split-at! */
-t2=*((C_word*)lf[111]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4885 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4887,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k4847 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4849(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4849,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
-
-/* genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4746(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4746,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4752,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t2,a[5]=((C_word)li25),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_4752(t6,t1,C_fix(0));}
-
-/* loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4752(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4752,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4766,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4778,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 777 gensym */
-t5=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k4776 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 777 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k4764 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4766(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4766,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4770,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* chicken-syntax.scm: 777 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_4752(t4,t2,t3);}
-
-/* k4768 in k4764 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4770(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4770,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k4736 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4738(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 764 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[109],((C_word*)t0)[2],t1);}
-
-/* k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2344,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2347,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4636,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4638,a[2]=((C_word)li24),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 834 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4638(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4638,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4642,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 836 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[101],t2,lf[105]);}
-
-/* k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4642,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4657,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=C_a_i_cons(&a,2,t2,t3);
-/* chicken-syntax.scm: 840 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[101],t5,lf[103]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4707,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_a_i_cons(&a,2,t2,t3);
-/* chicken-syntax.scm: 847 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[101],t5,lf[104]);}}
-
-/* k4705 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4707,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[41],t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4722,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k4720 in k4705 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4722,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[102],t2));}
-
-/* k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4657,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],C_fix(0));
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[41],t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4680,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 845 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-
-/* k4678 in k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4680,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4692,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k4690 in k4678 in k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4692(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4692,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[102],t5));}
-
-/* k4634 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 832 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[101],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2350,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4632,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 855 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[93]);}
-
-/* k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4632,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[93],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4628,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 856 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
-
-/* k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4628,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[94],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4422,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4424,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 857 ##sys#er-transformer */
-t7=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-
-/* a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4424(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4424,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4428,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 859 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[88],t2,lf[100]);}
-
-/* k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4428,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4431,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 860 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[99]);}
-
-/* k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4431,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 861 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[98]);}
-
-/* k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4434(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4434,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 862 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4437(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4437,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 863 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[93]);}
-
-/* k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4448,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4476,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 865 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
-
-/* k4474 in k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4476,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[8]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_i_caddr(((C_word*)t0)[8]);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[7],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[6],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t3,t10);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[7],t11);
-t13=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4568,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t12,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-t14=C_i_cdddr(((C_word*)t0)[8]);
-/* ##sys#append */
-t15=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t13,t14,C_SCHEME_END_OF_LIST);}
-
-/* k4566 in k4474 in k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word ab[84],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4568,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[95],t4);
-t6=C_a_i_cons(&a,2,lf[96],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t7);
-t9=C_a_i_cons(&a,2,lf[21],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,((C_word*)t0)[7],t10);
-t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=C_a_i_cons(&a,2,((C_word*)t0)[8],t12);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[9],t13);
-t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
-t16=C_a_i_cons(&a,2,t3,t15);
-t17=C_a_i_cons(&a,2,lf[97],t16);
-t18=C_a_i_cons(&a,2,t17,C_SCHEME_END_OF_LIST);
-t19=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t18);
-t20=C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
-t21=C_a_i_cons(&a,2,t20,C_SCHEME_END_OF_LIST);
-t22=C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
-t23=C_a_i_cons(&a,2,((C_word*)t0)[5],t22);
-t24=C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
-t25=C_a_i_cons(&a,2,((C_word*)t0)[4],t24);
-t26=C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
-t27=C_a_i_cons(&a,2,t26,C_SCHEME_END_OF_LIST);
-t28=C_a_i_cons(&a,2,((C_word*)t0)[3],t27);
-t29=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST));}
-
-/* k4420 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 853 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[88],((C_word*)t0)[2],t1);}
-
-/* k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2350,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2353,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4414,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 876 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
-
-/* k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4414,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[43],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4410,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 877 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[82]);}
-
-/* k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4410,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[82],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3999,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4001,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 878 ##sys#er-transformer */
-t7=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-
-/* a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4001(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4001,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4005,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 880 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[83],t2,lf[92]);}
-
-/* k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4005(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4005,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 881 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[91]);}
-
-/* k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4008,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 882 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[90]);}
-
-/* k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4011,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4014,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 883 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[89]);}
-
-/* k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4014(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4014,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4017,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 884 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-
-/* k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4017,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4020,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 885 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-
-/* k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4020(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4020,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4023,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 886 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[82]);}
-
-/* k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4023(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4023,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4026,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 887 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
-
-/* k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4026,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4028,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t1,a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word)li20),tmp=(C_word)a,a+=10,tmp);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4235,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[6],tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 901 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[88]);}
-
-/* k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[52],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4235,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[84],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[11],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[10],t4);
-t6=C_a_i_cons(&a,2,lf[70],t5);
-t7=C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
-t9=C_a_i_cons(&a,2,lf[85],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t6,t10);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[9],t11);
-t13=C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[8],t13);
-t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
-t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4275,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t15,tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 904 r */
-t17=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t17+1)))(3,t17,t16,lf[87]);}
-
-/* k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4275,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4279,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4283,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t8=C_i_cddr(((C_word*)t0)[7]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4309,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t10,a[5]=t6,a[6]=((C_word)li21),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_4309(t12,t7,t8);}
-
-/* loop1826 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4309(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4309,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4338,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-/* g18421843 */
-t5=((C_word*)t0)[2];
-f_4028(t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4336 in loop1826 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4338,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18261839 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4309(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18261839 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4309(t6,((C_word*)t0)[3],t5);}}
-
-/* k4281 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4283,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[86],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t1,t6);}
-
-/* k4277 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4279(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4279,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_i_cadr(((C_word*)t0)[5]);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t5,t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
-
-/* parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4028(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4028,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_symbolp(t3);
-t5=(C_truep(t4)?C_i_car(t2):C_SCHEME_FALSE);
-t6=(C_truep(t5)?C_i_cadr(t2):C_i_car(t2));
-t7=(C_truep(t5)?C_i_cddr(t2):C_i_cdr(t2));
-if(C_truep(C_i_nullp(t6))){
-if(C_truep(t5)){
-t8=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t5,t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4070,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],a[5]=t10,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t12=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,t7,C_SCHEME_END_OF_LIST);}
-else{
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4089,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t9=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,t7,C_SCHEME_END_OF_LIST);}}
-else{
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4146,a[2]=t7,a[3]=t1,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t5,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-t9=C_SCHEME_END_OF_LIST;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_FALSE;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4150,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4152,a[2]=t10,a[3]=t15,a[4]=t12,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[3],a[8]=((C_word)li19),tmp=(C_word)a,a+=9,tmp));
-t17=((C_word*)t15)[1];
-f_4152(t17,t13,t6);}}
-
-/* loop1790 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_4152(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(24);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4152,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4179,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li18),tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_4179(C_a_i(&a,15),t3,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop17901803 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop17901803 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g1806 in loop1790 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_4179(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_stack_check;
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t3,t4);
-return(C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k4148 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4146(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4146,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-if(C_truep(((C_word*)t0)[6])){
-t4=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4119,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t8=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4138,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
-
-/* k4136 in k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4138,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k4117 in k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4119,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k4087 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4089,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k4068 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_4070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4070,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k3997 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3999(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 874 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[83],((C_word*)t0)[2],t1);}
-
-/* k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2353,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2356,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_a_i_cons(&a,2,lf[67],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[41],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[65],t5);
-t7=C_a_i_cons(&a,2,lf[67],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3528,a[2]=t8,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3530,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 914 ##sys#er-transformer */
-t11=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
-
-/* a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3530(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3530,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3534,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 916 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[68],t2,lf[81]);}
-
-/* k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3534,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=C_i_cadddr(((C_word*)t0)[4]);
-t5=C_i_cddddr(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3549,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 921 r */
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[55]);}
-
-/* k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3549,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 922 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3552,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3555,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 923 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-
-/* k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3555,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3558,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 924 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-
-/* k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3558(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3558,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3561,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* chicken-syntax.scm: 925 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
-
-/* k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3561(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3561,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3567,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 927 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[80]);}
-
-/* k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3567,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3570,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 928 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[79]);}
-
-/* k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3570(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3570,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3573,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3938,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li16),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_3938(t10,t6,((C_word*)t0)[3]);}
-
-/* loop1872 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3938(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3938,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3967,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g18881889 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3965 in loop1872 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3967,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18721885 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3938(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18721885 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3938(t6,((C_word*)t0)[3],t5);}}
-
-/* k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3573(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3573,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[14],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[13],t2);
-t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t3,tmp=(C_word)a,a+=15,tmp);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3889,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3891,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[2],a[6]=((C_word)li15),tmp=(C_word)a,a+=7,tmp));
-t13=((C_word*)t11)[1];
-f_3891(t13,t9,t1);}
-
-/* loop1899 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3891(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(7);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3891,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3918,a[2]=((C_word*)t0)[5],a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_3918(t3,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop18991912 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop18991912 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g1915 in loop1899 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static C_word C_fcall f_3918(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-if(C_truep(C_i_memq(t1,((C_word*)t0)[2]))){
-t2=t1;
-return(t2);}
-else{
-return(lf[77]);}}
-
-/* k3887 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[67],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3885,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[14],t1);
-t3=C_a_i_cons(&a,2,lf[69],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[13],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[12],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[8],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[11],t11);
-t13=C_a_i_cons(&a,2,lf[70],t12);
-t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,t8,t14);
-t16=C_a_i_cons(&a,2,((C_word*)t0)[12],t15);
-t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3596,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t6,a[5]=t16,tmp=(C_word)a,a+=6,tmp);
-t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3600,a[2]=t17,tmp=(C_word)a,a+=3,tmp);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3602,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t20,a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[11],a[10]=((C_word)li13),tmp=(C_word)a,a+=11,tmp));
-t22=((C_word*)t20)[1];
-f_3602(t22,t18,((C_word*)t0)[2],C_fix(1));}
-
-/* loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3602(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word ab[114],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3602,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=C_i_car(t2);
-t5=C_i_memq(lf[71],*((C_word*)lf[72]+1));
-t6=C_i_cddr(t4);
-t7=C_i_pairp(t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,((C_word*)t0)[7],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=C_a_i_cons(&a,2,((C_word*)t0)[9],t11);
-t13=C_a_i_cons(&a,2,lf[73],t12);
-t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,lf[74],t14);
-t16=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t17=C_a_i_cons(&a,2,((C_word*)t0)[9],t16);
-t18=C_a_i_cons(&a,2,lf[75],t17);
-t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
-t20=C_a_i_cons(&a,2,t15,t19);
-t21=C_a_i_cons(&a,2,t8,t20);
-t22=C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
-t23=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3628,a[2]=((C_word*)t0)[3],a[3]=t22,a[4]=t5,a[5]=t7,a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=t2,a[9]=t1,a[10]=((C_word*)t0)[5],a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t7)){
-t24=C_i_caddr(t4);
-t25=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t26=C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
-t27=C_a_i_cons(&a,2,t24,t26);
-t28=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t29=C_a_i_cons(&a,2,((C_word*)t0)[7],t28);
-t30=C_a_i_cons(&a,2,t29,C_SCHEME_END_OF_LIST);
-t31=C_a_i_cons(&a,2,((C_word*)t0)[9],t30);
-t32=C_a_i_cons(&a,2,lf[73],t31);
-t33=C_a_i_cons(&a,2,t32,C_SCHEME_END_OF_LIST);
-t34=C_a_i_cons(&a,2,lf[74],t33);
-t35=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t36=C_a_i_cons(&a,2,t3,t35);
-t37=C_a_i_cons(&a,2,((C_word*)t0)[9],t36);
-t38=C_a_i_cons(&a,2,lf[76],t37);
-t39=C_a_i_cons(&a,2,t38,C_SCHEME_END_OF_LIST);
-t40=C_a_i_cons(&a,2,t34,t39);
-t41=C_a_i_cons(&a,2,t27,t40);
-t42=C_a_i_cons(&a,2,((C_word*)t0)[5],t41);
-t43=t23;
-f_3628(t43,C_a_i_cons(&a,2,t42,C_SCHEME_END_OF_LIST));}
-else{
-t24=t23;
-f_3628(t24,C_SCHEME_END_OF_LIST);}}}
-
-/* k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3628(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3628,NULL,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3664,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t1,a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t4=(C_truep(((C_word*)t0)[5])?((C_word*)t0)[4]:C_SCHEME_FALSE);
-if(C_truep(t4)){
-t5=C_i_caddr(((C_word*)t0)[11]);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[3],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[2],t7);
-t9=t3;
-f_3664(t9,C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
-else{
-t5=t3;
-f_3664(t5,C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST));}}
-
-/* k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3664(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3664,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3640,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3644,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(((C_word*)t0)[4]);
-t7=C_fixnum_increase(((C_word*)t0)[3]);
-/* chicken-syntax.scm: 958 loop */
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_3602(t8,t5,t6,t7);}
-
-/* k3642 in k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k3638 in k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3640(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3640,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k3598 in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3600(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k3594 in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3596(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3596,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k3526 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 911 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[68],((C_word*)t0)[2],t1);}
-
-/* k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2356,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3520,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 965 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
-
-/* k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3520,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[58],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3328,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3330,a[2]=((C_word)li12),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 966 ##sys#er-transformer */
-t6=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3330(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3330,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3334,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 968 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[63]);}
-
-/* k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3334,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3337,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 969 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
-
-/* k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3337,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3340,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 970 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
-
-/* k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3340,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3343,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 971 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-
-/* k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3343,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3346,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 972 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3346,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[9]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3355,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word)li11),tmp=(C_word)a,a+=11,tmp));
-t6=((C_word*)t4)[1];
-f_3355(t6,((C_word*)t0)[2],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3355(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3355,NULL,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_nullp(t2))){
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3365,a[2]=t4,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t1,a[7]=((C_word*)t0)[9],a[8]=t5,tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 975 reverse */
-t7=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t3);}
-else{
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3458,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[7],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t4,a[8]=t3,a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-t7=C_i_car(t2);
-/* chicken-syntax.scm: 982 c */
-t8=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
-
-/* k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3461,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3480,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 983 gensym */
-t4=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3486,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_car(((C_word*)t0)[9]);
-/* chicken-syntax.scm: 985 c */
-t4=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-
-/* k3484 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3486,2,t0,t1);}
-if(C_truep(t1)){
-/* chicken-syntax.scm: 985 loop */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_3355(t2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE);}
-else{
-t2=C_i_cdr(((C_word*)t0)[2]);
-t3=C_i_car(((C_word*)t0)[2]);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
-/* chicken-syntax.scm: 986 loop */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_3355(t5,((C_word*)t0)[5],t2,((C_word*)t0)[4],t4,C_SCHEME_FALSE);}}
-
-/* k3478 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3480(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 983 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3459 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3461,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-/* chicken-syntax.scm: 984 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_3355(t5,((C_word*)t0)[2],t2,t3,t4,C_SCHEME_FALSE);}
-
-/* k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3365,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3368,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 976 reverse */
-t3=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3368,2,t0,t1);}
-if(C_truep(((C_word*)t0)[8])){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3374,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3417,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 978 gensym */
-t4=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=C_i_car(t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[2],t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3440,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-t6=C_i_cdr(t1);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}}
-
-/* k3438 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3440,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k3415 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 978 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3385,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k3383 in k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3385,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3405,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t4=C_i_cdr(((C_word*)t0)[6]);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t6=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
-
-/* k3403 in k3383 in k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3405(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3405,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k3326 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3328(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 963 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[66],((C_word*)t0)[2],t1);}
-
-/* k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2362,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3320,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 990 ##sys#primitive-alias */
-t4=*((C_word*)lf[65]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
-
-/* k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3320,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[58],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3097,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3099,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 991 ##sys#er-transformer */
-t6=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3099,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3103,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 993 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
-
-/* k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3103,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 994 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3106,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3109,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 995 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
-
-/* k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3109,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3112,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 996 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[63]);}
-
-/* k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3112(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3112,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 997 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
-
-/* k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[9]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3124,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li9),tmp=(C_word)a,a+=11,tmp));
-t6=((C_word*)t4)[1];
-f_3124(t6,((C_word*)t0)[2],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_3124(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3124,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-if(C_truep(C_i_nullp(t2))){
-t7=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3134,a[2]=t5,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t1,a[6]=t4,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t6,tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 1000 reverse */
-t8=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}
-else{
-t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3243,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=t4,a[6]=t1,a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t3,a[10]=t2,tmp=(C_word)a,a+=11,tmp);
-t8=C_i_car(t2);
-/* chicken-syntax.scm: 1010 c */
-t9=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,((C_word*)t0)[2],t8);}}
-
-/* k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3243,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3246,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3265,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1011 gensym */
-t4=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3271,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t3=C_i_car(((C_word*)t0)[10]);
-/* chicken-syntax.scm: 1013 c */
-t4=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-
-/* k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3271,2,t0,t1);}
-if(C_truep(t1)){
-/* chicken-syntax.scm: 1013 loop */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_3124(t2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_TRUE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3277,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3304,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1015 gensym */
-t4=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3302 in k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3304(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1015 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3275 in k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3277,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[7]);
-t3=C_i_car(((C_word*)t0)[7]);
-t4=C_a_i_list(&a,2,t1,t3);
-t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
-t6=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-/* chicken-syntax.scm: 1016 loop */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_3124(t7,((C_word*)t0)[3],t2,((C_word*)t0)[2],t5,t6,C_SCHEME_FALSE);}
-
-/* k3263 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1011 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3244 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3246,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[7]);
-t3=C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
-t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-/* chicken-syntax.scm: 1012 loop */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_3124(t5,((C_word*)t0)[3],t2,t3,((C_word*)t0)[2],t4,C_SCHEME_FALSE);}
-
-/* k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3134(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3134,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3137,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 1001 reverse */
-t3=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3137,2,t0,t1);}
-if(C_truep(((C_word*)t0)[9])){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3143,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3198,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1003 gensym */
-t4=*((C_word*)lf[60]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=C_i_car(t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3233,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t4=C_i_cdr(t1);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}}
-
-/* k3231 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3233(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3233,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
-
-/* k3196 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1003 r */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3143,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3166,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k3164 in k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3166,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[8]);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3186,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t4=C_i_cdr(((C_word*)t0)[8]);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t6=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
-
-/* k3184 in k3164 in k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3186,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
-
-/* k3095 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 988 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[59],((C_word*)t0)[2],t1);}
-
-/* k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2362,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2365,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2816,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2818,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1026 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2818(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2818,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2822,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 1028 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[36],t2,lf[57]);}
-
-/* k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2822,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2825,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 1029 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[56]);}
-
-/* k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2825,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2828,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 1030 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-
-/* k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2828,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2831,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 1031 r */
-t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[54]);}
-
-/* k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2831(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2831,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2834,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 1032 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[53]);}
-
-/* k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2834(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2834,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2837,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 1033 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[52]);}
-
-/* k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2837,2,t0,t1);}
-t2=C_i_cddr(((C_word*)t0)[9]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2846,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li7),tmp=(C_word)a,a+=11,tmp));
-t6=((C_word*)t4)[1];
-f_2846(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t2,C_SCHEME_FALSE);}
-
-/* loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_2846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2846,NULL,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_nullp(t4))){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2856,a[2]=t3,a[3]=((C_word*)t0)[8],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t5)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2986,a[2]=((C_word*)t0)[9],a[3]=t6,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t8=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t5,C_SCHEME_END_OF_LIST);}
-else{
-t7=t6;
-f_2856(t7,lf[46]);}}
-else{
-t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2992,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=t3,a[8]=t1,a[9]=((C_word*)t0)[5],a[10]=t2,a[11]=((C_word*)t0)[6],a[12]=t4,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(C_i_pairp(t4))){
-t7=C_i_car(t4);
-t8=t6;
-f_2992(t8,C_i_pairp(t7));}
-else{
-t7=t6;
-f_2992(t7,C_SCHEME_FALSE);}}}
-
-/* k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_2992(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2992,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2995,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 1048 caar */
-t3=*((C_word*)lf[50]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[12]);}
-else{
-/* chicken-syntax.scm: 1059 syntax-error */
-t2=*((C_word*)lf[12]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[8],lf[36],lf[51],((C_word*)t0)[12]);}}
-
-/* k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2995,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[12]);
-t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3004,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],tmp=(C_word)a,a+=14,tmp);
-/* chicken-syntax.scm: 1050 c */
-t4=((C_word*)t0)[5];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t1);}
-
-/* k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3004,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3019,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3023,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1051 cdar */
-t4=*((C_word*)lf[47]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3029,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-/* chicken-syntax.scm: 1052 c */
-t3=((C_word*)t0)[5];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[3]);}}
-
-/* k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3029,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3044,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3048,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1053 cdar */
-t4=*((C_word*)lf[47]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3054,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-/* chicken-syntax.scm: 1054 c */
-t3=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3054(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3054,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3061,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11146,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1055 cdar */
-t5=*((C_word*)lf[47]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11150,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1055 cdar */
-t5=*((C_word*)lf[47]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3076,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1057 caar */
-t3=*((C_word*)lf[50]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
-
-/* k3074 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1057 syntax-error */
-t2=*((C_word*)lf[12]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[36],lf[49],t1);}
-
-/* f11150 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f11150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1055 append */
-t2=*((C_word*)lf[48]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-
-/* f11146 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f11146(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1055 append */
-t2=*((C_word*)lf[48]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3059 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1055 loop */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2846(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3046 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3048(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k3042 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3044(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3044,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
-/* chicken-syntax.scm: 1053 loop */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_2846(t4,((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3021 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3023(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k3017 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_3019(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3019,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
-/* chicken-syntax.scm: 1051 loop */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_2846(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2984 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2986(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2986,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[3];
-f_2856(t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_2856(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2856,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2863,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* chicken-syntax.scm: 1039 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[45]);}
-
-/* k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2971,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,lf[37],t2);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 1041 r */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[44]);}
-
-/* k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[38],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2955,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2955(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2955,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2891,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* chicken-syntax.scm: 1042 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
-
-/* k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2891(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2891,2,t0,t1);}
-t2=C_a_i_cons(&a,2,*((C_word*)lf[39]+1),C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[40],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2919,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=t5,a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 1045 r */
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[42]);}
-
-/* k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2919,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2931,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-/* chicken-syntax.scm: 1045 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-
-/* k2929 in k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2931(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2931,2,t0,t1);}
-t2=C_a_i_cons(&a,2,*((C_word*)lf[39]+1),C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[10],t4);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2915,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t5,tmp=(C_word)a,a+=10,tmp);
-/* ##sys#append */
-t7=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k2913 in k2929 in k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2915,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
-
-/* k2814 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1024 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[36],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2365,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2368,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2712,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2714,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1068 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2714(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2714,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2718,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 1070 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[33],t2,lf[35]);}
-
-/* k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2718(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2718,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2724,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* chicken-syntax.scm: 1072 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[34]);}
-
-/* k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2724(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2724,2,t0,t1);}
-if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2769,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* chicken-syntax.scm: 1075 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[21]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2808,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cddr(((C_word*)t0)[3]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}}
-
-/* k2806 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2808,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k2767 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2769(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2769,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2781,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t4=C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t5=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k2779 in k2767 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2781,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_i_car(((C_word*)t0)[4]);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t6,t8);
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
-
-/* k2710 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2712(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1066 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[33],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2368,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2675,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2677,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1085 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2677,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2681,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 1087 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[29],t2,lf[32]);}
-
-/* k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2681,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2688,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 1088 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[31]);}
-
-/* k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2688,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2700,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 1089 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-
-/* k2698 in k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2700(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2700,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2704,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k2702 in k2698 in k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2704,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k2673 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2675(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1083 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[29],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2371,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2374,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2653,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2655,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1096 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2655(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2655,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2663,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1098 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[28]);}
-
-/* k2661 in a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2663,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2667,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k2665 in k2661 in a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2667(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2667,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k2651 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1094 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[26],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2628,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2630,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1105 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2629 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2630,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2634,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1107 ##sys#check-syntax */
-t6=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[22],t2,lf[25]);}
-
-/* k2632 in a2629 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2634,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[3]);
-t3=C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t2,t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[23],t4));}
-
-/* k2626 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1103 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[22],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2377(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2377,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2380,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2462,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2464,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1115 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2464,5,t0,t1,t2,t3,t4);}
-t5=C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2474,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(t5))){
-t7=C_i_cdr(t5);
-t8=t6;
-f_2474(t8,C_eqp(t7,C_SCHEME_END_OF_LIST));}
-else{
-t7=t6;
-f_2474(t7,C_SCHEME_FALSE);}}
-
-/* k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_2474(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2474,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2484,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* rename21272132 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[20]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2498,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
-t3=C_i_car(((C_word*)t0)[5]);
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_cdr(((C_word*)t0)[5]);
-/* ##sys#list? */
-t5=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t2,t4);}
-else{
-t4=t2;
-f_2498(2,t4,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_2498(2,t3,C_SCHEME_FALSE);}}}
-
-/* k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2498,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=C_i_car(t2);
-t4=C_i_car(((C_word*)t0)[5]);
-t5=C_i_cdr(t4);
-t6=C_i_cdr(((C_word*)t0)[5]);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2514,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t6,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
-/* rename21272132 */
-t8=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[19]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
-t3=C_i_cdr(((C_word*)t0)[5]);
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_cdr(t3);
-t5=t2;
-f_2548(t5,C_eqp(t4,C_SCHEME_END_OF_LIST));}
-else{
-t4=t2;
-f_2548(t4,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_2548(t3,C_SCHEME_FALSE);}}}
-
-/* k2546 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_fcall f_2548(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2548,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[5]);
-t4=C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2561,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* rename21272132 */
-t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[20]);}
-else{
-/* ##sys#syntax-rules-mismatch */
-t2=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k2559 in k2546 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2561(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2561,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,t1,t3));}
-
-/* k2512 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2514,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2530,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* rename21272132 */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-
-/* k2528 in k2512 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k2482 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2484(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2484,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,t1,t3));}
-
-/* k2460 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2462(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1113 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[19],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2380(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2380,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2383,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2406,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2408,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1126 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2408(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2408,5,t0,t1,t2,t3,t4);}
-t5=C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2418,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(t5))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2447,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t8=C_i_car(t5);
-/* ##sys#list? */
-t9=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-else{
-t7=t6;
-f_2418(2,t7,C_SCHEME_FALSE);}}
-
-/* k2445 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[3]);
-/* ##sys#list? */
-t3=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[2];
-f_2418(2,t2,C_SCHEME_FALSE);}}
-
-/* k2416 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2418,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2431,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* rename21792184 */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[16]);}
-else{
-/* ##sys#syntax-rules-mismatch */
-t2=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k2429 in k2416 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2431,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,t1,t2));}
-
-/* k2404 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1124 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[15],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2383,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2386,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2396,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2398,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1136 ##sys#er-transformer */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a2397 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2398,5,t0,t1,t2,t3,t4);}
-/* chicken-syntax.scm: 1138 syntax-error */
-t5=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,lf[11],lf[13]);}
-
-/* k2394 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* chicken-syntax.scm: 1134 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[11],C_SCHEME_END_OF_LIST,t1);}
-
-/* k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2386,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2389,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1141 ##sys#macro-subset */
-t3=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],*((C_word*)lf[9]+1));}
-
-/* k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2389(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2389,2,t0,t1);}
-t2=C_mutate((C_word*)lf[0]+1 /* (set! chicken-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2392,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1146 register-feature! */
-t4=*((C_word*)lf[1]+1);
-((C_proc8)(void*)(*((C_word*)t4+1)))(8,t4,t3,lf[2],lf[3],lf[4],lf[5],lf[6],lf[7]);}
-
-/* k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
-static void C_ccall f_2392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[701] = {
-{"toplevel:chicken_syntax_scm",(void*)C_chicken_syntax_toplevel},
-{"f_2259:chicken_syntax_scm",(void*)f_2259},
-{"f_2263:chicken_syntax_scm",(void*)f_2263},
-{"f_10755:chicken_syntax_scm",(void*)f_10755},
-{"f_10759:chicken_syntax_scm",(void*)f_10759},
-{"f_10766:chicken_syntax_scm",(void*)f_10766},
-{"f_10753:chicken_syntax_scm",(void*)f_10753},
-{"f_2266:chicken_syntax_scm",(void*)f_2266},
-{"f_10647:chicken_syntax_scm",(void*)f_10647},
-{"f_10738:chicken_syntax_scm",(void*)f_10738},
-{"f_10745:chicken_syntax_scm",(void*)f_10745},
-{"f_10660:chicken_syntax_scm",(void*)f_10660},
-{"f_10645:chicken_syntax_scm",(void*)f_10645},
-{"f_2269:chicken_syntax_scm",(void*)f_2269},
-{"f_10200:chicken_syntax_scm",(void*)f_10200},
-{"f_10204:chicken_syntax_scm",(void*)f_10204},
-{"f_10213:chicken_syntax_scm",(void*)f_10213},
-{"f_10216:chicken_syntax_scm",(void*)f_10216},
-{"f_10222:chicken_syntax_scm",(void*)f_10222},
-{"f_10225:chicken_syntax_scm",(void*)f_10225},
-{"f_10228:chicken_syntax_scm",(void*)f_10228},
-{"f_10231:chicken_syntax_scm",(void*)f_10231},
-{"f_10641:chicken_syntax_scm",(void*)f_10641},
-{"f_10601:chicken_syntax_scm",(void*)f_10601},
-{"f_10633:chicken_syntax_scm",(void*)f_10633},
-{"f_10593:chicken_syntax_scm",(void*)f_10593},
-{"f_10549:chicken_syntax_scm",(void*)f_10549},
-{"f_10260:chicken_syntax_scm",(void*)f_10260},
-{"f_10270:chicken_syntax_scm",(void*)f_10270},
-{"f_10537:chicken_syntax_scm",(void*)f_10537},
-{"f_10273:chicken_syntax_scm",(void*)f_10273},
-{"f_10533:chicken_syntax_scm",(void*)f_10533},
-{"f_10276:chicken_syntax_scm",(void*)f_10276},
-{"f_10323:chicken_syntax_scm",(void*)f_10323},
-{"f_10287:chicken_syntax_scm",(void*)f_10287},
-{"f_10258:chicken_syntax_scm",(void*)f_10258},
-{"f_10254:chicken_syntax_scm",(void*)f_10254},
-{"f_10198:chicken_syntax_scm",(void*)f_10198},
-{"f_2272:chicken_syntax_scm",(void*)f_2272},
-{"f_10057:chicken_syntax_scm",(void*)f_10057},
-{"f_10061:chicken_syntax_scm",(void*)f_10061},
-{"f_10064:chicken_syntax_scm",(void*)f_10064},
-{"f_10067:chicken_syntax_scm",(void*)f_10067},
-{"f_10103:chicken_syntax_scm",(void*)f_10103},
-{"f_10118:chicken_syntax_scm",(void*)f_10118},
-{"f_10172:chicken_syntax_scm",(void*)f_10172},
-{"f_10133:chicken_syntax_scm",(void*)f_10133},
-{"f_10096:chicken_syntax_scm",(void*)f_10096},
-{"f_10055:chicken_syntax_scm",(void*)f_10055},
-{"f_2275:chicken_syntax_scm",(void*)f_2275},
-{"f_9958:chicken_syntax_scm",(void*)f_9958},
-{"f_9962:chicken_syntax_scm",(void*)f_9962},
-{"f_9965:chicken_syntax_scm",(void*)f_9965},
-{"f_9968:chicken_syntax_scm",(void*)f_9968},
-{"f_10047:chicken_syntax_scm",(void*)f_10047},
-{"f_9956:chicken_syntax_scm",(void*)f_9956},
-{"f_2278:chicken_syntax_scm",(void*)f_2278},
-{"f_9940:chicken_syntax_scm",(void*)f_9940},
-{"f_9948:chicken_syntax_scm",(void*)f_9948},
-{"f_9938:chicken_syntax_scm",(void*)f_9938},
-{"f_2281:chicken_syntax_scm",(void*)f_2281},
-{"f_9851:chicken_syntax_scm",(void*)f_9851},
-{"f_9855:chicken_syntax_scm",(void*)f_9855},
-{"f_9858:chicken_syntax_scm",(void*)f_9858},
-{"f_9861:chicken_syntax_scm",(void*)f_9861},
-{"f_9927:chicken_syntax_scm",(void*)f_9927},
-{"f_9864:chicken_syntax_scm",(void*)f_9864},
-{"f_9877:chicken_syntax_scm",(void*)f_9877},
-{"f_9921:chicken_syntax_scm",(void*)f_9921},
-{"f_9888:chicken_syntax_scm",(void*)f_9888},
-{"f_9896:chicken_syntax_scm",(void*)f_9896},
-{"f_9898:chicken_syntax_scm",(void*)f_9898},
-{"f_9915:chicken_syntax_scm",(void*)f_9915},
-{"f_9883:chicken_syntax_scm",(void*)f_9883},
-{"f_9875:chicken_syntax_scm",(void*)f_9875},
-{"f_9871:chicken_syntax_scm",(void*)f_9871},
-{"f_9849:chicken_syntax_scm",(void*)f_9849},
-{"f_2284:chicken_syntax_scm",(void*)f_2284},
-{"f_9737:chicken_syntax_scm",(void*)f_9737},
-{"f_9741:chicken_syntax_scm",(void*)f_9741},
-{"f_9750:chicken_syntax_scm",(void*)f_9750},
-{"f_9753:chicken_syntax_scm",(void*)f_9753},
-{"f_9756:chicken_syntax_scm",(void*)f_9756},
-{"f_9816:chicken_syntax_scm",(void*)f_9816},
-{"f_9791:chicken_syntax_scm",(void*)f_9791},
-{"f_9735:chicken_syntax_scm",(void*)f_9735},
-{"f_2287:chicken_syntax_scm",(void*)f_2287},
-{"f_9600:chicken_syntax_scm",(void*)f_9600},
-{"f_9604:chicken_syntax_scm",(void*)f_9604},
-{"f_9616:chicken_syntax_scm",(void*)f_9616},
-{"f_9619:chicken_syntax_scm",(void*)f_9619},
-{"f_9622:chicken_syntax_scm",(void*)f_9622},
-{"f_9669:chicken_syntax_scm",(void*)f_9669},
-{"f_9598:chicken_syntax_scm",(void*)f_9598},
-{"f_2290:chicken_syntax_scm",(void*)f_2290},
-{"f_8914:chicken_syntax_scm",(void*)f_8914},
-{"f_8918:chicken_syntax_scm",(void*)f_8918},
-{"f_9561:chicken_syntax_scm",(void*)f_9561},
-{"f_9590:chicken_syntax_scm",(void*)f_9590},
-{"f_8927:chicken_syntax_scm",(void*)f_8927},
-{"f_9517:chicken_syntax_scm",(void*)f_9517},
-{"f_9555:chicken_syntax_scm",(void*)f_9555},
-{"f_9544:chicken_syntax_scm",(void*)f_9544},
-{"f_9552:chicken_syntax_scm",(void*)f_9552},
-{"f_8930:chicken_syntax_scm",(void*)f_8930},
-{"f_9473:chicken_syntax_scm",(void*)f_9473},
-{"f_9511:chicken_syntax_scm",(void*)f_9511},
-{"f_9500:chicken_syntax_scm",(void*)f_9500},
-{"f_9508:chicken_syntax_scm",(void*)f_9508},
-{"f_8933:chicken_syntax_scm",(void*)f_8933},
-{"f_8936:chicken_syntax_scm",(void*)f_8936},
-{"f_8939:chicken_syntax_scm",(void*)f_8939},
-{"f_9438:chicken_syntax_scm",(void*)f_9438},
-{"f_9467:chicken_syntax_scm",(void*)f_9467},
-{"f_9387:chicken_syntax_scm",(void*)f_9387},
-{"f_9389:chicken_syntax_scm",(void*)f_9389},
-{"f_9422:chicken_syntax_scm",(void*)f_9422},
-{"f_9402:chicken_syntax_scm",(void*)f_9402},
-{"f_9298:chicken_syntax_scm",(void*)f_9298},
-{"f_9365:chicken_syntax_scm",(void*)f_9365},
-{"f_9379:chicken_syntax_scm",(void*)f_9379},
-{"f_9310:chicken_syntax_scm",(void*)f_9310},
-{"f_9312:chicken_syntax_scm",(void*)f_9312},
-{"f_9345:chicken_syntax_scm",(void*)f_9345},
-{"f_9325:chicken_syntax_scm",(void*)f_9325},
-{"f_9306:chicken_syntax_scm",(void*)f_9306},
-{"f_9302:chicken_syntax_scm",(void*)f_9302},
-{"f_8950:chicken_syntax_scm",(void*)f_8950},
-{"f_9234:chicken_syntax_scm",(void*)f_9234},
-{"f_9247:chicken_syntax_scm",(void*)f_9247},
-{"f_9154:chicken_syntax_scm",(void*)f_9154},
-{"f_9172:chicken_syntax_scm",(void*)f_9172},
-{"f_9185:chicken_syntax_scm",(void*)f_9185},
-{"f_9162:chicken_syntax_scm",(void*)f_9162},
-{"f_9158:chicken_syntax_scm",(void*)f_9158},
-{"f_9150:chicken_syntax_scm",(void*)f_9150},
-{"f_9142:chicken_syntax_scm",(void*)f_9142},
-{"f_9074:chicken_syntax_scm",(void*)f_9074},
-{"f_9087:chicken_syntax_scm",(void*)f_9087},
-{"f_8994:chicken_syntax_scm",(void*)f_8994},
-{"f_9012:chicken_syntax_scm",(void*)f_9012},
-{"f_9025:chicken_syntax_scm",(void*)f_9025},
-{"f_9002:chicken_syntax_scm",(void*)f_9002},
-{"f_8998:chicken_syntax_scm",(void*)f_8998},
-{"f_8990:chicken_syntax_scm",(void*)f_8990},
-{"f_8912:chicken_syntax_scm",(void*)f_8912},
-{"f_2293:chicken_syntax_scm",(void*)f_2293},
-{"f_8793:chicken_syntax_scm",(void*)f_8793},
-{"f_8797:chicken_syntax_scm",(void*)f_8797},
-{"f_8803:chicken_syntax_scm",(void*)f_8803},
-{"f_8904:chicken_syntax_scm",(void*)f_8904},
-{"f_8809:chicken_syntax_scm",(void*)f_8809},
-{"f_8812:chicken_syntax_scm",(void*)f_8812},
-{"f_8815:chicken_syntax_scm",(void*)f_8815},
-{"f_8855:chicken_syntax_scm",(void*)f_8855},
-{"f_8878:chicken_syntax_scm",(void*)f_8878},
-{"f_8885:chicken_syntax_scm",(void*)f_8885},
-{"f_8892:chicken_syntax_scm",(void*)f_8892},
-{"f_8868:chicken_syntax_scm",(void*)f_8868},
-{"f_8818:chicken_syntax_scm",(void*)f_8818},
-{"f_8791:chicken_syntax_scm",(void*)f_8791},
-{"f_2296:chicken_syntax_scm",(void*)f_2296},
-{"f_8307:chicken_syntax_scm",(void*)f_8307},
-{"f_8311:chicken_syntax_scm",(void*)f_8311},
-{"f_8320:chicken_syntax_scm",(void*)f_8320},
-{"f_8323:chicken_syntax_scm",(void*)f_8323},
-{"f_8326:chicken_syntax_scm",(void*)f_8326},
-{"f_8754:chicken_syntax_scm",(void*)f_8754},
-{"f_8783:chicken_syntax_scm",(void*)f_8783},
-{"f_8329:chicken_syntax_scm",(void*)f_8329},
-{"f_8719:chicken_syntax_scm",(void*)f_8719},
-{"f_8748:chicken_syntax_scm",(void*)f_8748},
-{"f_8332:chicken_syntax_scm",(void*)f_8332},
-{"f_8675:chicken_syntax_scm",(void*)f_8675},
-{"f_8713:chicken_syntax_scm",(void*)f_8713},
-{"f_8702:chicken_syntax_scm",(void*)f_8702},
-{"f_8710:chicken_syntax_scm",(void*)f_8710},
-{"f_8335:chicken_syntax_scm",(void*)f_8335},
-{"f_8631:chicken_syntax_scm",(void*)f_8631},
-{"f_8669:chicken_syntax_scm",(void*)f_8669},
-{"f_8658:chicken_syntax_scm",(void*)f_8658},
-{"f_8666:chicken_syntax_scm",(void*)f_8666},
-{"f_8338:chicken_syntax_scm",(void*)f_8338},
-{"f_8582:chicken_syntax_scm",(void*)f_8582},
-{"f_8615:chicken_syntax_scm",(void*)f_8615},
-{"f_8595:chicken_syntax_scm",(void*)f_8595},
-{"f_8527:chicken_syntax_scm",(void*)f_8527},
-{"f_8533:chicken_syntax_scm",(void*)f_8533},
-{"f_8566:chicken_syntax_scm",(void*)f_8566},
-{"f_8546:chicken_syntax_scm",(void*)f_8546},
-{"f_8531:chicken_syntax_scm",(void*)f_8531},
-{"f_8349:chicken_syntax_scm",(void*)f_8349},
-{"f_8423:chicken_syntax_scm",(void*)f_8423},
-{"f_8436:chicken_syntax_scm",(void*)f_8436},
-{"f_8454:chicken_syntax_scm",(void*)f_8454},
-{"f_8421:chicken_syntax_scm",(void*)f_8421},
-{"f_8417:chicken_syntax_scm",(void*)f_8417},
-{"f_8397:chicken_syntax_scm",(void*)f_8397},
-{"f_8305:chicken_syntax_scm",(void*)f_8305},
-{"f_2299:chicken_syntax_scm",(void*)f_2299},
-{"f_8262:chicken_syntax_scm",(void*)f_8262},
-{"f_8266:chicken_syntax_scm",(void*)f_8266},
-{"f_8273:chicken_syntax_scm",(void*)f_8273},
-{"f_8293:chicken_syntax_scm",(void*)f_8293},
-{"f_8297:chicken_syntax_scm",(void*)f_8297},
-{"f_8260:chicken_syntax_scm",(void*)f_8260},
-{"f_2302:chicken_syntax_scm",(void*)f_2302},
-{"f_8209:chicken_syntax_scm",(void*)f_8209},
-{"f_8213:chicken_syntax_scm",(void*)f_8213},
-{"f_8220:chicken_syntax_scm",(void*)f_8220},
-{"f_8248:chicken_syntax_scm",(void*)f_8248},
-{"f_8252:chicken_syntax_scm",(void*)f_8252},
-{"f_8207:chicken_syntax_scm",(void*)f_8207},
-{"f_2305:chicken_syntax_scm",(void*)f_2305},
-{"f_7981:chicken_syntax_scm",(void*)f_7981},
-{"f_7985:chicken_syntax_scm",(void*)f_7985},
-{"f_7994:chicken_syntax_scm",(void*)f_7994},
-{"f_8166:chicken_syntax_scm",(void*)f_8166},
-{"f_8195:chicken_syntax_scm",(void*)f_8195},
-{"f_8063:chicken_syntax_scm",(void*)f_8063},
-{"f_8096:chicken_syntax_scm",(void*)f_8096},
-{"f_8109:chicken_syntax_scm",(void*)f_8109},
-{"f_8094:chicken_syntax_scm",(void*)f_8094},
-{"f_8090:chicken_syntax_scm",(void*)f_8090},
-{"f_7979:chicken_syntax_scm",(void*)f_7979},
-{"f_2308:chicken_syntax_scm",(void*)f_2308},
-{"f_7939:chicken_syntax_scm",(void*)f_7939},
-{"f_7943:chicken_syntax_scm",(void*)f_7943},
-{"f_7963:chicken_syntax_scm",(void*)f_7963},
-{"f_7971:chicken_syntax_scm",(void*)f_7971},
-{"f_7946:chicken_syntax_scm",(void*)f_7946},
-{"f_7953:chicken_syntax_scm",(void*)f_7953},
-{"f_7957:chicken_syntax_scm",(void*)f_7957},
-{"f_7937:chicken_syntax_scm",(void*)f_7937},
-{"f_2311:chicken_syntax_scm",(void*)f_2311},
-{"f_7414:chicken_syntax_scm",(void*)f_7414},
-{"f_7418:chicken_syntax_scm",(void*)f_7418},
-{"f_7427:chicken_syntax_scm",(void*)f_7427},
-{"f_7430:chicken_syntax_scm",(void*)f_7430},
-{"f_7900:chicken_syntax_scm",(void*)f_7900},
-{"f_7929:chicken_syntax_scm",(void*)f_7929},
-{"f_7505:chicken_syntax_scm",(void*)f_7505},
-{"f_7860:chicken_syntax_scm",(void*)f_7860},
-{"f_7873:chicken_syntax_scm",(void*)f_7873},
-{"f_7508:chicken_syntax_scm",(void*)f_7508},
-{"f_7812:chicken_syntax_scm",(void*)f_7812},
-{"f_7854:chicken_syntax_scm",(void*)f_7854},
-{"f_7839:chicken_syntax_scm",(void*)f_7839},
-{"f_7851:chicken_syntax_scm",(void*)f_7851},
-{"f_7847:chicken_syntax_scm",(void*)f_7847},
-{"f_7511:chicken_syntax_scm",(void*)f_7511},
-{"f_7766:chicken_syntax_scm",(void*)f_7766},
-{"f_7799:chicken_syntax_scm",(void*)f_7799},
-{"f_7806:chicken_syntax_scm",(void*)f_7806},
-{"f_7523:chicken_syntax_scm",(void*)f_7523},
-{"f_7726:chicken_syntax_scm",(void*)f_7726},
-{"f_7530:chicken_syntax_scm",(void*)f_7530},
-{"f_7532:chicken_syntax_scm",(void*)f_7532},
-{"f_7720:chicken_syntax_scm",(void*)f_7720},
-{"f_7604:chicken_syntax_scm",(void*)f_7604},
-{"f_7686:chicken_syntax_scm",(void*)f_7686},
-{"f_7643:chicken_syntax_scm",(void*)f_7643},
-{"f_7623:chicken_syntax_scm",(void*)f_7623},
-{"f_7556:chicken_syntax_scm",(void*)f_7556},
-{"f_7594:chicken_syntax_scm",(void*)f_7594},
-{"f_7583:chicken_syntax_scm",(void*)f_7583},
-{"f_7591:chicken_syntax_scm",(void*)f_7591},
-{"f_7550:chicken_syntax_scm",(void*)f_7550},
-{"f_7554:chicken_syntax_scm",(void*)f_7554},
-{"f_7512:chicken_syntax_scm",(void*)f_7512},
-{"f_7463:chicken_syntax_scm",(void*)f_7463},
-{"f_7486:chicken_syntax_scm",(void*)f_7486},
-{"f_7490:chicken_syntax_scm",(void*)f_7490},
-{"f_7432:chicken_syntax_scm",(void*)f_7432},
-{"f_7453:chicken_syntax_scm",(void*)f_7453},
-{"f_7412:chicken_syntax_scm",(void*)f_7412},
-{"f_2314:chicken_syntax_scm",(void*)f_2314},
-{"f_7342:chicken_syntax_scm",(void*)f_7342},
-{"f_7346:chicken_syntax_scm",(void*)f_7346},
-{"f_7355:chicken_syntax_scm",(void*)f_7355},
-{"f_7358:chicken_syntax_scm",(void*)f_7358},
-{"f_7363:chicken_syntax_scm",(void*)f_7363},
-{"f_7400:chicken_syntax_scm",(void*)f_7400},
-{"f_7381:chicken_syntax_scm",(void*)f_7381},
-{"f_7340:chicken_syntax_scm",(void*)f_7340},
-{"f_2317:chicken_syntax_scm",(void*)f_2317},
-{"f_6971:chicken_syntax_scm",(void*)f_6971},
-{"f_6975:chicken_syntax_scm",(void*)f_6975},
-{"f_6984:chicken_syntax_scm",(void*)f_6984},
-{"f_6987:chicken_syntax_scm",(void*)f_6987},
-{"f_7298:chicken_syntax_scm",(void*)f_7298},
-{"f_7296:chicken_syntax_scm",(void*)f_7296},
-{"f_6990:chicken_syntax_scm",(void*)f_6990},
-{"f_7246:chicken_syntax_scm",(void*)f_7246},
-{"f_7288:chicken_syntax_scm",(void*)f_7288},
-{"f_7273:chicken_syntax_scm",(void*)f_7273},
-{"f_7285:chicken_syntax_scm",(void*)f_7285},
-{"f_7281:chicken_syntax_scm",(void*)f_7281},
-{"f_6993:chicken_syntax_scm",(void*)f_6993},
-{"f_7206:chicken_syntax_scm",(void*)f_7206},
-{"f_7013:chicken_syntax_scm",(void*)f_7013},
-{"f_7027:chicken_syntax_scm",(void*)f_7027},
-{"f_7200:chicken_syntax_scm",(void*)f_7200},
-{"f_7054:chicken_syntax_scm",(void*)f_7054},
-{"f_7152:chicken_syntax_scm",(void*)f_7152},
-{"f_7082:chicken_syntax_scm",(void*)f_7082},
-{"f_7096:chicken_syntax_scm",(void*)f_7096},
-{"f_7123:chicken_syntax_scm",(void*)f_7123},
-{"f_7090:chicken_syntax_scm",(void*)f_7090},
-{"f_7086:chicken_syntax_scm",(void*)f_7086},
-{"f_7021:chicken_syntax_scm",(void*)f_7021},
-{"f_7025:chicken_syntax_scm",(void*)f_7025},
-{"f_7017:chicken_syntax_scm",(void*)f_7017},
-{"f_6994:chicken_syntax_scm",(void*)f_6994},
-{"f_6969:chicken_syntax_scm",(void*)f_6969},
-{"f_2320:chicken_syntax_scm",(void*)f_2320},
-{"f_6965:chicken_syntax_scm",(void*)f_6965},
-{"f_6888:chicken_syntax_scm",(void*)f_6888},
-{"f_6892:chicken_syntax_scm",(void*)f_6892},
-{"f_6895:chicken_syntax_scm",(void*)f_6895},
-{"f_6898:chicken_syntax_scm",(void*)f_6898},
-{"f_6933:chicken_syntax_scm",(void*)f_6933},
-{"f_6886:chicken_syntax_scm",(void*)f_6886},
-{"f_2323:chicken_syntax_scm",(void*)f_2323},
-{"f_6783:chicken_syntax_scm",(void*)f_6783},
-{"f_6787:chicken_syntax_scm",(void*)f_6787},
-{"f_6874:chicken_syntax_scm",(void*)f_6874},
-{"f_6870:chicken_syntax_scm",(void*)f_6870},
-{"f_6789:chicken_syntax_scm",(void*)f_6789},
-{"f_6793:chicken_syntax_scm",(void*)f_6793},
-{"f_6850:chicken_syntax_scm",(void*)f_6850},
-{"f_6802:chicken_syntax_scm",(void*)f_6802},
-{"f_6824:chicken_syntax_scm",(void*)f_6824},
-{"f_6814:chicken_syntax_scm",(void*)f_6814},
-{"f_6805:chicken_syntax_scm",(void*)f_6805},
-{"f_6781:chicken_syntax_scm",(void*)f_6781},
-{"f_2326:chicken_syntax_scm",(void*)f_2326},
-{"f_6620:chicken_syntax_scm",(void*)f_6620},
-{"f_6624:chicken_syntax_scm",(void*)f_6624},
-{"f_6633:chicken_syntax_scm",(void*)f_6633},
-{"f_6636:chicken_syntax_scm",(void*)f_6636},
-{"f_6641:chicken_syntax_scm",(void*)f_6641},
-{"f_6686:chicken_syntax_scm",(void*)f_6686},
-{"f_6753:chicken_syntax_scm",(void*)f_6753},
-{"f_6715:chicken_syntax_scm",(void*)f_6715},
-{"f_6655:chicken_syntax_scm",(void*)f_6655},
-{"f_6659:chicken_syntax_scm",(void*)f_6659},
-{"f_6618:chicken_syntax_scm",(void*)f_6618},
-{"f_2329:chicken_syntax_scm",(void*)f_2329},
-{"f_6420:chicken_syntax_scm",(void*)f_6420},
-{"f_6424:chicken_syntax_scm",(void*)f_6424},
-{"f_6433:chicken_syntax_scm",(void*)f_6433},
-{"f_6436:chicken_syntax_scm",(void*)f_6436},
-{"f_6439:chicken_syntax_scm",(void*)f_6439},
-{"f_6442:chicken_syntax_scm",(void*)f_6442},
-{"f_6445:chicken_syntax_scm",(void*)f_6445},
-{"f_6452:chicken_syntax_scm",(void*)f_6452},
-{"f_6470:chicken_syntax_scm",(void*)f_6470},
-{"f_6486:chicken_syntax_scm",(void*)f_6486},
-{"f_6492:chicken_syntax_scm",(void*)f_6492},
-{"f_6552:chicken_syntax_scm",(void*)f_6552},
-{"f_6579:chicken_syntax_scm",(void*)f_6579},
-{"f_6546:chicken_syntax_scm",(void*)f_6546},
-{"f_6542:chicken_syntax_scm",(void*)f_6542},
-{"f_6534:chicken_syntax_scm",(void*)f_6534},
-{"f_6530:chicken_syntax_scm",(void*)f_6530},
-{"f_6499:chicken_syntax_scm",(void*)f_6499},
-{"f_6468:chicken_syntax_scm",(void*)f_6468},
-{"f_6418:chicken_syntax_scm",(void*)f_6418},
-{"f_2332:chicken_syntax_scm",(void*)f_2332},
-{"f_6414:chicken_syntax_scm",(void*)f_6414},
-{"f_6410:chicken_syntax_scm",(void*)f_6410},
-{"f_5827:chicken_syntax_scm",(void*)f_5827},
-{"f_5831:chicken_syntax_scm",(void*)f_5831},
-{"f_5843:chicken_syntax_scm",(void*)f_5843},
-{"f_5846:chicken_syntax_scm",(void*)f_5846},
-{"f_5849:chicken_syntax_scm",(void*)f_5849},
-{"f_6149:chicken_syntax_scm",(void*)f_6149},
-{"f_6152:chicken_syntax_scm",(void*)f_6152},
-{"f_6361:chicken_syntax_scm",(void*)f_6361},
-{"f_6390:chicken_syntax_scm",(void*)f_6390},
-{"f_6155:chicken_syntax_scm",(void*)f_6155},
-{"f_6317:chicken_syntax_scm",(void*)f_6317},
-{"f_6355:chicken_syntax_scm",(void*)f_6355},
-{"f_6344:chicken_syntax_scm",(void*)f_6344},
-{"f_6352:chicken_syntax_scm",(void*)f_6352},
-{"f_6171:chicken_syntax_scm",(void*)f_6171},
-{"f_6282:chicken_syntax_scm",(void*)f_6282},
-{"f_6311:chicken_syntax_scm",(void*)f_6311},
-{"f_6174:chicken_syntax_scm",(void*)f_6174},
-{"f_6177:chicken_syntax_scm",(void*)f_6177},
-{"f_6180:chicken_syntax_scm",(void*)f_6180},
-{"f_6238:chicken_syntax_scm",(void*)f_6238},
-{"f_6276:chicken_syntax_scm",(void*)f_6276},
-{"f_6265:chicken_syntax_scm",(void*)f_6265},
-{"f_6273:chicken_syntax_scm",(void*)f_6273},
-{"f_6183:chicken_syntax_scm",(void*)f_6183},
-{"f_6186:chicken_syntax_scm",(void*)f_6186},
-{"f_6189:chicken_syntax_scm",(void*)f_6189},
-{"f_6196:chicken_syntax_scm",(void*)f_6196},
-{"f_6156:chicken_syntax_scm",(void*)f_6156},
-{"f_6168:chicken_syntax_scm",(void*)f_6168},
-{"f_6164:chicken_syntax_scm",(void*)f_6164},
-{"f_5948:chicken_syntax_scm",(void*)f_5948},
-{"f_5954:chicken_syntax_scm",(void*)f_5954},
-{"f_6142:chicken_syntax_scm",(void*)f_6142},
-{"f_6130:chicken_syntax_scm",(void*)f_6130},
-{"f_6114:chicken_syntax_scm",(void*)f_6114},
-{"f_6078:chicken_syntax_scm",(void*)f_6078},
-{"f_6028:chicken_syntax_scm",(void*)f_6028},
-{"f_6016:chicken_syntax_scm",(void*)f_6016},
-{"f_5851:chicken_syntax_scm",(void*)f_5851},
-{"f_5859:chicken_syntax_scm",(void*)f_5859},
-{"f_5863:chicken_syntax_scm",(void*)f_5863},
-{"f_5867:chicken_syntax_scm",(void*)f_5867},
-{"f_5869:chicken_syntax_scm",(void*)f_5869},
-{"f_5922:chicken_syntax_scm",(void*)f_5922},
-{"f_5938:chicken_syntax_scm",(void*)f_5938},
-{"f_5934:chicken_syntax_scm",(void*)f_5934},
-{"f_5890:chicken_syntax_scm",(void*)f_5890},
-{"f_5825:chicken_syntax_scm",(void*)f_5825},
-{"f_2335:chicken_syntax_scm",(void*)f_2335},
-{"f_5817:chicken_syntax_scm",(void*)f_5817},
-{"f_5813:chicken_syntax_scm",(void*)f_5813},
-{"f_5809:chicken_syntax_scm",(void*)f_5809},
-{"f_5602:chicken_syntax_scm",(void*)f_5602},
-{"f_5606:chicken_syntax_scm",(void*)f_5606},
-{"f_5609:chicken_syntax_scm",(void*)f_5609},
-{"f_5612:chicken_syntax_scm",(void*)f_5612},
-{"f_5619:chicken_syntax_scm",(void*)f_5619},
-{"f_5769:chicken_syntax_scm",(void*)f_5769},
-{"f_5654:chicken_syntax_scm",(void*)f_5654},
-{"f_5730:chicken_syntax_scm",(void*)f_5730},
-{"f_5742:chicken_syntax_scm",(void*)f_5742},
-{"f_5714:chicken_syntax_scm",(void*)f_5714},
-{"f_5600:chicken_syntax_scm",(void*)f_5600},
-{"f_2338:chicken_syntax_scm",(void*)f_2338},
-{"f_5592:chicken_syntax_scm",(void*)f_5592},
-{"f_5288:chicken_syntax_scm",(void*)f_5288},
-{"f_5292:chicken_syntax_scm",(void*)f_5292},
-{"f_5304:chicken_syntax_scm",(void*)f_5304},
-{"f_5307:chicken_syntax_scm",(void*)f_5307},
-{"f_5310:chicken_syntax_scm",(void*)f_5310},
-{"f_5313:chicken_syntax_scm",(void*)f_5313},
-{"f_5316:chicken_syntax_scm",(void*)f_5316},
-{"f_5319:chicken_syntax_scm",(void*)f_5319},
-{"f_5340:chicken_syntax_scm",(void*)f_5340},
-{"f_5568:chicken_syntax_scm",(void*)f_5568},
-{"f_5430:chicken_syntax_scm",(void*)f_5430},
-{"f_5449:chicken_syntax_scm",(void*)f_5449},
-{"f_5406:chicken_syntax_scm",(void*)f_5406},
-{"f_5338:chicken_syntax_scm",(void*)f_5338},
-{"f_5286:chicken_syntax_scm",(void*)f_5286},
-{"f_2341:chicken_syntax_scm",(void*)f_2341},
-{"f_5278:chicken_syntax_scm",(void*)f_5278},
-{"f_5274:chicken_syntax_scm",(void*)f_5274},
-{"f_5270:chicken_syntax_scm",(void*)f_5270},
-{"f_5266:chicken_syntax_scm",(void*)f_5266},
-{"f_4740:chicken_syntax_scm",(void*)f_4740},
-{"f_4744:chicken_syntax_scm",(void*)f_4744},
-{"f_4781:chicken_syntax_scm",(void*)f_4781},
-{"f_5189:chicken_syntax_scm",(void*)f_5189},
-{"f_5226:chicken_syntax_scm",(void*)f_5226},
-{"f_5230:chicken_syntax_scm",(void*)f_5230},
-{"f_5183:chicken_syntax_scm",(void*)f_5183},
-{"f_4784:chicken_syntax_scm",(void*)f_4784},
-{"f_4787:chicken_syntax_scm",(void*)f_4787},
-{"f_4790:chicken_syntax_scm",(void*)f_4790},
-{"f_4793:chicken_syntax_scm",(void*)f_4793},
-{"f_4796:chicken_syntax_scm",(void*)f_4796},
-{"f_4799:chicken_syntax_scm",(void*)f_4799},
-{"f_4802:chicken_syntax_scm",(void*)f_4802},
-{"f_4805:chicken_syntax_scm",(void*)f_4805},
-{"f_4808:chicken_syntax_scm",(void*)f_4808},
-{"f_4811:chicken_syntax_scm",(void*)f_4811},
-{"f_4814:chicken_syntax_scm",(void*)f_4814},
-{"f_4825:chicken_syntax_scm",(void*)f_4825},
-{"f_4851:chicken_syntax_scm",(void*)f_4851},
-{"f_4861:chicken_syntax_scm",(void*)f_4861},
-{"f_4865:chicken_syntax_scm",(void*)f_4865},
-{"f_4879:chicken_syntax_scm",(void*)f_4879},
-{"f_4903:chicken_syntax_scm",(void*)f_4903},
-{"f_4979:chicken_syntax_scm",(void*)f_4979},
-{"f_5127:chicken_syntax_scm",(void*)f_5127},
-{"f_5047:chicken_syntax_scm",(void*)f_5047},
-{"f_5066:chicken_syntax_scm",(void*)f_5066},
-{"f_5036:chicken_syntax_scm",(void*)f_5036},
-{"f_5004:chicken_syntax_scm",(void*)f_5004},
-{"f_4907:chicken_syntax_scm",(void*)f_4907},
-{"f_4930:chicken_syntax_scm",(void*)f_4930},
-{"f_4963:chicken_syntax_scm",(void*)f_4963},
-{"f_4943:chicken_syntax_scm",(void*)f_4943},
-{"f_4924:chicken_syntax_scm",(void*)f_4924},
-{"f_4893:chicken_syntax_scm",(void*)f_4893},
-{"f_4901:chicken_syntax_scm",(void*)f_4901},
-{"f_4887:chicken_syntax_scm",(void*)f_4887},
-{"f_4849:chicken_syntax_scm",(void*)f_4849},
-{"f_4746:chicken_syntax_scm",(void*)f_4746},
-{"f_4752:chicken_syntax_scm",(void*)f_4752},
-{"f_4778:chicken_syntax_scm",(void*)f_4778},
-{"f_4766:chicken_syntax_scm",(void*)f_4766},
-{"f_4770:chicken_syntax_scm",(void*)f_4770},
-{"f_4738:chicken_syntax_scm",(void*)f_4738},
-{"f_2344:chicken_syntax_scm",(void*)f_2344},
-{"f_4638:chicken_syntax_scm",(void*)f_4638},
-{"f_4642:chicken_syntax_scm",(void*)f_4642},
-{"f_4707:chicken_syntax_scm",(void*)f_4707},
-{"f_4722:chicken_syntax_scm",(void*)f_4722},
-{"f_4657:chicken_syntax_scm",(void*)f_4657},
-{"f_4680:chicken_syntax_scm",(void*)f_4680},
-{"f_4692:chicken_syntax_scm",(void*)f_4692},
-{"f_4636:chicken_syntax_scm",(void*)f_4636},
-{"f_2347:chicken_syntax_scm",(void*)f_2347},
-{"f_4632:chicken_syntax_scm",(void*)f_4632},
-{"f_4628:chicken_syntax_scm",(void*)f_4628},
-{"f_4424:chicken_syntax_scm",(void*)f_4424},
-{"f_4428:chicken_syntax_scm",(void*)f_4428},
-{"f_4431:chicken_syntax_scm",(void*)f_4431},
-{"f_4434:chicken_syntax_scm",(void*)f_4434},
-{"f_4437:chicken_syntax_scm",(void*)f_4437},
-{"f_4448:chicken_syntax_scm",(void*)f_4448},
-{"f_4476:chicken_syntax_scm",(void*)f_4476},
-{"f_4568:chicken_syntax_scm",(void*)f_4568},
-{"f_4422:chicken_syntax_scm",(void*)f_4422},
-{"f_2350:chicken_syntax_scm",(void*)f_2350},
-{"f_4414:chicken_syntax_scm",(void*)f_4414},
-{"f_4410:chicken_syntax_scm",(void*)f_4410},
-{"f_4001:chicken_syntax_scm",(void*)f_4001},
-{"f_4005:chicken_syntax_scm",(void*)f_4005},
-{"f_4008:chicken_syntax_scm",(void*)f_4008},
-{"f_4011:chicken_syntax_scm",(void*)f_4011},
-{"f_4014:chicken_syntax_scm",(void*)f_4014},
-{"f_4017:chicken_syntax_scm",(void*)f_4017},
-{"f_4020:chicken_syntax_scm",(void*)f_4020},
-{"f_4023:chicken_syntax_scm",(void*)f_4023},
-{"f_4026:chicken_syntax_scm",(void*)f_4026},
-{"f_4235:chicken_syntax_scm",(void*)f_4235},
-{"f_4275:chicken_syntax_scm",(void*)f_4275},
-{"f_4309:chicken_syntax_scm",(void*)f_4309},
-{"f_4338:chicken_syntax_scm",(void*)f_4338},
-{"f_4283:chicken_syntax_scm",(void*)f_4283},
-{"f_4279:chicken_syntax_scm",(void*)f_4279},
-{"f_4028:chicken_syntax_scm",(void*)f_4028},
-{"f_4152:chicken_syntax_scm",(void*)f_4152},
-{"f_4179:chicken_syntax_scm",(void*)f_4179},
-{"f_4150:chicken_syntax_scm",(void*)f_4150},
-{"f_4146:chicken_syntax_scm",(void*)f_4146},
-{"f_4138:chicken_syntax_scm",(void*)f_4138},
-{"f_4119:chicken_syntax_scm",(void*)f_4119},
-{"f_4089:chicken_syntax_scm",(void*)f_4089},
-{"f_4070:chicken_syntax_scm",(void*)f_4070},
-{"f_3999:chicken_syntax_scm",(void*)f_3999},
-{"f_2353:chicken_syntax_scm",(void*)f_2353},
-{"f_3530:chicken_syntax_scm",(void*)f_3530},
-{"f_3534:chicken_syntax_scm",(void*)f_3534},
-{"f_3549:chicken_syntax_scm",(void*)f_3549},
-{"f_3552:chicken_syntax_scm",(void*)f_3552},
-{"f_3555:chicken_syntax_scm",(void*)f_3555},
-{"f_3558:chicken_syntax_scm",(void*)f_3558},
-{"f_3561:chicken_syntax_scm",(void*)f_3561},
-{"f_3567:chicken_syntax_scm",(void*)f_3567},
-{"f_3570:chicken_syntax_scm",(void*)f_3570},
-{"f_3938:chicken_syntax_scm",(void*)f_3938},
-{"f_3967:chicken_syntax_scm",(void*)f_3967},
-{"f_3573:chicken_syntax_scm",(void*)f_3573},
-{"f_3891:chicken_syntax_scm",(void*)f_3891},
-{"f_3918:chicken_syntax_scm",(void*)f_3918},
-{"f_3889:chicken_syntax_scm",(void*)f_3889},
-{"f_3885:chicken_syntax_scm",(void*)f_3885},
-{"f_3602:chicken_syntax_scm",(void*)f_3602},
-{"f_3628:chicken_syntax_scm",(void*)f_3628},
-{"f_3664:chicken_syntax_scm",(void*)f_3664},
-{"f_3644:chicken_syntax_scm",(void*)f_3644},
-{"f_3640:chicken_syntax_scm",(void*)f_3640},
-{"f_3600:chicken_syntax_scm",(void*)f_3600},
-{"f_3596:chicken_syntax_scm",(void*)f_3596},
-{"f_3528:chicken_syntax_scm",(void*)f_3528},
-{"f_2356:chicken_syntax_scm",(void*)f_2356},
-{"f_3520:chicken_syntax_scm",(void*)f_3520},
-{"f_3330:chicken_syntax_scm",(void*)f_3330},
-{"f_3334:chicken_syntax_scm",(void*)f_3334},
-{"f_3337:chicken_syntax_scm",(void*)f_3337},
-{"f_3340:chicken_syntax_scm",(void*)f_3340},
-{"f_3343:chicken_syntax_scm",(void*)f_3343},
-{"f_3346:chicken_syntax_scm",(void*)f_3346},
-{"f_3355:chicken_syntax_scm",(void*)f_3355},
-{"f_3458:chicken_syntax_scm",(void*)f_3458},
-{"f_3486:chicken_syntax_scm",(void*)f_3486},
-{"f_3480:chicken_syntax_scm",(void*)f_3480},
-{"f_3461:chicken_syntax_scm",(void*)f_3461},
-{"f_3365:chicken_syntax_scm",(void*)f_3365},
-{"f_3368:chicken_syntax_scm",(void*)f_3368},
-{"f_3440:chicken_syntax_scm",(void*)f_3440},
-{"f_3417:chicken_syntax_scm",(void*)f_3417},
-{"f_3374:chicken_syntax_scm",(void*)f_3374},
-{"f_3385:chicken_syntax_scm",(void*)f_3385},
-{"f_3405:chicken_syntax_scm",(void*)f_3405},
-{"f_3328:chicken_syntax_scm",(void*)f_3328},
-{"f_2359:chicken_syntax_scm",(void*)f_2359},
-{"f_3320:chicken_syntax_scm",(void*)f_3320},
-{"f_3099:chicken_syntax_scm",(void*)f_3099},
-{"f_3103:chicken_syntax_scm",(void*)f_3103},
-{"f_3106:chicken_syntax_scm",(void*)f_3106},
-{"f_3109:chicken_syntax_scm",(void*)f_3109},
-{"f_3112:chicken_syntax_scm",(void*)f_3112},
-{"f_3115:chicken_syntax_scm",(void*)f_3115},
-{"f_3124:chicken_syntax_scm",(void*)f_3124},
-{"f_3243:chicken_syntax_scm",(void*)f_3243},
-{"f_3271:chicken_syntax_scm",(void*)f_3271},
-{"f_3304:chicken_syntax_scm",(void*)f_3304},
-{"f_3277:chicken_syntax_scm",(void*)f_3277},
-{"f_3265:chicken_syntax_scm",(void*)f_3265},
-{"f_3246:chicken_syntax_scm",(void*)f_3246},
-{"f_3134:chicken_syntax_scm",(void*)f_3134},
-{"f_3137:chicken_syntax_scm",(void*)f_3137},
-{"f_3233:chicken_syntax_scm",(void*)f_3233},
-{"f_3198:chicken_syntax_scm",(void*)f_3198},
-{"f_3143:chicken_syntax_scm",(void*)f_3143},
-{"f_3166:chicken_syntax_scm",(void*)f_3166},
-{"f_3186:chicken_syntax_scm",(void*)f_3186},
-{"f_3097:chicken_syntax_scm",(void*)f_3097},
-{"f_2362:chicken_syntax_scm",(void*)f_2362},
-{"f_2818:chicken_syntax_scm",(void*)f_2818},
-{"f_2822:chicken_syntax_scm",(void*)f_2822},
-{"f_2825:chicken_syntax_scm",(void*)f_2825},
-{"f_2828:chicken_syntax_scm",(void*)f_2828},
-{"f_2831:chicken_syntax_scm",(void*)f_2831},
-{"f_2834:chicken_syntax_scm",(void*)f_2834},
-{"f_2837:chicken_syntax_scm",(void*)f_2837},
-{"f_2846:chicken_syntax_scm",(void*)f_2846},
-{"f_2992:chicken_syntax_scm",(void*)f_2992},
-{"f_2995:chicken_syntax_scm",(void*)f_2995},
-{"f_3004:chicken_syntax_scm",(void*)f_3004},
-{"f_3029:chicken_syntax_scm",(void*)f_3029},
-{"f_3054:chicken_syntax_scm",(void*)f_3054},
-{"f_3076:chicken_syntax_scm",(void*)f_3076},
-{"f11150:chicken_syntax_scm",(void*)f11150},
-{"f11146:chicken_syntax_scm",(void*)f11146},
-{"f_3061:chicken_syntax_scm",(void*)f_3061},
-{"f_3048:chicken_syntax_scm",(void*)f_3048},
-{"f_3044:chicken_syntax_scm",(void*)f_3044},
-{"f_3023:chicken_syntax_scm",(void*)f_3023},
-{"f_3019:chicken_syntax_scm",(void*)f_3019},
-{"f_2986:chicken_syntax_scm",(void*)f_2986},
-{"f_2856:chicken_syntax_scm",(void*)f_2856},
-{"f_2863:chicken_syntax_scm",(void*)f_2863},
-{"f_2971:chicken_syntax_scm",(void*)f_2971},
-{"f_2959:chicken_syntax_scm",(void*)f_2959},
-{"f_2955:chicken_syntax_scm",(void*)f_2955},
-{"f_2891:chicken_syntax_scm",(void*)f_2891},
-{"f_2919:chicken_syntax_scm",(void*)f_2919},
-{"f_2931:chicken_syntax_scm",(void*)f_2931},
-{"f_2915:chicken_syntax_scm",(void*)f_2915},
-{"f_2816:chicken_syntax_scm",(void*)f_2816},
-{"f_2365:chicken_syntax_scm",(void*)f_2365},
-{"f_2714:chicken_syntax_scm",(void*)f_2714},
-{"f_2718:chicken_syntax_scm",(void*)f_2718},
-{"f_2724:chicken_syntax_scm",(void*)f_2724},
-{"f_2808:chicken_syntax_scm",(void*)f_2808},
-{"f_2769:chicken_syntax_scm",(void*)f_2769},
-{"f_2781:chicken_syntax_scm",(void*)f_2781},
-{"f_2712:chicken_syntax_scm",(void*)f_2712},
-{"f_2368:chicken_syntax_scm",(void*)f_2368},
-{"f_2677:chicken_syntax_scm",(void*)f_2677},
-{"f_2681:chicken_syntax_scm",(void*)f_2681},
-{"f_2688:chicken_syntax_scm",(void*)f_2688},
-{"f_2700:chicken_syntax_scm",(void*)f_2700},
-{"f_2704:chicken_syntax_scm",(void*)f_2704},
-{"f_2675:chicken_syntax_scm",(void*)f_2675},
-{"f_2371:chicken_syntax_scm",(void*)f_2371},
-{"f_2655:chicken_syntax_scm",(void*)f_2655},
-{"f_2663:chicken_syntax_scm",(void*)f_2663},
-{"f_2667:chicken_syntax_scm",(void*)f_2667},
-{"f_2653:chicken_syntax_scm",(void*)f_2653},
-{"f_2374:chicken_syntax_scm",(void*)f_2374},
-{"f_2630:chicken_syntax_scm",(void*)f_2630},
-{"f_2634:chicken_syntax_scm",(void*)f_2634},
-{"f_2628:chicken_syntax_scm",(void*)f_2628},
-{"f_2377:chicken_syntax_scm",(void*)f_2377},
-{"f_2464:chicken_syntax_scm",(void*)f_2464},
-{"f_2474:chicken_syntax_scm",(void*)f_2474},
-{"f_2498:chicken_syntax_scm",(void*)f_2498},
-{"f_2548:chicken_syntax_scm",(void*)f_2548},
-{"f_2561:chicken_syntax_scm",(void*)f_2561},
-{"f_2514:chicken_syntax_scm",(void*)f_2514},
-{"f_2530:chicken_syntax_scm",(void*)f_2530},
-{"f_2484:chicken_syntax_scm",(void*)f_2484},
-{"f_2462:chicken_syntax_scm",(void*)f_2462},
-{"f_2380:chicken_syntax_scm",(void*)f_2380},
-{"f_2408:chicken_syntax_scm",(void*)f_2408},
-{"f_2447:chicken_syntax_scm",(void*)f_2447},
-{"f_2418:chicken_syntax_scm",(void*)f_2418},
-{"f_2431:chicken_syntax_scm",(void*)f_2431},
-{"f_2406:chicken_syntax_scm",(void*)f_2406},
-{"f_2383:chicken_syntax_scm",(void*)f_2383},
-{"f_2398:chicken_syntax_scm",(void*)f_2398},
-{"f_2396:chicken_syntax_scm",(void*)f_2396},
-{"f_2386:chicken_syntax_scm",(void*)f_2386},
-{"f_2389:chicken_syntax_scm",(void*)f_2389},
-{"f_2392:chicken_syntax_scm",(void*)f_2392},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/chicken.c b/bootstrap/chicken.c
deleted file mode 100644
index b391097c..00000000
--- a/bootstrap/chicken.c
+++ /dev/null
@@ -1,3212 +0,0 @@
-/* Generated from chicken.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:33
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: chicken.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file chicken.c
- used units: library eval chicken_syntax srfi_1 srfi_4 utils files extras data_structures support compiler optimizer unboxing compiler_syntax scrutinizer driver platform backend srfi_69
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_chicken_syntax_toplevel)
-C_externimport void C_ccall C_chicken_syntax_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_srfi_1_toplevel)
-C_externimport void C_ccall C_srfi_1_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_srfi_4_toplevel)
-C_externimport void C_ccall C_srfi_4_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_utils_toplevel)
-C_externimport void C_ccall C_utils_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_files_toplevel)
-C_externimport void C_ccall C_files_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_extras_toplevel)
-C_externimport void C_ccall C_extras_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_data_structures_toplevel)
-C_externimport void C_ccall C_data_structures_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_support_toplevel)
-C_externimport void C_ccall C_support_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_compiler_toplevel)
-C_externimport void C_ccall C_compiler_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_optimizer_toplevel)
-C_externimport void C_ccall C_optimizer_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_unboxing_toplevel)
-C_externimport void C_ccall C_unboxing_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_compiler_syntax_toplevel)
-C_externimport void C_ccall C_compiler_syntax_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_scrutinizer_toplevel)
-C_externimport void C_ccall C_scrutinizer_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_driver_toplevel)
-C_externimport void C_ccall C_driver_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_platform_toplevel)
-C_externimport void C_ccall C_platform_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_backend_toplevel)
-C_externimport void C_ccall C_backend_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_srfi_69_toplevel)
-C_externimport void C_ccall C_srfi_69_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[105];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_toplevel)
-C_externexport void C_ccall C_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_397)
-static void C_ccall f_397(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_400)
-static void C_ccall f_400(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_403)
-static void C_ccall f_403(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_406)
-static void C_ccall f_406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_409)
-static void C_ccall f_409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_412)
-static void C_ccall f_412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_415)
-static void C_ccall f_415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_418)
-static void C_ccall f_418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_421)
-static void C_ccall f_421(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_424)
-static void C_ccall f_424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_427)
-static void C_ccall f_427(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_430)
-static void C_ccall f_430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_433)
-static void C_ccall f_433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_436)
-static void C_ccall f_436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_439)
-static void C_ccall f_439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_442)
-static void C_ccall f_442(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_445)
-static void C_ccall f_445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_448)
-static void C_ccall f_448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_451)
-static void C_ccall f_451(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_455)
-static void C_ccall f_455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1494)
-static void C_ccall f_1494(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1501)
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1504)
-static void C_fcall f_1504(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1507)
-static void C_fcall f_1507(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1604)
-static void C_ccall f_1604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1617)
-static void C_ccall f_1617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1749)
-static void C_fcall f_1749(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1747)
-static void C_ccall f_1747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1677)
-static void C_ccall f_1677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1701)
-static void C_fcall f_1701(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1685)
-static void C_ccall f_1685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1689)
-static void C_ccall f_1689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1513)
-static void C_ccall f_1513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1523)
-static void C_ccall f_1523(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1543)
-static void C_ccall f_1543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1492)
-static void C_ccall f_1492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_458)
-static void C_ccall f_458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1361)
-static void C_ccall f_1361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1365)
-static void C_ccall f_1365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1377)
-static void C_ccall f_1377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1469)
-static void C_ccall f_1469(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1380)
-static void C_ccall f_1380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1387)
-static void C_ccall f_1387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1465)
-static void C_ccall f_1465(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1407)
-static void C_ccall f_1407(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1359)
-static void C_ccall f_1359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_461)
-static void C_ccall f_461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1177)
-static void C_ccall f_1177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1181)
-static void C_ccall f_1181(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1190)
-static void C_ccall f_1190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1313)
-static void C_fcall f_1313(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1351)
-static void C_ccall f_1351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1340)
-static void C_fcall f_1340(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1348)
-static void C_ccall f_1348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1193)
-static void C_ccall f_1193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1289)
-static void C_ccall f_1289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1204)
-static void C_ccall f_1204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1287)
-static void C_ccall f_1287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1214)
-static void C_ccall f_1214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1212)
-static void C_ccall f_1212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1175)
-static void C_ccall f_1175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_464)
-static void C_ccall f_464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1091)
-static void C_ccall f_1091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1095)
-static void C_ccall f_1095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1098)
-static void C_ccall f_1098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1105)
-static void C_ccall f_1105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1129)
-static void C_ccall f_1129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1145)
-static void C_ccall f_1145(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1148)
-static void C_ccall f_1148(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1151)
-static void C_ccall f_1151(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1154)
-static void C_ccall f_1154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1167)
-static void C_ccall f_1167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1157)
-static void C_ccall f_1157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1160)
-static void C_ccall f_1160(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1163)
-static void C_ccall f_1163(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1089)
-static void C_ccall f_1089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_467)
-static void C_ccall f_467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1021)
-static void C_ccall f_1021(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1025)
-static void C_ccall f_1025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1028)
-static void C_ccall f_1028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1038)
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1070)
-static void C_ccall f_1070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1066)
-static void C_fcall f_1066(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1019)
-static void C_ccall f_1019(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_470)
-static void C_ccall f_470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_992)
-static void C_ccall f_992(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_996)
-static void C_ccall f_996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1011)
-static void C_ccall f_1011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_990)
-static void C_ccall f_990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_473)
-static void C_ccall f_473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_974)
-static void C_ccall f_974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_982)
-static void C_ccall f_982(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_972)
-static void C_ccall f_972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_476)
-static void C_ccall f_476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_956)
-static void C_ccall f_956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_964)
-static void C_ccall f_964(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_954)
-static void C_ccall f_954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_479)
-static void C_ccall f_479(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_938)
-static void C_ccall f_938(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_946)
-static void C_ccall f_946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_936)
-static void C_ccall f_936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_482)
-static void C_ccall f_482(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_920)
-static void C_ccall f_920(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_928)
-static void C_ccall f_928(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_918)
-static void C_ccall f_918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_485)
-static void C_ccall f_485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_902)
-static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_910)
-static void C_ccall f_910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_900)
-static void C_ccall f_900(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_488)
-static void C_ccall f_488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_884)
-static void C_ccall f_884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_892)
-static void C_ccall f_892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_882)
-static void C_ccall f_882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_491)
-static void C_ccall f_491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_866)
-static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_874)
-static void C_ccall f_874(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_864)
-static void C_ccall f_864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_494)
-static void C_ccall f_494(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_497)
-static void C_ccall f_497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_857)
-static void C_ccall f_857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_853)
-static void C_ccall f_853(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_845)
-static void C_ccall f_845(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_835)
-static void C_ccall f_835(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_843)
-static void C_ccall f_843(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_501)
-static void C_ccall f_501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_630)
-static void C_ccall f_630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_642)
-static void C_fcall f_642(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_825)
-static void C_ccall f_825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_818)
-static void C_ccall f_818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_740)
-static void C_ccall f_740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_757)
-static void C_ccall f_757(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_743)
-static void C_ccall f_743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_664)
-static void C_ccall f_664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_727)
-static void C_ccall f_727(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_717)
-static void C_ccall f_717(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_707)
-static void C_ccall f_707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_697)
-static void C_ccall f_697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_634)
-static void C_ccall f_634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_637)
-static void C_ccall f_637(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_618)
-static void C_ccall f_618(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_622)
-static void C_ccall f_622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_610)
-static void C_ccall f_610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_616)
-static void C_ccall f_616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_613)
-static void C_ccall f_613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_503)
-static void C_ccall f_503(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_509)
-static void C_fcall f_509(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_544)
-static void C_fcall f_544(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_570)
-static void C_ccall f_570(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_566)
-static void C_ccall f_566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_523)
-static void C_ccall f_523(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_1504)
-static void C_fcall trf_1504(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1504(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1504(t0,t1);}
-
-C_noret_decl(trf_1507)
-static void C_fcall trf_1507(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1507(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1507(t0,t1);}
-
-C_noret_decl(trf_1749)
-static void C_fcall trf_1749(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1749(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1749(t0,t1,t2);}
-
-C_noret_decl(trf_1701)
-static void C_fcall trf_1701(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1701(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1701(t0,t1,t2);}
-
-C_noret_decl(trf_1313)
-static void C_fcall trf_1313(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1313(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1313(t0,t1,t2);}
-
-C_noret_decl(trf_1340)
-static void C_fcall trf_1340(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1340(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1340(t0,t1);}
-
-C_noret_decl(trf_1066)
-static void C_fcall trf_1066(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1066(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1066(t0,t1);}
-
-C_noret_decl(trf_642)
-static void C_fcall trf_642(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_642(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_642(t0,t1,t2);}
-
-C_noret_decl(trf_509)
-static void C_fcall trf_509(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_509(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_509(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_544)
-static void C_fcall trf_544(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_544(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_544(t0,t1);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_main_entry_point
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("toplevel"));
-C_resize_stack(131072);
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(1238)){
-C_save(t1);
-C_rereclaim2(1238*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,105);
-lf[0]=C_h_intern(&lf[0],33,"\003syschicken-ffi-macro-environment");
-lf[1]=C_h_intern(&lf[1],27,"\010compilercompiler-arguments");
-lf[2]=C_h_intern(&lf[2],29,"\010compilerprocess-command-line");
-lf[3]=C_h_intern(&lf[3],7,"reverse");
-lf[4]=C_h_intern(&lf[4],14,"string->symbol");
-lf[5]=C_h_intern(&lf[5],9,"substring");
-lf[6]=C_h_intern(&lf[6],25,"\003sysimplicit-exit-handler");
-lf[7]=C_h_intern(&lf[7],17,"user-options-pass");
-lf[8]=C_h_intern(&lf[8],4,"exit");
-lf[9]=C_h_intern(&lf[9],19,"compile-source-file");
-lf[10]=C_h_intern(&lf[10],14,"optimize-level");
-lf[11]=C_h_intern(&lf[11],22,"optimize-leaf-routines");
-lf[12]=C_h_intern(&lf[12],5,"cons*");
-lf[13]=C_h_intern(&lf[13],6,"inline");
-lf[14]=C_h_intern(&lf[14],5,"local");
-lf[15]=C_h_intern(&lf[15],8,"unboxing");
-lf[16]=C_h_intern(&lf[16],6,"unsafe");
-lf[17]=C_h_intern(&lf[17],18,"disable-interrupts");
-lf[18]=C_h_intern(&lf[18],8,"no-trace");
-lf[19]=C_h_intern(&lf[19],5,"block");
-lf[20]=C_h_intern(&lf[20],11,"lambda-lift");
-lf[21]=C_h_intern(&lf[21],14,"no-lambda-info");
-lf[22]=C_h_intern(&lf[22],11,"debug-level");
-lf[23]=C_h_intern(&lf[23],25,"\010compilercompiler-warning");
-lf[24]=C_h_intern(&lf[24],5,"usage");
-lf[25]=C_decode_literal(C_heaptop,"\376B\000\000 invalid debug level ~S - ignored");
-lf[26]=C_h_intern(&lf[26],31,"\010compilervalid-compiler-options");
-lf[27]=C_h_intern(&lf[27],45,"\010compilervalid-compiler-options-with-argument");
-lf[28]=C_h_intern(&lf[28],4,"quit");
-lf[29]=C_decode_literal(C_heaptop,"\376B\000\000 missing argument to `-~s\047 option");
-lf[30]=C_decode_literal(C_heaptop,"\376B\000\000&invalid compiler option `~a\047 - ignored");
-lf[31]=C_h_intern(&lf[31],4,"conc");
-lf[32]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
-lf[33]=C_h_intern(&lf[33],6,"append");
-lf[34]=C_h_intern(&lf[34],4,"argv");
-lf[35]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[36]=C_h_intern(&lf[36],6,"remove");
-lf[37]=C_h_intern(&lf[37],12,"string-split");
-lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[39]=C_h_intern(&lf[39],24,"get-environment-variable");
-lf[40]=C_decode_literal(C_heaptop,"\376B\000\000\017CHICKEN_OPTIONS");
-lf[41]=C_h_intern(&lf[41],16,"\003sysmacro-subset");
-lf[42]=C_h_intern(&lf[42],28,"\003sysextend-macro-environment");
-lf[43]=C_h_intern(&lf[43],20,"foreign-safe-lambda*");
-lf[44]=C_h_intern(&lf[44],25,"\004coreforeign-safe-lambda*");
-lf[45]=C_h_intern(&lf[45],10,"\003sysappend");
-lf[46]=C_h_intern(&lf[46],18,"\003syser-transformer");
-lf[47]=C_h_intern(&lf[47],19,"foreign-safe-lambda");
-lf[48]=C_h_intern(&lf[48],24,"\004coreforeign-safe-lambda");
-lf[49]=C_h_intern(&lf[49],15,"foreign-lambda*");
-lf[50]=C_h_intern(&lf[50],20,"\004coreforeign-lambda*");
-lf[51]=C_h_intern(&lf[51],14,"foreign-lambda");
-lf[52]=C_h_intern(&lf[52],19,"\004coreforeign-lambda");
-lf[53]=C_h_intern(&lf[53],17,"foreign-primitive");
-lf[54]=C_h_intern(&lf[54],22,"\004coreforeign-primitive");
-lf[55]=C_h_intern(&lf[55],23,"define-foreign-variable");
-lf[56]=C_h_intern(&lf[56],28,"\004coredefine-foreign-variable");
-lf[57]=C_h_intern(&lf[57],19,"define-foreign-type");
-lf[58]=C_h_intern(&lf[58],24,"\004coredefine-foreign-type");
-lf[59]=C_h_intern(&lf[59],15,"foreign-declare");
-lf[60]=C_h_intern(&lf[60],12,"\004coredeclare");
-lf[61]=C_h_intern(&lf[61],16,"\003syscheck-syntax");
-lf[62]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006string\376\377\001\000\000\000\000");
-lf[63]=C_h_intern(&lf[63],13,"foreign-value");
-lf[64]=C_h_intern(&lf[64],14,"symbol->string");
-lf[65]=C_h_intern(&lf[65],12,"syntax-error");
-lf[66]=C_decode_literal(C_heaptop,"\376B\000\000*bad argument type - not a string or symbol");
-lf[67]=C_h_intern(&lf[67],5,"begin");
-lf[68]=C_h_intern(&lf[68],6,"gensym");
-lf[69]=C_h_intern(&lf[69],5,"code_");
-lf[70]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[71]=C_h_intern(&lf[71],12,"foreign-code");
-lf[72]=C_h_intern(&lf[72],11,"\004coreinline");
-lf[73]=C_h_intern(&lf[73],17,"get-output-string");
-lf[74]=C_h_intern(&lf[74],7,"display");
-lf[75]=C_decode_literal(C_heaptop,"\376B\000\000 \012; return C_SCHEME_UNDEFINED; }\012");
-lf[76]=C_h_intern(&lf[76],18,"string-intersperse");
-lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\005() { ");
-lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\016static C_word ");
-lf[80]=C_h_intern(&lf[80],18,"open-output-string");
-lf[81]=C_h_intern(&lf[81],7,"declare");
-lf[82]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006string\376\377\001\000\000\000\000");
-lf[83]=C_h_intern(&lf[83],12,"let-location");
-lf[84]=C_h_intern(&lf[84],17,"\004corelet-location");
-lf[85]=C_h_intern(&lf[85],10,"fold-right");
-lf[86]=C_h_intern(&lf[86],10,"append-map");
-lf[87]=C_h_intern(&lf[87],3,"let");
-lf[88]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001\376\377\001\000\000"
-"\000\000\376\001\000\000\001_");
-lf[89]=C_h_intern(&lf[89],15,"define-location");
-lf[90]=C_h_intern(&lf[90],29,"\004coredefine-external-variable");
-lf[91]=C_h_intern(&lf[91],9,"\004coreset!");
-lf[92]=C_h_intern(&lf[92],9,"\003syserror");
-lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[94]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
-lf[95]=C_h_intern(&lf[95],15,"define-external");
-lf[96]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
-lf[97]=C_h_intern(&lf[97],5,"quote");
-lf[98]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[99]=C_h_intern(&lf[99],29,"\004coreforeign-callback-wrapper");
-lf[100]=C_h_intern(&lf[100],6,"lambda");
-lf[101]=C_h_intern(&lf[101],6,"define");
-lf[102]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\002\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\377\001\000\000\000\000\376"
-"\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[103]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\002\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\377\001\000\000\000\000\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376"
-"\001\000\000\001_\376\377\001\000\000\000\001");
-lf[104]=C_h_intern(&lf[104],21,"\003sysmacro-environment");
-C_register_lf2(lf,105,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_397,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k395 */
-static void C_ccall f_397(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_397,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_400,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k398 in k395 */
-static void C_ccall f_400(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_400,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_403,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_chicken_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k401 in k398 in k395 */
-static void C_ccall f_403(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_403,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_406,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_srfi_1_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k404 in k401 in k398 in k395 */
-static void C_ccall f_406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_406,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_409,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_srfi_4_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_409,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_412,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_utils_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_412,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_415,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_files_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_415,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_418,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_extras_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_418,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_421,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_421(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_421,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_424,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_support_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_424,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_427,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_compiler_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_427(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_427,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_430,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_optimizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_430,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_433,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_unboxing_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_433,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_436,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_compiler_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_436,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_439,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_scrutinizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_442,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_driver_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_442(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_442,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_445,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_platform_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_445,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_448,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_backend_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_448,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_srfi_69_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_451(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_451,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_455,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#macro-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[104]))(2,*((C_word*)lf[104]+1),t2);}
-
-/* k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_455,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_458,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1492,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1494,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1494(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1494,5,t0,t1,t2,t3,t4);}
-t5=C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1501,a[2]=t3,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_trace("r37");
-t7=t3;
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[97]);}
-
-/* k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1501,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1504,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-t3=C_i_car(((C_word*)t0)[4]);
-t4=t2;
-f_1504(t4,C_i_stringp(t3));}
-else{
-t3=t2;
-f_1504(t3,C_SCHEME_FALSE);}}
-
-/* k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1504(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1504,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1507,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t3=t1;
-if(C_truep(t3)){
-t4=t2;
-f_1507(t4,C_SCHEME_FALSE);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-t4=C_i_car(((C_word*)t0)[4]);
-t5=t2;
-f_1507(t5,C_i_symbolp(t4));}
-else{
-t4=t2;
-f_1507(t4,C_SCHEME_FALSE);}}}
-
-/* k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1507(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1507,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1513,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[96]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[102]);}
-else{
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[103]);}}}
-
-/* k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1604,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[5])?C_i_cadr(((C_word*)t0)[4]):C_i_car(((C_word*)t0)[4]));
-t3=C_i_cdr(t2);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1617,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-C_trace("r37");
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[101]);}
-
-/* k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1617,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[7]);
-t3=C_i_car(((C_word*)t0)[7]);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[97],t4);
-t6=(C_truep(((C_word*)t0)[6])?C_i_car(((C_word*)t0)[5]):lf[98]);
-t7=(C_truep(((C_word*)t0)[6])?C_i_caddr(((C_word*)t0)[5]):C_i_cadr(((C_word*)t0)[5]));
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,lf[97],t8);
-t10=C_SCHEME_END_OF_LIST;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_FALSE;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1747,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[4],a[8]=t2,a[9]=t5,a[10]=t6,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1749,a[2]=t11,a[3]=t16,a[4]=t13,tmp=(C_word)a,a+=5,tmp));
-t18=((C_word*)t16)[1];
-f_1749(t18,t14,((C_word*)t0)[3]);}
-
-/* loop75 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1749(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1749,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-C_trace("loop7588");
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-C_trace("loop7588");
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1747,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[97],t2);
-t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1677,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t3,tmp=(C_word)a,a+=12,tmp);
-C_trace("r37");
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[100]);}
-
-/* k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1677,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1685,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1701,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_1701(t10,t6,((C_word*)t0)[2]);}
-
-/* loop99 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1701(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1701,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_cadr(t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-C_trace("loop99112");
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-C_trace("loop99112");
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1683 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1685,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1689,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-t3=(C_truep(((C_word*)t0)[3])?C_i_cdddr(((C_word*)t0)[2]):C_i_cddr(((C_word*)t0)[2]));
-C_trace("##sys#append");
-t4=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k1687 in k1683 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1689,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=C_a_i_cons(&a,2,lf[99],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,((C_word*)t0)[4],t10);
-t12=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_cons(&a,2,((C_word*)t0)[2],t11));}
-
-/* k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1513,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1523,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("r37");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[67]);}
-
-/* k1521 in k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1523(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1523,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=C_a_i_cons(&a,2,lf[56],t4);
-t6=C_i_cadr(((C_word*)t0)[4]);
-t7=C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t6,t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[3],t8);
-t10=C_a_i_cons(&a,2,lf[90],t9);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1543,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
-t12=C_i_cddr(((C_word*)t0)[4]);
-if(C_truep(C_i_pairp(t12))){
-t13=C_i_caddr(((C_word*)t0)[4]);
-t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,((C_word*)t0)[3],t14);
-t16=C_a_i_cons(&a,2,lf[91],t15);
-t17=C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t18=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t18+1)))(4,t18,t11,t17,C_SCHEME_END_OF_LIST);}
-else{
-C_trace("##sys#append");
-t13=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t11,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-
-/* k1541 in k1521 in k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1543(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1543,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k1490 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[95],C_SCHEME_END_OF_LIST,t1);}
-
-/* k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_458,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_461,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1359,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1361,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1361,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1365,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[89],t2,lf[94]);}
-
-/* k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1365,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_caddr(((C_word*)t0)[4]);
-t4=C_i_cdddr(((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_nullp(t4))){
-t6=t5;
-f_1377(2,t6,C_SCHEME_FALSE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=t5;
-f_1377(2,t7,C_i_car(t4));}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[92]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[93],t4);}}}
-
-/* k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1377(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1377,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1380,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1469,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[68]))(2,*((C_word*)lf[68]+1),t3);}
-
-/* k1467 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1469(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("r123");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1380(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1380,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1387,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("r123");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
-
-/* k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1387(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1387,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1465,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[64]+1)))(3,*((C_word*)lf[64]+1),t2,((C_word*)t0)[4]);}
-
-/* k1463 in k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1465(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[45],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1465,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=C_a_i_cons(&a,2,lf[56],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[7],t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[6],t8);
-t10=C_a_i_cons(&a,2,lf[90],t9);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1407,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-t12=C_i_car(((C_word*)t0)[2]);
-t13=C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
-t14=C_a_i_cons(&a,2,((C_word*)t0)[6],t13);
-t15=C_a_i_cons(&a,2,lf[91],t14);
-t16=C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t17=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t17+1)))(4,t17,t11,t16,C_SCHEME_END_OF_LIST);}
-else{
-C_trace("##sys#append");
-t12=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-
-/* k1405 in k1463 in k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1407(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1407,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k1357 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[89],C_SCHEME_END_OF_LIST,t1);}
-
-/* k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_461,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_464,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1175,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1177,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1177,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1181,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[83],t2,lf[88]);}
-
-/* k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1181(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1181,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1190,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("r144");
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[87]);}
-
-/* k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1190,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1193,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1313,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_1313(t10,t6,((C_word*)t0)[4]);}
-
-/* loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1313(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1313,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1340,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1351,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g169170");
-t6=t3;
-f_1340(t6,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1349 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1351,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop153166");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_1313(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop153166");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_1313(t6,((C_word*)t0)[3],t5);}}
-
-/* g169 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1340(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1340,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1348,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[68]))(2,*((C_word*)lf[68]+1),t2);}
-
-/* k1346 in g169 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("r144");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1193,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1204,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1289,tmp=(C_word)a,a+=2,tmp);
-C_trace("append-map");
-((C_proc5)C_retrieve_symbol_proc(lf[86]))(5,*((C_word*)lf[86]+1),t2,t3,((C_word*)t0)[3],t1);}
-
-/* a1288 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1289,4,t0,t1,t2,t3);}
-t4=C_i_cddr(t2);
-if(C_truep(C_i_pairp(t4))){
-t5=C_i_cddr(t2);
-t6=C_a_i_cons(&a,2,t3,t5);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_list(&a,1,t6));}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}}
-
-/* k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1204,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1212,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1214,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1287,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("##sys#append");
-t5=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1285 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1287,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-C_trace("fold-right");
-((C_proc6)C_retrieve_symbol_proc(lf[85]))(6,*((C_word*)lf[85]+1),((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a1213 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[15],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1214,5,t0,t1,t2,t3,t4);}
-t5=C_i_length(t2);
-t6=C_eqp(C_fix(3),t5);
-if(C_truep(t6)){
-t7=C_i_car(t2);
-t8=C_i_cadr(t2);
-t9=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t3,t9);
-t11=C_a_i_cons(&a,2,t8,t10);
-t12=C_a_i_cons(&a,2,t7,t11);
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_cons(&a,2,lf[84],t12));}
-else{
-t7=C_i_car(t2);
-t8=C_i_cadr(t2);
-t9=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t8,t9);
-t11=C_a_i_cons(&a,2,t7,t10);
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_cons(&a,2,lf[84],t11));}}
-
-/* k1210 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1212(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1212,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k1173 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[83],C_SCHEME_END_OF_LIST,t1);}
-
-/* k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_464,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_467,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1089,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1091,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1091,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1095,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[71],t2,lf[82]);}
-
-/* k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1095,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1098,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[68]))(3,*((C_word*)lf[68]+1),t2,lf[69]);}
-
-/* k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1098,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1105,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("r198");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
-
-/* k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1105,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1129,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("r198");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[81]);}
-
-/* k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1129,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1145,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[80]))(2,*((C_word*)lf[80]+1),t2);}
-
-/* k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1145(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1145,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1148,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[79],t1);}
-
-/* k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1148(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1148,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1151,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,((C_word*)t0)[6],((C_word*)t0)[3]);}
-
-/* k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1151(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1151,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1154,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[78],((C_word*)t0)[3]);}
-
-/* k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1154,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1157,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1167,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cdr(((C_word*)t0)[2]);
-C_trace("string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[76]))(4,*((C_word*)lf[76]+1),t3,t4,lf[77]);}
-
-/* k1165 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1157,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[75],((C_word*)t0)[2]);}
-
-/* k1158 in k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1160(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1160,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1163,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[73]))(3,*((C_word*)lf[73]+1),t2,((C_word*)t0)[2]);}
-
-/* k1161 in k1158 in k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1163(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1163,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[59],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[72],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t5,t8);
-t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
-
-/* k1087 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[71],C_SCHEME_END_OF_LIST,t1);}
-
-/* k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_467,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_470,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1019,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1021,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1021(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1021,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1025,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[63],t2,lf[70]);}
-
-/* k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1025,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1028,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[68]))(3,*((C_word*)lf[68]+1),t2,lf[69]);}
-
-/* k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1028,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1038,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("r217");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[67]);}
-
-/* k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1038,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1066,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1070,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_stringp(((C_word*)t0)[2]))){
-t5=t3;
-f_1066(t5,C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[2]))){
-C_trace("symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[64]+1)))(3,*((C_word*)lf[64]+1),t4,((C_word*)t0)[2]);}
-else{
-C_trace("syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[65]))(5,*((C_word*)lf[65]+1),t4,lf[63],lf[66],((C_word*)t0)[2]);}}}
-
-/* k1068 in k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1070,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_1066(t2,C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
-
-/* k1064 in k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_1066(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1066,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,lf[56],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t4,t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
-
-/* k1017 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1019(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[63],C_SCHEME_END_OF_LIST,t1);}
-
-/* k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_470,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_473,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_990,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_992,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_992(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_992,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_996,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[59],t2,lf[62]);}
-
-/* k994 in a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_996,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1011,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-C_trace("##sys#append");
-t4=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k1009 in k994 in a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_1011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1011,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[59],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[60],t3));}
-
-/* k988 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[59],C_SCHEME_END_OF_LIST,t1);}
-
-/* k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_473(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_473,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_476,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_972,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_974,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a973 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_974,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_982,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k980 in a973 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_982(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_982,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[58],t1));}
-
-/* k970 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[57],C_SCHEME_END_OF_LIST,t1);}
-
-/* k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_476,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_479,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_954,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_956,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a955 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_956,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_964,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k962 in a955 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_964(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_964,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[56],t1));}
-
-/* k952 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[55],C_SCHEME_END_OF_LIST,t1);}
-
-/* k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_479(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_479,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_482,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_936,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_938,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a937 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_938(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_938,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_946,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k944 in a937 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_946,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[54],t1));}
-
-/* k934 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_936(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[53],C_SCHEME_END_OF_LIST,t1);}
-
-/* k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_482(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_482,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_485,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_918,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_920,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a919 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_920(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_920,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_928,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k926 in a919 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_928(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_928,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[52],t1));}
-
-/* k916 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[51],C_SCHEME_END_OF_LIST,t1);}
-
-/* k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_485,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_488,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_900,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_902,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a901 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_902,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_910,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k908 in a901 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_910,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[50],t1));}
-
-/* k898 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_900(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[49],C_SCHEME_END_OF_LIST,t1);}
-
-/* k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_491,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_882,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_884,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a883 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_884,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_892,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k890 in a883 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_892,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[48],t1));}
-
-/* k880 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[47],C_SCHEME_END_OF_LIST,t1);}
-
-/* k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_491,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_494,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_864,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_866,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
-
-/* a865 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_866,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_874,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cdr(t2);
-C_trace("##sys#append");
-t7=*((C_word*)lf[45]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k872 in a865 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_874(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_874,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[44],t1));}
-
-/* k862 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[43],C_SCHEME_END_OF_LIST,t1);}
-
-/* k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_494(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_494,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_497,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#macro-subset");
-((C_proc3)C_retrieve_symbol_proc(lf[41]))(3,*((C_word*)lf[41]+1),t2,((C_word*)t0)[2]);}
-
-/* k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_497,2,t0,t1);}
-t2=C_mutate((C_word*)lf[0]+1 /* (set! chicken-ffi-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_835,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_845,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_853,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_857,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-C_trace("chicken.scm: 48 get-environment-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[39]))(3,*((C_word*)lf[39]+1),t7,lf[40]);}
-
-/* k855 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-C_trace("chicken.scm: 48 string-split");
-((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],t2);}
-else{
-C_trace("chicken.scm: 48 string-split");
-((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],lf[38]);}}
-
-/* k851 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_853(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 46 remove");
-((C_proc4)C_retrieve_symbol_proc(lf[36]))(4,*((C_word*)lf[36]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a844 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_845(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_845,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_string_equal_p(t2,lf[35]));}
-
-/* k833 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_835(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_835,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_843,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("chicken.scm: 49 argv");
-((C_proc2)C_retrieve_symbol_proc(lf[34]))(2,*((C_word*)lf[34]+1),t2);}
-
-/* k841 in k833 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_843(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(t1);
-C_trace("chicken.scm: 45 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[33]+1)))(4,*((C_word*)lf[33]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_501,2,t0,t1);}
-t2=C_mutate((C_word*)lf[1]+1 /* (set! compiler-arguments ...) */,t1);
-t3=C_mutate((C_word*)lf[2]+1 /* (set! process-command-line ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_503,tmp=(C_word)a,a+=2,tmp));
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_610,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_618,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_630,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t4,t5,t6);}
-
-/* a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_630,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_634,a[2]=t4,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_642,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
-t9=((C_word*)t7)[1];
-f_642(t9,t5,((C_word*)t4)[1]);}
-
-/* loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_642(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_642,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_i_car(t2);
-t4=C_i_cdr(t2);
-t5=C_eqp(lf[10],t3);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_664,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-t7=C_i_car(t4);
-C_trace("chicken.scm: 82 string->number");
-C_string_to_number(3,0,t6,t7);}
-else{
-t6=C_eqp(lf[22],t3);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_740,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-t8=C_i_car(t4);
-C_trace("chicken.scm: 107 string->number");
-C_string_to_number(3,0,t7,t8);}
-else{
-if(C_truep(C_i_memq(t3,C_retrieve(lf[26])))){
-C_trace("chicken.scm: 114 loop");
-t16=t1;
-t17=t4;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-if(C_truep(C_i_memq(t3,C_retrieve(lf[27])))){
-if(C_truep(C_i_pairp(t4))){
-t7=C_i_cdr(t4);
-C_trace("chicken.scm: 117 loop");
-t16=t1;
-t17=t7;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-C_trace("chicken.scm: 118 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[28]))(4,*((C_word*)lf[28]+1),t1,lf[29],t3);}}
-else{
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_818,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_825,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_stringp(t3))){
-C_trace("chicken.scm: 120 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),t7,lf[24],lf[30],t3);}
-else{
-C_trace("chicken.scm: 122 conc");
-((C_proc4)C_retrieve_symbol_proc(lf[31]))(4,*((C_word*)lf[31]+1),t8,lf[32],t3);}}}}}}}
-
-/* k823 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 120 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[24],lf[30],t1);}
-
-/* k816 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 123 loop");
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_642(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_740,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_743,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-switch(t1){
-case C_fix(0):
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("chicken.scm: 109 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),t3,lf[21],lf[18],((C_word*)((C_word*)t0)[2])[1]);
-case C_fix(1):
-t3=C_a_i_cons(&a,2,lf[18],((C_word*)((C_word*)t0)[2])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 113 loop");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_642(t6,((C_word*)t0)[3],t5);
-case C_fix(2):
-t3=C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 113 loop");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_642(t4,((C_word*)t0)[3],t3);
-default:
-t3=C_i_car(((C_word*)t0)[5]);
-C_trace("chicken.scm: 112 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),t2,lf[24],lf[25],t3);}}
-
-/* k755 in k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_757(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 113 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_642(t4,((C_word*)t0)[2],t3);}
-
-/* k741 in k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 113 loop");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_642(t3,((C_word*)t0)[2],t2);}
-
-/* k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_664,2,t0,t1);}
-switch(t1){
-case C_fix(0):
-t2=C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 105 loop");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_642(t3,((C_word*)t0)[3],t2);
-case C_fix(1):
-t2=C_a_i_cons(&a,2,lf[11],((C_word*)((C_word*)t0)[2])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 105 loop");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_642(t5,((C_word*)t0)[3],t4);
-case C_fix(2):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_697,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("chicken.scm: 90 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),t2,lf[11],lf[13],((C_word*)((C_word*)t0)[2])[1]);
-case C_fix(3):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_707,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("chicken.scm: 93 cons*");
-((C_proc6)C_retrieve_symbol_proc(lf[12]))(6,*((C_word*)lf[12]+1),t2,lf[11],lf[13],lf[14],((C_word*)((C_word*)t0)[2])[1]);
-case C_fix(4):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_717,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("chicken.scm: 96 cons*");
-((C_proc8)C_retrieve_symbol_proc(lf[12]))(8,*((C_word*)lf[12]+1),t2,lf[11],lf[13],lf[14],lf[15],lf[16],((C_word*)((C_word*)t0)[2])[1]);
-default:
-t2=t1;
-if(C_truep(C_fixnum_greater_or_equal_p(t2,C_fix(5)))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_727,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-C_trace("chicken.scm: 101 cons*");
-((C_proc12)C_retrieve_symbol_proc(lf[12]))(12,*((C_word*)lf[12]+1),t3,lf[17],lf[18],lf[16],lf[19],lf[11],lf[20],lf[21],lf[13],lf[15],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t3=C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 105 loop");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_642(t4,((C_word*)t0)[3],t3);}}}
-
-/* k725 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_727(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 105 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_642(t4,((C_word*)t0)[2],t3);}
-
-/* k715 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_717(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 105 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_642(t4,((C_word*)t0)[2],t3);}
-
-/* k705 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 105 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_642(t4,((C_word*)t0)[2],t3);}
-
-/* k695 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 105 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_642(t4,((C_word*)t0)[2],t3);}
-
-/* k632 in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_634,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_637,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_apply(5,0,t2,C_retrieve(lf[9]),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k635 in k632 in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_637(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 125 exit");
-((C_proc2)C_retrieve_symbol_proc(lf[8]))(2,*((C_word*)lf[8]+1),((C_word*)t0)[2]);}
-
-/* a617 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_618(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_618,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_622,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("chicken.scm: 76 user-options-pass");
-((C_proc2)C_retrieve_symbol_proc(lf[7]))(2,*((C_word*)lf[7]+1),t2);}
-
-/* k620 in a617 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-C_trace("g325326");
-t3=t2;
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_retrieve(lf[1]));}
-else{
-t2=C_retrieve(lf[2]);
-C_trace("g325326");
-t3=t2;
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_retrieve(lf[1]));}}
-
-/* k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_610,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_613,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_616,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#implicit-exit-handler");
-((C_proc2)C_retrieve_symbol_proc(lf[6]))(2,*((C_word*)lf[6]+1),t3);}
-
-/* k614 in k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* k611 in k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_503(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_503,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_509,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_509(t6,t1,t2,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_509(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_509,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(C_i_nullp(t2))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_523,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("chicken.scm: 61 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[3]+1)))(3,*((C_word*)lf[3]+1),t5,t3);}
-else{
-t5=C_i_car(t2);
-t6=C_i_string_length(t5);
-t7=C_i_string_ref(t5,C_fix(0));
-t8=C_eqp(C_make_character(45),t7);
-t9=(C_truep(t8)?C_fixnum_greaterp(t6,C_fix(1)):C_SCHEME_FALSE);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_544,a[2]=t6,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[2],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_fixnum_greaterp(t6,C_fix(1)))){
-t11=C_i_string_ref(t5,C_fix(1));
-t12=t10;
-f_544(t12,C_eqp(C_make_character(58),t11));}
-else{
-t11=t10;
-f_544(t11,C_SCHEME_FALSE);}}
-else{
-if(C_truep(t4)){
-t10=C_i_cdr(t2);
-t11=C_a_i_cons(&a,2,t5,t3);
-C_trace("chicken.scm: 70 loop");
-t17=t1;
-t18=t10;
-t19=t11;
-t20=t4;
-t1=t17;
-t2=t18;
-t3=t19;
-t4=t20;
-goto loop;}
-else{
-t10=C_i_cdr(t2);
-C_trace("chicken.scm: 71 loop");
-t17=t1;
-t18=t10;
-t19=t3;
-t20=t5;
-t1=t17;
-t2=t18;
-t3=t19;
-t4=t20;
-goto loop;}}}}
-
-/* k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_fcall f_544(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_544,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[8]);
-C_trace("chicken.scm: 67 loop");
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_509(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[8]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_566,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_570,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("chicken.scm: 68 substring");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),t4,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2]);}}
-
-/* k568 in k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_570(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 68 string->symbol");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],t1);}
-
-/* k564 in k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_566,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
-C_trace("chicken.scm: 68 loop");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_509(t3,((C_word*)t0)[4],((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* k521 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
-static void C_ccall f_523(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("chicken.scm: 61 values");
-C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[152] = {
-{"toplevel:chicken_scm",(void*)C_toplevel},
-{"f_397:chicken_scm",(void*)f_397},
-{"f_400:chicken_scm",(void*)f_400},
-{"f_403:chicken_scm",(void*)f_403},
-{"f_406:chicken_scm",(void*)f_406},
-{"f_409:chicken_scm",(void*)f_409},
-{"f_412:chicken_scm",(void*)f_412},
-{"f_415:chicken_scm",(void*)f_415},
-{"f_418:chicken_scm",(void*)f_418},
-{"f_421:chicken_scm",(void*)f_421},
-{"f_424:chicken_scm",(void*)f_424},
-{"f_427:chicken_scm",(void*)f_427},
-{"f_430:chicken_scm",(void*)f_430},
-{"f_433:chicken_scm",(void*)f_433},
-{"f_436:chicken_scm",(void*)f_436},
-{"f_439:chicken_scm",(void*)f_439},
-{"f_442:chicken_scm",(void*)f_442},
-{"f_445:chicken_scm",(void*)f_445},
-{"f_448:chicken_scm",(void*)f_448},
-{"f_451:chicken_scm",(void*)f_451},
-{"f_455:chicken_scm",(void*)f_455},
-{"f_1494:chicken_scm",(void*)f_1494},
-{"f_1501:chicken_scm",(void*)f_1501},
-{"f_1504:chicken_scm",(void*)f_1504},
-{"f_1507:chicken_scm",(void*)f_1507},
-{"f_1604:chicken_scm",(void*)f_1604},
-{"f_1617:chicken_scm",(void*)f_1617},
-{"f_1749:chicken_scm",(void*)f_1749},
-{"f_1747:chicken_scm",(void*)f_1747},
-{"f_1677:chicken_scm",(void*)f_1677},
-{"f_1701:chicken_scm",(void*)f_1701},
-{"f_1685:chicken_scm",(void*)f_1685},
-{"f_1689:chicken_scm",(void*)f_1689},
-{"f_1513:chicken_scm",(void*)f_1513},
-{"f_1523:chicken_scm",(void*)f_1523},
-{"f_1543:chicken_scm",(void*)f_1543},
-{"f_1492:chicken_scm",(void*)f_1492},
-{"f_458:chicken_scm",(void*)f_458},
-{"f_1361:chicken_scm",(void*)f_1361},
-{"f_1365:chicken_scm",(void*)f_1365},
-{"f_1377:chicken_scm",(void*)f_1377},
-{"f_1469:chicken_scm",(void*)f_1469},
-{"f_1380:chicken_scm",(void*)f_1380},
-{"f_1387:chicken_scm",(void*)f_1387},
-{"f_1465:chicken_scm",(void*)f_1465},
-{"f_1407:chicken_scm",(void*)f_1407},
-{"f_1359:chicken_scm",(void*)f_1359},
-{"f_461:chicken_scm",(void*)f_461},
-{"f_1177:chicken_scm",(void*)f_1177},
-{"f_1181:chicken_scm",(void*)f_1181},
-{"f_1190:chicken_scm",(void*)f_1190},
-{"f_1313:chicken_scm",(void*)f_1313},
-{"f_1351:chicken_scm",(void*)f_1351},
-{"f_1340:chicken_scm",(void*)f_1340},
-{"f_1348:chicken_scm",(void*)f_1348},
-{"f_1193:chicken_scm",(void*)f_1193},
-{"f_1289:chicken_scm",(void*)f_1289},
-{"f_1204:chicken_scm",(void*)f_1204},
-{"f_1287:chicken_scm",(void*)f_1287},
-{"f_1214:chicken_scm",(void*)f_1214},
-{"f_1212:chicken_scm",(void*)f_1212},
-{"f_1175:chicken_scm",(void*)f_1175},
-{"f_464:chicken_scm",(void*)f_464},
-{"f_1091:chicken_scm",(void*)f_1091},
-{"f_1095:chicken_scm",(void*)f_1095},
-{"f_1098:chicken_scm",(void*)f_1098},
-{"f_1105:chicken_scm",(void*)f_1105},
-{"f_1129:chicken_scm",(void*)f_1129},
-{"f_1145:chicken_scm",(void*)f_1145},
-{"f_1148:chicken_scm",(void*)f_1148},
-{"f_1151:chicken_scm",(void*)f_1151},
-{"f_1154:chicken_scm",(void*)f_1154},
-{"f_1167:chicken_scm",(void*)f_1167},
-{"f_1157:chicken_scm",(void*)f_1157},
-{"f_1160:chicken_scm",(void*)f_1160},
-{"f_1163:chicken_scm",(void*)f_1163},
-{"f_1089:chicken_scm",(void*)f_1089},
-{"f_467:chicken_scm",(void*)f_467},
-{"f_1021:chicken_scm",(void*)f_1021},
-{"f_1025:chicken_scm",(void*)f_1025},
-{"f_1028:chicken_scm",(void*)f_1028},
-{"f_1038:chicken_scm",(void*)f_1038},
-{"f_1070:chicken_scm",(void*)f_1070},
-{"f_1066:chicken_scm",(void*)f_1066},
-{"f_1019:chicken_scm",(void*)f_1019},
-{"f_470:chicken_scm",(void*)f_470},
-{"f_992:chicken_scm",(void*)f_992},
-{"f_996:chicken_scm",(void*)f_996},
-{"f_1011:chicken_scm",(void*)f_1011},
-{"f_990:chicken_scm",(void*)f_990},
-{"f_473:chicken_scm",(void*)f_473},
-{"f_974:chicken_scm",(void*)f_974},
-{"f_982:chicken_scm",(void*)f_982},
-{"f_972:chicken_scm",(void*)f_972},
-{"f_476:chicken_scm",(void*)f_476},
-{"f_956:chicken_scm",(void*)f_956},
-{"f_964:chicken_scm",(void*)f_964},
-{"f_954:chicken_scm",(void*)f_954},
-{"f_479:chicken_scm",(void*)f_479},
-{"f_938:chicken_scm",(void*)f_938},
-{"f_946:chicken_scm",(void*)f_946},
-{"f_936:chicken_scm",(void*)f_936},
-{"f_482:chicken_scm",(void*)f_482},
-{"f_920:chicken_scm",(void*)f_920},
-{"f_928:chicken_scm",(void*)f_928},
-{"f_918:chicken_scm",(void*)f_918},
-{"f_485:chicken_scm",(void*)f_485},
-{"f_902:chicken_scm",(void*)f_902},
-{"f_910:chicken_scm",(void*)f_910},
-{"f_900:chicken_scm",(void*)f_900},
-{"f_488:chicken_scm",(void*)f_488},
-{"f_884:chicken_scm",(void*)f_884},
-{"f_892:chicken_scm",(void*)f_892},
-{"f_882:chicken_scm",(void*)f_882},
-{"f_491:chicken_scm",(void*)f_491},
-{"f_866:chicken_scm",(void*)f_866},
-{"f_874:chicken_scm",(void*)f_874},
-{"f_864:chicken_scm",(void*)f_864},
-{"f_494:chicken_scm",(void*)f_494},
-{"f_497:chicken_scm",(void*)f_497},
-{"f_857:chicken_scm",(void*)f_857},
-{"f_853:chicken_scm",(void*)f_853},
-{"f_845:chicken_scm",(void*)f_845},
-{"f_835:chicken_scm",(void*)f_835},
-{"f_843:chicken_scm",(void*)f_843},
-{"f_501:chicken_scm",(void*)f_501},
-{"f_630:chicken_scm",(void*)f_630},
-{"f_642:chicken_scm",(void*)f_642},
-{"f_825:chicken_scm",(void*)f_825},
-{"f_818:chicken_scm",(void*)f_818},
-{"f_740:chicken_scm",(void*)f_740},
-{"f_757:chicken_scm",(void*)f_757},
-{"f_743:chicken_scm",(void*)f_743},
-{"f_664:chicken_scm",(void*)f_664},
-{"f_727:chicken_scm",(void*)f_727},
-{"f_717:chicken_scm",(void*)f_717},
-{"f_707:chicken_scm",(void*)f_707},
-{"f_697:chicken_scm",(void*)f_697},
-{"f_634:chicken_scm",(void*)f_634},
-{"f_637:chicken_scm",(void*)f_637},
-{"f_618:chicken_scm",(void*)f_618},
-{"f_622:chicken_scm",(void*)f_622},
-{"f_610:chicken_scm",(void*)f_610},
-{"f_616:chicken_scm",(void*)f_616},
-{"f_613:chicken_scm",(void*)f_613},
-{"f_503:chicken_scm",(void*)f_503},
-{"f_509:chicken_scm",(void*)f_509},
-{"f_544:chicken_scm",(void*)f_544},
-{"f_570:chicken_scm",(void*)f_570},
-{"f_566:chicken_scm",(void*)f_566},
-{"f_523:chicken_scm",(void*)f_523},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/compiler-syntax.c b/bootstrap/compiler-syntax.c
deleted file mode 100644
index 2c10ffaa..00000000
--- a/bootstrap/compiler-syntax.c
+++ /dev/null
@@ -1,4075 +0,0 @@
-/* Generated from compiler-syntax.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:38
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: compiler-syntax.scm -optimize-level 2 -include-path . -include-path ./ -inline -no-lambda-info -local -no-trace -extend private-namespace.scm -no-trace -output-file compiler-syntax.c
- unit: compiler_syntax
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[76];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_compiler_syntax_toplevel)
-C_externexport void C_ccall C_compiler_syntax_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_699)
-static void C_ccall f_699(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_702)
-static void C_ccall f_702(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2842)
-static void C_ccall f_2842(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2432)
-static void C_ccall f_2432(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2436)
-static void C_ccall f_2436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2439)
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2442)
-static void C_ccall f_2442(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2445)
-static void C_ccall f_2445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2448)
-static void C_ccall f_2448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2451)
-static void C_ccall f_2451(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2454)
-static void C_ccall f_2454(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2830)
-static void C_ccall f_2830(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2822)
-static void C_ccall f_2822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2802)
-static void C_ccall f_2802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2463)
-static void C_fcall f_2463(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2752)
-static void C_fcall f_2752(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2786)
-static void C_ccall f_2786(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2466)
-static void C_ccall f_2466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2703)
-static void C_fcall f_2703(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2736)
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2716)
-static void C_fcall f_2716(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2481)
-static void C_ccall f_2481(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2659)
-static void C_fcall f_2659(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2686)
-static C_word C_fcall f_2686(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_2657)
-static void C_ccall f_2657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2653)
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2595)
-static void C_fcall f_2595(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2593)
-static void C_ccall f_2593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2589)
-static void C_ccall f_2589(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2535)
-static void C_fcall f_2535(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2533)
-static void C_ccall f_2533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2529)
-static void C_ccall f_2529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_793)
-static void C_ccall f_793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2430)
-static void C_ccall f_2430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1862)
-static void C_ccall f_1862(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1866)
-static void C_ccall f_1866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1869)
-static void C_ccall f_1869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1872)
-static void C_ccall f_1872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1875)
-static void C_ccall f_1875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1878)
-static void C_ccall f_1878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1881)
-static void C_ccall f_1881(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1884)
-static void C_ccall f_1884(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1887)
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1890)
-static void C_ccall f_1890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1893)
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1896)
-static void C_ccall f_1896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1899)
-static void C_ccall f_1899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1902)
-static void C_ccall f_1902(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2418)
-static void C_ccall f_2418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2410)
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2390)
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1911)
-static void C_fcall f_1911(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2340)
-static void C_fcall f_2340(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2374)
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1914)
-static void C_ccall f_1914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2263)
-static void C_fcall f_2263(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2296)
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2276)
-static void C_fcall f_2276(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1945)
-static void C_ccall f_1945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2219)
-static void C_fcall f_2219(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2246)
-static C_word C_fcall f_2246(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_2217)
-static void C_ccall f_2217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2213)
-static void C_ccall f_2213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2155)
-static void C_fcall f_2155(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2153)
-static void C_ccall f_2153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2149)
-static void C_ccall f_2149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2015)
-static void C_fcall f_2015(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2013)
-static void C_ccall f_2013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2009)
-static void C_ccall f_2009(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_796)
-static void C_ccall f_796(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1813)
-static void C_ccall f_1813(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1823)
-static void C_ccall f_1823(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1830)
-static void C_ccall f_1830(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1846)
-static void C_ccall f_1846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_799)
-static void C_ccall f_799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1811)
-static void C_ccall f_1811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1807)
-static void C_ccall f_1807(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1803)
-static void C_ccall f_1803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1799)
-static void C_ccall f_1799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1795)
-static void C_ccall f_1795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1791)
-static void C_ccall f_1791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1787)
-static void C_ccall f_1787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1651)
-static void C_ccall f_1651(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1655)
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1658)
-static void C_ccall f_1658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1668)
-static void C_ccall f_1668(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1712)
-static void C_ccall f_1712(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1692)
-static void C_ccall f_1692(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_802)
-static void C_ccall f_802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1649)
-static void C_ccall f_1649(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1645)
-static void C_ccall f_1645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1641)
-static void C_ccall f_1641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1637)
-static void C_ccall f_1637(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1633)
-static void C_ccall f_1633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1629)
-static void C_ccall f_1629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1625)
-static void C_ccall f_1625(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1540)
-static void C_ccall f_1540(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1550)
-static void C_ccall f_1550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_805)
-static void C_ccall f_805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1538)
-static void C_ccall f_1538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1534)
-static void C_ccall f_1534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1530)
-static void C_ccall f_1530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1526)
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1522)
-static void C_ccall f_1522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1518)
-static void C_ccall f_1518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1514)
-static void C_ccall f_1514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1443)
-static void C_ccall f_1443(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1447)
-static void C_ccall f_1447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_808)
-static void C_ccall f_808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_810)
-static void C_ccall f_810(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7) C_noret;
-C_noret_decl(f_816)
-static void C_ccall f_816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1425)
-static void C_ccall f_1425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1429)
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1414)
-static void C_ccall f_1414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1421)
-static void C_ccall f_1421(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_838)
-static void C_fcall f_838(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_841)
-static void C_ccall f_841(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_881)
-static void C_ccall f_881(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_884)
-static void C_ccall f_884(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_887)
-static void C_ccall f_887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_890)
-static void C_ccall f_890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_893)
-static void C_ccall f_893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_896)
-static void C_ccall f_896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_899)
-static void C_ccall f_899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_993)
-static void C_fcall f_993(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1054)
-static void C_ccall f_1054(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1358)
-static C_word C_fcall f_1358(C_word t0,C_word t1);
-C_noret_decl(f_1272)
-static void C_ccall f_1272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1275)
-static void C_ccall f_1275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1242)
-static void C_ccall f_1242(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1205)
-static void C_ccall f_1205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1168)
-static void C_ccall f_1168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1131)
-static void C_ccall f_1131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1106)
-static void C_ccall f_1106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1081)
-static void C_ccall f_1081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1060)
-static void C_ccall f_1060(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1003)
-static void C_ccall f_1003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1006)
-static void C_ccall f_1006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1025)
-static void C_ccall f_1025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1021)
-static void C_ccall f_1021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_983)
-static C_word C_fcall f_983(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_930)
-static void C_fcall f_930(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_973)
-static void C_ccall f_973(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_911)
-static void C_fcall f_911(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_901)
-static C_word C_fcall f_901(C_word t0);
-C_noret_decl(f_846)
-static void C_fcall f_846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_850)
-static void C_ccall f_850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_866)
-static void C_ccall f_866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_869)
-static void C_ccall f_869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_872)
-static void C_ccall f_872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_863)
-static void C_ccall f_863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_853)
-static void C_ccall f_853(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_719)
-static void C_ccall f_719(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_719)
-static void C_ccall f_719r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_723)
-static void C_ccall f_723(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_771)
-static void C_ccall f_771(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_735)
-static void C_fcall f_735(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_750)
-static void C_ccall f_750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_743)
-static void C_fcall f_743(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_705)
-static void C_ccall f_705(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_709)
-static void C_ccall f_709(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_713)
-static void C_ccall f_713(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_2463)
-static void C_fcall trf_2463(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2463(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2463(t0,t1);}
-
-C_noret_decl(trf_2752)
-static void C_fcall trf_2752(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2752(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2752(t0,t1,t2);}
-
-C_noret_decl(trf_2703)
-static void C_fcall trf_2703(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2703(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2703(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2716)
-static void C_fcall trf_2716(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2716(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2716(t0,t1);}
-
-C_noret_decl(trf_2659)
-static void C_fcall trf_2659(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2659(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2659(t0,t1,t2);}
-
-C_noret_decl(trf_2595)
-static void C_fcall trf_2595(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2595(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2595(t0,t1,t2);}
-
-C_noret_decl(trf_2535)
-static void C_fcall trf_2535(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2535(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2535(t0,t1,t2);}
-
-C_noret_decl(trf_1911)
-static void C_fcall trf_1911(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1911(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1911(t0,t1);}
-
-C_noret_decl(trf_2340)
-static void C_fcall trf_2340(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2340(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2340(t0,t1,t2);}
-
-C_noret_decl(trf_2263)
-static void C_fcall trf_2263(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2263(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2263(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2276)
-static void C_fcall trf_2276(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2276(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2276(t0,t1);}
-
-C_noret_decl(trf_2219)
-static void C_fcall trf_2219(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2219(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2219(t0,t1,t2);}
-
-C_noret_decl(trf_2155)
-static void C_fcall trf_2155(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2155(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2155(t0,t1,t2);}
-
-C_noret_decl(trf_2015)
-static void C_fcall trf_2015(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2015(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2015(t0,t1,t2);}
-
-C_noret_decl(trf_838)
-static void C_fcall trf_838(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_838(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_838(t0,t1);}
-
-C_noret_decl(trf_993)
-static void C_fcall trf_993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_993(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_993(t0,t1,t2);}
-
-C_noret_decl(trf_930)
-static void C_fcall trf_930(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_930(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_930(t0,t1,t2);}
-
-C_noret_decl(trf_911)
-static void C_fcall trf_911(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_911(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_911(t0,t1);}
-
-C_noret_decl(trf_846)
-static void C_fcall trf_846(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_846(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_846(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_735)
-static void C_fcall trf_735(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_735(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_735(t0,t1,t2);}
-
-C_noret_decl(trf_743)
-static void C_fcall trf_743(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_743(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_743(t0,t1,t2);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr8)
-static void C_fcall tr8(C_proc8 k) C_regparm C_noret;
-C_regparm static void C_fcall tr8(C_proc8 k){
-C_word t7=C_pick(0);
-C_word t6=C_pick(1);
-C_word t5=C_pick(2);
-C_word t4=C_pick(3);
-C_word t3=C_pick(4);
-C_word t2=C_pick(5);
-C_word t1=C_pick(6);
-C_word t0=C_pick(7);
-C_adjust_stack(-8);
-(k)(8,t0,t1,t2,t3,t4,t5,t6,t7);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_compiler_syntax_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_compiler_syntax_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("compiler_syntax_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(854)){
-C_save(t1);
-C_rereclaim2(854*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,76);
-lf[0]=C_h_intern(&lf[0],35,"\010compilercompiler-syntax-statistics");
-lf[1]=C_h_intern(&lf[1],24,"\003syscompiler-syntax-hook");
-lf[2]=C_h_intern(&lf[2],13,"alist-update!");
-lf[3]=C_h_intern(&lf[3],9,"alist-ref");
-lf[4]=C_h_intern(&lf[4],3,"eq\077");
-lf[5]=C_h_intern(&lf[5],14,"\010compilerr-c-s");
-lf[6]=C_h_intern(&lf[6],8,"\003sysput!");
-lf[7]=C_h_intern(&lf[7],24,"\010compilercompiler-syntax");
-lf[8]=C_h_intern(&lf[8],18,"\003syser-transformer");
-lf[9]=C_h_intern(&lf[9],9,"\003syserror");
-lf[10]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[11]=C_h_intern(&lf[11],30,"\010compilercompile-format-string");
-lf[12]=C_h_intern(&lf[12],17,"extended-bindings");
-lf[13]=C_h_intern(&lf[13],25,"\010compilercompiler-warning");
-lf[14]=C_h_intern(&lf[14],6,"syntax");
-lf[15]=C_decode_literal(C_heaptop,"\376B\000\000\036(~a) in format string ~s~a, ~\077");
-lf[16]=C_h_intern(&lf[16],17,"get-output-string");
-lf[17]=C_h_intern(&lf[17],7,"display");
-lf[18]=C_decode_literal(C_heaptop,"\376B\000\000\011 in line ");
-lf[19]=C_h_intern(&lf[19],18,"open-output-string");
-lf[20]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[21]=C_h_intern(&lf[21],17,"\010compilerget-line");
-lf[22]=C_decode_literal(C_heaptop,"\376B\000\000/too few arguments to formatted output procedure");
-lf[23]=C_h_intern(&lf[23],20,"reverse-list->string");
-lf[24]=C_h_intern(&lf[24],10,"\003sysappend");
-lf[25]=C_h_intern(&lf[25],7,"reverse");
-lf[26]=C_decode_literal(C_heaptop,"\376B\000\0000too many arguments to formatted output procedure");
-lf[27]=C_h_intern(&lf[27],16,"\003sysflush-output");
-lf[28]=C_h_intern(&lf[28],9,"\003sysapply");
-lf[29]=C_h_intern(&lf[29],10,"write-char");
-lf[30]=C_decode_literal(C_heaptop,"\376B\000\000$illegal format-string character `~c\047");
-lf[31]=C_h_intern(&lf[31],14,"number->string");
-lf[32]=C_h_intern(&lf[32],3,"let");
-lf[33]=C_h_intern(&lf[33],7,"fprintf");
-lf[34]=C_h_intern(&lf[34],3,"out");
-lf[35]=C_h_intern(&lf[35],5,"write");
-lf[36]=C_h_intern(&lf[36],5,"cadar");
-lf[37]=C_h_intern(&lf[37],4,"caar");
-lf[38]=C_h_intern(&lf[38],5,"quote");
-lf[39]=C_h_intern(&lf[39],7,"call/cc");
-lf[40]=C_h_intern(&lf[40],6,"printf");
-lf[41]=C_h_intern(&lf[41],19,"\003sysstandard-output");
-lf[42]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006printf\376\003\000\000\002\376\001\000\000\010#%printf\376\377\016");
-lf[43]=C_h_intern(&lf[43],19,"\003sysprimitive-alias");
-lf[44]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007fprintf\376\003\000\000\002\376\001\000\000\011#%fprintf\376\377\016");
-lf[45]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007sprintf\376\003\000\000\002\376\001\000\000\011#%sprintf\376\377\016");
-lf[46]=C_h_intern(&lf[46],7,"sprintf");
-lf[47]=C_h_intern(&lf[47],6,"format");
-lf[48]=C_h_intern(&lf[48],6,"gensym");
-lf[49]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007sprintf\376\003\000\000\002\376\001\000\000\011#%sprintf\376\003\000\000\002\376\001\000\000\006format\376\003\000\000\002\376\001\000\000\010#%format\376\377\016");
-lf[50]=C_h_intern(&lf[50],1,"o");
-lf[51]=C_h_intern(&lf[51],10,"fold-right");
-lf[52]=C_h_intern(&lf[52],4,"list");
-lf[53]=C_h_intern(&lf[53],6,"lambda");
-lf[54]=C_h_intern(&lf[54],3,"tmp");
-lf[55]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001o\376\003\000\000\002\376\001\000\000\003#%o\376\377\016");
-lf[56]=C_h_intern(&lf[56],11,"\003syssetslot");
-lf[57]=C_h_intern(&lf[57],8,"\003sysslot");
-lf[58]=C_h_intern(&lf[58],3,"map");
-lf[59]=C_h_intern(&lf[59],17,"standard-bindings");
-lf[60]=C_h_intern(&lf[60],5,"caadr");
-lf[61]=C_h_intern(&lf[61],7,"length+");
-lf[62]=C_h_intern(&lf[62],5,"pair\077");
-lf[63]=C_h_intern(&lf[63],3,"and");
-lf[64]=C_h_intern(&lf[64],5,"begin");
-lf[65]=C_h_intern(&lf[65],4,"node");
-lf[66]=C_h_intern(&lf[66],6,"result");
-lf[67]=C_h_intern(&lf[67],4,"set!");
-lf[68]=C_h_intern(&lf[68],4,"cons");
-lf[69]=C_h_intern(&lf[69],3,"res");
-lf[70]=C_h_intern(&lf[70],4,"loop");
-lf[71]=C_h_intern(&lf[71],2,"if");
-lf[72]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003map\376\003\000\000\002\376\001\000\000\007\003sysmap\376\003\000\000\002\376\001\000\000\005#%map\376\377\016");
-lf[73]=C_h_intern(&lf[73],8,"\004coreapp");
-lf[74]=C_h_intern(&lf[74],8,"for-each");
-lf[75]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010for-each\376\003\000\000\002\376\001\000\000\014\003sysfor-each\376\003\000\000\002\376\001\000\000\012#%for-each\376\377\016");
-C_register_lf2(lf,76,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_699,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k697 */
-static void C_ccall f_699(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_699,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_702,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k700 in k697 */
-static void C_ccall f_702(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_702,2,t0,t1);}
-t2=C_set_block_item(lf[0] /* compiler-syntax-statistics */,0,C_SCHEME_END_OF_LIST);
-t3=C_mutate((C_word*)lf[1]+1 /* (set! compiler-syntax-hook ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_705,tmp=(C_word)a,a+=2,tmp));
-t4=C_mutate((C_word*)lf[5]+1 /* (set! r-c-s ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_719,tmp=(C_word)a,a+=2,tmp));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_793,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2432,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2842,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t7,lf[62]);}
-
-/* k2840 in k700 in k697 */
-static void C_ccall f_2842(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2842,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[62],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),((C_word*)t0)[3],lf[75],((C_word*)t0)[2],t3);}
-
-/* a2431 in k700 in k697 */
-static void C_ccall f_2432(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2432,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2436,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 61 r */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[32]);}
-
-/* k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2436,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 62 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[71]);}
-
-/* k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2442,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 63 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[70]);}
-
-/* k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2442(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2442,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2445,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* compiler-syntax.scm: 64 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[64]);}
-
-/* k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2445,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* compiler-syntax.scm: 65 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[63]);}
-
-/* k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2448,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2451,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* compiler-syntax.scm: 66 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[62]);}
-
-/* k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2451(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2451,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2454,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* compiler-syntax.scm: 67 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
-
-/* k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2454(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2454,2,t0,t1);}
-t2=(C_word)C_i_cddr(((C_word*)t0)[10]);
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2463,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-if(C_truep((C_word)C_i_memq(lf[74],C_retrieve(lf[59])))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2830,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[10],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 70 length+ */
-((C_proc3)C_retrieve_symbol_proc(lf[61]))(3,*((C_word*)lf[61]+1),t4,((C_word*)t0)[10]);}
-else{
-t4=t3;
-f_2463(t4,C_SCHEME_FALSE);}}
-
-/* k2828 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2830(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2830,2,t0,t1);}
-if(C_truep((C_word)C_fixnum_greaterp(t1,C_fix(2)))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2802,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2822,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 72 caadr */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[60]+1)))(3,*((C_word*)lf[60]+1),t4,((C_word*)t0)[4]);}
-else{
-t4=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t5=((C_word*)t0)[5];
-f_2463(t5,(C_word)C_i_symbolp(t4));}}
-else{
-t2=((C_word*)t0)[5];
-f_2463(t2,C_SCHEME_FALSE);}}
-
-/* k2820 in k2828 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* compiler-syntax.scm: 72 c */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2800 in k2828 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-f_2463(t2,t1);}
-else{
-t2=(C_word)C_i_cadr(((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-f_2463(t3,(C_word)C_i_symbolp(t2));}}
-
-/* k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2463(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2463,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2466,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2752,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_2752(t10,t6,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[9];
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* loop137 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2752(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2752,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2786,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_a_i_list(&a,1,t4);
-/* compiler-syntax.scm: 74 gensym */
-((C_proc2)C_retrieve_symbol_proc(lf[48]))(2,*((C_word*)lf[48]+1),t3);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2784 in loop137 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2786(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2786,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop137150 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2752(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop137150 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2752(t6,((C_word*)t0)[3],t5);}}
-
-/* k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2466,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2481,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2703,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_2703(t10,t6,t1,((C_word*)t0)[2]);}
-
-/* loop165 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2703(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2703,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_pairp(t2);
-t5=(C_truep(t4)?(C_word)C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[52]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2736,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=(C_word)C_slot(t2,C_fix(0));
-t9=(C_word)C_slot(t3,C_fix(0));
-/* g185186 */
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k2734 in loop165 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2736,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2716,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_2716(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_2716(t5,t4);}}
-
-/* k2714 in k2734 in loop165 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2716(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop165179 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2703(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2481(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2481,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2653,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2657,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2659,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_2659(t11,t7,((C_word*)t0)[3]);}
-
-/* loop192 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2659(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2659,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2686,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_2686(C_a_i(&a,6),t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop192205 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop192205 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g208 in loop192 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static C_word C_fcall f_2686(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-return((C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k2655 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2653,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=(C_word)C_i_cadr(((C_word*)t0)[9]);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2589,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],a[10]=t5,tmp=(C_word)a,a+=11,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2593,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2595,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
-t15=((C_word*)t13)[1];
-f_2595(t15,t11,((C_word*)t0)[2]);}
-
-/* loop220 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2595(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2595,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,C_fix(0),C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[57],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t8=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop220233 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop220233 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2591 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2587 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2589(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2589,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2529,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t2,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2533,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2535,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_2535(t12,t8,((C_word*)t0)[2]);}
-
-/* loop248 in k2587 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_fcall f_2535(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2535,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[57],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t8=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop248261 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop248261 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2531 in k2587 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2527 in k2587 in k2651 in k2479 in k2464 in k2461 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in a2431 in k700 in k697 */
-static void C_ccall f_2529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2529,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[73],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t10);
-t12=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t11);
-t13=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t12));}
-
-/* k791 in k700 in k697 */
-static void C_ccall f_793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_793,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_796,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1862,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2430,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t4,lf[62]);}
-
-/* k2428 in k791 in k700 in k697 */
-static void C_ccall f_2430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2430,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[62],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),((C_word*)t0)[3],lf[72],((C_word*)t0)[2],t3);}
-
-/* a1861 in k791 in k700 in k697 */
-static void C_ccall f_1862(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1862,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1866,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 87 r */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[32]);}
-
-/* k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1866,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1869,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 88 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[71]);}
-
-/* k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1869,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1872,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 89 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[70]);}
-
-/* k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1872,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1875,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* compiler-syntax.scm: 90 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[69]);}
-
-/* k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1875(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1875,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1878,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-/* compiler-syntax.scm: 91 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[68]);}
-
-/* k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1878,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1881,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* compiler-syntax.scm: 92 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
-
-/* k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1881(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1881,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1884,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* compiler-syntax.scm: 93 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[66]);}
-
-/* k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1884(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1884,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_1887,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* compiler-syntax.scm: 94 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[65]);}
-
-/* k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1887,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_1890,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* compiler-syntax.scm: 95 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[38]);}
-
-/* k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1890,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_1893,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=t1,a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-/* compiler-syntax.scm: 96 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[64]);}
-
-/* k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_1896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-/* compiler-syntax.scm: 97 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
-
-/* k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_1899,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-/* compiler-syntax.scm: 98 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[63]);}
-
-/* k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1899,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_1902,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t1,a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-/* compiler-syntax.scm: 99 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[62]);}
-
-/* k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1902(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1902,2,t0,t1);}
-t2=(C_word)C_i_cddr(((C_word*)t0)[16]);
-t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_1911,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[16],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-if(C_truep((C_word)C_i_memq(lf[58],C_retrieve(lf[59])))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[16],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 102 length+ */
-((C_proc3)C_retrieve_symbol_proc(lf[61]))(3,*((C_word*)lf[61]+1),t4,((C_word*)t0)[16]);}
-else{
-t4=t3;
-f_1911(t4,C_SCHEME_FALSE);}}
-
-/* k2416 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2418,2,t0,t1);}
-if(C_truep((C_word)C_fixnum_greaterp(t1,C_fix(2)))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2390,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2410,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 104 caadr */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[60]+1)))(3,*((C_word*)lf[60]+1),t4,((C_word*)t0)[4]);}
-else{
-t4=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t5=((C_word*)t0)[5];
-f_1911(t5,(C_word)C_i_symbolp(t4));}}
-else{
-t2=((C_word*)t0)[5];
-f_1911(t2,C_SCHEME_FALSE);}}
-
-/* k2408 in k2416 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* compiler-syntax.scm: 104 c */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2388 in k2416 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-f_1911(t2,t1);}
-else{
-t2=(C_word)C_i_cadr(((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-f_1911(t3,(C_word)C_i_symbolp(t2));}}
-
-/* k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_1911(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1911,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_1914,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2340,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_2340(t10,t6,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[12];
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* loop314 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2340(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2340,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2374,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_a_i_list(&a,1,t4);
-/* compiler-syntax.scm: 106 gensym */
-((C_proc2)C_retrieve_symbol_proc(lf[48]))(2,*((C_word*)lf[48]+1),t3);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2372 in loop314 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2374,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop314327 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2340(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop314327 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2340(t6,((C_word*)t0)[3],t5);}}
-
-/* k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[53],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1914,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[16],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[15],t4);
-t6=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[14],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t5,t8);
-t10=C_SCHEME_END_OF_LIST;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_FALSE;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_1945,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t9,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[15],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[11],a[16]=((C_word*)t0)[12],a[17]=((C_word*)t0)[13],tmp=(C_word)a,a+=18,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2263,a[2]=t11,a[3]=t16,a[4]=t13,tmp=(C_word)a,a+=5,tmp));
-t18=((C_word*)t16)[1];
-f_2263(t18,t14,t1,((C_word*)t0)[2]);}
-
-/* loop342 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2263(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2263,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_pairp(t2);
-t5=(C_truep(t4)?(C_word)C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[52]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=(C_word)C_slot(t2,C_fix(0));
-t9=(C_word)C_slot(t3,C_fix(0));
-/* g362363 */
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k2294 in loop342 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_2276(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_2276(t5,t4);}}
-
-/* k2274 in k2294 in loop342 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2276(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop342356 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2263(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_1945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1945,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2213,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2217,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2219,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_2219(t11,t7,((C_word*)t0)[3]);}
-
-/* loop369 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2219(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2219,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2246,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_2246(C_a_i(&a,6),t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop369382 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop369382 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g385 in loop369 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static C_word C_fcall f_2246(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-return((C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k2215 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[40],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2213,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[17],t1);
-t3=(C_word)C_i_cadr(((C_word*)t0)[16]);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[15],t4);
-t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2149,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=t5,tmp=(C_word)a,a+=17,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2153,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2155,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
-t15=((C_word*)t13)[1];
-f_2155(t15,t11,((C_word*)t0)[2]);}
-
-/* loop397 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2155(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2155,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,C_fix(0),C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[57],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t8=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop397410 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop397410 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2151 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2147 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[96],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2149,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[16],t1);
-t3=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[15],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t2,t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[14],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,C_fix(1),t11);
-t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t12);
-t14=(C_word)C_a_i_cons(&a,2,lf[56],t13);
-t15=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t16=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],t15);
-t17=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t16);
-t18=(C_word)C_a_i_cons(&a,2,t17,C_SCHEME_END_OF_LIST);
-t19=(C_word)C_a_i_cons(&a,2,t14,t18);
-t20=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t19);
-t21=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t20);
-t22=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t23=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t22);
-t24=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t23);
-t25=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2009,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[7],a[9]=t10,a[10]=t21,a[11]=t24,a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
-t26=C_SCHEME_END_OF_LIST;
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_SCHEME_FALSE;
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2013,a[2]=t25,tmp=(C_word)a,a+=3,tmp);
-t31=C_SCHEME_UNDEFINED;
-t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
-t33=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2015,a[2]=t27,a[3]=t32,a[4]=t29,tmp=(C_word)a,a+=5,tmp));
-t34=((C_word*)t32)[1];
-f_2015(t34,t30,((C_word*)t0)[2]);}
-
-/* loop425 in k2147 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_fcall f_2015(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2015,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[57],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t8=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop425438 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop425438 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2011 in k2147 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k2007 in k2147 in k2211 in k1943 in k1912 in k1909 in k1900 in k1897 in k1894 in k1891 in k1888 in k1885 in k1882 in k1879 in k1876 in k1873 in k1870 in k1867 in k1864 in a1861 in k791 in k700 in k697 */
-static void C_ccall f_2009(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[51],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2009,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t7,t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t9);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t10);
-t12=(C_word)C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t12);
-t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t13);
-t15=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t14);
-t16=(C_word)C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
-t17=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t16);
-t18=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t17));}
-
-/* k794 in k791 in k700 in k697 */
-static void C_ccall f_796(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_796,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_799,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1813,tmp=(C_word)a,a+=2,tmp);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),t2,lf[55],t3,C_SCHEME_END_OF_LIST);}
-
-/* a1812 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1813(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1813,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_length(t2);
-t6=(C_word)C_fixnum_greaterp(t5,C_fix(1));
-t7=(C_truep(t6)?(C_word)C_i_memq(lf[50],C_retrieve(lf[12])):C_SCHEME_FALSE);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1823,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 128 r */
-t9=t3;
-((C_proc3)C_retrieve_proc(t9))(3,t9,t8,lf[54]);}
-else{
-t8=t2;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-
-/* k1821 in a1812 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1823(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1823,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1830,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 129 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
-
-/* k1828 in k1821 in a1812 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1830(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1830,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1846,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* compiler-syntax.scm: 129 fold-right */
-((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),t3,*((C_word*)lf[52]+1),((C_word*)t0)[4],t4);}
-
-/* k1844 in k1828 in k1821 in a1812 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1846,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_799,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_802,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1651,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1811,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t4,lf[17]);}
-
-/* k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1811,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[17],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1807,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[35]);}
-
-/* k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1807(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1807,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[35],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1803,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[33]);}
-
-/* k1801 in k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1803,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[33],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1799,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[31]);}
-
-/* k1797 in k1801 in k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1799,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[31],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1795,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[29]);}
-
-/* k1793 in k1797 in k1801 in k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1795,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[29],t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1791,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[19]);}
-
-/* k1789 in k1793 in k1797 in k1801 in k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1791,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[19],t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1787,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[16]);}
-
-/* k1785 in k1789 in k1793 in k1797 in k1801 in k1805 in k1809 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1787,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[16],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),((C_word*)t0)[3],lf[49],((C_word*)t0)[2],t9);}
-
-/* a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1651(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1651,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1655,a[2]=t4,a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 134 gensym */
-((C_proc3)C_retrieve_symbol_proc(lf[48]))(3,*((C_word*)lf[48]+1),t5,lf[34]);}
-
-/* k1653 in a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1655,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1658,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-t4=(C_word)C_i_memq(t3,lf[45]);
-t5=(C_truep(t4)?lf[46]:lf[47]);
-t6=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* compiler-syntax.scm: 135 compile-format-string */
-((C_proc8)C_retrieve_symbol_proc(lf[11]))(8,*((C_word*)lf[11]+1),t2,t5,t1,((C_word*)t0)[3],t6,((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* k1656 in k1653 in a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1658,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1668,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 144 r */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[32]);}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k1666 in k1656 in k1653 in a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1668(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1668,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1712,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 144 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[19]);}
-
-/* k1710 in k1666 in k1656 in k1653 in a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1712(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1712,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1692,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 146 r */
-t7=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[16]);}
-
-/* k1690 in k1710 in k1666 in k1656 in k1653 in a1650 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1692(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1692,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
-
-/* k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_802,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_805,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1540,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1649,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t4,lf[17]);}
-
-/* k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1649(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1649,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[17],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1645,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[35]);}
-
-/* k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1645,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[35],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1641,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[33]);}
-
-/* k1639 in k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1641,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[33],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1637,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[31]);}
-
-/* k1635 in k1639 in k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1637(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1637,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[31],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[29]);}
-
-/* k1631 in k1635 in k1639 in k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1633,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[29],t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1629,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[19]);}
-
-/* k1627 in k1631 in k1635 in k1639 in k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1629,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[19],t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1625,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[16]);}
-
-/* k1623 in k1627 in k1631 in k1635 in k1639 in k1643 in k1647 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1625(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1625,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[16],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),((C_word*)t0)[3],lf[44],((C_word*)t0)[2],t9);}
-
-/* a1539 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1540(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1540,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_length(t2);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t5,C_fix(3)))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1550,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t7=(C_word)C_i_cadr(t2);
-t8=(C_word)C_i_cddr(t2);
-/* compiler-syntax.scm: 152 compile-format-string */
-((C_proc8)C_retrieve_symbol_proc(lf[11]))(8,*((C_word*)lf[11]+1),t6,lf[33],t7,t2,t8,t3,t4);}
-else{
-t6=t2;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k1548 in a1539 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1550(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-
-/* k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_805,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_808,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1443,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1538,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t4,lf[17]);}
-
-/* k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1538,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[17],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1534,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[35]);}
-
-/* k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1534,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[35],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1530,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[33]);}
-
-/* k1528 in k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1530,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[33],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1526,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[31]);}
-
-/* k1524 in k1528 in k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1526,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[31],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1522,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[29]);}
-
-/* k1520 in k1524 in k1528 in k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1522,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[29],t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1518,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[19]);}
-
-/* k1516 in k1520 in k1524 in k1528 in k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1518,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[19],t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1514,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-/* ##sys#primitive-alias */
-((C_proc3)C_retrieve_symbol_proc(lf[43]))(3,*((C_word*)lf[43]+1),t3,lf[16]);}
-
-/* k1512 in k1516 in k1520 in k1524 in k1528 in k1532 in k1536 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1514,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[16],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
-/* ##compiler#r-c-s */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),((C_word*)t0)[3],lf[42],((C_word*)t0)[2],t9);}
-
-/* a1442 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1443(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1443,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1447,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_i_cdr(t2);
-/* compiler-syntax.scm: 161 compile-format-string */
-((C_proc8)C_retrieve_symbol_proc(lf[11]))(8,*((C_word*)lf[11]+1),t5,lf[40],lf[41],t2,t6,t3,t4);}
-
-/* k1445 in a1442 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[2],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_808,2,t0,t1);}
-t2=C_mutate((C_word*)lf[11]+1 /* (set! compile-format-string ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_810,tmp=(C_word)a,a+=2,tmp));
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-
-/* ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_810(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
-C_word tmp;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(c!=8) C_bad_argc_2(c,8,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr8,(void*)f_810,8,t0,t1,t2,t3,t4,t5,t6,t7);}
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_816,a[2]=t7,a[3]=t6,a[4]=t3,a[5]=t4,a[6]=t2,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 168 call/cc */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[39]+1)))(3,*((C_word*)lf[39]+1),t1,t8);}
-
-/* a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_816(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[18],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_816,3,t0,t1,t2);}
-t3=(C_word)C_i_length(((C_word*)t0)[7]);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,C_fix(1)))){
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[6],C_retrieve(lf[12])))){
-t4=(C_word)C_i_car(((C_word*)t0)[7]);
-t5=(C_word)C_i_stringp(t4);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_838,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_838(t7,t5);}
-else{
-t7=(C_word)C_i_car(((C_word*)t0)[7]);
-if(C_truep((C_word)C_i_listp(t7))){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1414,a[2]=((C_word*)t0)[7],a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1425,a[2]=((C_word*)t0)[7],a[3]=t8,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 174 r */
-t10=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t10))(3,t10,t9,lf[38]);}
-else{
-t8=t6;
-f_838(t8,C_SCHEME_FALSE);}}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k1423 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1425,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1429,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 174 caar */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2]);}
-
-/* k1427 in k1423 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* compiler-syntax.scm: 174 c */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k1412 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1414,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1421,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* compiler-syntax.scm: 175 cadar */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[36]+1)))(3,*((C_word*)lf[36]+1),t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_838(t2,C_SCHEME_FALSE);}}
-
-/* k1419 in k1412 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1421(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_838(t2,(C_word)C_i_stringp(t1));}
-
-/* k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_fcall f_838(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_838,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_841,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[8]);
-if(C_truep((C_word)C_i_stringp(t3))){
-t4=t2;
-f_841(2,t4,(C_word)C_i_car(((C_word*)t0)[8]));}
-else{
-/* compiler-syntax.scm: 176 cadar */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[36]+1)))(3,*((C_word*)lf[36]+1),t2,((C_word*)t0)[8]);}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_841(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_841,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[8]);
-t3=t2;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_846,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_fix(0);
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(C_word)C_i_string_length(t1);
-t11=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_881,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t10,a[6]=t7,a[7]=t5,a[8]=t4,a[9]=t9,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-/* compiler-syntax.scm: 190 r */
-t12=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t12))(3,t12,t11,lf[17]);}
-
-/* k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_881(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_881,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_884,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* compiler-syntax.scm: 191 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[35]);}
-
-/* k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_884(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_884,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_887,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* compiler-syntax.scm: 192 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[29]);}
-
-/* k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_887,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_890,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* compiler-syntax.scm: 193 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[34]);}
-
-/* k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_890,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_893,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-/* compiler-syntax.scm: 194 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[33]);}
-
-/* k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-/* compiler-syntax.scm: 195 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[32]);}
-
-/* k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_899,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-/* compiler-syntax.scm: 196 r */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[31]);}
-
-/* k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[47],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_899,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_901,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp));
-t11=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_911,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[13],tmp=(C_word)a,a+=4,tmp));
-t12=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_930,a[2]=((C_word*)t0)[9],a[3]=t9,a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp));
-t13=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_983,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp));
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_993,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[9],a[6]=t5,a[7]=t9,a[8]=((C_word*)t0)[4],a[9]=t15,a[10]=t3,a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=t7,a[14]=((C_word*)t0)[8],a[15]=((C_word*)t0)[5],a[16]=((C_word*)t0)[11],a[17]=((C_word*)t0)[6],a[18]=((C_word*)t0)[7],a[19]=((C_word*)t0)[14],tmp=(C_word)a,a+=20,tmp));
-t17=((C_word*)t15)[1];
-f_993(t17,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_fcall f_993(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(16);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_993,NULL,3,t0,t1,t2);}
-t3=((C_word*)((C_word*)t0)[19])[1];
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[18]))){
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1003,a[2]=t2,a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=t1,a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[17],tmp=(C_word)a,a+=9,tmp);
-if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[12])[1]))){
-t5=t4;
-f_1003(2,t5,C_SCHEME_UNDEFINED);}
-else{
-/* compiler-syntax.scm: 218 fail */
-t5=((C_word*)t0)[11];
-f_846(t5,t4,C_SCHEME_FALSE,lf[26],C_SCHEME_END_OF_LIST);}}
-else{
-t4=f_901(((C_word*)((C_word*)t0)[10])[1]);
-t5=(C_word)C_eqp(t4,C_make_character(126));
-if(C_truep(t5)){
-t6=f_901(((C_word*)((C_word*)t0)[10])[1]);
-t7=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_1054,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[19],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[16],a[13]=t1,a[14]=((C_word*)t0)[9],a[15]=t6,tmp=(C_word)a,a+=16,tmp);
-/* compiler-syntax.scm: 226 endchunk */
-t8=((C_word*)((C_word*)t0)[13])[1];
-f_930(t8,t7,t2);}
-else{
-t6=(C_word)C_a_i_cons(&a,2,t4,t2);
-/* compiler-syntax.scm: 249 loop */
-t11=t1;
-t12=t6;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1054(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1054,2,t0,t1);}
-t2=(C_word)C_u_i_char_upcase(((C_word*)t0)[15]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1060,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],tmp=(C_word)a,a+=4,tmp);
-switch(t2){
-case C_make_character(83):
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1081,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 228 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(65):
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1106,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 229 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(67):
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1131,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 230 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(66):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1168,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 231 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(79):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1205,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 232 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(88):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1242,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 233 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(33):
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[27],t4);
-t6=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[10])[1],t5);
-/* compiler-syntax.scm: 248 loop */
-t7=((C_word*)((C_word*)t0)[14])[1];
-f_993(t7,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-case C_make_character(63):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1272,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[12],tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 236 next */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_911(t5,t4);
-case C_make_character(126):
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,C_make_character(126),t4);
-t6=(C_word)C_a_i_cons(&a,2,*((C_word*)lf[29]+1),t5);
-t7=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[10])[1],t6);
-/* compiler-syntax.scm: 248 loop */
-t8=((C_word*)((C_word*)t0)[14])[1];
-f_993(t8,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-default:
-t4=(C_word)C_eqp(t2,C_make_character(37));
-t5=(C_truep(t4)?t4:(C_word)C_eqp(t2,C_make_character(78)));
-if(C_truep(t5)){
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,C_make_character(10),t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t7);
-t9=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[10])[1],t8);
-/* compiler-syntax.scm: 248 loop */
-t10=((C_word*)((C_word*)t0)[14])[1];
-f_993(t10,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_word)C_u_i_char_whitespacep(((C_word*)t0)[15]))){
-t6=f_901(((C_word*)((C_word*)t0)[4])[1]);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1358,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t8=f_1358(t7,t6);
-/* compiler-syntax.scm: 248 loop */
-t9=((C_word*)((C_word*)t0)[14])[1];
-f_993(t9,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);}
-else{
-/* compiler-syntax.scm: 247 fail */
-t6=((C_word*)t0)[2];
-f_846(t6,t3,C_SCHEME_TRUE,lf[30],(C_word)C_a_i_list(&a,1,((C_word*)t0)[15]));}}}}
-
-/* skip in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static C_word C_fcall f_1358(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_u_i_char_whitespacep(t1))){
-t2=f_901(((C_word*)((C_word*)t0)[3])[1]);
-t6=t2;
-t1=t6;
-goto loop;}
-else{
-t2=(C_word)C_fixnum_decrease(((C_word*)((C_word*)t0)[2])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-return(t3);}}
-
-/* k1270 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1272,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1275,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* compiler-syntax.scm: 237 next */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_911(t3,t2);}
-
-/* k1273 in k1270 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1275,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[28],t5);
-t7=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t6);
-/* compiler-syntax.scm: 248 loop */
-t8=((C_word*)((C_word*)t0)[3])[1];
-f_993(t8,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1240 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1242(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1242,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_fix(16),C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t7);
-/* compiler-syntax.scm: 248 loop */
-t9=((C_word*)((C_word*)t0)[3])[1];
-f_993(t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1203 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1205,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_fix(8),C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t7);
-/* compiler-syntax.scm: 248 loop */
-t9=((C_word*)((C_word*)t0)[3])[1];
-f_993(t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1166 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1168,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_fix(2),C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t7);
-/* compiler-syntax.scm: 248 loop */
-t9=((C_word*)((C_word*)t0)[3])[1];
-f_993(t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1129 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1131(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1131,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t4);
-/* compiler-syntax.scm: 248 loop */
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_993(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1104 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1106,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t4);
-/* compiler-syntax.scm: 248 loop */
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_993(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1079 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1081,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
-t5=f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[4])[1],t4);
-/* compiler-syntax.scm: 248 loop */
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_993(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1058 in k1052 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1060(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* compiler-syntax.scm: 248 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_993(t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k1001 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1003,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1006,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* compiler-syntax.scm: 219 endchunk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_930(t3,t2,((C_word*)t0)[2]);}
-
-/* k1004 in k1001 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1006,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1021,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1025,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* compiler-syntax.scm: 221 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[25]+1)))(3,*((C_word*)lf[25]+1),t6,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k1023 in k1004 in k1001 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[24]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k1019 in k1004 in k1001 in loop in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_1021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1021,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* push in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static C_word C_fcall f_983(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[2])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-return(t3);}
-
-/* endchunk in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_fcall f_930(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_930,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_length(t2);
-t4=(C_word)C_eqp(C_fix(1),t3);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,t5,t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-/* compiler-syntax.scm: 209 push */
-t9=t1;
-((C_proc2)C_retrieve_proc(t9))(2,t9,f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[3])[1],t8));}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_973,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* compiler-syntax.scm: 212 reverse-list->string */
-((C_proc3)C_retrieve_symbol_proc(lf[23]))(3,*((C_word*)lf[23]+1),t5,t2);}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k971 in endchunk in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_973(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_973,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-/* compiler-syntax.scm: 209 push */
-t5=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t5))(2,t5,f_983(C_a_i(&a,3),((C_word*)((C_word*)t0)[2])[1],t4));}
-
-/* next in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_fcall f_911(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_911,NULL,2,t0,t1);}
-if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[3])[1]))){
-/* compiler-syntax.scm: 203 fail */
-t2=((C_word*)t0)[2];
-f_846(t2,t1,C_SCHEME_TRUE,lf[22],C_SCHEME_END_OF_LIST);}
-else{
-t2=(C_word)C_i_car(((C_word*)((C_word*)t0)[3])[1]);
-t3=(C_word)C_i_cdr(((C_word*)((C_word*)t0)[3])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}}
-
-/* fetch in k897 in k894 in k891 in k888 in k885 in k882 in k879 in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static C_word C_fcall f_901(C_word t0){
-C_word tmp;
-C_word t1;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t1=(C_word)C_i_string_ref(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
-t2=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],C_fix(1));
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-return(t1);}
-
-/* fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_fcall f_846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_846,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_850,a[2]=t4,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,a[7]=((C_word*)t0)[5],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* compiler-syntax.scm: 179 get-line */
-((C_proc3)C_retrieve_symbol_proc(lf[21]))(3,*((C_word*)lf[21]+1),t5,((C_word*)t0)[2]);}
-
-/* k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_850,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_853,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_863,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_866,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* open-output-string */
-((C_proc2)C_retrieve_symbol_proc(lf[19]))(2,*((C_word*)lf[19]+1),t4);}
-else{
-/* compiler-syntax.scm: 180 compiler-warning */
-((C_proc9)C_retrieve_symbol_proc(lf[13]))(9,*((C_word*)lf[13]+1),t2,lf[14],lf[15],((C_word*)t0)[5],((C_word*)t0)[4],lf[20],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k864 in k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_866,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_869,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[17]+1)))(4,*((C_word*)lf[17]+1),t2,lf[18],t1);}
-
-/* k867 in k864 in k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_869,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_872,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* display */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[17]+1)))(4,*((C_word*)lf[17]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k870 in k867 in k864 in k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* get-output-string */
-((C_proc3)C_retrieve_symbol_proc(lf[16]))(3,*((C_word*)lf[16]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k861 in k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* compiler-syntax.scm: 180 compiler-warning */
-((C_proc9)C_retrieve_symbol_proc(lf[13]))(9,*((C_word*)lf[13]+1),((C_word*)t0)[6],lf[14],lf[15],((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k851 in k848 in fail in k839 in k836 in a815 in ##compiler#compile-format-string in k806 in k803 in k800 in k797 in k794 in k791 in k700 in k697 */
-static void C_ccall f_853(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-/* compiler-syntax.scm: 186 return */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_FALSE);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##compiler#r-c-s in k700 in k697 */
-static void C_ccall f_719(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_719r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_719r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_719r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_723,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-t6=t5;
-f_723(2,t6,C_SCHEME_END_OF_LIST);}
-else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=t5;
-f_723(2,t7,(C_word)C_i_car(t4));}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[9]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[10],t4);}}}
-
-/* k721 in ##compiler#r-c-s in k700 in k697 */
-static void C_ccall f_723(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_723,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_771,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* compiler-syntax.scm: 46 ##sys#er-transformer */
-((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t2,((C_word*)t0)[2]);}
-
-/* k769 in k721 in ##compiler#r-c-s in k700 in k697 */
-static void C_ccall f_771(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_771,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t3=(C_word)C_i_symbolp(((C_word*)t0)[3]);
-t4=(C_truep(t3)?(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]):((C_word*)t0)[3]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_735,a[2]=t6,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_735(t8,((C_word*)t0)[2],t4);}
-
-/* loop52 in k769 in k721 in ##compiler#r-c-s in k700 in k697 */
-static void C_fcall f_735(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_735,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_743,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_750,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g5960 */
-t6=t3;
-f_743(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k748 in loop52 in k769 in k721 in ##compiler#r-c-s in k700 in k697 */
-static void C_ccall f_750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_735(t3,((C_word*)t0)[2],t2);}
-
-/* g59 in loop52 in k769 in k721 in ##compiler#r-c-s in k700 in k697 */
-static void C_fcall f_743(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_743,NULL,3,t0,t1,t2);}
-/* compiler-syntax.scm: 49 ##sys#put! */
-((C_proc5)C_retrieve_symbol_proc(lf[6]))(5,*((C_word*)lf[6]+1),t1,t2,lf[7],((C_word*)t0)[2]);}
-
-/* ##sys#compiler-syntax-hook in k700 in k697 */
-static void C_ccall f_705(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_705,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_709,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* compiler-syntax.scm: 41 alist-ref */
-((C_proc6)C_retrieve_symbol_proc(lf[3]))(6,*((C_word*)lf[3]+1),t4,t2,*((C_word*)lf[0]+1),*((C_word*)lf[4]+1),C_fix(0));}
-
-/* k707 in ##sys#compiler-syntax-hook in k700 in k697 */
-static void C_ccall f_709(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_709,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_713,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_fixnum_increase(t1);
-/* compiler-syntax.scm: 43 alist-update! */
-((C_proc5)C_retrieve_symbol_proc(lf[2]))(5,*((C_word*)lf[2]+1),t2,((C_word*)t0)[2],t3,*((C_word*)lf[0]+1));}
-
-/* k711 in k707 in ##sys#compiler-syntax-hook in k700 in k697 */
-static void C_ccall f_713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[0]+1 /* (set! compiler-syntax-statistics ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[163] = {
-{"toplevel:compiler_syntax_scm",(void*)C_compiler_syntax_toplevel},
-{"f_699:compiler_syntax_scm",(void*)f_699},
-{"f_702:compiler_syntax_scm",(void*)f_702},
-{"f_2842:compiler_syntax_scm",(void*)f_2842},
-{"f_2432:compiler_syntax_scm",(void*)f_2432},
-{"f_2436:compiler_syntax_scm",(void*)f_2436},
-{"f_2439:compiler_syntax_scm",(void*)f_2439},
-{"f_2442:compiler_syntax_scm",(void*)f_2442},
-{"f_2445:compiler_syntax_scm",(void*)f_2445},
-{"f_2448:compiler_syntax_scm",(void*)f_2448},
-{"f_2451:compiler_syntax_scm",(void*)f_2451},
-{"f_2454:compiler_syntax_scm",(void*)f_2454},
-{"f_2830:compiler_syntax_scm",(void*)f_2830},
-{"f_2822:compiler_syntax_scm",(void*)f_2822},
-{"f_2802:compiler_syntax_scm",(void*)f_2802},
-{"f_2463:compiler_syntax_scm",(void*)f_2463},
-{"f_2752:compiler_syntax_scm",(void*)f_2752},
-{"f_2786:compiler_syntax_scm",(void*)f_2786},
-{"f_2466:compiler_syntax_scm",(void*)f_2466},
-{"f_2703:compiler_syntax_scm",(void*)f_2703},
-{"f_2736:compiler_syntax_scm",(void*)f_2736},
-{"f_2716:compiler_syntax_scm",(void*)f_2716},
-{"f_2481:compiler_syntax_scm",(void*)f_2481},
-{"f_2659:compiler_syntax_scm",(void*)f_2659},
-{"f_2686:compiler_syntax_scm",(void*)f_2686},
-{"f_2657:compiler_syntax_scm",(void*)f_2657},
-{"f_2653:compiler_syntax_scm",(void*)f_2653},
-{"f_2595:compiler_syntax_scm",(void*)f_2595},
-{"f_2593:compiler_syntax_scm",(void*)f_2593},
-{"f_2589:compiler_syntax_scm",(void*)f_2589},
-{"f_2535:compiler_syntax_scm",(void*)f_2535},
-{"f_2533:compiler_syntax_scm",(void*)f_2533},
-{"f_2529:compiler_syntax_scm",(void*)f_2529},
-{"f_793:compiler_syntax_scm",(void*)f_793},
-{"f_2430:compiler_syntax_scm",(void*)f_2430},
-{"f_1862:compiler_syntax_scm",(void*)f_1862},
-{"f_1866:compiler_syntax_scm",(void*)f_1866},
-{"f_1869:compiler_syntax_scm",(void*)f_1869},
-{"f_1872:compiler_syntax_scm",(void*)f_1872},
-{"f_1875:compiler_syntax_scm",(void*)f_1875},
-{"f_1878:compiler_syntax_scm",(void*)f_1878},
-{"f_1881:compiler_syntax_scm",(void*)f_1881},
-{"f_1884:compiler_syntax_scm",(void*)f_1884},
-{"f_1887:compiler_syntax_scm",(void*)f_1887},
-{"f_1890:compiler_syntax_scm",(void*)f_1890},
-{"f_1893:compiler_syntax_scm",(void*)f_1893},
-{"f_1896:compiler_syntax_scm",(void*)f_1896},
-{"f_1899:compiler_syntax_scm",(void*)f_1899},
-{"f_1902:compiler_syntax_scm",(void*)f_1902},
-{"f_2418:compiler_syntax_scm",(void*)f_2418},
-{"f_2410:compiler_syntax_scm",(void*)f_2410},
-{"f_2390:compiler_syntax_scm",(void*)f_2390},
-{"f_1911:compiler_syntax_scm",(void*)f_1911},
-{"f_2340:compiler_syntax_scm",(void*)f_2340},
-{"f_2374:compiler_syntax_scm",(void*)f_2374},
-{"f_1914:compiler_syntax_scm",(void*)f_1914},
-{"f_2263:compiler_syntax_scm",(void*)f_2263},
-{"f_2296:compiler_syntax_scm",(void*)f_2296},
-{"f_2276:compiler_syntax_scm",(void*)f_2276},
-{"f_1945:compiler_syntax_scm",(void*)f_1945},
-{"f_2219:compiler_syntax_scm",(void*)f_2219},
-{"f_2246:compiler_syntax_scm",(void*)f_2246},
-{"f_2217:compiler_syntax_scm",(void*)f_2217},
-{"f_2213:compiler_syntax_scm",(void*)f_2213},
-{"f_2155:compiler_syntax_scm",(void*)f_2155},
-{"f_2153:compiler_syntax_scm",(void*)f_2153},
-{"f_2149:compiler_syntax_scm",(void*)f_2149},
-{"f_2015:compiler_syntax_scm",(void*)f_2015},
-{"f_2013:compiler_syntax_scm",(void*)f_2013},
-{"f_2009:compiler_syntax_scm",(void*)f_2009},
-{"f_796:compiler_syntax_scm",(void*)f_796},
-{"f_1813:compiler_syntax_scm",(void*)f_1813},
-{"f_1823:compiler_syntax_scm",(void*)f_1823},
-{"f_1830:compiler_syntax_scm",(void*)f_1830},
-{"f_1846:compiler_syntax_scm",(void*)f_1846},
-{"f_799:compiler_syntax_scm",(void*)f_799},
-{"f_1811:compiler_syntax_scm",(void*)f_1811},
-{"f_1807:compiler_syntax_scm",(void*)f_1807},
-{"f_1803:compiler_syntax_scm",(void*)f_1803},
-{"f_1799:compiler_syntax_scm",(void*)f_1799},
-{"f_1795:compiler_syntax_scm",(void*)f_1795},
-{"f_1791:compiler_syntax_scm",(void*)f_1791},
-{"f_1787:compiler_syntax_scm",(void*)f_1787},
-{"f_1651:compiler_syntax_scm",(void*)f_1651},
-{"f_1655:compiler_syntax_scm",(void*)f_1655},
-{"f_1658:compiler_syntax_scm",(void*)f_1658},
-{"f_1668:compiler_syntax_scm",(void*)f_1668},
-{"f_1712:compiler_syntax_scm",(void*)f_1712},
-{"f_1692:compiler_syntax_scm",(void*)f_1692},
-{"f_802:compiler_syntax_scm",(void*)f_802},
-{"f_1649:compiler_syntax_scm",(void*)f_1649},
-{"f_1645:compiler_syntax_scm",(void*)f_1645},
-{"f_1641:compiler_syntax_scm",(void*)f_1641},
-{"f_1637:compiler_syntax_scm",(void*)f_1637},
-{"f_1633:compiler_syntax_scm",(void*)f_1633},
-{"f_1629:compiler_syntax_scm",(void*)f_1629},
-{"f_1625:compiler_syntax_scm",(void*)f_1625},
-{"f_1540:compiler_syntax_scm",(void*)f_1540},
-{"f_1550:compiler_syntax_scm",(void*)f_1550},
-{"f_805:compiler_syntax_scm",(void*)f_805},
-{"f_1538:compiler_syntax_scm",(void*)f_1538},
-{"f_1534:compiler_syntax_scm",(void*)f_1534},
-{"f_1530:compiler_syntax_scm",(void*)f_1530},
-{"f_1526:compiler_syntax_scm",(void*)f_1526},
-{"f_1522:compiler_syntax_scm",(void*)f_1522},
-{"f_1518:compiler_syntax_scm",(void*)f_1518},
-{"f_1514:compiler_syntax_scm",(void*)f_1514},
-{"f_1443:compiler_syntax_scm",(void*)f_1443},
-{"f_1447:compiler_syntax_scm",(void*)f_1447},
-{"f_808:compiler_syntax_scm",(void*)f_808},
-{"f_810:compiler_syntax_scm",(void*)f_810},
-{"f_816:compiler_syntax_scm",(void*)f_816},
-{"f_1425:compiler_syntax_scm",(void*)f_1425},
-{"f_1429:compiler_syntax_scm",(void*)f_1429},
-{"f_1414:compiler_syntax_scm",(void*)f_1414},
-{"f_1421:compiler_syntax_scm",(void*)f_1421},
-{"f_838:compiler_syntax_scm",(void*)f_838},
-{"f_841:compiler_syntax_scm",(void*)f_841},
-{"f_881:compiler_syntax_scm",(void*)f_881},
-{"f_884:compiler_syntax_scm",(void*)f_884},
-{"f_887:compiler_syntax_scm",(void*)f_887},
-{"f_890:compiler_syntax_scm",(void*)f_890},
-{"f_893:compiler_syntax_scm",(void*)f_893},
-{"f_896:compiler_syntax_scm",(void*)f_896},
-{"f_899:compiler_syntax_scm",(void*)f_899},
-{"f_993:compiler_syntax_scm",(void*)f_993},
-{"f_1054:compiler_syntax_scm",(void*)f_1054},
-{"f_1358:compiler_syntax_scm",(void*)f_1358},
-{"f_1272:compiler_syntax_scm",(void*)f_1272},
-{"f_1275:compiler_syntax_scm",(void*)f_1275},
-{"f_1242:compiler_syntax_scm",(void*)f_1242},
-{"f_1205:compiler_syntax_scm",(void*)f_1205},
-{"f_1168:compiler_syntax_scm",(void*)f_1168},
-{"f_1131:compiler_syntax_scm",(void*)f_1131},
-{"f_1106:compiler_syntax_scm",(void*)f_1106},
-{"f_1081:compiler_syntax_scm",(void*)f_1081},
-{"f_1060:compiler_syntax_scm",(void*)f_1060},
-{"f_1003:compiler_syntax_scm",(void*)f_1003},
-{"f_1006:compiler_syntax_scm",(void*)f_1006},
-{"f_1025:compiler_syntax_scm",(void*)f_1025},
-{"f_1021:compiler_syntax_scm",(void*)f_1021},
-{"f_983:compiler_syntax_scm",(void*)f_983},
-{"f_930:compiler_syntax_scm",(void*)f_930},
-{"f_973:compiler_syntax_scm",(void*)f_973},
-{"f_911:compiler_syntax_scm",(void*)f_911},
-{"f_901:compiler_syntax_scm",(void*)f_901},
-{"f_846:compiler_syntax_scm",(void*)f_846},
-{"f_850:compiler_syntax_scm",(void*)f_850},
-{"f_866:compiler_syntax_scm",(void*)f_866},
-{"f_869:compiler_syntax_scm",(void*)f_869},
-{"f_872:compiler_syntax_scm",(void*)f_872},
-{"f_863:compiler_syntax_scm",(void*)f_863},
-{"f_853:compiler_syntax_scm",(void*)f_853},
-{"f_719:compiler_syntax_scm",(void*)f_719},
-{"f_723:compiler_syntax_scm",(void*)f_723},
-{"f_771:compiler_syntax_scm",(void*)f_771},
-{"f_735:compiler_syntax_scm",(void*)f_735},
-{"f_750:compiler_syntax_scm",(void*)f_750},
-{"f_743:compiler_syntax_scm",(void*)f_743},
-{"f_705:compiler_syntax_scm",(void*)f_705},
-{"f_709:compiler_syntax_scm",(void*)f_709},
-{"f_713:compiler_syntax_scm",(void*)f_713},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/compiler.c b/bootstrap/compiler.c
deleted file mode 100644
index a0c3ffc5..00000000
--- a/bootstrap/compiler.c
+++ /dev/null
@@ -1,27128 +0,0 @@
-/* Generated from compiler.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:33
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: compiler.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file compiler.c
- unit: compiler
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[673];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_compiler_toplevel)
-C_externexport void C_ccall C_compiler_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5088)
-static void C_ccall f_5088(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5091)
-static void C_ccall f_5091(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17502)
-static void C_ccall f_17502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_19009)
-static void C_ccall f_19009(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19012)
-static void C_ccall f_19012(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19015)
-static void C_ccall f_19015(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19018)
-static void C_ccall f_19018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19021)
-static void C_ccall f_19021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18924)
-static void C_fcall f_18924(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18951)
-static void C_ccall f_18951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18892)
-static void C_fcall f_18892(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18908)
-static void C_ccall f_18908(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18915)
-static void C_ccall f_18915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18922)
-static void C_ccall f_18922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18896)
-static void C_ccall f_18896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18906)
-static void C_ccall f_18906(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18878)
-static void C_fcall f_18878(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18886)
-static void C_ccall f_18886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18798)
-static void C_fcall f_18798(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18805)
-static void C_ccall f_18805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18867)
-static void C_ccall f_18867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18857)
-static void C_ccall f_18857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18831)
-static void C_ccall f_18831(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18817)
-static void C_ccall f_18817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18752)
-static void C_fcall f_18752(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_18758)
-static void C_fcall f_18758(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18792)
-static void C_ccall f_18792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18785)
-static void C_fcall f_18785(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17629)
-static void C_fcall f_17629(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_18741)
-static void C_ccall f_18741(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18632)
-static void C_ccall f_18632(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18658)
-static void C_fcall f_18658(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_18691)
-static void C_ccall f_18691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18694)
-static void C_ccall f_18694(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18713)
-static void C_ccall f_18713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18701)
-static void C_ccall f_18701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18669)
-static void C_ccall f_18669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18680)
-static void C_ccall f_18680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18648)
-static void C_ccall f_18648(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18577)
-static void C_ccall f_18577(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18580)
-static void C_ccall f_18580(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18583)
-static void C_ccall f_18583(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18603)
-static void C_ccall f_18603(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18565)
-static void C_ccall f_18565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18466)
-static void C_fcall f_18466(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18536)
-static void C_ccall f_18536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18555)
-static void C_ccall f_18555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18530)
-static void C_ccall f_18530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18514)
-static void C_ccall f_18514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18487)
-static void C_fcall f_18487(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18490)
-static void C_ccall f_18490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18432)
-static void C_fcall f_18432(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18444)
-static void C_ccall f_18444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18383)
-static void C_ccall f_18383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18401)
-static void C_fcall f_18401(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18386)
-static void C_fcall f_18386(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18398)
-static void C_ccall f_18398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18225)
-static void C_ccall f_18225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18359)
-static void C_ccall f_18359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18348)
-static void C_ccall f_18348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18264)
-static void C_fcall f_18264(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18344)
-static void C_ccall f_18344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18270)
-static void C_ccall f_18270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18276)
-static void C_fcall f_18276(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18308)
-static void C_ccall f_18308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18300)
-static void C_ccall f_18300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18229)
-static void C_fcall f_18229(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18250)
-static void C_ccall f_18250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18182)
-static void C_ccall f_18182(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18198)
-static void C_ccall f_18198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18202)
-static void C_ccall f_18202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18135)
-static void C_ccall f_18135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18147)
-static void C_ccall f_18147(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18151)
-static void C_ccall f_18151(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18139)
-static void C_ccall f_18139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17946)
-static void C_ccall f_17946(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_18065)
-static void C_ccall f_18065(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18071)
-static void C_ccall f_18071(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18096)
-static void C_ccall f_18096(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17953)
-static void C_ccall f_17953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18056)
-static void C_ccall f_18056(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17956)
-static void C_ccall f_17956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17959)
-static void C_ccall f_17959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17962)
-static void C_ccall f_17962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18007)
-static void C_ccall f_18007(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18033)
-static void C_ccall f_18033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18014)
-static void C_fcall f_18014(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18018)
-static void C_ccall f_18018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17991)
-static void C_ccall f_17991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17873)
-static void C_ccall f_17873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17888)
-static void C_fcall f_17888(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17857)
-static void C_ccall f_17857(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17827)
-static void C_ccall f_17827(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17801)
-static void C_ccall f_17801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17797)
-static void C_ccall f_17797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17793)
-static void C_ccall f_17793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17767)
-static void C_ccall f_17767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17763)
-static void C_ccall f_17763(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17737)
-static void C_ccall f_17737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17711)
-static void C_ccall f_17711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17556)
-static void C_fcall f_17556(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_17616)
-static void C_ccall f_17616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17560)
-static void C_ccall f_17560(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17595)
-static void C_ccall f_17595(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17602)
-static void C_ccall f_17602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17563)
-static void C_fcall f_17563(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17566)
-static void C_fcall f_17566(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17582)
-static void C_ccall f_17582(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17505)
-static void C_fcall f_17505(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17509)
-static void C_ccall f_17509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17535)
-static void C_ccall f_17535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17551)
-static void C_ccall f_17551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17493)
-static void C_ccall f_17493(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17484)
-static void C_ccall f_17484(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17475)
-static void C_ccall f_17475(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17466)
-static void C_ccall f_17466(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17457)
-static void C_ccall f_17457(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17448)
-static void C_ccall f_17448(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17439)
-static void C_ccall f_17439(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17430)
-static void C_ccall f_17430(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17421)
-static void C_ccall f_17421(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17412)
-static void C_ccall f_17412(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17403)
-static void C_ccall f_17403(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17394)
-static void C_ccall f_17394(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17385)
-static void C_ccall f_17385(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17376)
-static void C_ccall f_17376(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17367)
-static void C_ccall f_17367(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17358)
-static void C_ccall f_17358(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17352)
-static void C_ccall f_17352(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17346)
-static void C_ccall f_17346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13,C_word t14,C_word t15,C_word t16,C_word t17) C_noret;
-C_noret_decl(f_15586)
-static void C_ccall f_15586(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_17313)
-static void C_ccall f_17313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17316)
-static void C_ccall f_17316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17319)
-static void C_ccall f_17319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17322)
-static void C_ccall f_17322(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17325)
-static void C_ccall f_17325(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17340)
-static void C_ccall f_17340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17338)
-static void C_ccall f_17338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17328)
-static void C_ccall f_17328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17122)
-static void C_fcall f_17122(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_17129)
-static void C_ccall f_17129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17133)
-static void C_fcall f_17133(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17154)
-static void C_ccall f_17154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17076)
-static void C_fcall f_17076(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17082)
-static void C_fcall f_17082(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17116)
-static void C_ccall f_17116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17109)
-static void C_fcall f_17109(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16051)
-static void C_fcall f_16051(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_16085)
-static void C_fcall f_16085(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16124)
-static void C_fcall f_16124(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16962)
-static void C_ccall f_16962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16958)
-static void C_ccall f_16958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16747)
-static void C_ccall f_16747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16753)
-static void C_ccall f_16753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16850)
-static void C_ccall f_16850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16894)
-static void C_ccall f_16894(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16870)
-static void C_ccall f_16870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16874)
-static void C_ccall f_16874(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16757)
-static void C_fcall f_16757(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16764)
-static void C_ccall f_16764(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16833)
-static void C_ccall f_16833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16837)
-static void C_ccall f_16837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16805)
-static void C_ccall f_16805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16793)
-static void C_ccall f_16793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16258)
-static void C_ccall f_16258(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_16720)
-static void C_ccall f_16720(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16262)
-static void C_ccall f_16262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16685)
-static void C_fcall f_16685(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16714)
-static void C_ccall f_16714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16634)
-static void C_ccall f_16634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16636)
-static void C_fcall f_16636(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16669)
-static void C_ccall f_16669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16649)
-static void C_fcall f_16649(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16265)
-static void C_ccall f_16265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16268)
-static void C_ccall f_16268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16274)
-static void C_ccall f_16274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16280)
-static void C_ccall f_16280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16286)
-static void C_fcall f_16286(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16601)
-static void C_ccall f_16601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16604)
-static void C_ccall f_16604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16289)
-static void C_ccall f_16289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16543)
-static void C_fcall f_16543(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16570)
-static C_word C_fcall f_16570(C_word t0,C_word t1);
-C_noret_decl(f_16528)
-static void C_ccall f_16528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16524)
-static void C_ccall f_16524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16411)
-static void C_ccall f_16411(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16443)
-static void C_ccall f_16443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16449)
-static void C_fcall f_16449(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16493)
-static void C_ccall f_16493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16447)
-static void C_ccall f_16447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16422)
-static void C_ccall f_16422(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_16414)
-static void C_ccall f_16414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16407)
-static void C_fcall f_16407(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16357)
-static void C_fcall f_16357(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16395)
-static void C_ccall f_16395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16384)
-static void C_fcall f_16384(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16392)
-static void C_ccall f_16392(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16318)
-static void C_ccall f_16318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16348)
-static void C_ccall f_16348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16340)
-static void C_ccall f_16340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16336)
-static void C_ccall f_16336(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16332)
-static void C_ccall f_16332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16321)
-static void C_ccall f_16321(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16157)
-static void C_ccall f_16157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16160)
-static void C_ccall f_16160(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16241)
-static void C_ccall f_16241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16183)
-static void C_ccall f_16183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16225)
-static void C_ccall f_16225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16213)
-static void C_ccall f_16213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16145)
-static void C_ccall f_16145(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16097)
-static void C_ccall f_16097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16103)
-static void C_ccall f_16103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15616)
-static void C_fcall f_15616(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15650)
-static void C_fcall f_15650(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15993)
-static void C_fcall f_15993(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16008)
-static void C_ccall f_16008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16001)
-static void C_fcall f_16001(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15954)
-static void C_ccall f_15954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17178)
-static void C_fcall f_17178(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17231)
-static void C_fcall f_17231(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17262)
-static void C_fcall f_17262(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17272)
-static void C_ccall f_17272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17257)
-static void C_ccall f_17257(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17222)
-static void C_ccall f_17222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17176)
-static void C_ccall f_17176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15967)
-static void C_ccall f_15967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15970)
-static void C_ccall f_15970(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15981)
-static void C_ccall f_15981(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15908)
-static void C_ccall f_15908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15790)
-static void C_ccall f_15790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15796)
-static void C_fcall f_15796(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15813)
-static void C_ccall f_15813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15816)
-static void C_ccall f_15816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15819)
-static void C_fcall f_15819(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15858)
-static void C_ccall f_15858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15837)
-static void C_fcall f_15837(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15844)
-static void C_ccall f_15844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15822)
-static void C_ccall f_15822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15825)
-static void C_ccall f_15825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15828)
-static void C_ccall f_15828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15735)
-static void C_ccall f_15735(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15740)
-static void C_fcall f_15740(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15755)
-static void C_ccall f_15755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15748)
-static void C_fcall f_15748(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15671)
-static void C_ccall f_15671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15688)
-static void C_fcall f_15688(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15703)
-static void C_ccall f_15703(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15696)
-static void C_fcall f_15696(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15675)
-static void C_ccall f_15675(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15686)
-static void C_ccall f_15686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15661)
-static void C_ccall f_15661(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15605)
-static void C_fcall f_15605(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15614)
-static void C_ccall f_15614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15595)
-static void C_fcall f_15595(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15600)
-static void C_ccall f_15600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15589)
-static void C_fcall f_15589(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13640)
-static void C_ccall f_13640(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13644)
-static void C_ccall f_13644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14509)
-static void C_ccall f_14509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14513)
-static void C_ccall f_14513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14516)
-static void C_ccall f_14516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14525)
-static void C_ccall f_14525(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15451)
-static void C_fcall f_15451(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15459)
-static C_word C_fcall f_15459(C_word t0,C_word t1);
-C_noret_decl(f_14529)
-static void C_ccall f_14529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15429)
-static void C_fcall f_15429(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15402)
-static void C_fcall f_15402(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14540)
-static void C_ccall f_14540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15399)
-static void C_ccall f_15399(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15344)
-static void C_fcall f_15344(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15347)
-static void C_ccall f_15347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15375)
-static void C_ccall f_15375(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15353)
-static void C_ccall f_15353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14543)
-static void C_ccall f_14543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14546)
-static void C_ccall f_14546(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15266)
-static void C_ccall f_15266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15270)
-static void C_fcall f_15270(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15329)
-static void C_ccall f_15329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15288)
-static void C_ccall f_15288(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15293)
-static void C_ccall f_15293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15208)
-static void C_ccall f_15208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15246)
-static void C_ccall f_15246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15212)
-static void C_ccall f_15212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15229)
-static void C_ccall f_15229(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15221)
-static void C_ccall f_15221(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15202)
-static void C_ccall f_15202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15163)
-static void C_ccall f_15163(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_15163)
-static void C_ccall f_15163r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_15157)
-static void C_ccall f_15157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15155)
-static void C_ccall f_15155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15147)
-static void C_ccall f_15147(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15115)
-static void C_ccall f_15115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15121)
-static void C_fcall f_15121(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14549)
-static void C_ccall f_14549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15062)
-static void C_fcall f_15062(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15071)
-static void C_ccall f_15071(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14552)
-static void C_ccall f_14552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14931)
-static void C_fcall f_14931(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14954)
-static void C_ccall f_14954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14997)
-static void C_fcall f_14997(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15033)
-static void C_ccall f_15033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15005)
-static void C_fcall f_15005(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15030)
-static void C_ccall f_15030(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15026)
-static void C_ccall f_15026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15012)
-static void C_fcall f_15012(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15015)
-static void C_ccall f_15015(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14958)
-static void C_ccall f_14958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14964)
-static void C_fcall f_14964(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14555)
-static void C_ccall f_14555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14899)
-static void C_ccall f_14899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14885)
-static void C_fcall f_14885(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14892)
-static void C_ccall f_14892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14873)
-static void C_fcall f_14873(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14558)
-static void C_ccall f_14558(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14753)
-static void C_ccall f_14753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14834)
-static void C_ccall f_14834(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14759)
-static void C_ccall f_14759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14824)
-static void C_ccall f_14824(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14816)
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14812)
-static void C_ccall f_14812(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14808)
-static void C_ccall f_14808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14762)
-static void C_fcall f_14762(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14765)
-static void C_ccall f_14765(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14561)
-static void C_ccall f_14561(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14567)
-static void C_fcall f_14567(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14593)
-static void C_fcall f_14593(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14619)
-static void C_fcall f_14619(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14625)
-static void C_ccall f_14625(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14519)
-static void C_ccall f_14519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14484)
-static void C_fcall f_14484(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14494)
-static void C_ccall f_14494(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14502)
-static void C_ccall f_14502(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14470)
-static void C_fcall f_14470(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14478)
-static void C_ccall f_14478(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14464)
-static void C_fcall f_14464(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14286)
-static void C_fcall f_14286(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_14299)
-static void C_fcall f_14299(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14415)
-static void C_ccall f_14415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14425)
-static void C_ccall f_14425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14311)
-static void C_fcall f_14311(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14392)
-static void C_ccall f_14392(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14399)
-static void C_ccall f_14399(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14356)
-static void C_fcall f_14356(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14359)
-static void C_ccall f_14359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14365)
-static void C_ccall f_14365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14314)
-static void C_ccall f_14314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14317)
-static void C_ccall f_14317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14252)
-static void C_fcall f_14252(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_14258)
-static void C_fcall f_14258(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14273)
-static void C_ccall f_14273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14266)
-static void C_fcall f_14266(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13653)
-static void C_fcall f_13653(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_13690)
-static void C_fcall f_13690(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14208)
-static void C_ccall f_14208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14202)
-static void C_ccall f_14202(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14166)
-static void C_ccall f_14166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14169)
-static void C_ccall f_14169(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14104)
-static void C_ccall f_14104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14158)
-static void C_ccall f_14158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14107)
-static void C_ccall f_14107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14130)
-static void C_ccall f_14130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14110)
-static void C_ccall f_14110(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14113)
-static void C_ccall f_14113(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14116)
-static void C_ccall f_14116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13971)
-static void C_ccall f_13971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14083)
-static void C_ccall f_14083(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13978)
-static void C_ccall f_13978(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14051)
-static void C_fcall f_14051(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14069)
-static void C_ccall f_14069(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14059)
-static void C_fcall f_14059(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14063)
-static void C_ccall f_14063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13981)
-static void C_ccall f_13981(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13984)
-static void C_ccall f_13984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14043)
-static void C_ccall f_14043(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13987)
-static void C_ccall f_13987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13990)
-static void C_fcall f_13990(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13993)
-static void C_fcall f_13993(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14025)
-static void C_ccall f_14025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13996)
-static void C_ccall f_13996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13905)
-static void C_ccall f_13905(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13924)
-static void C_fcall f_13924(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13939)
-static void C_ccall f_13939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13932)
-static void C_fcall f_13932(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13909)
-static void C_ccall f_13909(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13922)
-static void C_ccall f_13922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13913)
-static void C_ccall f_13913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13838)
-static void C_ccall f_13838(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13843)
-static void C_fcall f_13843(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13870)
-static void C_ccall f_13870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13873)
-static void C_ccall f_13873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13876)
-static void C_ccall f_13876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13861)
-static void C_ccall f_13861(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13781)
-static void C_ccall f_13781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13784)
-static void C_ccall f_13784(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13745)
-static void C_ccall f_13745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13702)
-static void C_ccall f_13702(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13733)
-static void C_ccall f_13733(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13631)
-static void C_ccall f_13631(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13622)
-static void C_ccall f_13622(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13613)
-static void C_ccall f_13613(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13604)
-static void C_ccall f_13604(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13595)
-static void C_ccall f_13595(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13589)
-static void C_ccall f_13589(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13583)
-static void C_ccall f_13583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_12724)
-static void C_ccall f_12724(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13545)
-static void C_ccall f_13545(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13453)
-static void C_fcall f_13453(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13459)
-static void C_fcall f_13459(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13479)
-static void C_ccall f_13479(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13497)
-static void C_ccall f_13497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13506)
-static void C_ccall f_13506(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13539)
-static void C_ccall f_13539(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13527)
-static void C_ccall f_13527(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13473)
-static void C_ccall f_13473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13432)
-static void C_fcall f_13432(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_13438)
-static void C_ccall f_13438(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13256)
-static void C_fcall f_13256(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_13260)
-static void C_ccall f_13260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13263)
-static void C_ccall f_13263(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13342)
-static void C_ccall f_13342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13333)
-static void C_ccall f_13333(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13329)
-static void C_ccall f_13329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13294)
-static void C_ccall f_13294(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13300)
-static void C_ccall f_13300(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13317)
-static void C_ccall f_13317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13313)
-static void C_ccall f_13313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13292)
-static void C_ccall f_13292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12784)
-static void C_fcall f_12784(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12826)
-static void C_fcall f_12826(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13167)
-static void C_fcall f_13167(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13352)
-static void C_ccall f_13352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13355)
-static void C_ccall f_13355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13426)
-static void C_ccall f_13426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13417)
-static void C_ccall f_13417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13413)
-static void C_ccall f_13413(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13401)
-static void C_ccall f_13401(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13122)
-static void C_ccall f_13122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13158)
-static void C_ccall f_13158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13053)
-static void C_ccall f_13053(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13062)
-static void C_ccall f_13062(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13096)
-static void C_ccall f_13096(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13092)
-static void C_ccall f_13092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13040)
-static void C_ccall f_13040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12963)
-static void C_fcall f_12963(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12986)
-static void C_ccall f_12986(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13007)
-static void C_ccall f_13007(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12838)
-static void C_ccall f_12838(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12841)
-static void C_ccall f_12841(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12948)
-static void C_ccall f_12948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12939)
-static void C_ccall f_12939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12935)
-static void C_ccall f_12935(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12894)
-static void C_ccall f_12894(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12911)
-static void C_ccall f_12911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12915)
-static void C_ccall f_12915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12888)
-static void C_ccall f_12888(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12842)
-static void C_ccall f_12842(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12859)
-static void C_ccall f_12859(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12727)
-static void C_fcall f_12727(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_12731)
-static void C_ccall f_12731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12761)
-static void C_ccall f_12761(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12778)
-static void C_ccall f_12778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12755)
-static void C_ccall f_12755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12634)
-static void C_ccall f_12634(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12666)
-static void C_fcall f_12666(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12685)
-static void C_ccall f_12685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12708)
-static void C_ccall f_12708(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12691)
-static void C_ccall f_12691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12637)
-static void C_fcall f_12637(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12643)
-static void C_fcall f_12643(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12653)
-static void C_ccall f_12653(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12495)
-static void C_ccall f_12495(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12499)
-static void C_fcall f_12499(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12505)
-static void C_ccall f_12505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12508)
-static void C_ccall f_12508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12558)
-static void C_fcall f_12558(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12587)
-static void C_ccall f_12587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12511)
-static void C_ccall f_12511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12521)
-static void C_ccall f_12521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12523)
-static void C_fcall f_12523(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12552)
-static void C_ccall f_12552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12514)
-static void C_ccall f_12514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12396)
-static void C_ccall f_12396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12406)
-static void C_ccall f_12406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12456)
-static void C_fcall f_12456(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12485)
-static void C_ccall f_12485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12409)
-static void C_ccall f_12409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12419)
-static void C_ccall f_12419(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12421)
-static void C_fcall f_12421(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12450)
-static void C_ccall f_12450(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12412)
-static void C_ccall f_12412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12359)
-static void C_ccall f_12359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12385)
-static void C_ccall f_12385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12366)
-static void C_ccall f_12366(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12108)
-static void C_ccall f_12108(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_12112)
-static void C_ccall f_12112(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12115)
-static void C_ccall f_12115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12353)
-static void C_ccall f_12353(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12118)
-static void C_ccall f_12118(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12121)
-static void C_ccall f_12121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12124)
-static void C_ccall f_12124(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12127)
-static void C_ccall f_12127(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12347)
-static void C_ccall f_12347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12130)
-static void C_ccall f_12130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12140)
-static void C_fcall f_12140(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12259)
-static void C_fcall f_12259(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12298)
-static void C_ccall f_12298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12301)
-static void C_ccall f_12301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12272)
-static void C_fcall f_12272(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12143)
-static void C_ccall f_12143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12183)
-static void C_ccall f_12183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12186)
-static void C_ccall f_12186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12213)
-static void C_ccall f_12213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12209)
-static void C_ccall f_12209(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12205)
-static void C_ccall f_12205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12176)
-static void C_ccall f_12176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12166)
-static void C_ccall f_12166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12154)
-static void C_ccall f_12154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12099)
-static void C_ccall f_12099(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12090)
-static void C_ccall f_12090(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12081)
-static void C_ccall f_12081(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12072)
-static void C_ccall f_12072(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12063)
-static void C_ccall f_12063(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12054)
-static void C_ccall f_12054(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12045)
-static void C_ccall f_12045(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12036)
-static void C_ccall f_12036(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12030)
-static void C_ccall f_12030(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12024)
-static void C_ccall f_12024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9) C_noret;
-C_noret_decl(f_10414)
-static void C_ccall f_10414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10481)
-static void C_fcall f_10481(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10485)
-static void C_ccall f_10485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10488)
-static void C_ccall f_10488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11926)
-static void C_fcall f_11926(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11941)
-static void C_fcall f_11941(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11944)
-static void C_ccall f_11944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11985)
-static void C_ccall f_11985(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11903)
-static void C_ccall f_11903(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11868)
-static void C_ccall f_11868(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11874)
-static void C_ccall f_11874(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11840)
-static void C_ccall f_11840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11805)
-static void C_ccall f_11805(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11811)
-static void C_ccall f_11811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11779)
-static void C_ccall f_11779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11744)
-static void C_ccall f_11744(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11750)
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11616)
-static void C_ccall f_11616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11618)
-static void C_fcall f_11618(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11669)
-static void C_fcall f_11669(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11663)
-static void C_ccall f_11663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11659)
-static void C_ccall f_11659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11716)
-static void C_ccall f_11716(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11612)
-static void C_ccall f_11612(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11608)
-static void C_ccall f_11608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11591)
-static void C_ccall f_11591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11595)
-static void C_ccall f_11595(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11563)
-static void C_ccall f_11563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11546)
-static void C_ccall f_11546(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11511)
-static void C_ccall f_11511(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11517)
-static void C_ccall f_11517(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11449)
-static void C_ccall f_11449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11454)
-static void C_fcall f_11454(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11464)
-static void C_ccall f_11464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11402)
-static void C_ccall f_11402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11414)
-static void C_fcall f_11414(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11424)
-static void C_ccall f_11424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11135)
-static void C_ccall f_11135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11138)
-static void C_ccall f_11138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11355)
-static void C_ccall f_11355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11358)
-static void C_ccall f_11358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11344)
-static void C_ccall f_11344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11309)
-static void C_ccall f_11309(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11315)
-static void C_ccall f_11315(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11274)
-static void C_ccall f_11274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11278)
-static void C_ccall f_11278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11282)
-static void C_ccall f_11282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11249)
-static void C_ccall f_11249(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11214)
-static void C_ccall f_11214(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11220)
-static void C_ccall f_11220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11188)
-static void C_ccall f_11188(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11184)
-static void C_ccall f_11184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11159)
-static void C_ccall f_11159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11155)
-static void C_ccall f_11155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11122)
-static void C_ccall f_11122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11087)
-static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11093)
-static void C_ccall f_11093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11048)
-static void C_ccall f_11048(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11052)
-static void C_ccall f_11052(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10957)
-static void C_ccall f_10957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10998)
-static void C_ccall f_10998(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11004)
-static void C_ccall f_11004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10960)
-static void C_ccall f_10960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10965)
-static void C_ccall f_10965(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10971)
-static void C_ccall f_10971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10948)
-static void C_ccall f_10948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10913)
-static void C_ccall f_10913(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10919)
-static void C_ccall f_10919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10871)
-static void C_ccall f_10871(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10911)
-static void C_ccall f_10911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10876)
-static void C_ccall f_10876(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10882)
-static void C_ccall f_10882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10851)
-static void C_ccall f_10851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10816)
-static void C_ccall f_10816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10822)
-static void C_ccall f_10822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10801)
-static void C_ccall f_10801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10797)
-static void C_ccall f_10797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10713)
-static void C_ccall f_10713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10717)
-static void C_ccall f_10717(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10688)
-static void C_ccall f_10688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10692)
-static void C_ccall f_10692(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10696)
-static void C_ccall f_10696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10663)
-static void C_ccall f_10663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10659)
-static void C_ccall f_10659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10634)
-static void C_ccall f_10634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10630)
-static void C_ccall f_10630(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10582)
-static void C_ccall f_10582(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10585)
-static void C_ccall f_10585(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10609)
-static void C_ccall f_10609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10588)
-static void C_ccall f_10588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10595)
-static void C_fcall f_10595(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10591)
-static void C_ccall f_10591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10497)
-static void C_ccall f_10497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10500)
-static void C_ccall f_10500(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10568)
-static void C_ccall f_10568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10562)
-static void C_ccall f_10562(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10509)
-static void C_ccall f_10509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10518)
-static void C_fcall f_10518(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10553)
-static void C_ccall f_10553(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10556)
-static void C_ccall f_10556(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10512)
-static void C_ccall f_10512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10516)
-static void C_ccall f_10516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10491)
-static void C_ccall f_10491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10471)
-static void C_fcall f_10471(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10465)
-static void C_fcall f_10465(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10417)
-static void C_fcall f_10417(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10440)
-static void C_ccall f_10440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5248)
-static void C_ccall f_5248(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10409)
-static void C_ccall f_10409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10371)
-static void C_ccall f_10371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10374)
-static void C_ccall f_10374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10393)
-static void C_ccall f_10393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10403)
-static void C_ccall f_10403(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10389)
-static void C_ccall f_10389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10385)
-static void C_ccall f_10385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10324)
-static void C_fcall f_10324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10330)
-static void C_fcall f_10330(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10364)
-static void C_ccall f_10364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10357)
-static void C_fcall f_10357(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5724)
-static void C_fcall f_5724(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_10252)
-static void C_ccall f_10252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10264)
-static void C_ccall f_10264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10267)
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10294)
-static void C_ccall f_10294(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10255)
-static void C_ccall f_10255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10258)
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5787)
-static void C_ccall f_5787(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5790)
-static void C_ccall f_5790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10222)
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10225)
-static void C_ccall f_10225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10228)
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10231)
-static void C_ccall f_10231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10234)
-static void C_ccall f_10234(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5793)
-static void C_ccall f_5793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5797)
-static void C_ccall f_5797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5800)
-static void C_ccall f_5800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5806)
-static void C_ccall f_5806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5818)
-static void C_ccall f_5818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5840)
-static void C_ccall f_5840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5907)
-static void C_fcall f_5907(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6008)
-static void C_fcall f_6008(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9983)
-static void C_ccall f_9983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10116)
-static void C_ccall f_10116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10077)
-static void C_ccall f_10077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10045)
-static void C_fcall f_10045(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9999)
-static void C_fcall f_9999(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9943)
-static void C_fcall f_9943(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9947)
-static void C_ccall f_9947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9953)
-static void C_ccall f_9953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9967)
-static void C_ccall f_9967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9956)
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9632)
-static void C_ccall f_9632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9923)
-static void C_ccall f_9923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9651)
-static void C_ccall f_9651(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9654)
-static void C_ccall f_9654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9665)
-static void C_ccall f_9665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9838)
-static void C_fcall f_9838(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9882)
-static void C_ccall f_9882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9878)
-static void C_ccall f_9878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9874)
-static void C_ccall f_9874(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9862)
-static void C_ccall f_9862(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9697)
-static void C_ccall f_9697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9829)
-static void C_ccall f_9829(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9793)
-static void C_ccall f_9793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9747)
-static void C_ccall f_9747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9721)
-static void C_ccall f_9721(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9717)
-static void C_ccall f_9717(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9705)
-static void C_ccall f_9705(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9673)
-static void C_ccall f_9673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9661)
-static void C_ccall f_9661(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9622)
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9573)
-static void C_fcall f_9573(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9607)
-static void C_ccall f_9607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9600)
-static void C_fcall f_9600(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9567)
-static void C_ccall f_9567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9563)
-static void C_ccall f_9563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9488)
-static void C_ccall f_9488(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9506)
-static void C_ccall f_9506(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9536)
-static void C_ccall f_9536(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_9536)
-static void C_ccall f_9536r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_9542)
-static void C_ccall f_9542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9512)
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9519)
-static void C_ccall f_9519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9494)
-static void C_ccall f_9494(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9500)
-static void C_ccall f_9500(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9357)
-static void C_ccall f_9357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9360)
-static void C_ccall f_9360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9371)
-static void C_ccall f_9371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9381)
-static void C_ccall f_9381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9384)
-static void C_ccall f_9384(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9387)
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9392)
-static void C_ccall f_9392(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9417)
-static void C_ccall f_9417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9422)
-static void C_ccall f_9422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9447)
-static void C_ccall f_9447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9374)
-static void C_ccall f_9374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9342)
-static void C_ccall f_9342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9338)
-static void C_ccall f_9338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9333)
-static void C_ccall f_9333(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9177)
-static void C_ccall f_9177(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9180)
-static void C_ccall f_9180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9183)
-static void C_ccall f_9183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9189)
-static void C_ccall f_9189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9300)
-static void C_ccall f_9300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9261)
-static void C_ccall f_9261(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9228)
-static void C_fcall f_9228(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9236)
-static void C_ccall f_9236(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9224)
-static void C_ccall f_9224(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9204)
-static void C_ccall f_9204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9121)
-static void C_ccall f_9121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9130)
-static void C_ccall f_9130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9165)
-static void C_ccall f_9165(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9161)
-static void C_ccall f_9161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9133)
-static void C_fcall f_9133(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9153)
-static void C_ccall f_9153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9145)
-static void C_ccall f_9145(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8957)
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9105)
-static void C_ccall f_9105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8969)
-static void C_ccall f_8969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8972)
-static void C_ccall f_8972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8975)
-static void C_ccall f_8975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8980)
-static void C_ccall f_8980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9005)
-static void C_ccall f_9005(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9010)
-static void C_ccall f_9010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9035)
-static void C_ccall f_9035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9038)
-static void C_ccall f_9038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9041)
-static void C_ccall f_9041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9072)
-static void C_fcall f_9072(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8900)
-static void C_ccall f_8900(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8903)
-static void C_ccall f_8903(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8906)
-static void C_ccall f_8906(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8918)
-static void C_ccall f_8918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8891)
-static void C_ccall f_8891(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8878)
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8865)
-static void C_ccall f_8865(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8852)
-static void C_ccall f_8852(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8839)
-static void C_ccall f_8839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8772)
-static void C_ccall f_8772(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8791)
-static void C_fcall f_8791(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8818)
-static void C_ccall f_8818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8822)
-static void C_ccall f_8822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8811)
-static void C_ccall f_8811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8785)
-static void C_ccall f_8785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8756)
-static void C_ccall f_8756(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8741)
-static void C_ccall f_8741(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8710)
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8718)
-static void C_ccall f_8718(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8681)
-static void C_ccall f_8681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8648)
-static void C_ccall f_8648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8634)
-static void C_ccall f_8634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8642)
-static void C_ccall f_8642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8638)
-static void C_ccall f_8638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8601)
-static void C_ccall f_8601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8609)
-static void C_ccall f_8609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8605)
-static void C_ccall f_8605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8268)
-static void C_ccall f_8268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8274)
-static void C_ccall f_8274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8277)
-static void C_ccall f_8277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8283)
-static void C_ccall f_8283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8509)
-static void C_ccall f_8509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8512)
-static void C_ccall f_8512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8520)
-static void C_ccall f_8520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8545)
-static void C_ccall f_8545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8550)
-static void C_ccall f_8550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8438)
-static void C_ccall f_8438(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8477)
-static void C_ccall f_8477(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8493)
-static void C_ccall f_8493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8496)
-static void C_ccall f_8496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8499)
-static void C_ccall f_8499(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8490)
-static void C_ccall f_8490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8480)
-static void C_ccall f_8480(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8441)
-static void C_ccall f_8441(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8471)
-static void C_ccall f_8471(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8444)
-static void C_ccall f_8444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8447)
-static void C_ccall f_8447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8462)
-static void C_ccall f_8462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8366)
-static void C_fcall f_8366(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8373)
-static void C_ccall f_8373(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8432)
-static void C_ccall f_8432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8420)
-static void C_ccall f_8420(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8290)
-static void C_fcall f_8290(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8297)
-static void C_ccall f_8297(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8356)
-static void C_ccall f_8356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8336)
-static void C_ccall f_8336(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8223)
-static void C_fcall f_8223(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8252)
-static void C_ccall f_8252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8140)
-static void C_ccall f_8140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8174)
-static void C_fcall f_8174(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8207)
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8187)
-static void C_fcall f_8187(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8172)
-static void C_ccall f_8172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8143)
-static void C_ccall f_8143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8164)
-static void C_ccall f_8164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8168)
-static void C_ccall f_8168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8146)
-static void C_ccall f_8146(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8149)
-static void C_ccall f_8149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8121)
-static void C_ccall f_8121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7596)
-static void C_ccall f_7596(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8004)
-static void C_ccall f_8004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8006)
-static void C_fcall f_8006(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8084)
-static void C_ccall f_8084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8033)
-static void C_fcall f_8033(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8057)
-static C_word C_fcall f_8057(C_word t0);
-C_noret_decl(f_8046)
-static void C_fcall f_8046(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7602)
-static void C_ccall f_7602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7994)
-static void C_ccall f_7994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7605)
-static void C_ccall f_7605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7879)
-static void C_ccall f_7879(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7922)
-static void C_ccall f_7922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7943)
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7949)
-static void C_fcall f_7949(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7987)
-static void C_ccall f_7987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7976)
-static void C_fcall f_7976(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7984)
-static void C_ccall f_7984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7941)
-static void C_ccall f_7941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7923)
-static void C_ccall f_7923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7927)
-static void C_ccall f_7927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7930)
-static void C_ccall f_7930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7934)
-static void C_ccall f_7934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7937)
-static void C_ccall f_7937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7918)
-static void C_ccall f_7918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7883)
-static void C_ccall f_7883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7889)
-static void C_fcall f_7889(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7910)
-static void C_ccall f_7910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7914)
-static void C_ccall f_7914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7899)
-static void C_ccall f_7899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7886)
-static void C_ccall f_7886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7610)
-static void C_ccall f_7610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7614)
-static void C_ccall f_7614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7642)
-static void C_ccall f_7642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7652)
-static void C_fcall f_7652(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7873)
-static void C_ccall f_7873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7869)
-static void C_ccall f_7869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7816)
-static void C_ccall f_7816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7819)
-static void C_ccall f_7819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7763)
-static void C_ccall f_7763(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7786)
-static void C_ccall f_7786(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7778)
-static void C_ccall f_7778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7709)
-static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7734)
-static void C_ccall f_7734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7750)
-static void C_ccall f_7750(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7750)
-static void C_ccall f_7750r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7756)
-static void C_ccall f_7756(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7740)
-static void C_ccall f_7740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7748)
-static void C_ccall f_7748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7715)
-static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7721)
-static void C_ccall f_7721(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7732)
-static void C_ccall f_7732(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7725)
-static void C_ccall f_7725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7662)
-static void C_ccall f_7662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7665)
-static void C_ccall f_7665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7693)
-static void C_ccall f_7693(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7704)
-static void C_ccall f_7704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7697)
-static void C_ccall f_7697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7672)
-static void C_fcall f_7672(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5719)
-static void C_ccall f_5719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5636)
-static void C_ccall f_5636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5712)
-static void C_ccall f_5712(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5639)
-static void C_ccall f_5639(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5705)
-static void C_ccall f_5705(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5642)
-static void C_ccall f_5642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5657)
-static void C_ccall f_5657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5662)
-static void C_ccall f_5662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5699)
-static void C_ccall f_5699(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5666)
-static void C_ccall f_5666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5674)
-static void C_fcall f_5674(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5684)
-static void C_ccall f_5684(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5669)
-static void C_ccall f_5669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f20080)
-static void C_ccall f20080(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7676)
-static void C_ccall f_7676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7683)
-static void C_ccall f_7683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7615)
-static void C_ccall f_7615(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7619)
-static void C_ccall f_7619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7622)
-static void C_ccall f_7622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7626)
-static void C_ccall f_7626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7629)
-static void C_ccall f_7629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7633)
-static void C_ccall f_7633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7636)
-static void C_ccall f_7636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7509)
-static void C_fcall f_7509(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7583)
-static void C_ccall f_7583(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7536)
-static void C_fcall f_7536(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7540)
-static void C_ccall f_7540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7543)
-static void C_ccall f_7543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7568)
-static void C_ccall f_7568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7564)
-static void C_ccall f_7564(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7550)
-static void C_fcall f_7550(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7554)
-static void C_ccall f_7554(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7402)
-static void C_ccall f_7402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7463)
-static void C_ccall f_7463(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7469)
-static void C_fcall f_7469(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7492)
-static void C_ccall f_7492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7449)
-static void C_ccall f_7449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7457)
-static void C_ccall f_7457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7407)
-static void C_ccall f_7407(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7413)
-static void C_fcall f_7413(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7436)
-static void C_ccall f_7436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7295)
-static void C_ccall f_7295(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7393)
-static void C_ccall f_7393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7389)
-static void C_ccall f_7389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7298)
-static void C_fcall f_7298(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7385)
-static void C_ccall f_7385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7377)
-static void C_ccall f_7377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7381)
-static void C_ccall f_7381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7301)
-static void C_ccall f_7301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7331)
-static void C_fcall f_7331(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7150)
-static void C_ccall f_7150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7153)
-static void C_ccall f_7153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7237)
-static void C_ccall f_7237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7241)
-static void C_ccall f_7241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7156)
-static void C_fcall f_7156(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7159)
-static void C_ccall f_7159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7223)
-static void C_ccall f_7223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7162)
-static void C_ccall f_7162(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7211)
-static void C_ccall f_7211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7219)
-static void C_ccall f_7219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7215)
-static void C_ccall f_7215(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7165)
-static void C_ccall f_7165(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7029)
-static void C_ccall f_7029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7087)
-static void C_fcall f_7087(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7137)
-static void C_ccall f_7137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7114)
-static void C_fcall f_7114(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7130)
-static void C_ccall f_7130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7126)
-static void C_ccall f_7126(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7032)
-static void C_ccall f_7032(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7035)
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7051)
-static void C_fcall f_7051(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7059)
-static C_word C_fcall f_7059(C_word t0,C_word t1);
-C_noret_decl(f_7038)
-static void C_ccall f_7038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7045)
-static void C_ccall f_7045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6942)
-static void C_ccall f_6942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6966)
-static void C_fcall f_6966(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7016)
-static void C_ccall f_7016(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6993)
-static void C_fcall f_6993(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7009)
-static void C_ccall f_7009(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7005)
-static void C_ccall f_7005(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6960)
-static void C_ccall f_6960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6945)
-static void C_ccall f_6945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6952)
-static void C_ccall f_6952(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6613)
-static void C_ccall f_6613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6919)
-static void C_ccall f_6919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6930)
-static void C_ccall f_6930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6924)
-static void C_ccall f_6924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6622)
-static void C_ccall f_6622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6627)
-static void C_ccall f_6627(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6883)
-static void C_fcall f_6883(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6912)
-static void C_ccall f_6912(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6631)
-static void C_ccall f_6631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6834)
-static void C_fcall f_6834(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6867)
-static void C_ccall f_6867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6847)
-static void C_fcall f_6847(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6832)
-static void C_ccall f_6832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6634)
-static void C_ccall f_6634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6637)
-static void C_ccall f_6637(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6828)
-static void C_ccall f_6828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6640)
-static void C_ccall f_6640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6824)
-static void C_ccall f_6824(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6643)
-static void C_ccall f_6643(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6649)
-static void C_ccall f_6649(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6799)
-static void C_ccall f_6799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6772)
-static void C_fcall f_6772(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6664)
-static void C_ccall f_6664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6751)
-static void C_ccall f_6751(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6695)
-static void C_fcall f_6695(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6729)
-static void C_ccall f_6729(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6673)
-static void C_fcall f_6673(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6456)
-static void C_ccall f_6456(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6559)
-static void C_fcall f_6559(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6477)
-static void C_ccall f_6477(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6503)
-static void C_fcall f_6503(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6485)
-static void C_ccall f_6485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6501)
-static void C_ccall f_6501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6481)
-static void C_ccall f_6481(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6244)
-static void C_ccall f_6244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6250)
-static void C_ccall f_6250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6411)
-static void C_fcall f_6411(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6440)
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6253)
-static void C_ccall f_6253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6362)
-static void C_fcall f_6362(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6395)
-static void C_ccall f_6395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6375)
-static void C_fcall f_6375(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6360)
-static void C_ccall f_6360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6256)
-static void C_ccall f_6256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6259)
-static void C_ccall f_6259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6292)
-static void C_fcall f_6292(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6342)
-static void C_ccall f_6342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6305)
-static void C_fcall f_6305(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6323)
-static void C_fcall f_6323(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6331)
-static void C_ccall f_6331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6270)
-static void C_ccall f_6270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6282)
-static void C_ccall f_6282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6286)
-static void C_ccall f_6286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6278)
-static void C_ccall f_6278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6157)
-static void C_ccall f_6157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6159)
-static void C_fcall f_6159(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6180)
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6218)
-static void C_ccall f_6218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6228)
-static void C_ccall f_6228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6206)
-static void C_ccall f_6206(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6184)
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6199)
-static void C_ccall f_6199(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6174)
-static void C_ccall f_6174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6153)
-static void C_ccall f_6153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6104)
-static void C_fcall f_6104(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6133)
-static void C_ccall f_6133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6083)
-static void C_ccall f_6083(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6086)
-static void C_ccall f_6086(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6097)
-static void C_ccall f_6097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6091)
-static void C_ccall f_6091(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6089)
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6058)
-static void C_ccall f_6058(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6066)
-static void C_ccall f_6066(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6029)
-static void C_ccall f_6029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6041)
-static void C_ccall f_6041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6037)
-static void C_ccall f_6037(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5950)
-static void C_ccall f_5950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5962)
-static void C_ccall f_5962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5966)
-static void C_ccall f_5966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5971)
-static void C_ccall f_5971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5996)
-static void C_ccall f_5996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5999)
-static void C_ccall f_5999(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5910)
-static void C_ccall f_5910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5921)
-static void C_ccall f_5921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5849)
-static void C_ccall f_5849(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5860)
-static void C_ccall f_5860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5868)
-static void C_ccall f_5868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5876)
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5822)
-static void C_fcall f_5822(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5768)
-static void C_ccall f_5768(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5740)
-static void C_ccall f_5740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5734)
-static void C_ccall f_5734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5594)
-static void C_fcall f_5594(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5598)
-static void C_ccall f_5598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5619)
-static void C_ccall f_5619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5630)
-static void C_ccall f_5630(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5623)
-static void C_ccall f_5623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5599)
-static void C_ccall f_5599(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5603)
-static void C_ccall f_5603(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5606)
-static void C_ccall f_5606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5610)
-static void C_ccall f_5610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5613)
-static void C_ccall f_5613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5424)
-static void C_fcall f_5424(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5428)
-static void C_ccall f_5428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5440)
-static void C_ccall f_5440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5458)
-static void C_ccall f_5458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5566)
-static void C_ccall f_5566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5523)
-static void C_fcall f_5523(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5530)
-static void C_ccall f_5530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5544)
-static void C_ccall f_5544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5540)
-static void C_ccall f_5540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5476)
-static void C_fcall f_5476(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5483)
-static void C_ccall f_5483(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5497)
-static void C_ccall f_5497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5493)
-static void C_ccall f_5493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5462)
-static void C_fcall f_5462(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5444)
-static void C_fcall f_5444(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5378)
-static void C_fcall f_5378(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5410)
-static void C_ccall f_5410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5318)
-static void C_fcall f_5318(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5324)
-static void C_fcall f_5324(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5339)
-static void C_ccall f_5339(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5305)
-static void C_fcall f_5305(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5309)
-static void C_ccall f_5309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5316)
-static void C_ccall f_5316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5312)
-static void C_ccall f_5312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5290)
-static void C_fcall f_5290(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5294)
-static void C_ccall f_5294(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5300)
-static void C_ccall f_5300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5251)
-static void C_fcall f_5251(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5288)
-static void C_ccall f_5288(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5284)
-static void C_ccall f_5284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5264)
-static void C_fcall f_5264(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5187)
-static void C_ccall f_5187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5246)
-static void C_ccall f_5246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5191)
-static void C_ccall f_5191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5239)
-static void C_ccall f_5239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5194)
-static void C_ccall f_5194(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5232)
-static void C_ccall f_5232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5197)
-static void C_ccall f_5197(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5201)
-static void C_ccall f_5201(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5205)
-static void C_ccall f_5205(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5225)
-static void C_ccall f_5225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5208)
-static void C_ccall f_5208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5218)
-static void C_ccall f_5218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5093)
-static void C_ccall f_5093(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_5093)
-static void C_ccall f_5093r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-
-C_noret_decl(trf_18924)
-static void C_fcall trf_18924(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18924(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18924(t0,t1);}
-
-C_noret_decl(trf_18892)
-static void C_fcall trf_18892(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18892(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18892(t0,t1,t2);}
-
-C_noret_decl(trf_18878)
-static void C_fcall trf_18878(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18878(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18878(t0,t1,t2);}
-
-C_noret_decl(trf_18798)
-static void C_fcall trf_18798(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18798(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18798(t0,t1,t2);}
-
-C_noret_decl(trf_18752)
-static void C_fcall trf_18752(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18752(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_18752(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_18758)
-static void C_fcall trf_18758(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18758(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18758(t0,t1,t2);}
-
-C_noret_decl(trf_18785)
-static void C_fcall trf_18785(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18785(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18785(t0,t1,t2);}
-
-C_noret_decl(trf_17629)
-static void C_fcall trf_17629(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17629(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_17629(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_18658)
-static void C_fcall trf_18658(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18658(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_18658(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_18466)
-static void C_fcall trf_18466(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18466(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18466(t0,t1);}
-
-C_noret_decl(trf_18487)
-static void C_fcall trf_18487(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18487(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18487(t0,t1);}
-
-C_noret_decl(trf_18432)
-static void C_fcall trf_18432(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18432(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18432(t0,t1);}
-
-C_noret_decl(trf_18401)
-static void C_fcall trf_18401(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18401(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18401(t0,t1);}
-
-C_noret_decl(trf_18386)
-static void C_fcall trf_18386(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18386(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18386(t0,t1);}
-
-C_noret_decl(trf_18264)
-static void C_fcall trf_18264(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18264(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18264(t0,t1);}
-
-C_noret_decl(trf_18276)
-static void C_fcall trf_18276(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18276(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18276(t0,t1);}
-
-C_noret_decl(trf_18229)
-static void C_fcall trf_18229(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18229(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18229(t0,t1,t2);}
-
-C_noret_decl(trf_18014)
-static void C_fcall trf_18014(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18014(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18014(t0,t1);}
-
-C_noret_decl(trf_17888)
-static void C_fcall trf_17888(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17888(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17888(t0,t1);}
-
-C_noret_decl(trf_17556)
-static void C_fcall trf_17556(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17556(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_17556(t0,t1,t2,t3);}
-
-C_noret_decl(trf_17563)
-static void C_fcall trf_17563(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17563(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17563(t0,t1);}
-
-C_noret_decl(trf_17566)
-static void C_fcall trf_17566(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17566(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17566(t0,t1);}
-
-C_noret_decl(trf_17505)
-static void C_fcall trf_17505(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17505(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_17505(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_17122)
-static void C_fcall trf_17122(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17122(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_17122(t0,t1,t2,t3);}
-
-C_noret_decl(trf_17133)
-static void C_fcall trf_17133(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17133(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17133(t0,t1,t2);}
-
-C_noret_decl(trf_17076)
-static void C_fcall trf_17076(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17076(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_17076(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_17082)
-static void C_fcall trf_17082(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17082(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17082(t0,t1,t2);}
-
-C_noret_decl(trf_17109)
-static void C_fcall trf_17109(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17109(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17109(t0,t1,t2);}
-
-C_noret_decl(trf_16051)
-static void C_fcall trf_16051(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16051(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_16051(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_16085)
-static void C_fcall trf_16085(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16085(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16085(t0,t1);}
-
-C_noret_decl(trf_16124)
-static void C_fcall trf_16124(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16124(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16124(t0,t1);}
-
-C_noret_decl(trf_16757)
-static void C_fcall trf_16757(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16757(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16757(t0,t1,t2);}
-
-C_noret_decl(trf_16685)
-static void C_fcall trf_16685(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16685(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16685(t0,t1,t2);}
-
-C_noret_decl(trf_16636)
-static void C_fcall trf_16636(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16636(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_16636(t0,t1,t2,t3);}
-
-C_noret_decl(trf_16649)
-static void C_fcall trf_16649(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16649(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16649(t0,t1);}
-
-C_noret_decl(trf_16286)
-static void C_fcall trf_16286(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16286(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16286(t0,t1);}
-
-C_noret_decl(trf_16543)
-static void C_fcall trf_16543(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16543(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16543(t0,t1,t2);}
-
-C_noret_decl(trf_16449)
-static void C_fcall trf_16449(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16449(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16449(t0,t1,t2);}
-
-C_noret_decl(trf_16407)
-static void C_fcall trf_16407(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16407(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16407(t0,t1);}
-
-C_noret_decl(trf_16357)
-static void C_fcall trf_16357(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16357(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16357(t0,t1,t2);}
-
-C_noret_decl(trf_16384)
-static void C_fcall trf_16384(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16384(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16384(t0,t1,t2);}
-
-C_noret_decl(trf_15616)
-static void C_fcall trf_15616(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15616(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_15616(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_15650)
-static void C_fcall trf_15650(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15650(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15650(t0,t1);}
-
-C_noret_decl(trf_15993)
-static void C_fcall trf_15993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15993(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15993(t0,t1,t2);}
-
-C_noret_decl(trf_16001)
-static void C_fcall trf_16001(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16001(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16001(t0,t1,t2);}
-
-C_noret_decl(trf_17178)
-static void C_fcall trf_17178(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17178(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17178(t0,t1,t2);}
-
-C_noret_decl(trf_17231)
-static void C_fcall trf_17231(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17231(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17231(t0,t1);}
-
-C_noret_decl(trf_17262)
-static void C_fcall trf_17262(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17262(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17262(t0,t1,t2);}
-
-C_noret_decl(trf_15796)
-static void C_fcall trf_15796(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15796(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15796(t0,t1);}
-
-C_noret_decl(trf_15819)
-static void C_fcall trf_15819(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15819(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15819(t0,t1);}
-
-C_noret_decl(trf_15837)
-static void C_fcall trf_15837(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15837(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15837(t0,t1);}
-
-C_noret_decl(trf_15740)
-static void C_fcall trf_15740(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15740(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15740(t0,t1,t2);}
-
-C_noret_decl(trf_15748)
-static void C_fcall trf_15748(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15748(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15748(t0,t1,t2);}
-
-C_noret_decl(trf_15688)
-static void C_fcall trf_15688(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15688(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15688(t0,t1,t2);}
-
-C_noret_decl(trf_15696)
-static void C_fcall trf_15696(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15696(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15696(t0,t1,t2);}
-
-C_noret_decl(trf_15605)
-static void C_fcall trf_15605(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15605(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15605(t0,t1,t2);}
-
-C_noret_decl(trf_15595)
-static void C_fcall trf_15595(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15595(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15595(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15589)
-static void C_fcall trf_15589(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15589(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15589(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15451)
-static void C_fcall trf_15451(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15451(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15451(t0,t1,t2);}
-
-C_noret_decl(trf_15429)
-static void C_fcall trf_15429(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15429(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15429(t0,t1);}
-
-C_noret_decl(trf_15402)
-static void C_fcall trf_15402(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15402(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15402(t0,t1);}
-
-C_noret_decl(trf_15344)
-static void C_fcall trf_15344(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15344(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15344(t0,t1);}
-
-C_noret_decl(trf_15270)
-static void C_fcall trf_15270(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15270(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15270(t0,t1,t2);}
-
-C_noret_decl(trf_15121)
-static void C_fcall trf_15121(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15121(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15121(t0,t1);}
-
-C_noret_decl(trf_15062)
-static void C_fcall trf_15062(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15062(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15062(t0,t1);}
-
-C_noret_decl(trf_14931)
-static void C_fcall trf_14931(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14931(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14931(t0,t1);}
-
-C_noret_decl(trf_14997)
-static void C_fcall trf_14997(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14997(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14997(t0,t1,t2);}
-
-C_noret_decl(trf_15005)
-static void C_fcall trf_15005(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15005(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15005(t0,t1,t2);}
-
-C_noret_decl(trf_15012)
-static void C_fcall trf_15012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15012(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15012(t0,t1);}
-
-C_noret_decl(trf_14964)
-static void C_fcall trf_14964(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14964(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14964(t0,t1);}
-
-C_noret_decl(trf_14885)
-static void C_fcall trf_14885(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14885(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14885(t0,t1);}
-
-C_noret_decl(trf_14873)
-static void C_fcall trf_14873(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14873(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14873(t0,t1);}
-
-C_noret_decl(trf_14762)
-static void C_fcall trf_14762(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14762(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14762(t0,t1);}
-
-C_noret_decl(trf_14567)
-static void C_fcall trf_14567(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14567(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14567(t0,t1);}
-
-C_noret_decl(trf_14593)
-static void C_fcall trf_14593(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14593(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14593(t0,t1);}
-
-C_noret_decl(trf_14619)
-static void C_fcall trf_14619(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14619(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14619(t0,t1);}
-
-C_noret_decl(trf_14484)
-static void C_fcall trf_14484(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14484(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14484(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14470)
-static void C_fcall trf_14470(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14470(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14470(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14464)
-static void C_fcall trf_14464(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14464(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14464(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14286)
-static void C_fcall trf_14286(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14286(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_14286(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_14299)
-static void C_fcall trf_14299(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14299(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14299(t0,t1);}
-
-C_noret_decl(trf_14311)
-static void C_fcall trf_14311(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14311(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14311(t0,t1);}
-
-C_noret_decl(trf_14356)
-static void C_fcall trf_14356(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14356(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14356(t0,t1);}
-
-C_noret_decl(trf_14252)
-static void C_fcall trf_14252(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14252(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_14252(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_14258)
-static void C_fcall trf_14258(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14258(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14258(t0,t1,t2);}
-
-C_noret_decl(trf_14266)
-static void C_fcall trf_14266(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14266(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14266(t0,t1,t2);}
-
-C_noret_decl(trf_13653)
-static void C_fcall trf_13653(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13653(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_13653(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_13690)
-static void C_fcall trf_13690(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13690(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13690(t0,t1);}
-
-C_noret_decl(trf_14051)
-static void C_fcall trf_14051(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14051(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14051(t0,t1,t2);}
-
-C_noret_decl(trf_14059)
-static void C_fcall trf_14059(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14059(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14059(t0,t1,t2);}
-
-C_noret_decl(trf_13990)
-static void C_fcall trf_13990(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13990(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13990(t0,t1);}
-
-C_noret_decl(trf_13993)
-static void C_fcall trf_13993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13993(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13993(t0,t1);}
-
-C_noret_decl(trf_13924)
-static void C_fcall trf_13924(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13924(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13924(t0,t1,t2);}
-
-C_noret_decl(trf_13932)
-static void C_fcall trf_13932(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13932(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13932(t0,t1,t2);}
-
-C_noret_decl(trf_13843)
-static void C_fcall trf_13843(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13843(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13843(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13453)
-static void C_fcall trf_13453(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13453(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13453(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13459)
-static void C_fcall trf_13459(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13459(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13459(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13432)
-static void C_fcall trf_13432(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13432(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_13432(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_13256)
-static void C_fcall trf_13256(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13256(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_13256(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_12784)
-static void C_fcall trf_12784(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12784(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12784(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12826)
-static void C_fcall trf_12826(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12826(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12826(t0,t1);}
-
-C_noret_decl(trf_13167)
-static void C_fcall trf_13167(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13167(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13167(t0,t1);}
-
-C_noret_decl(trf_12963)
-static void C_fcall trf_12963(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12963(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12963(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12727)
-static void C_fcall trf_12727(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12727(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_12727(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_12666)
-static void C_fcall trf_12666(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12666(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12666(t0,t1,t2);}
-
-C_noret_decl(trf_12637)
-static void C_fcall trf_12637(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12637(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12637(t0,t1,t2);}
-
-C_noret_decl(trf_12643)
-static void C_fcall trf_12643(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12643(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12643(t0,t1,t2);}
-
-C_noret_decl(trf_12499)
-static void C_fcall trf_12499(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12499(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12499(t0,t1);}
-
-C_noret_decl(trf_12558)
-static void C_fcall trf_12558(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12558(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12558(t0,t1,t2);}
-
-C_noret_decl(trf_12523)
-static void C_fcall trf_12523(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12523(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12523(t0,t1,t2);}
-
-C_noret_decl(trf_12456)
-static void C_fcall trf_12456(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12456(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12456(t0,t1,t2);}
-
-C_noret_decl(trf_12421)
-static void C_fcall trf_12421(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12421(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12421(t0,t1,t2);}
-
-C_noret_decl(trf_12140)
-static void C_fcall trf_12140(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12140(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12140(t0,t1);}
-
-C_noret_decl(trf_12259)
-static void C_fcall trf_12259(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12259(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12259(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12272)
-static void C_fcall trf_12272(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12272(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12272(t0,t1);}
-
-C_noret_decl(trf_10481)
-static void C_fcall trf_10481(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10481(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10481(t0,t1);}
-
-C_noret_decl(trf_11926)
-static void C_fcall trf_11926(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11926(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11926(t0,t1,t2);}
-
-C_noret_decl(trf_11941)
-static void C_fcall trf_11941(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11941(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11941(t0,t1);}
-
-C_noret_decl(trf_11618)
-static void C_fcall trf_11618(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11618(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11618(t0,t1,t2);}
-
-C_noret_decl(trf_11669)
-static void C_fcall trf_11669(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11669(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11669(t0,t1);}
-
-C_noret_decl(trf_11454)
-static void C_fcall trf_11454(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11454(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11454(t0,t1,t2);}
-
-C_noret_decl(trf_11414)
-static void C_fcall trf_11414(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11414(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11414(t0,t1,t2);}
-
-C_noret_decl(trf_10595)
-static void C_fcall trf_10595(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10595(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10595(t0,t1);}
-
-C_noret_decl(trf_10518)
-static void C_fcall trf_10518(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10518(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10518(t0,t1,t2);}
-
-C_noret_decl(trf_10471)
-static void C_fcall trf_10471(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10471(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10471(t0,t1,t2);}
-
-C_noret_decl(trf_10465)
-static void C_fcall trf_10465(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10465(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10465(t0,t1,t2);}
-
-C_noret_decl(trf_10417)
-static void C_fcall trf_10417(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10417(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10417(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10324)
-static void C_fcall trf_10324(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10324(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_10324(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_10330)
-static void C_fcall trf_10330(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10330(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10330(t0,t1,t2);}
-
-C_noret_decl(trf_10357)
-static void C_fcall trf_10357(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10357(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10357(t0,t1,t2);}
-
-C_noret_decl(trf_5724)
-static void C_fcall trf_5724(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5724(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5724(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5907)
-static void C_fcall trf_5907(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5907(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5907(t0,t1);}
-
-C_noret_decl(trf_6008)
-static void C_fcall trf_6008(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6008(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6008(t0,t1);}
-
-C_noret_decl(trf_10045)
-static void C_fcall trf_10045(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10045(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10045(t0,t1,t2);}
-
-C_noret_decl(trf_9999)
-static void C_fcall trf_9999(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9999(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9999(t0,t1,t2);}
-
-C_noret_decl(trf_9943)
-static void C_fcall trf_9943(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9943(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9943(t0,t1);}
-
-C_noret_decl(trf_9838)
-static void C_fcall trf_9838(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9838(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9838(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9573)
-static void C_fcall trf_9573(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9573(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9573(t0,t1,t2);}
-
-C_noret_decl(trf_9600)
-static void C_fcall trf_9600(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9600(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9600(t0,t1,t2);}
-
-C_noret_decl(trf_9228)
-static void C_fcall trf_9228(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9228(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9228(t0,t1);}
-
-C_noret_decl(trf_9133)
-static void C_fcall trf_9133(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9133(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9133(t0,t1);}
-
-C_noret_decl(trf_9072)
-static void C_fcall trf_9072(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9072(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9072(t0,t1);}
-
-C_noret_decl(trf_8791)
-static void C_fcall trf_8791(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8791(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8791(t0,t1,t2);}
-
-C_noret_decl(trf_8366)
-static void C_fcall trf_8366(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8366(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8366(t0,t1,t2);}
-
-C_noret_decl(trf_8290)
-static void C_fcall trf_8290(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8290(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8290(t0,t1,t2);}
-
-C_noret_decl(trf_8223)
-static void C_fcall trf_8223(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8223(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8223(t0,t1,t2);}
-
-C_noret_decl(trf_8174)
-static void C_fcall trf_8174(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8174(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8174(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8187)
-static void C_fcall trf_8187(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8187(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8187(t0,t1);}
-
-C_noret_decl(trf_8006)
-static void C_fcall trf_8006(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8006(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8006(t0,t1,t2);}
-
-C_noret_decl(trf_8033)
-static void C_fcall trf_8033(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8033(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8033(t0,t1,t2);}
-
-C_noret_decl(trf_8046)
-static void C_fcall trf_8046(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8046(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8046(t0,t1);}
-
-C_noret_decl(trf_7949)
-static void C_fcall trf_7949(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7949(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7949(t0,t1,t2);}
-
-C_noret_decl(trf_7976)
-static void C_fcall trf_7976(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7976(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7976(t0,t1,t2);}
-
-C_noret_decl(trf_7889)
-static void C_fcall trf_7889(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7889(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7889(t0,t1,t2);}
-
-C_noret_decl(trf_7652)
-static void C_fcall trf_7652(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7652(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7652(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7672)
-static void C_fcall trf_7672(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7672(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7672(t0,t1,t2);}
-
-C_noret_decl(trf_5674)
-static void C_fcall trf_5674(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5674(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5674(t0,t1,t2);}
-
-C_noret_decl(trf_7509)
-static void C_fcall trf_7509(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7509(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7509(t0,t1,t2);}
-
-C_noret_decl(trf_7536)
-static void C_fcall trf_7536(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7536(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7536(t0,t1,t2);}
-
-C_noret_decl(trf_7550)
-static void C_fcall trf_7550(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7550(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7550(t0,t1);}
-
-C_noret_decl(trf_7469)
-static void C_fcall trf_7469(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7469(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7469(t0,t1,t2);}
-
-C_noret_decl(trf_7413)
-static void C_fcall trf_7413(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7413(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7413(t0,t1,t2);}
-
-C_noret_decl(trf_7298)
-static void C_fcall trf_7298(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7298(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7298(t0,t1);}
-
-C_noret_decl(trf_7331)
-static void C_fcall trf_7331(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7331(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7331(t0,t1);}
-
-C_noret_decl(trf_7156)
-static void C_fcall trf_7156(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7156(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7156(t0,t1);}
-
-C_noret_decl(trf_7087)
-static void C_fcall trf_7087(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7087(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7087(t0,t1,t2);}
-
-C_noret_decl(trf_7114)
-static void C_fcall trf_7114(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7114(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7114(t0,t1,t2);}
-
-C_noret_decl(trf_7051)
-static void C_fcall trf_7051(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7051(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7051(t0,t1,t2);}
-
-C_noret_decl(trf_6966)
-static void C_fcall trf_6966(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6966(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6966(t0,t1,t2);}
-
-C_noret_decl(trf_6993)
-static void C_fcall trf_6993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6993(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6993(t0,t1,t2);}
-
-C_noret_decl(trf_6883)
-static void C_fcall trf_6883(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6883(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6883(t0,t1,t2);}
-
-C_noret_decl(trf_6834)
-static void C_fcall trf_6834(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6834(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6834(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6847)
-static void C_fcall trf_6847(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6847(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6847(t0,t1);}
-
-C_noret_decl(trf_6772)
-static void C_fcall trf_6772(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6772(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6772(t0,t1);}
-
-C_noret_decl(trf_6695)
-static void C_fcall trf_6695(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6695(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6695(t0,t1);}
-
-C_noret_decl(trf_6673)
-static void C_fcall trf_6673(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6673(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6673(t0,t1);}
-
-C_noret_decl(trf_6559)
-static void C_fcall trf_6559(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6559(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6559(t0,t1,t2);}
-
-C_noret_decl(trf_6503)
-static void C_fcall trf_6503(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6503(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6503(t0,t1,t2);}
-
-C_noret_decl(trf_6411)
-static void C_fcall trf_6411(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6411(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6411(t0,t1,t2);}
-
-C_noret_decl(trf_6362)
-static void C_fcall trf_6362(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6362(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6362(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6375)
-static void C_fcall trf_6375(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6375(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6375(t0,t1);}
-
-C_noret_decl(trf_6292)
-static void C_fcall trf_6292(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6292(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6292(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6305)
-static void C_fcall trf_6305(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6305(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6305(t0,t1);}
-
-C_noret_decl(trf_6323)
-static void C_fcall trf_6323(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6323(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6323(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6159)
-static void C_fcall trf_6159(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6159(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6159(t0,t1,t2);}
-
-C_noret_decl(trf_6104)
-static void C_fcall trf_6104(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6104(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6104(t0,t1,t2);}
-
-C_noret_decl(trf_5822)
-static void C_fcall trf_5822(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5822(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5822(t0,t1,t2);}
-
-C_noret_decl(trf_5594)
-static void C_fcall trf_5594(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5594(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5594(t0,t1);}
-
-C_noret_decl(trf_5424)
-static void C_fcall trf_5424(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5424(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5424(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5523)
-static void C_fcall trf_5523(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5523(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5523(t0,t1,t2);}
-
-C_noret_decl(trf_5476)
-static void C_fcall trf_5476(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5476(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5476(t0,t1,t2);}
-
-C_noret_decl(trf_5462)
-static void C_fcall trf_5462(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5462(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5462(t0,t1,t2);}
-
-C_noret_decl(trf_5444)
-static void C_fcall trf_5444(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5444(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5444(t0,t1,t2);}
-
-C_noret_decl(trf_5378)
-static void C_fcall trf_5378(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5378(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5378(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5318)
-static void C_fcall trf_5318(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5318(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5318(t0,t1,t2);}
-
-C_noret_decl(trf_5324)
-static void C_fcall trf_5324(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5324(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5324(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5305)
-static void C_fcall trf_5305(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5305(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5305(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5290)
-static void C_fcall trf_5290(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5290(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5290(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5251)
-static void C_fcall trf_5251(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5251(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5251(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5264)
-static void C_fcall trf_5264(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5264(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5264(t0,t1);}
-
-C_noret_decl(tr10)
-static void C_fcall tr10(C_proc10 k) C_regparm C_noret;
-C_regparm static void C_fcall tr10(C_proc10 k){
-C_word t9=C_pick(0);
-C_word t8=C_pick(1);
-C_word t7=C_pick(2);
-C_word t6=C_pick(3);
-C_word t5=C_pick(4);
-C_word t4=C_pick(5);
-C_word t3=C_pick(6);
-C_word t2=C_pick(7);
-C_word t1=C_pick(8);
-C_word t0=C_pick(9);
-C_adjust_stack(-10);
-(k)(10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-
-C_noret_decl(tr9)
-static void C_fcall tr9(C_proc9 k) C_regparm C_noret;
-C_regparm static void C_fcall tr9(C_proc9 k){
-C_word t8=C_pick(0);
-C_word t7=C_pick(1);
-C_word t6=C_pick(2);
-C_word t5=C_pick(3);
-C_word t4=C_pick(4);
-C_word t3=C_pick(5);
-C_word t2=C_pick(6);
-C_word t1=C_pick(7);
-C_word t0=C_pick(8);
-C_adjust_stack(-9);
-(k)(9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-
-C_noret_decl(tr7)
-static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
-C_regparm static void C_fcall tr7(C_proc7 k){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-(k)(7,t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr18)
-static void C_fcall tr18(C_proc18 k) C_regparm C_noret;
-C_regparm static void C_fcall tr18(C_proc18 k){
-C_word t17=C_pick(0);
-C_word t16=C_pick(1);
-C_word t15=C_pick(2);
-C_word t14=C_pick(3);
-C_word t13=C_pick(4);
-C_word t12=C_pick(5);
-C_word t11=C_pick(6);
-C_word t10=C_pick(7);
-C_word t9=C_pick(8);
-C_word t8=C_pick(9);
-C_word t7=C_pick(10);
-C_word t6=C_pick(11);
-C_word t5=C_pick(12);
-C_word t4=C_pick(13);
-C_word t3=C_pick(14);
-C_word t2=C_pick(15);
-C_word t1=C_pick(16);
-C_word t0=C_pick(17);
-C_adjust_stack(-18);
-(k)(18,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_compiler_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_compiler_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("compiler_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(6766)){
-C_save(t1);
-C_rereclaim2(6766*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,673);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],1,"d");
-lf[3]=C_h_intern(&lf[3],2,"pp");
-lf[4]=C_h_intern(&lf[4],5,"print");
-lf[5]=C_h_intern(&lf[5],18,"\010compilerunit-name");
-lf[6]=C_h_intern(&lf[6],11,"number-type");
-lf[7]=C_h_intern(&lf[7],7,"generic");
-lf[8]=C_h_intern(&lf[8],17,"standard-bindings");
-lf[9]=C_h_intern(&lf[9],17,"extended-bindings");
-lf[10]=C_h_intern(&lf[10],28,"\010compilerinsert-timer-checks");
-lf[11]=C_h_intern(&lf[11],19,"\010compilerused-units");
-lf[12]=C_h_intern(&lf[12],6,"unsafe");
-lf[13]=C_h_intern(&lf[13],29,"\010compilerforeign-declarations");
-lf[14]=C_h_intern(&lf[14],24,"\010compileremit-trace-info");
-lf[15]=C_h_intern(&lf[15],26,"\010compilerblock-compilation");
-lf[16]=C_h_intern(&lf[16],34,"\010compilerline-number-database-size");
-lf[17]=C_h_intern(&lf[17],25,"\010compilertarget-heap-size");
-lf[18]=C_h_intern(&lf[18],33,"\010compilertarget-initial-heap-size");
-lf[19]=C_h_intern(&lf[19],26,"\010compilertarget-stack-size");
-lf[20]=C_h_intern(&lf[20],22,"optimize-leaf-routines");
-lf[21]=C_h_intern(&lf[21],21,"\010compileremit-profile");
-lf[22]=C_h_intern(&lf[22],24,"\010compilerno-bound-checks");
-lf[23]=C_h_intern(&lf[23],23,"\010compilerno-argc-checks");
-lf[24]=C_h_intern(&lf[24],28,"\010compilerno-procedure-checks");
-lf[25]=C_h_intern(&lf[25],24,"\010compilersource-filename");
-lf[26]=C_h_intern(&lf[26],26,"\010compilersafe-globals-flag");
-lf[27]=C_h_intern(&lf[27],26,"\010compilerexplicit-use-flag");
-lf[28]=C_h_intern(&lf[28],40,"\010compilerdisable-stack-overflow-checking");
-lf[29]=C_h_intern(&lf[29],29,"\010compilerrequire-imports-flag");
-lf[30]=C_h_intern(&lf[30],27,"\010compileremit-unsafe-marker");
-lf[31]=C_h_intern(&lf[31],30,"\010compilerexternal-protos-first");
-lf[32]=C_h_intern(&lf[32],26,"\010compilerdo-lambda-lifting");
-lf[33]=C_h_intern(&lf[33],24,"\010compilerinline-max-size");
-lf[34]=C_h_intern(&lf[34],26,"\010compileremit-closure-info");
-lf[35]=C_h_intern(&lf[35],33,"\010compilerundefine-shadowed-macros");
-lf[36]=C_h_intern(&lf[36],30,"\010compilerconstant-declarations");
-lf[37]=C_h_intern(&lf[37],28,"\010compilerprofiled-procedures");
-lf[38]=C_h_intern(&lf[38],25,"\010compilerimport-libraries");
-lf[39]=C_h_intern(&lf[39],29,"\010compilerall-import-libraries");
-lf[40]=C_h_intern(&lf[40],30,"\010compilerstandalone-executable");
-lf[41]=C_h_intern(&lf[41],26,"\010compilerlocal-definitions");
-lf[42]=C_h_intern(&lf[42],24,"\010compilerinline-globally");
-lf[43]=C_h_intern(&lf[43],23,"\010compilerinline-locally");
-lf[44]=C_h_intern(&lf[44],27,"\010compilerinline-output-file");
-lf[45]=C_h_intern(&lf[45],22,"\010compilerdo-scrutinize");
-lf[46]=C_h_intern(&lf[46],28,"\010compilerenable-inline-files");
-lf[47]=C_h_intern(&lf[47],32,"\010compilercompiler-syntax-enabled");
-lf[48]=C_h_intern(&lf[48],41,"\010compilerdefault-default-target-heap-size");
-lf[49]=C_h_intern(&lf[49],42,"\010compilerdefault-default-target-stack-size");
-lf[50]=C_h_intern(&lf[50],21,"\010compilerverbose-mode");
-lf[51]=C_h_intern(&lf[51],30,"\010compileroriginal-program-size");
-lf[52]=C_h_intern(&lf[52],29,"\010compilercurrent-program-size");
-lf[53]=C_h_intern(&lf[53],31,"\010compilerline-number-database-2");
-lf[54]=C_h_intern(&lf[54],28,"\010compilerimmutable-constants");
-lf[55]=C_h_intern(&lf[55],21,"\010compilerinline-table");
-lf[56]=C_h_intern(&lf[56],26,"\010compilerinline-table-used");
-lf[57]=C_h_intern(&lf[57],23,"\010compilerconstant-table");
-lf[58]=C_h_intern(&lf[58],23,"\010compilerconstants-used");
-lf[59]=C_h_intern(&lf[59],30,"\010compilerbroken-constant-nodes");
-lf[60]=C_h_intern(&lf[60],37,"\010compilerinline-substitutions-enabled");
-lf[61]=C_h_intern(&lf[61],24,"\010compilerdirect-call-ids");
-lf[62]=C_h_intern(&lf[62],23,"\010compilerfirst-analysis");
-lf[63]=C_h_intern(&lf[63],27,"\010compilerforeign-type-table");
-lf[64]=C_h_intern(&lf[64],26,"\010compilerforeign-variables");
-lf[65]=C_h_intern(&lf[65],29,"\010compilerforeign-lambda-stubs");
-lf[66]=C_h_intern(&lf[66],22,"foreign-callback-stubs");
-lf[67]=C_h_intern(&lf[67],27,"\010compilerexternal-variables");
-lf[68]=C_h_intern(&lf[68],26,"\010compilerloop-lambda-names");
-lf[69]=C_h_intern(&lf[69],28,"\010compilerprofile-lambda-list");
-lf[70]=C_h_intern(&lf[70],29,"\010compilerprofile-lambda-index");
-lf[71]=C_h_intern(&lf[71],33,"\010compilerprofile-info-vector-name");
-lf[72]=C_h_intern(&lf[72],28,"\010compilerexternal-to-pointer");
-lf[73]=C_h_intern(&lf[73],34,"\010compilererror-is-extended-binding");
-lf[74]=C_h_intern(&lf[74],24,"\010compilerreal-name-table");
-lf[75]=C_h_intern(&lf[75],29,"\010compilerlocation-pointer-map");
-lf[76]=C_h_intern(&lf[76],34,"\010compilerpending-canonicalizations");
-lf[77]=C_h_intern(&lf[77],29,"\010compilerdefconstant-bindings");
-lf[78]=C_h_intern(&lf[78],23,"\010compilercallback-names");
-lf[79]=C_h_intern(&lf[79],23,"\010compilertoplevel-scope");
-lf[80]=C_h_intern(&lf[80],27,"\010compilertoplevel-lambda-id");
-lf[81]=C_h_intern(&lf[81],25,"\010compilercsc-control-file");
-lf[82]=C_h_intern(&lf[82],26,"\010compilerdata-declarations");
-lf[83]=C_h_intern(&lf[83],26,"\010compilerfile-requirements");
-lf[84]=C_h_intern(&lf[84],28,"\010compilerpostponed-initforms");
-lf[85]=C_h_intern(&lf[85],28,"\010compilerinitialize-compiler");
-lf[86]=C_h_intern(&lf[86],12,"vector-fill!");
-lf[87]=C_h_intern(&lf[87],11,"make-vector");
-lf[88]=C_h_intern(&lf[88],25,"\010compilermake-random-name");
-lf[89]=C_h_intern(&lf[89],12,"profile-info");
-lf[90]=C_h_intern(&lf[90],32,"\010compilercanonicalize-expression");
-lf[91]=C_h_intern(&lf[91],4,"cdar");
-lf[92]=C_h_intern(&lf[92],4,"caar");
-lf[93]=C_h_intern(&lf[93],7,"\003sysget");
-lf[94]=C_h_intern(&lf[94],16,"\004coremacro-alias");
-lf[95]=C_h_intern(&lf[95],8,"\003sysput!");
-lf[96]=C_h_intern(&lf[96],6,"gensym");
-lf[97]=C_h_intern(&lf[97],23,"\010compilerset-real-name!");
-lf[98]=C_h_intern(&lf[98],5,"quote");
-lf[99]=C_h_intern(&lf[99],19,"\003sysundefined-value");
-lf[100]=C_h_intern(&lf[100],15,"\004coreinline_ref");
-lf[101]=C_h_intern(&lf[101],36,"\010compilerforeign-type-convert-result");
-lf[102]=C_h_intern(&lf[102],30,"\010compilerfinish-foreign-result");
-lf[103]=C_h_intern(&lf[103],27,"\010compilerfinal-foreign-type");
-lf[104]=C_h_intern(&lf[104],19,"\004coreinline_loc_ref");
-lf[105]=C_h_intern(&lf[105],21,"\003sysalias-global-hook");
-lf[106]=C_h_intern(&lf[106],14,"\004coreprimitive");
-lf[107]=C_h_intern(&lf[107],18,"\003syshash-table-ref");
-lf[108]=C_h_intern(&lf[108],18,"\003syscurrent-module");
-lf[109]=C_h_intern(&lf[109],21,"\003sysmacro-environment");
-lf[110]=C_h_intern(&lf[110],22,"\003syscompile-to-closure");
-lf[111]=C_h_intern(&lf[111],28,"\003syscurrent-meta-environment");
-lf[112]=C_h_intern(&lf[112],16,"\003sysdynamic-wind");
-lf[113]=C_h_intern(&lf[113],26,"\003sysmeta-macro-environment");
-lf[114]=C_h_intern(&lf[114],27,"\010compilerunlikely-variables");
-lf[115]=C_h_intern(&lf[115],25,"\010compilercompiler-warning");
-lf[116]=C_h_intern(&lf[116],3,"var");
-lf[117]=C_decode_literal(C_heaptop,"\376B\000\000.reference to variable `~s\047 possibly unintended");
-lf[118]=C_h_intern(&lf[118],8,"keyword\077");
-lf[119]=C_h_intern(&lf[119],12,"syntax-error");
-lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\023illegal atomic form");
-lf[121]=C_h_intern(&lf[121],18,"\010compilerconstant\077");
-lf[122]=C_h_intern(&lf[122],24,"\003syssyntax-error-culprit");
-lf[123]=C_h_intern(&lf[123],2,"if");
-lf[124]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[125]=C_h_intern(&lf[125],16,"\003syscheck-syntax");
-lf[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\002if\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\001\376\001\000\000\001_");
-lf[127]=C_h_intern(&lf[127],16,"\003sysstrip-syntax");
-lf[128]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[129]=C_h_intern(&lf[129],10,"\004corecheck");
-lf[130]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[131]=C_h_intern(&lf[131],14,"\004coreimmutable");
-lf[132]=C_h_intern(&lf[132],22,"\010compilerhide-variable");
-lf[133]=C_h_intern(&lf[133],21,"\010compileralways-bound");
-lf[134]=C_h_intern(&lf[134],9,"\003syserror");
-lf[135]=C_h_intern(&lf[135],10,"alist-cons");
-lf[136]=C_h_intern(&lf[136],1,"c");
-lf[137]=C_h_intern(&lf[137],6,"cadadr");
-lf[138]=C_h_intern(&lf[138],14,"\004coreundefined");
-lf[139]=C_h_intern(&lf[139],5,"caadr");
-lf[140]=C_h_intern(&lf[140],23,"\004corerequire-for-syntax");
-lf[141]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[142]=C_h_intern(&lf[142],10,"lset-union");
-lf[143]=C_h_intern(&lf[143],3,"eq\077");
-lf[144]=C_h_intern(&lf[144],22,"\003syshash-table-update!");
-lf[145]=C_h_intern(&lf[145],14,"dynamic/syntax");
-lf[146]=C_h_intern(&lf[146],11,"\003sysrequire");
-lf[147]=C_h_intern(&lf[147],4,"eval");
-lf[148]=C_h_intern(&lf[148],22,"\004corerequire-extension");
-lf[149]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[150]=C_h_intern(&lf[150],22,"\003sysdo-the-right-thing");
-lf[151]=C_h_intern(&lf[151],10,"\004corebegin");
-lf[152]=C_h_intern(&lf[152],3,"ext");
-lf[153]=C_decode_literal(C_heaptop,"\376B\000\000)extension `~A\047 is currently not installed");
-lf[154]=C_h_intern(&lf[154],18,"\003sysfind-extension");
-lf[155]=C_h_intern(&lf[155],31,"\003syscanonicalize-extension-path");
-lf[156]=C_h_intern(&lf[156],17,"require-extension");
-lf[157]=C_h_intern(&lf[157],8,"feature\077");
-lf[158]=C_h_intern(&lf[158],3,"let");
-lf[159]=C_h_intern(&lf[159],8,"\004corelet");
-lf[160]=C_h_intern(&lf[160],6,"append");
-lf[161]=C_h_intern(&lf[161],21,"\003syscanonicalize-body");
-lf[162]=C_h_intern(&lf[162],4,"cons");
-lf[163]=C_h_intern(&lf[163],6,"unzip1");
-lf[164]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[165]=C_h_intern(&lf[165],6,"letrec");
-lf[166]=C_h_intern(&lf[166],11,"\004coreletrec");
-lf[167]=C_h_intern(&lf[167],10,"\003sysappend");
-lf[168]=C_h_intern(&lf[168],9,"\004coreset!");
-lf[169]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[170]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[171]=C_h_intern(&lf[171],6,"lambda");
-lf[172]=C_h_intern(&lf[172],11,"\004corelambda");
-lf[173]=C_h_intern(&lf[173],30,"\010compilerexpand-profile-lambda");
-lf[174]=C_h_intern(&lf[174],37,"\010compilerprocess-lambda-documentation");
-lf[175]=C_h_intern(&lf[175],5,"begin");
-lf[176]=C_h_intern(&lf[176],3,"all");
-lf[177]=C_h_intern(&lf[177],4,"some");
-lf[178]=C_h_intern(&lf[178],16,"\010compilerprofile");
-lf[179]=C_h_intern(&lf[179],26,"\010compilerbuild-lambda-list");
-lf[180]=C_h_intern(&lf[180],13,"\010compilerposq");
-lf[181]=C_h_intern(&lf[181],30,"\010compilerdecompose-lambda-list");
-lf[182]=C_h_intern(&lf[182],31,"\003sysexpand-extended-lambda-list");
-lf[183]=C_h_intern(&lf[183],25,"\003sysextended-lambda-list\077");
-lf[184]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[185]=C_h_intern(&lf[185],10,"let-syntax");
-lf[186]=C_h_intern(&lf[186],18,"\003syser-transformer");
-lf[187]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012let-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_"
-"\376\377\001\000\000\000\001");
-lf[188]=C_h_intern(&lf[188],13,"letrec-syntax");
-lf[189]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015letrec-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000"
-"\000\001_\376\377\001\000\000\000\001");
-lf[190]=C_h_intern(&lf[190],18,"\004coredefine-syntax");
-lf[191]=C_h_intern(&lf[191],25,"\003sysenable-runtime-macros");
-lf[192]=C_h_intern(&lf[192],23,"\003syscurrent-environment");
-lf[193]=C_h_intern(&lf[193],28,"\003sysextend-macro-environment");
-lf[194]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[195]=C_h_intern(&lf[195],26,"\003sysregister-syntax-export");
-lf[196]=C_h_intern(&lf[196],5,"cdadr");
-lf[197]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[198]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[199]=C_h_intern(&lf[199],27,"\004coredefine-compiler-syntax");
-lf[200]=C_h_intern(&lf[200],11,"\004coresyntax");
-lf[201]=C_h_intern(&lf[201],24,"\010compilercompiler-syntax");
-lf[202]=C_h_intern(&lf[202],8,"\003syscons");
-lf[203]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[204]=C_h_intern(&lf[204],24,"\004corelet-compiler-syntax");
-lf[205]=C_h_intern(&lf[205],12,"dynamic-wind");
-lf[206]=C_h_intern(&lf[206],19,"let-compiler-syntax");
-lf[207]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
-lf[208]=C_h_intern(&lf[208],11,"\004coremodule");
-lf[209]=C_h_intern(&lf[209],29,"\003sysinitial-macro-environment");
-lf[210]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
-lf[211]=C_h_intern(&lf[211],7,"reverse");
-lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\037not generating import library `");
-lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
-lf[214]=C_decode_literal(C_heaptop,"\376B\000\000 \047 because imports did not change");
-lf[215]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
-lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\017\012;; END OF FILE");
-lf[217]=C_h_intern(&lf[217],12,"pretty-print");
-lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\005;;;; ");
-lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\030 - GENERATED BY CHICKEN ");
-lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\020 -*- Scheme -*-\012");
-lf[221]=C_h_intern(&lf[221],15,"chicken-version");
-lf[222]=C_h_intern(&lf[222],19,"with-output-to-file");
-lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\033generating import library `");
-lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
-lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\005\047 ...");
-lf[226]=C_h_intern(&lf[226],9,"read-file");
-lf[227]=C_h_intern(&lf[227],12,"file-exists\077");
-lf[228]=C_h_intern(&lf[228],32,"\003syscompiled-module-registration");
-lf[229]=C_h_intern(&lf[229],13,"string-append");
-lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
-lf[231]=C_h_intern(&lf[231],14,"symbol->string");
-lf[232]=C_h_intern(&lf[232],4,"exit");
-lf[233]=C_h_intern(&lf[233],19,"print-error-message");
-lf[234]=C_h_intern(&lf[234],18,"current-error-port");
-lf[235]=C_h_intern(&lf[235],19,"\003sysfinalize-module");
-lf[236]=C_h_intern(&lf[236],22,"with-exception-handler");
-lf[237]=C_h_intern(&lf[237],30,"call-with-current-continuation");
-lf[238]=C_h_intern(&lf[238],6,"import");
-lf[239]=C_h_intern(&lf[239],17,"import-for-syntax");
-lf[240]=C_h_intern(&lf[240],6,"syntax");
-lf[241]=C_decode_literal(C_heaptop,"\376B\000\000Imodule body of `~s\047 does not begin with `import\047 form - maybe unintended\077");
-lf[242]=C_h_intern(&lf[242],19,"\003sysregister-module");
-lf[243]=C_h_intern(&lf[243],32,"\010compilercanonicalize-begin-body");
-lf[244]=C_h_intern(&lf[244],21,"\003syssyntax-error-hook");
-lf[245]=C_h_intern(&lf[245],6,"module");
-lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
-lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
-lf[248]=C_h_intern(&lf[248],17,"\004corenamed-lambda");
-lf[249]=C_h_intern(&lf[249],16,"\004coreloop-lambda");
-lf[250]=C_h_intern(&lf[250],4,"set!");
-lf[251]=C_h_intern(&lf[251],18,"\004coreinline_update");
-lf[252]=C_h_intern(&lf[252],27,"\010compilerforeign-type-check");
-lf[253]=C_h_intern(&lf[253],38,"\010compilerforeign-type-convert-argument");
-lf[254]=C_h_intern(&lf[254],22,"\004coreinline_loc_update");
-lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment to syntactic identifier");
-lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\032assignment to keyword `~S\047");
-lf[257]=C_h_intern(&lf[257],19,"\003sysundefine-macro!");
-lf[258]=C_decode_literal(C_heaptop,"\376B\000\000+assigned global variable `~S\047 is a macro ~A");
-lf[259]=C_h_intern(&lf[259],17,"get-output-string");
-lf[260]=C_h_intern(&lf[260],5,"write");
-lf[261]=C_h_intern(&lf[261],7,"display");
-lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\010in line ");
-lf[263]=C_h_intern(&lf[263],18,"open-output-string");
-lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[265]=C_h_intern(&lf[265],10,"\003sysmacro\077");
-lf[266]=C_h_intern(&lf[266],34,"\010compileralways-bound-to-procedure");
-lf[267]=C_decode_literal(C_heaptop,"\376B\000\000/assignment to variable `~s\047 possibly unintended");
-lf[268]=C_h_intern(&lf[268],17,"\010compilerget-line");
-lf[269]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[270]=C_h_intern(&lf[270],11,"\004coreinline");
-lf[271]=C_h_intern(&lf[271],20,"\004coreinline_allocate");
-lf[272]=C_h_intern(&lf[272],7,"\003sysmap");
-lf[273]=C_h_intern(&lf[273],19,"\004corecompiletimetoo");
-lf[274]=C_h_intern(&lf[274],23,"\004coreelaborationtimetoo");
-lf[275]=C_h_intern(&lf[275],20,"\004corecompiletimeonly");
-lf[276]=C_h_intern(&lf[276],24,"\004coreelaborationtimeonly");
-lf[277]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[278]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[279]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[280]=C_h_intern(&lf[280],19,"\004coreforeign-lambda");
-lf[281]=C_h_intern(&lf[281],30,"\010compilerexpand-foreign-lambda");
-lf[282]=C_h_intern(&lf[282],24,"\004coreforeign-safe-lambda");
-lf[283]=C_h_intern(&lf[283],20,"\004coreforeign-lambda*");
-lf[284]=C_h_intern(&lf[284],31,"\010compilerexpand-foreign-lambda*");
-lf[285]=C_h_intern(&lf[285],25,"\004coreforeign-safe-lambda*");
-lf[286]=C_h_intern(&lf[286],22,"\004coreforeign-primitive");
-lf[287]=C_h_intern(&lf[287],33,"\010compilerexpand-foreign-primitive");
-lf[288]=C_h_intern(&lf[288],28,"\004coredefine-foreign-variable");
-lf[289]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[290]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[291]=C_h_intern(&lf[291],24,"\004coredefine-foreign-type");
-lf[292]=C_h_intern(&lf[292],6,"define");
-lf[293]=C_h_intern(&lf[293],10,"\003sysvalues");
-lf[294]=C_h_intern(&lf[294],19,"\003syshash-table-set!");
-lf[295]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[296]=C_h_intern(&lf[296],29,"\004coredefine-external-variable");
-lf[297]=C_h_intern(&lf[297],9,"c-pointer");
-lf[298]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
-lf[300]=C_h_intern(&lf[300],5,"fifth");
-lf[301]=C_h_intern(&lf[301],17,"\004corelet-location");
-lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
-lf[303]=C_h_intern(&lf[303],14,"\010compilerwords");
-lf[304]=C_h_intern(&lf[304],46,"\010compilerestimate-foreign-result-location-size");
-lf[305]=C_h_intern(&lf[305],18,"\004coredefine-inline");
-lf[306]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[307]=C_h_intern(&lf[307],6,"cdaddr");
-lf[308]=C_h_intern(&lf[308],20,"\004coredefine-constant");
-lf[309]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[310]=C_h_intern(&lf[310],17,"\010compilerconstant");
-lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\010constant");
-lf[312]=C_h_intern(&lf[312],29,"\010compilercollapsable-literal\077");
-lf[313]=C_h_intern(&lf[313],4,"quit");
-lf[314]=C_decode_literal(C_heaptop,"\376B\000\0008error in constant evaluation of ~S for named constant ~S");
-lf[315]=C_h_intern(&lf[315],12,"\004coredeclare");
-lf[316]=C_h_intern(&lf[316],28,"\010compilerprocess-declaration");
-lf[317]=C_h_intern(&lf[317],29,"\004coreforeign-callback-wrapper");
-lf[318]=C_h_intern(&lf[318],8,"split-at");
-lf[319]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\020nonnull-c-string\376\377\016");
-lf[320]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\031nonnull-unsigned-c-string\376\377\016");
-lf[321]=C_h_intern(&lf[321],25,"nonnull-unsigned-c-string");
-lf[322]=C_h_intern(&lf[322],16,"nonnull-c-string");
-lf[323]=C_h_intern(&lf[323],17,"\003sysmake-c-string");
-lf[324]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\011c-string*\376\377\016");
-lf[325]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\022unsigned-c-string*\376\377\016");
-lf[326]=C_h_intern(&lf[326],18,"unsigned-c-string*");
-lf[327]=C_h_intern(&lf[327],9,"c-string*");
-lf[328]=C_h_intern(&lf[328],13,"c-string-list");
-lf[329]=C_h_intern(&lf[329],14,"c-string-list*");
-lf[330]=C_decode_literal(C_heaptop,"\376B\000\000/not a valid result type for callback procedures");
-lf[331]=C_h_intern(&lf[331],8,"c-string");
-lf[332]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\021unsigned-c-string\376\377\016");
-lf[333]=C_h_intern(&lf[333],17,"unsigned-c-string");
-lf[334]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\010c-string\376\377\016");
-lf[335]=C_h_intern(&lf[335],1,"r");
-lf[336]=C_h_intern(&lf[336],3,"and");
-lf[337]=C_decode_literal(C_heaptop,"\376B\000\000Anon-matching or invalid argument list to foreign callback-wrapper");
-lf[338]=C_decode_literal(C_heaptop,"\376B\000\000<name `~S\047 of external definition is not a valid C identifier");
-lf[339]=C_h_intern(&lf[339],28,"\010compilervalid-c-identifier\077");
-lf[340]=C_h_intern(&lf[340],8,"location");
-lf[341]=C_h_intern(&lf[341],17,"\003sysmake-locative");
-lf[342]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010location\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[343]=C_h_intern(&lf[343],13,"\004corecallunit");
-lf[344]=C_h_intern(&lf[344],37,"\010compilerupdate-line-number-database!");
-lf[345]=C_h_intern(&lf[345],10,"\003sysexpand");
-lf[346]=C_decode_literal(C_heaptop,"\376B\000\000\030) - malformed expression");
-lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\011(in line ");
-lf[348]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
-lf[349]=C_h_intern(&lf[349],31,"\010compileremit-syntax-trace-info");
-lf[350]=C_decode_literal(C_heaptop,"\376B\000\000 literal in operator position: ~S");
-lf[351]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
-lf[352]=C_h_intern(&lf[352],26,"\010compilerinternal-bindings");
-lf[353]=C_h_intern(&lf[353],22,"\003sysclear-trace-buffer");
-lf[354]=C_h_intern(&lf[354],26,"\010compilerdebugging-chicken");
-lf[355]=C_h_intern(&lf[355],7,"newline");
-lf[356]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
-lf[357]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[358]=C_h_intern(&lf[358],4,"uses");
-lf[359]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[360]=C_h_intern(&lf[360],29,"\010compilerstring->c-identifier");
-lf[361]=C_h_intern(&lf[361],18,"\010compilerstringify");
-lf[362]=C_h_intern(&lf[362],6,"static");
-lf[363]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[364]=C_h_intern(&lf[364],17,"register-feature!");
-lf[365]=C_h_intern(&lf[365],4,"unit");
-lf[366]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[367]=C_h_intern(&lf[367],5,"usage");
-lf[368]=C_decode_literal(C_heaptop,"\376B\000\0003unit was already given a name (new name is ignored)");
-lf[369]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[370]=C_h_intern(&lf[370],34,"\010compilerdefault-standard-bindings");
-lf[371]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[372]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[373]=C_h_intern(&lf[373],34,"\010compilerdefault-extended-bindings");
-lf[374]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[375]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[376]=C_h_intern(&lf[376],18,"usual-integrations");
-lf[377]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[378]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[379]=C_h_intern(&lf[379],17,"lset-intersection");
-lf[380]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[381]=C_h_intern(&lf[381],6,"fixnum");
-lf[382]=C_h_intern(&lf[382],17,"fixnum-arithmetic");
-lf[383]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[384]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[385]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[386]=C_h_intern(&lf[386],4,"safe");
-lf[387]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[388]=C_h_intern(&lf[388],15,"no-bound-checks");
-lf[389]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[390]=C_h_intern(&lf[390],14,"no-argc-checks");
-lf[391]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[392]=C_h_intern(&lf[392],19,"no-procedure-checks");
-lf[393]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[394]=C_h_intern(&lf[394],18,"interrupts-enabled");
-lf[395]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[396]=C_h_intern(&lf[396],18,"disable-interrupts");
-lf[397]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[398]=C_h_intern(&lf[398],15,"disable-warning");
-lf[399]=C_h_intern(&lf[399],26,"\010compilerdisabled-warnings");
-lf[400]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[401]=C_h_intern(&lf[401],12,"always-bound");
-lf[402]=C_h_intern(&lf[402],12,"\003sysfor-each");
-lf[403]=C_h_intern(&lf[403],12,"safe-globals");
-lf[404]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[405]=C_h_intern(&lf[405],38,"no-procedure-checks-for-usual-bindings");
-lf[406]=C_h_intern(&lf[406],18,"bound-to-procedure");
-lf[407]=C_h_intern(&lf[407],15,"foreign-declare");
-lf[408]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[409]=C_h_intern(&lf[409],7,"declare");
-lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
-lf[411]=C_h_intern(&lf[411],5,"every");
-lf[412]=C_h_intern(&lf[412],7,"string\077");
-lf[413]=C_h_intern(&lf[413],5,"block");
-lf[414]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[415]=C_h_intern(&lf[415],8,"separate");
-lf[416]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[417]=C_h_intern(&lf[417],20,"keep-shadowed-macros");
-lf[418]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[419]=C_h_intern(&lf[419],6,"unused");
-lf[420]=C_h_intern(&lf[420],15,"\010compilerunused");
-lf[421]=C_h_intern(&lf[421],3,"not");
-lf[422]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[423]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[424]=C_h_intern(&lf[424],15,"lset-difference");
-lf[425]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[426]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[427]=C_h_intern(&lf[427],6,"inline");
-lf[428]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[429]=C_h_intern(&lf[429],2,"no");
-lf[430]=C_h_intern(&lf[430],15,"\010compilerinline");
-lf[431]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[432]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[433]=C_h_intern(&lf[433],13,"inline-global");
-lf[434]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[435]=C_h_intern(&lf[435],22,"\010compilerinline-global");
-lf[436]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[437]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[438]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
-lf[439]=C_h_intern(&lf[439],14,"compile-syntax");
-lf[440]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[441]=C_h_intern(&lf[441],12,"block-global");
-lf[442]=C_h_intern(&lf[442],4,"hide");
-lf[443]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[444]=C_h_intern(&lf[444],6,"export");
-lf[445]=C_h_intern(&lf[445],24,"\010compilerexport-variable");
-lf[446]=C_h_intern(&lf[446],30,"emit-external-prototypes-first");
-lf[447]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[448]=C_h_intern(&lf[448],11,"lambda-lift");
-lf[449]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[450]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[451]=C_h_intern(&lf[451],3,"yes");
-lf[452]=C_h_intern(&lf[452],12,"inline-limit");
-lf[453]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[454]=C_decode_literal(C_heaptop,"\376B\000\0002invalid argument to `inline-limit\047 declaration: ~s");
-lf[455]=C_h_intern(&lf[455],8,"constant");
-lf[456]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[457]=C_decode_literal(C_heaptop,"\376B\000\000/invalid arguments to `constant\047 declaration: ~S");
-lf[458]=C_h_intern(&lf[458],7,"symbol\077");
-lf[459]=C_h_intern(&lf[459],19,"emit-import-library");
-lf[460]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
-lf[462]=C_decode_literal(C_heaptop,"\376B\000\000(invalid import-library specification: ~s");
-lf[463]=C_h_intern(&lf[463],7,"profile");
-lf[464]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[465]=C_h_intern(&lf[465],20,"profiled-propcedures");
-lf[466]=C_h_intern(&lf[466],5,"local");
-lf[467]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[468]=C_h_intern(&lf[468],14,"\010compilerlocal");
-lf[469]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[470]=C_h_intern(&lf[470],4,"type");
-lf[471]=C_h_intern(&lf[471],18,"\004coredeclared-type");
-lf[472]=C_h_intern(&lf[472],9,"\004coretype");
-lf[473]=C_decode_literal(C_heaptop,"\376B\000\000$illegal `type\047 declaration item `~s\047");
-lf[474]=C_h_intern(&lf[474],10,"scrutinize");
-lf[475]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
-lf[477]=C_decode_literal(C_heaptop,"\376B\000\000!invalid declaration specification");
-lf[478]=C_h_intern(&lf[478],17,"make-foreign-stub");
-lf[479]=C_h_intern(&lf[479],12,"foreign-stub");
-lf[480]=C_h_intern(&lf[480],13,"foreign-stub\077");
-lf[481]=C_h_intern(&lf[481],15,"foreign-stub-id");
-lf[482]=C_h_intern(&lf[482],24,"foreign-stub-return-type");
-lf[483]=C_h_intern(&lf[483],17,"foreign-stub-name");
-lf[484]=C_h_intern(&lf[484],27,"foreign-stub-argument-types");
-lf[485]=C_h_intern(&lf[485],27,"foreign-stub-argument-names");
-lf[486]=C_h_intern(&lf[486],17,"foreign-stub-body");
-lf[487]=C_h_intern(&lf[487],16,"foreign-stub-cps");
-lf[488]=C_h_intern(&lf[488],21,"foreign-stub-callback");
-lf[489]=C_h_intern(&lf[489],28,"\010compilercreate-foreign-stub");
-lf[490]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006\003sysgc\376\003\000\000\002\376\377\006\000\376\377\016\376\377\016");
-lf[491]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
-lf[493]=C_h_intern(&lf[493],14,"string->symbol");
-lf[494]=C_h_intern(&lf[494],37,"\010compilerestimate-foreign-result-size");
-lf[495]=C_h_intern(&lf[495],4,"stub");
-lf[496]=C_h_intern(&lf[496],1,"a");
-lf[497]=C_h_intern(&lf[497],13,"list-tabulate");
-lf[498]=C_decode_literal(C_heaptop,"\376B\000\000-name `~s\047 of foreign procedure has wrong type");
-lf[499]=C_h_intern(&lf[499],4,"cadr");
-lf[500]=C_h_intern(&lf[500],3,"car");
-lf[501]=C_h_intern(&lf[501],4,"void");
-lf[502]=C_h_intern(&lf[502],24,"\003sysline-number-database");
-lf[503]=C_h_intern(&lf[503],31,"\010compilerperform-cps-conversion");
-lf[504]=C_h_intern(&lf[504],4,"node");
-lf[505]=C_h_intern(&lf[505],9,"\004corecall");
-lf[506]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[507]=C_h_intern(&lf[507],16,"\010compilervarnode");
-lf[508]=C_h_intern(&lf[508],1,"k");
-lf[509]=C_h_intern(&lf[509],13,"\004corevariable");
-lf[510]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[511]=C_h_intern(&lf[511],2,"f_");
-lf[512]=C_h_intern(&lf[512],1,"t");
-lf[513]=C_h_intern(&lf[513],26,"make-foreign-callback-stub");
-lf[514]=C_h_intern(&lf[514],13,"\010compilerbomb");
-lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\016bad node (cps)");
-lf[516]=C_h_intern(&lf[516],15,"\004coreglobal-ref");
-lf[517]=C_h_intern(&lf[517],5,"cons*");
-lf[518]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\001\000\000\015\004corevariable\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\003\000\000\002\376\001\000\000\017\004coreglo"
-"bal-ref\376\377\016");
-lf[519]=C_h_intern(&lf[519],6,"values");
-lf[520]=C_h_intern(&lf[520],21,"foreign-callback-stub");
-lf[521]=C_h_intern(&lf[521],22,"foreign-callback-stub\077");
-lf[522]=C_h_intern(&lf[522],24,"foreign-callback-stub-id");
-lf[523]=C_h_intern(&lf[523],26,"foreign-callback-stub-name");
-lf[524]=C_h_intern(&lf[524],32,"foreign-callback-stub-qualifiers");
-lf[525]=C_h_intern(&lf[525],33,"foreign-callback-stub-return-type");
-lf[526]=C_h_intern(&lf[526],36,"foreign-callback-stub-argument-types");
-lf[527]=C_h_intern(&lf[527],27,"\010compileranalyze-expression");
-lf[528]=C_h_intern(&lf[528],13,"\010compilerput!");
-lf[529]=C_h_intern(&lf[529],8,"captured");
-lf[530]=C_h_intern(&lf[530],6,"global");
-lf[531]=C_h_intern(&lf[531],12,"\010compilerget");
-lf[532]=C_h_intern(&lf[532],12,"\004corerecurse");
-lf[533]=C_h_intern(&lf[533],17,"\010compilercollect!");
-lf[534]=C_h_intern(&lf[534],10,"call-sites");
-lf[535]=C_h_intern(&lf[535],4,"home");
-lf[536]=C_h_intern(&lf[536],7,"unknown");
-lf[537]=C_h_intern(&lf[537],18,"\004coredirect_lambda");
-lf[538]=C_h_intern(&lf[538],6,"simple");
-lf[539]=C_h_intern(&lf[539],28,"\010compilersimple-lambda-node\077");
-lf[540]=C_h_intern(&lf[540],14,"rest-parameter");
-lf[541]=C_h_intern(&lf[541],4,"list");
-lf[542]=C_h_intern(&lf[542],12,"contained-in");
-lf[543]=C_h_intern(&lf[543],8,"contains");
-lf[544]=C_h_intern(&lf[544],8,"assigned");
-lf[545]=C_h_intern(&lf[545],16,"assigned-locally");
-lf[546]=C_h_intern(&lf[546],15,"potential-value");
-lf[547]=C_h_intern(&lf[547],8,"standard");
-lf[548]=C_h_intern(&lf[548],5,"redef");
-lf[549]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of standard binding `~S\047");
-lf[550]=C_h_intern(&lf[550],8,"extended");
-lf[551]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of extended binding `~S\047");
-lf[552]=C_h_intern(&lf[552],18,"\010compilerintrinsic");
-lf[553]=C_h_intern(&lf[553],9,"\004coreproc");
-lf[554]=C_h_intern(&lf[554],9,"undefined");
-lf[555]=C_h_intern(&lf[555],5,"value");
-lf[556]=C_h_intern(&lf[556],16,"\010compilerget-all");
-lf[557]=C_h_intern(&lf[557],11,"local-value");
-lf[558]=C_h_intern(&lf[558],26,"\010compilervariable-visible\077");
-lf[559]=C_h_intern(&lf[559],10,"references");
-lf[560]=C_h_intern(&lf[560],3,"any");
-lf[561]=C_h_intern(&lf[561],9,"replacing");
-lf[562]=C_h_intern(&lf[562],10,"replacable");
-lf[563]=C_h_intern(&lf[563],9,"removable");
-lf[564]=C_h_intern(&lf[564],37,"\010compilerexpression-has-side-effects\077");
-lf[565]=C_h_intern(&lf[565],21,"has-unused-parameters");
-lf[566]=C_h_intern(&lf[566],13,"explicit-rest");
-lf[567]=C_h_intern(&lf[567],11,"collapsable");
-lf[568]=C_h_intern(&lf[568],12,"contractable");
-lf[569]=C_h_intern(&lf[569],9,"inlinable");
-lf[570]=C_h_intern(&lf[570],28,"\010compilerscan-free-variables");
-lf[571]=C_h_intern(&lf[571],11,"hidden-refs");
-lf[572]=C_h_intern(&lf[572],18,"\010compilerdebugging");
-lf[573]=C_h_intern(&lf[573],1,"i");
-lf[574]=C_decode_literal(C_heaptop,"\376B\000\000>global inlining candidate was assigned and will not be inlined");
-lf[575]=C_h_intern(&lf[575],5,"boxed");
-lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\042global variable `~S\047 is never used");
-lf[577]=C_decode_literal(C_heaptop,"\376B\000\000:local assignment to unused variable `~S\047 may be unintended");
-lf[578]=C_h_intern(&lf[578],23,"\003syshash-table-for-each");
-lf[579]=C_h_intern(&lf[579],1,"p");
-lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis gathering phase...");
-lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis traversal phase...");
-lf[582]=C_h_intern(&lf[582],35,"\010compilerperform-closure-conversion");
-lf[583]=C_h_intern(&lf[583],12,"customizable");
-lf[584]=C_h_intern(&lf[584],11,"lset-adjoin");
-lf[585]=C_h_intern(&lf[585],20,"node-parameters-set!");
-lf[586]=C_decode_literal(C_heaptop,"\376B\000\0009known procedure called with wrong number of arguments: ~A");
-lf[587]=C_h_intern(&lf[587],28,"\010compilersource-info->string");
-lf[588]=C_h_intern(&lf[588],21,"\010compilerllist-length");
-lf[589]=C_h_intern(&lf[589],8,"toplevel");
-lf[590]=C_h_intern(&lf[590],18,"captured-variables");
-lf[591]=C_h_intern(&lf[591],12,"closure-size");
-lf[592]=C_h_intern(&lf[592],10,"\004coreunbox");
-lf[593]=C_h_intern(&lf[593],8,"\004corebox");
-lf[594]=C_h_intern(&lf[594],12,"\004coreclosure");
-lf[595]=C_h_intern(&lf[595],14,"\010compilerqnode");
-lf[596]=C_h_intern(&lf[596],20,"\003sysmake-lambda-info");
-lf[597]=C_h_intern(&lf[597],8,"->string");
-lf[598]=C_h_intern(&lf[598],1,"\077");
-lf[599]=C_h_intern(&lf[599],18,"\010compilerreal-name");
-lf[600]=C_h_intern(&lf[600],10,"fold-right");
-lf[601]=C_h_intern(&lf[601],10,"boxed-rest");
-lf[602]=C_h_intern(&lf[602],6,"filter");
-lf[603]=C_h_intern(&lf[603],16,"\004coreupdatebox_i");
-lf[604]=C_h_intern(&lf[604],14,"\004coreupdatebox");
-lf[605]=C_h_intern(&lf[605],8,"\004coreref");
-lf[606]=C_h_intern(&lf[606],13,"\004coreupdate_i");
-lf[607]=C_h_intern(&lf[607],11,"\004coreupdate");
-lf[608]=C_h_intern(&lf[608],19,"\010compilerimmediate\077");
-lf[609]=C_decode_literal(C_heaptop,"\376B\000\000\023bad node (closure2)");
-lf[610]=C_h_intern(&lf[610],11,"\004coreswitch");
-lf[611]=C_h_intern(&lf[611],9,"\004corecond");
-lf[612]=C_h_intern(&lf[612],16,"\004coredirect_call");
-lf[613]=C_h_intern(&lf[613],11,"\004corereturn");
-lf[614]=C_h_intern(&lf[614],1,"o");
-lf[615]=C_decode_literal(C_heaptop,"\376B\000\000\026calls to known targets");
-lf[616]=C_h_intern(&lf[616],16,"\003sysmake-promise");
-lf[617]=C_decode_literal(C_heaptop,"\376B\000\000*closure conversion transformation phase...");
-lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\027customizable procedures");
-lf[619]=C_decode_literal(C_heaptop,"\376B\000\000%closure conversion gathering phase...");
-lf[620]=C_h_intern(&lf[620],19,"make-lambda-literal");
-lf[621]=C_h_intern(&lf[621],14,"lambda-literal");
-lf[622]=C_h_intern(&lf[622],15,"lambda-literal\077");
-lf[623]=C_h_intern(&lf[623],17,"lambda-literal-id");
-lf[624]=C_h_intern(&lf[624],23,"lambda-literal-external");
-lf[625]=C_h_intern(&lf[625],24,"lambda-literal-arguments");
-lf[626]=C_h_intern(&lf[626],29,"lambda-literal-argument-count");
-lf[627]=C_h_intern(&lf[627],28,"lambda-literal-rest-argument");
-lf[628]=C_h_intern(&lf[628],26,"lambda-literal-temporaries");
-lf[629]=C_h_intern(&lf[629],34,"lambda-literal-unboxed-temporaries");
-lf[630]=C_h_intern(&lf[630],32,"lambda-literal-callee-signatures");
-lf[631]=C_h_intern(&lf[631],24,"lambda-literal-allocated");
-lf[632]=C_h_intern(&lf[632],30,"lambda-literal-directly-called");
-lf[633]=C_h_intern(&lf[633],27,"lambda-literal-closure-size");
-lf[634]=C_h_intern(&lf[634],22,"lambda-literal-looping");
-lf[635]=C_h_intern(&lf[635],27,"lambda-literal-customizable");
-lf[636]=C_h_intern(&lf[636],33,"lambda-literal-rest-argument-mode");
-lf[637]=C_h_intern(&lf[637],19,"lambda-literal-body");
-lf[638]=C_h_intern(&lf[638],21,"lambda-literal-direct");
-lf[639]=C_h_intern(&lf[639],36,"\010compilerprepare-for-code-generation");
-lf[640]=C_h_intern(&lf[640],10,"\004corelocal");
-lf[641]=C_h_intern(&lf[641],12,"\004coreliteral");
-lf[642]=C_h_intern(&lf[642],11,"\004coreglobal");
-lf[643]=C_decode_literal(C_heaptop,"\376B\000\000!identified direct recursive calls");
-lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\021bad direct lambda");
-lf[645]=C_h_intern(&lf[645],4,"none");
-lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\024unused rest argument");
-lf[647]=C_h_intern(&lf[647],7,"butlast");
-lf[648]=C_h_intern(&lf[648],9,"\004corebind");
-lf[649]=C_h_intern(&lf[649],16,"\004corelet_unboxed");
-lf[650]=C_h_intern(&lf[650],13,"\004coresetlocal");
-lf[651]=C_h_intern(&lf[651],16,"\004coresetglobal_i");
-lf[652]=C_h_intern(&lf[652],14,"\004coresetglobal");
-lf[653]=C_h_intern(&lf[653],1,"=");
-lf[654]=C_decode_literal(C_heaptop,"\376B\000\0000coerced inexact literal number `~S\047 to fixnum ~S");
-lf[655]=C_decode_literal(C_heaptop,"\376B\000\000,cannot coerce inexact literal `~S\047 to fixnum");
-lf[656]=C_h_intern(&lf[656],20,"\010compilerbig-fixnum\077");
-lf[657]=C_h_intern(&lf[657],3,"max");
-lf[658]=C_h_intern(&lf[658],10,"list-index");
-lf[659]=C_h_intern(&lf[659],36,"\010compilermake-block-variable-literal");
-lf[660]=C_h_intern(&lf[660],36,"\010compilerblock-variable-literal-name");
-lf[661]=C_h_intern(&lf[661],32,"\010compilerblock-variable-literal\077");
-lf[662]=C_h_intern(&lf[662],14,"\004coreimmediate");
-lf[663]=C_h_intern(&lf[663],3,"fix");
-lf[664]=C_h_intern(&lf[664],4,"bool");
-lf[665]=C_h_intern(&lf[665],4,"char");
-lf[666]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003nil\376\377\016");
-lf[667]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003eof\376\377\016");
-lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\027bad immediate (prepare)");
-lf[669]=C_decode_literal(C_heaptop,"\376B\000\000\027fast global assignments");
-lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\026fast global references");
-lf[671]=C_decode_literal(C_heaptop,"\376B\000\000\030fast box initializations");
-lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\024preparation phase...");
-C_register_lf2(lf,673,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c385 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5088,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k5086 */
-static void C_ccall f_5088(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5088,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k5089 in k5086 */
-static void C_ccall f_5091(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word ab[96],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5091,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! d ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5093,tmp=(C_word)a,a+=2,tmp));
-t3=C_set_block_item(lf[5] /* unit-name */,0,C_SCHEME_FALSE);
-t4=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[7]);
-t5=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
-t6=C_set_block_item(lf[9] /* extended-bindings */,0,C_SCHEME_END_OF_LIST);
-t7=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_TRUE);
-t8=C_set_block_item(lf[11] /* used-units */,0,C_SCHEME_END_OF_LIST);
-t9=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_FALSE);
-t10=C_set_block_item(lf[13] /* foreign-declarations */,0,C_SCHEME_END_OF_LIST);
-t11=C_set_block_item(lf[14] /* emit-trace-info */,0,C_SCHEME_FALSE);
-t12=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_FALSE);
-t13=C_set_block_item(lf[16] /* line-number-database-size */,0,C_fix(997));
-t14=C_set_block_item(lf[17] /* target-heap-size */,0,C_SCHEME_FALSE);
-t15=C_set_block_item(lf[18] /* target-initial-heap-size */,0,C_SCHEME_FALSE);
-t16=C_set_block_item(lf[19] /* target-stack-size */,0,C_SCHEME_FALSE);
-t17=C_set_block_item(lf[20] /* optimize-leaf-routines */,0,C_SCHEME_FALSE);
-t18=C_set_block_item(lf[21] /* emit-profile */,0,C_SCHEME_FALSE);
-t19=C_set_block_item(lf[22] /* no-bound-checks */,0,C_SCHEME_FALSE);
-t20=C_set_block_item(lf[23] /* no-argc-checks */,0,C_SCHEME_FALSE);
-t21=C_set_block_item(lf[24] /* no-procedure-checks */,0,C_SCHEME_FALSE);
-t22=C_set_block_item(lf[25] /* source-filename */,0,C_SCHEME_FALSE);
-t23=C_set_block_item(lf[26] /* safe-globals-flag */,0,C_SCHEME_FALSE);
-t24=C_set_block_item(lf[27] /* explicit-use-flag */,0,C_SCHEME_FALSE);
-t25=C_set_block_item(lf[28] /* disable-stack-overflow-checking */,0,C_SCHEME_FALSE);
-t26=C_set_block_item(lf[29] /* require-imports-flag */,0,C_SCHEME_FALSE);
-t27=C_set_block_item(lf[30] /* emit-unsafe-marker */,0,C_SCHEME_FALSE);
-t28=C_set_block_item(lf[31] /* external-protos-first */,0,C_SCHEME_FALSE);
-t29=C_set_block_item(lf[32] /* do-lambda-lifting */,0,C_SCHEME_FALSE);
-t30=C_set_block_item(lf[33] /* inline-max-size */,0,C_fix(20));
-t31=C_set_block_item(lf[34] /* emit-closure-info */,0,C_SCHEME_TRUE);
-t32=C_set_block_item(lf[35] /* undefine-shadowed-macros */,0,C_SCHEME_TRUE);
-t33=C_set_block_item(lf[36] /* constant-declarations */,0,C_SCHEME_END_OF_LIST);
-t34=C_set_block_item(lf[37] /* profiled-procedures */,0,C_SCHEME_FALSE);
-t35=C_set_block_item(lf[38] /* import-libraries */,0,C_SCHEME_END_OF_LIST);
-t36=C_set_block_item(lf[39] /* all-import-libraries */,0,C_SCHEME_FALSE);
-t37=C_set_block_item(lf[40] /* standalone-executable */,0,C_SCHEME_TRUE);
-t38=C_set_block_item(lf[41] /* local-definitions */,0,C_SCHEME_FALSE);
-t39=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_FALSE);
-t40=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_FALSE);
-t41=C_set_block_item(lf[44] /* inline-output-file */,0,C_SCHEME_FALSE);
-t42=C_set_block_item(lf[45] /* do-scrutinize */,0,C_SCHEME_FALSE);
-t43=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_FALSE);
-t44=C_set_block_item(lf[47] /* compiler-syntax-enabled */,0,C_SCHEME_TRUE);
-t45=C_mutate((C_word*)lf[48]+1 /* (set! default-default-target-heap-size ...) */,C_fix((C_word)C_DEFAULT_TARGET_HEAP_SIZE));
-t46=C_mutate((C_word*)lf[49]+1 /* (set! default-default-target-stack-size ...) */,C_fix((C_word)C_DEFAULT_TARGET_STACK_SIZE));
-t47=C_set_block_item(lf[50] /* verbose-mode */,0,C_SCHEME_FALSE);
-t48=C_set_block_item(lf[51] /* original-program-size */,0,C_SCHEME_FALSE);
-t49=C_set_block_item(lf[52] /* current-program-size */,0,C_fix(0));
-t50=C_set_block_item(lf[53] /* line-number-database-2 */,0,C_SCHEME_FALSE);
-t51=C_set_block_item(lf[54] /* immutable-constants */,0,C_SCHEME_END_OF_LIST);
-t52=C_set_block_item(lf[55] /* inline-table */,0,C_SCHEME_FALSE);
-t53=C_set_block_item(lf[56] /* inline-table-used */,0,C_SCHEME_FALSE);
-t54=C_set_block_item(lf[57] /* constant-table */,0,C_SCHEME_FALSE);
-t55=C_set_block_item(lf[58] /* constants-used */,0,C_SCHEME_FALSE);
-t56=C_set_block_item(lf[59] /* broken-constant-nodes */,0,C_SCHEME_END_OF_LIST);
-t57=C_set_block_item(lf[60] /* inline-substitutions-enabled */,0,C_SCHEME_FALSE);
-t58=C_set_block_item(lf[61] /* direct-call-ids */,0,C_SCHEME_END_OF_LIST);
-t59=C_set_block_item(lf[62] /* first-analysis */,0,C_SCHEME_TRUE);
-t60=C_set_block_item(lf[63] /* foreign-type-table */,0,C_SCHEME_FALSE);
-t61=C_set_block_item(lf[64] /* foreign-variables */,0,C_SCHEME_END_OF_LIST);
-t62=C_set_block_item(lf[65] /* foreign-lambda-stubs */,0,C_SCHEME_END_OF_LIST);
-t63=C_set_block_item(lf[66] /* foreign-callback-stubs */,0,C_SCHEME_END_OF_LIST);
-t64=C_set_block_item(lf[67] /* external-variables */,0,C_SCHEME_END_OF_LIST);
-t65=C_set_block_item(lf[68] /* loop-lambda-names */,0,C_SCHEME_END_OF_LIST);
-t66=C_set_block_item(lf[69] /* profile-lambda-list */,0,C_SCHEME_END_OF_LIST);
-t67=C_set_block_item(lf[70] /* profile-lambda-index */,0,C_fix(0));
-t68=C_set_block_item(lf[71] /* profile-info-vector-name */,0,C_SCHEME_FALSE);
-t69=C_set_block_item(lf[72] /* external-to-pointer */,0,C_SCHEME_END_OF_LIST);
-t70=C_set_block_item(lf[73] /* error-is-extended-binding */,0,C_SCHEME_FALSE);
-t71=C_set_block_item(lf[74] /* real-name-table */,0,C_SCHEME_FALSE);
-t72=C_set_block_item(lf[75] /* location-pointer-map */,0,C_SCHEME_END_OF_LIST);
-t73=C_set_block_item(lf[76] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
-t74=C_set_block_item(lf[77] /* defconstant-bindings */,0,C_SCHEME_END_OF_LIST);
-t75=C_set_block_item(lf[78] /* callback-names */,0,C_SCHEME_END_OF_LIST);
-t76=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_TRUE);
-t77=C_set_block_item(lf[80] /* toplevel-lambda-id */,0,C_SCHEME_FALSE);
-t78=C_set_block_item(lf[81] /* csc-control-file */,0,C_SCHEME_FALSE);
-t79=C_set_block_item(lf[82] /* data-declarations */,0,C_SCHEME_END_OF_LIST);
-t80=C_set_block_item(lf[83] /* file-requirements */,0,C_SCHEME_FALSE);
-t81=C_set_block_item(lf[84] /* postponed-initforms */,0,C_SCHEME_END_OF_LIST);
-t82=C_mutate((C_word*)lf[85]+1 /* (set! initialize-compiler ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5187,tmp=(C_word)a,a+=2,tmp));
-t83=C_mutate((C_word*)lf[90]+1 /* (set! canonicalize-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5248,tmp=(C_word)a,a+=2,tmp));
-t84=C_mutate((C_word*)lf[316]+1 /* (set! process-declaration ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10414,tmp=(C_word)a,a+=2,tmp));
-t85=C_mutate((C_word*)lf[478]+1 /* (set! make-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12024,tmp=(C_word)a,a+=2,tmp));
-t86=C_mutate((C_word*)lf[480]+1 /* (set! foreign-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12030,tmp=(C_word)a,a+=2,tmp));
-t87=C_mutate((C_word*)lf[481]+1 /* (set! foreign-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12036,tmp=(C_word)a,a+=2,tmp));
-t88=C_mutate((C_word*)lf[482]+1 /* (set! foreign-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12045,tmp=(C_word)a,a+=2,tmp));
-t89=C_mutate((C_word*)lf[483]+1 /* (set! foreign-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12054,tmp=(C_word)a,a+=2,tmp));
-t90=C_mutate((C_word*)lf[484]+1 /* (set! foreign-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12063,tmp=(C_word)a,a+=2,tmp));
-t91=C_mutate((C_word*)lf[485]+1 /* (set! foreign-stub-argument-names ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12072,tmp=(C_word)a,a+=2,tmp));
-t92=C_mutate((C_word*)lf[486]+1 /* (set! foreign-stub-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12081,tmp=(C_word)a,a+=2,tmp));
-t93=C_mutate((C_word*)lf[487]+1 /* (set! foreign-stub-cps ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12090,tmp=(C_word)a,a+=2,tmp));
-t94=C_mutate((C_word*)lf[488]+1 /* (set! foreign-stub-callback ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12099,tmp=(C_word)a,a+=2,tmp));
-t95=C_mutate((C_word*)lf[489]+1 /* (set! create-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12108,tmp=(C_word)a,a+=2,tmp));
-t96=C_mutate((C_word*)lf[281]+1 /* (set! expand-foreign-lambda ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12359,tmp=(C_word)a,a+=2,tmp));
-t97=C_mutate((C_word*)lf[284]+1 /* (set! expand-foreign-lambda* ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12396,tmp=(C_word)a,a+=2,tmp));
-t98=C_mutate((C_word*)lf[287]+1 /* (set! expand-foreign-primitive ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12495,tmp=(C_word)a,a+=2,tmp));
-t99=C_mutate((C_word*)lf[344]+1 /* (set! update-line-number-database! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12634,tmp=(C_word)a,a+=2,tmp));
-t100=C_mutate((C_word*)lf[503]+1 /* (set! perform-cps-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12724,tmp=(C_word)a,a+=2,tmp));
-t101=C_mutate((C_word*)lf[513]+1 /* (set! make-foreign-callback-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13583,tmp=(C_word)a,a+=2,tmp));
-t102=C_mutate((C_word*)lf[521]+1 /* (set! foreign-callback-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13589,tmp=(C_word)a,a+=2,tmp));
-t103=C_mutate((C_word*)lf[522]+1 /* (set! foreign-callback-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13595,tmp=(C_word)a,a+=2,tmp));
-t104=C_mutate((C_word*)lf[523]+1 /* (set! foreign-callback-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13604,tmp=(C_word)a,a+=2,tmp));
-t105=C_mutate((C_word*)lf[524]+1 /* (set! foreign-callback-stub-qualifiers ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13613,tmp=(C_word)a,a+=2,tmp));
-t106=C_mutate((C_word*)lf[525]+1 /* (set! foreign-callback-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13622,tmp=(C_word)a,a+=2,tmp));
-t107=C_mutate((C_word*)lf[526]+1 /* (set! foreign-callback-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13631,tmp=(C_word)a,a+=2,tmp));
-t108=C_mutate((C_word*)lf[527]+1 /* (set! analyze-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13640,tmp=(C_word)a,a+=2,tmp));
-t109=C_mutate((C_word*)lf[582]+1 /* (set! perform-closure-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15586,tmp=(C_word)a,a+=2,tmp));
-t110=C_mutate((C_word*)lf[620]+1 /* (set! make-lambda-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17346,tmp=(C_word)a,a+=2,tmp));
-t111=C_mutate((C_word*)lf[622]+1 /* (set! lambda-literal? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17352,tmp=(C_word)a,a+=2,tmp));
-t112=C_mutate((C_word*)lf[623]+1 /* (set! lambda-literal-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17358,tmp=(C_word)a,a+=2,tmp));
-t113=C_mutate((C_word*)lf[624]+1 /* (set! lambda-literal-external ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17367,tmp=(C_word)a,a+=2,tmp));
-t114=C_mutate((C_word*)lf[625]+1 /* (set! lambda-literal-arguments ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17376,tmp=(C_word)a,a+=2,tmp));
-t115=C_mutate((C_word*)lf[626]+1 /* (set! lambda-literal-argument-count ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17385,tmp=(C_word)a,a+=2,tmp));
-t116=C_mutate((C_word*)lf[627]+1 /* (set! lambda-literal-rest-argument ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17394,tmp=(C_word)a,a+=2,tmp));
-t117=C_mutate((C_word*)lf[628]+1 /* (set! lambda-literal-temporaries ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17403,tmp=(C_word)a,a+=2,tmp));
-t118=C_mutate((C_word*)lf[629]+1 /* (set! lambda-literal-unboxed-temporaries ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17412,tmp=(C_word)a,a+=2,tmp));
-t119=C_mutate((C_word*)lf[630]+1 /* (set! lambda-literal-callee-signatures ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17421,tmp=(C_word)a,a+=2,tmp));
-t120=C_mutate((C_word*)lf[631]+1 /* (set! lambda-literal-allocated ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17430,tmp=(C_word)a,a+=2,tmp));
-t121=C_mutate((C_word*)lf[632]+1 /* (set! lambda-literal-directly-called ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17439,tmp=(C_word)a,a+=2,tmp));
-t122=C_mutate((C_word*)lf[633]+1 /* (set! lambda-literal-closure-size ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17448,tmp=(C_word)a,a+=2,tmp));
-t123=C_mutate((C_word*)lf[634]+1 /* (set! lambda-literal-looping ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17457,tmp=(C_word)a,a+=2,tmp));
-t124=C_mutate((C_word*)lf[635]+1 /* (set! lambda-literal-customizable ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17466,tmp=(C_word)a,a+=2,tmp));
-t125=C_mutate((C_word*)lf[636]+1 /* (set! lambda-literal-rest-argument-mode ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17475,tmp=(C_word)a,a+=2,tmp));
-t126=C_mutate((C_word*)lf[637]+1 /* (set! lambda-literal-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17484,tmp=(C_word)a,a+=2,tmp));
-t127=C_mutate((C_word*)lf[638]+1 /* (set! lambda-literal-direct ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17493,tmp=(C_word)a,a+=2,tmp));
-t128=C_mutate((C_word*)lf[639]+1 /* (set! prepare-for-code-generation ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17502,tmp=(C_word)a,a+=2,tmp));
-t129=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t129+1)))(2,t129,C_SCHEME_UNDEFINED);}
-
-/* ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word ab[95],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_17502,4,t0,t1,t2,t3);}
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_fix(0);
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_END_OF_LIST;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_fix(0);
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_fix(0);
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_END_OF_LIST;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_fix(0);
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_fix(0);
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_fix(0);
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=C_SCHEME_UNDEFINED;
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_SCHEME_UNDEFINED;
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=C_SCHEME_UNDEFINED;
-t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
-t32=C_SCHEME_UNDEFINED;
-t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
-t34=C_SCHEME_UNDEFINED;
-t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
-t36=C_SCHEME_UNDEFINED;
-t37=(*a=C_VECTOR_TYPE|1,a[1]=t36,tmp=(C_word)a,a+=2,tmp);
-t38=C_SCHEME_UNDEFINED;
-t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
-t40=C_SCHEME_UNDEFINED;
-t41=(*a=C_VECTOR_TYPE|1,a[1]=t40,tmp=(C_word)a,a+=2,tmp);
-t42=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17505,a[2]=t29,a[3]=t35,tmp=(C_word)a,a+=4,tmp));
-t43=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17556,a[2]=t3,a[3]=t23,a[4]=t35,a[5]=t39,tmp=(C_word)a,a+=6,tmp));
-t44=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_17629,a[2]=t41,a[3]=t25,a[4]=t35,a[5]=t39,a[6]=t3,a[7]=t9,a[8]=t17,a[9]=t19,a[10]=t13,a[11]=t11,a[12]=t21,a[13]=t31,a[14]=t33,a[15]=t15,a[16]=t29,a[17]=t27,tmp=(C_word)a,a+=18,tmp));
-t45=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18752,a[2]=t31,tmp=(C_word)a,a+=3,tmp));
-t46=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18798,a[2]=t7,a[3]=t5,a[4]=t37,a[5]=t41,tmp=(C_word)a,a+=6,tmp));
-t47=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18878,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t48=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18892,a[2]=t5,a[3]=t37,tmp=(C_word)a,a+=4,tmp));
-t49=C_set_block_item(t41,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_18924,tmp=(C_word)a,a+=2,tmp));
-t50=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19009,a[2]=t2,a[3]=t31,a[4]=t21,a[5]=t23,a[6]=t25,a[7]=t9,a[8]=t7,a[9]=t5,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 2668 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t50,lf[579],lf[672]);}
-
-/* k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_19009(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19009,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19012,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2669 walk");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_17629(t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
-
-/* k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_19012(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19012,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19015,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2670 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[671],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_19015(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19015,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19018,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2671 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[670],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k19016 in k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_19018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19018,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19021,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2672 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[669],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k19019 in k19016 in k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_19021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2673 values");
-C_values(6,0,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* immediate-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18924(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18924,NULL,2,t1,t2);}
-t3=C_retrieve(lf[99]);
-t4=C_eqp(t3,t2);
-if(C_truep(t4)){
-t5=t1;
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[138],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
-else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18951,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fixnump(t2))){
-t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[663],t6);
-t8=t1;
-t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
-else{
-if(C_truep(C_booleanp(t2))){
-t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[664],t6);
-t8=t1;
-t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
-else{
-if(C_truep(C_charp(t2))){
-t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[665],t6);
-t8=t1;
-t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
-else{
-if(C_truep(C_i_nullp(t2))){
-t6=t1;
-t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[662],lf[666],C_SCHEME_END_OF_LIST));}
-else{
-if(C_truep(C_eofp(t2))){
-t6=t1;
-t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[662],lf[667],C_SCHEME_END_OF_LIST));}
-else{
-C_trace("compiler.scm: 2665 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),t5,lf[668]);}}}}}}}
-
-/* k18949 in immediate-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18951,2,t0,t1);}
-t2=((C_word*)t0)[2];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[662],t1,C_SCHEME_END_OF_LIST));}
-
-/* blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18892(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18892,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18896,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18908,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2649 list-index");
-((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18908(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18908,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18915,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2651 block-variable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[661]))(3,*((C_word*)lf[661]+1),t3,t2);}
-
-/* k18913 in a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18915,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18922,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2652 block-variable-literal-name");
-((C_proc3)C_retrieve_symbol_proc(lf[660]))(3,*((C_word*)lf[660]+1),t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k18920 in k18913 in a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18922(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_eqp(((C_word*)t0)[2],t1));}
-
-/* k18894 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18896,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18906,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2654 make-block-variable-literal");
-((C_proc3)C_retrieve_symbol_proc(lf[659]))(3,*((C_word*)lf[659]+1),t2,((C_word*)t0)[2]);}}
-
-/* k18904 in k18894 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18906(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2654 new-literal");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_18878(t2,((C_word*)t0)[2],t1);}
-
-/* new-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18878(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18878,NULL,3,t0,t1,t2);}
-t3=C_i_length(((C_word*)((C_word*)t0)[2])[1]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18886,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t5=C_a_i_list(&a,1,t2);
-C_trace("compiler.scm: 2645 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)((C_word*)t0)[2])[1],t5);}
-
-/* k18884 in new-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18798(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18798,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18805,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2629 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t3,t2);}
-
-/* k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18805,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 2629 immediate-literal");
-f_18924(((C_word*)t0)[6],((C_word*)t0)[5]);}
-else{
-if(C_truep(C_i_numberp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18817,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_inexactp(((C_word*)t0)[5]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18831,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2632 list-index");
-((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t2,t3,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-C_trace("compiler.scm: 2634 new-literal");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_18878(t3,((C_word*)t0)[6],((C_word*)t0)[5]);}}
-else{
-if(C_truep(C_lambdainfop(((C_word*)t0)[5]))){
-t2=C_i_length(((C_word*)((C_word*)t0)[2])[1]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18857,a[2]=t2,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t4=C_a_i_list(&a,1,((C_word*)t0)[5]);
-C_trace("compiler.scm: 2638 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)((C_word*)t0)[2])[1],t4);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18867,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2640 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t2,((C_word*)t0)[5],((C_word*)((C_word*)t0)[3])[1]);}}}}
-
-/* k18865 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-C_trace("compiler.scm: 2641 new-literal");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_18878(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k18855 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[2],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18857,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_vector(&a,1,((C_word*)t0)[2]));}
-
-/* a18830 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18831(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18831,3,t0,t1,t2);}
-if(C_truep(C_i_numberp(t2))){
-if(C_truep(C_i_inexactp(t2))){
-t3=((C_word*)t0)[2];
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_eqp(t3,t4));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k18815 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-C_trace("compiler.scm: 2634 new-literal");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_18878(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18752(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18752,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18758,a[2]=t7,a[3]=t11,a[4]=t9,a[5]=t5,a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[2],tmp=(C_word)a,a+=9,tmp));
-t13=((C_word*)t11)[1];
-f_18758(t13,t1,t2);}
-
-/* loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18758(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18758,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18785,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18792,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g49014902");
-t6=t3;
-f_18785(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k18790 in loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18792,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop48854898");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_18758(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop48854898");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_18758(t6,((C_word*)t0)[3],t5);}}
-
-/* g4901 in loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18785(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18785,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2626 walk");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17629(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word *a;
-loop:
-a=C_alloc(18);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_17629,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=t2;
-t7=C_slot(t6,C_fix(3));
-t8=t2;
-t9=C_slot(t8,C_fix(2));
-t10=t2;
-t11=C_slot(t10,C_fix(1));
-t12=C_eqp(t11,lf[138]);
-t13=(C_truep(t12)?t12:C_eqp(t11,lf[553]));
-if(C_truep(t13)){
-t14=t2;
-t15=t1;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,t14);}
-else{
-t14=C_eqp(t11,lf[509]);
-if(C_truep(t14)){
-t15=C_i_car(t9);
-C_trace("compiler.scm: 2419 walk-var");
-t16=((C_word*)((C_word*)t0)[17])[1];
-f_17505(t16,t1,t15,t3,C_SCHEME_FALSE);}
-else{
-t15=C_eqp(t11,lf[516]);
-if(C_truep(t15)){
-t16=C_i_car(t9);
-C_trace("compiler.scm: 2422 walk-global");
-t17=((C_word*)((C_word*)t0)[16])[1];
-f_17556(t17,t1,t16,C_SCHEME_TRUE);}
-else{
-t16=C_eqp(t11,lf[612]);
-if(C_truep(t16)){
-t17=C_i_cadddr(t9);
-t18=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t17);
-t19=C_mutate(((C_word *)((C_word*)t0)[15])+1,t18);
-t20=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17711,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2426 mapwalk");
-t21=((C_word*)((C_word*)t0)[14])[1];
-f_18752(t21,t20,t7,t3,t4,t5);}
-else{
-t17=C_eqp(t11,lf[271]);
-if(C_truep(t17)){
-t18=C_i_cadr(t9);
-t19=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t18);
-t20=C_mutate(((C_word *)((C_word*)t0)[15])+1,t19);
-t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17737,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2430 mapwalk");
-t22=((C_word*)((C_word*)t0)[14])[1];
-f_18752(t22,t21,t7,t3,t4,t5);}
-else{
-t18=C_eqp(t11,lf[100]);
-if(C_truep(t18)){
-t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17763,a[2]=t9,a[3]=t11,a[4]=t1,a[5]=((C_word*)t0)[15],tmp=(C_word)a,a+=6,tmp);
-t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17767,a[2]=t19,tmp=(C_word)a,a+=3,tmp);
-t21=C_i_cadr(t9);
-C_trace("compiler.scm: 2433 estimate-foreign-result-size");
-((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t20,t21);}
-else{
-t19=C_eqp(t11,lf[104]);
-if(C_truep(t19)){
-t20=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17797,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[14],a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
-t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17801,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
-t22=C_i_car(t9);
-C_trace("compiler.scm: 2437 estimate-foreign-result-size");
-((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t21,t22);}
-else{
-t20=C_eqp(t11,lf[594]);
-if(C_truep(t20)){
-t21=C_i_car(t9);
-t22=C_fixnum_plus(C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t21),C_fix(1));
-t23=C_mutate(((C_word *)((C_word*)t0)[15])+1,t22);
-t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17827,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2442 mapwalk");
-t25=((C_word*)((C_word*)t0)[14])[1];
-f_18752(t25,t24,t7,t3,t4,t5);}
-else{
-t21=C_eqp(t11,lf[593]);
-if(C_truep(t21)){
-t22=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],C_fix(2));
-t23=C_mutate(((C_word *)((C_word*)t0)[15])+1,t22);
-t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17857,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t25=C_i_car(t7);
-C_trace("compiler.scm: 2446 walk");
-t105=t24;
-t106=t25;
-t107=t3;
-t108=t4;
-t109=t5;
-t1=t105;
-t2=t106;
-t3=t107;
-t4=t108;
-t5=t109;
-goto loop;}
-else{
-t22=C_eqp(t11,lf[604]);
-if(C_truep(t22)){
-t23=C_i_car(t7);
-t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17873,a[2]=t5,a[3]=t23,a[4]=t11,a[5]=t1,a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2450 mapwalk");
-t25=((C_word*)((C_word*)t0)[14])[1];
-f_18752(t25,t24,t7,t3,t4,t5);}
-else{
-t23=C_eqp(t11,lf[172]);
-t24=(C_truep(t23)?t23:C_eqp(t11,lf[537]));
-if(C_truep(t24)){
-t25=((C_word*)((C_word*)t0)[11])[1];
-t26=((C_word*)((C_word*)t0)[10])[1];
-t27=((C_word*)((C_word*)t0)[9])[1];
-t28=((C_word*)((C_word*)t0)[8])[1];
-t29=((C_word*)((C_word*)t0)[15])[1];
-t30=C_eqp(t11,lf[537]);
-t31=C_set_block_item(((C_word*)t0)[11],0,C_fix(0));
-t32=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_END_OF_LIST);
-t33=C_set_block_item(((C_word*)t0)[15],0,C_fix(0));
-t34=C_set_block_item(((C_word*)t0)[9],0,C_SCHEME_END_OF_LIST);
-t35=C_set_block_item(((C_word*)t0)[8],0,C_fix(0));
-t36=C_i_caddr(t9);
-t37=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_17946,a[2]=((C_word*)t0)[13],a[3]=t7,a[4]=((C_word*)t0)[6],a[5]=t30,a[6]=t27,a[7]=((C_word*)t0)[9],a[8]=t29,a[9]=((C_word*)t0)[15],a[10]=t26,a[11]=((C_word*)t0)[10],a[12]=t25,a[13]=((C_word*)t0)[11],a[14]=t28,a[15]=((C_word*)t0)[8],a[16]=((C_word*)t0)[7],a[17]=t9,tmp=(C_word)a,a+=18,tmp);
-C_trace("compiler.scm: 2472 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t1,t36,t37);}
-else{
-t25=C_eqp(t11,lf[158]);
-if(C_truep(t25)){
-t26=C_i_car(t9);
-t27=C_i_car(t7);
-t28=C_slot(t27,C_fix(1));
-t29=C_eqp(lf[593],t28);
-t30=(C_truep(t29)?C_a_i_list(&a,1,t26):C_SCHEME_END_OF_LIST);
-t31=C_fixnum_increase(((C_word*)((C_word*)t0)[11])[1]);
-t32=C_mutate(((C_word *)((C_word*)t0)[11])+1,t31);
-t33=C_a_i_list(&a,1,C_fix(1));
-t34=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18135,a[2]=t9,a[3]=t3,a[4]=t5,a[5]=t30,a[6]=t4,a[7]=((C_word*)t0)[13],a[8]=t7,a[9]=t33,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 2530 walk");
-t105=t34;
-t106=t27;
-t107=t3;
-t108=t4;
-t109=t5;
-t1=t105;
-t2=t106;
-t3=t107;
-t4=t108;
-t5=t109;
-goto loop;}
-else{
-t26=C_eqp(t11,lf[649]);
-if(C_truep(t26)){
-t27=C_i_car(t9);
-t28=C_i_car(t7);
-t29=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18182,a[2]=t28,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[13],a[7]=t7,a[8]=t9,a[9]=t1,a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t30=C_i_cadr(t9);
-C_trace("compiler.scm: 2536 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t29,t27,t30,((C_word*)((C_word*)t0)[10])[1]);}
-else{
-t27=C_eqp(t11,lf[250]);
-if(C_truep(t27)){
-t28=C_i_car(t9);
-t29=C_i_car(t7);
-t30=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18225,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,a[6]=t28,a[7]=t1,a[8]=t5,a[9]=t4,a[10]=t3,a[11]=t29,a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-C_trace("compiler.scm: 2545 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t30,t28,t3);}
-else{
-t28=C_eqp(t11,lf[505]);
-if(C_truep(t28)){
-t29=C_i_cdr(t7);
-t30=C_i_length(t29);
-t31=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_18383,a[2]=((C_word*)t0)[8],a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t7,a[7]=((C_word*)t0)[14],a[8]=t9,a[9]=t11,a[10]=t1,a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 2569 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t31,*((C_word*)lf[653]+1),((C_word*)((C_word*)t0)[9])[1],t30);}
-else{
-t29=C_eqp(t11,lf[532]);
-if(C_truep(t29)){
-t30=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18432,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[14],a[7]=t9,a[8]=t11,a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(C_i_car(t9))){
-t31=C_fixnum_increase(((C_word*)((C_word*)t0)[8])[1]);
-t32=C_mutate(((C_word *)((C_word*)t0)[8])+1,t31);
-t33=t30;
-f_18432(t33,t32);}
-else{
-t31=t30;
-f_18432(t31,C_SCHEME_UNDEFINED);}}
-else{
-t30=C_eqp(t11,lf[98]);
-if(C_truep(t30)){
-t31=C_i_car(t9);
-t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18466,a[2]=((C_word*)t0)[4],a[3]=t31,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnump(t31))){
-t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18565,a[2]=t32,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2580 big-fixnum?");
-((C_proc3)C_retrieve_symbol_proc(lf[656]))(3,*((C_word*)lf[656]+1),t33,t31);}
-else{
-t33=t32;
-f_18466(t33,C_SCHEME_FALSE);}}
-else{
-t31=C_eqp(t11,lf[123]);
-t32=(C_truep(t31)?t31:C_eqp(t11,lf[611]));
-if(C_truep(t32)){
-t33=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18577,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[13],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
-t34=C_i_car(t7);
-C_trace("compiler.scm: 2595 walk");
-t105=t33;
-t106=t34;
-t107=t3;
-t108=t4;
-t109=t5;
-t1=t105;
-t2=t106;
-t3=t107;
-t4=t108;
-t5=t109;
-goto loop;}
-else{
-t33=C_eqp(t11,lf[610]);
-if(C_truep(t33)){
-t34=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18632,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[13],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
-t35=C_i_car(t7);
-C_trace("compiler.scm: 2604 walk");
-t105=t34;
-t106=t35;
-t107=t3;
-t108=t4;
-t109=t5;
-t1=t105;
-t2=t106;
-t3=t107;
-t4=t108;
-t5=t109;
-goto loop;}
-else{
-t34=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18741,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2623 mapwalk");
-t35=((C_word*)((C_word*)t0)[14])[1];
-f_18752(t35,t34,t7,t3,t4,t5);}}}}}}}}}}}}}}}}}}}}
-
-/* k18739 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18741(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18741,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18632(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18632,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[10])[1];
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18648,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=C_i_car(((C_word*)t0)[7]);
-t5=C_i_cdr(((C_word*)t0)[6]);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18658,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp));
-t9=((C_word*)t7)[1];
-f_18658(t9,t3,t4,t5,C_fix(0));}
-
-/* loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18658(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18658,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t6=C_eqp(t2,C_fix(0));
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18669,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t8=C_i_car(t3);
-C_trace("compiler.scm: 2614 walk");
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_17629(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18691,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t4,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[2],a[10]=t3,a[11]=t2,a[12]=t1,tmp=(C_word)a,a+=13,tmp);
-t8=C_i_car(t3);
-C_trace("compiler.scm: 2617 walk");
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_17629(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18691(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18691,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18694,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cadr(((C_word*)t0)[10]);
-C_trace("compiler.scm: 2618 walk");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18694(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18694,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18701,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-t3=C_fixnum_decrease(((C_word*)t0)[7]);
-t4=C_i_cddr(((C_word*)t0)[6]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18713,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t6=C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]);
-C_trace("compiler.scm: 2621 max");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t5,t6,((C_word*)t0)[2]);}
-
-/* k18711 in k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2621 loop");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_18658(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k18699 in k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2619 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[517]))(5,*((C_word*)lf[517]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k18667 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18669,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18680,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[5]);
-C_trace("compiler.scm: 2615 max");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t2,((C_word*)t0)[2],t3);}
-
-/* k18678 in k18667 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18680,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)t0)[5],t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_list(&a,1,((C_word*)t0)[2]));}
-
-/* k18646 in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18648(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18648,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=((C_word*)t0)[4];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-
-/* k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18577(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18577,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[10])[1];
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18580,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=t2,a[12]=((C_word*)t0)[10],tmp=(C_word)a,a+=13,tmp);
-t4=C_i_cadr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2597 walk");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18580(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18580,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[12])[1];
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18583,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t1,a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-t4=C_i_caddr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2599 walk");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18581 in k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18583(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18583,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18603,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=C_fixnum_difference(((C_word*)((C_word*)t0)[8])[1],((C_word*)t0)[2]);
-t4=C_fixnum_difference(((C_word*)t0)[2],((C_word*)t0)[9]);
-C_trace("compiler.scm: 2600 max");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t2,t3,t4);}
-
-/* k18601 in k18581 in k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18603(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18603,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)t0)[9],t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,t2);
-t4=C_a_i_list(&a,3,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);
-t5=((C_word*)t0)[4];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t4));}
-
-/* k18563 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_18466(t2,C_i_not(t1));}
-
-/* k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18466(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18466,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 2581 immediate-literal");
-f_18924(((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-if(C_truep(C_i_numberp(((C_word*)t0)[3]))){
-t2=C_eqp(lf[381],*((C_word*)lf[6]+1));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18487,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18514,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2584 big-fixnum?");
-((C_proc3)C_retrieve_symbol_proc(lf[656]))(3,*((C_word*)lf[656]+1),t4,((C_word*)t0)[3]);}
-else{
-t4=t3;
-f_18487(t4,C_SCHEME_FALSE);}}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18530,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2590 literal");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_18798(t4,t3,((C_word*)t0)[3]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18536,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2591 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t2,((C_word*)t0)[3]);}}}
-
-/* k18534 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18536,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 2591 immediate-literal");
-f_18924(((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18555,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2592 literal");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18798(t3,t2,((C_word*)t0)[3]);}}
-
-/* k18553 in k18534 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18555,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
-
-/* k18528 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18530,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
-
-/* k18512 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_18487(t2,C_i_not(t1));}
-
-/* k18485 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18487(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18487,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_inexact_to_exact(((C_word*)t0)[4]);
-C_trace("compiler.scm: 2585 compiler-warning");
-((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),t2,lf[470],lf[654],((C_word*)t0)[4],t3);}
-else{
-C_trace("compiler.scm: 2589 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[655],((C_word*)t0)[4]);}}
-
-/* k18488 in k18485 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_inexact_to_exact(((C_word*)t0)[4]);
-C_trace("compiler.scm: 2588 immediate-literal");
-f_18924(((C_word*)t0)[2],t2);}
-
-/* k18430 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18432(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18432,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18444,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2576 mapwalk");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_18752(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18442 in k18430 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18444,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18383,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[11])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18386,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18401,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=C_i_length(((C_word*)t0)[8]);
-if(C_truep(C_fixnum_greater_or_equal_p(t5,C_fix(3)))){
-t6=C_i_caddr(((C_word*)t0)[8]);
-t7=t4;
-f_18401(t7,C_eqp(((C_word*)t0)[4],t6));}
-else{
-t6=t4;
-f_18401(t6,C_SCHEME_FALSE);}}
-
-/* k18399 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18401(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_fixnum_increase(((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-f_18386(t4,t3);}
-else{
-t2=((C_word*)t0)[2];
-f_18386(t2,C_SCHEME_UNDEFINED);}}
-
-/* k18384 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18386(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18386,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18398,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2572 mapwalk");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_18752(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18396 in k18384 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18398,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18225,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18229,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-C_trace("g47284729");
-t3=t2;
-f_18229(t3,((C_word*)t0)[7],t1);}
-else{
-t2=C_slot(((C_word*)t0)[11],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18264,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[6],a[13]=t2,tmp=(C_word)a,a+=14,tmp);
-t4=*((C_word*)lf[22]+1);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18348,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t4)){
-t6=t3;
-f_18264(t6,C_i_not(t4));}
-else{
-t6=*((C_word*)lf[12]+1);
-if(C_truep(t6)){
-t7=t3;
-f_18264(t7,C_i_not(t6));}
-else{
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18359,a[2]=((C_word*)t0)[6],a[3]=t5,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t7,((C_word*)t0)[6],lf[133]);}}}}
-
-/* k18357 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-f_18264(t3,C_i_not(t2));}
-else{
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[552]);}}
-
-/* k18346 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_18264(t2,C_i_not(t1));}
-
-/* k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18264(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18264,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-C_trace("compiler.scm: 2554 variable-visible?");
-((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[12]);}
-
-/* k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18344,2,t0,t1);}
-t2=C_i_not(t1);
-t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18270,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t2,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-t4=C_eqp(((C_word*)t0)[13],lf[98]);
-if(C_truep(t4)){
-t5=C_slot(((C_word*)t0)[2],C_fix(2));
-t6=C_i_car(t5);
-C_trace("compiler.scm: 2555 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t3,t6);}
-else{
-t5=t3;
-f_18270(2,t5,C_SCHEME_FALSE);}}
-
-/* k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18270,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_eqp(lf[138],((C_word*)t0)[13]));
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t2,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(((C_word*)t0)[12])){
-t4=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
-t6=t3;
-f_18276(t6,t5);}
-else{
-t4=t3;
-f_18276(t4,C_SCHEME_UNDEFINED);}}
-
-/* k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18276(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18276,NULL,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[12])?lf[651]:lf[652]);
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18308,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t2,a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-if(C_truep(((C_word*)t0)[11])){
-C_trace("compiler.scm: 2561 blockvar-literal");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_18892(t4,t3,((C_word*)t0)[10]);}
-else{
-C_trace("compiler.scm: 2562 literal");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_18798(t4,t3,((C_word*)t0)[10]);}}
-
-/* k18306 in k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18308,2,t0,t1);}
-t2=C_a_i_list(&a,3,t1,((C_word*)t0)[10],((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18300,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-t4=C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2565 walk");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18298 in k18306 in k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18300,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[4];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-
-/* g4728 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18229(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18229,NULL,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18250,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2547 walk");
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_17629(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18248 in g4728 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18250,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[650],((C_word*)t0)[2],t2));}
-
-/* k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18182(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18182,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[10])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18198,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2539 walk");
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_17629(t4,t3,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-
-/* k18196 in k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18198,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18202,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cadr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2540 walk");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18200 in k18196 in k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18202,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[649],((C_word*)t0)[2],t2));}
-
-/* k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18135,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18139,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cadr(((C_word*)t0)[8]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18147,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2531 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18145 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18147(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18147,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18151,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2531 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k18149 in k18145 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18151(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2531 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_17629(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k18137 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18139(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18139,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[648],((C_word*)t0)[2],t2));}
-
-/* a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17946(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[28],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_17946,5,t0,t1,t2,t3,t4);}
-t5=C_i_car(((C_word*)t0)[17]);
-t6=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17953,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t3,a[7]=t2,a[8]=t5,a[9]=((C_word*)t0)[5],a[10]=t1,a[11]=((C_word*)t0)[17],a[12]=((C_word*)t0)[6],a[13]=((C_word*)t0)[7],a[14]=((C_word*)t0)[8],a[15]=((C_word*)t0)[9],a[16]=((C_word*)t0)[10],a[17]=((C_word*)t0)[11],a[18]=((C_word*)t0)[12],a[19]=((C_word*)t0)[13],a[20]=((C_word*)t0)[14],a[21]=((C_word*)t0)[15],a[22]=((C_word*)t0)[16],tmp=(C_word)a,a+=23,tmp);
-if(C_truep(t4)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18065,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2478 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t7,((C_word*)t0)[4],t4,lf[559]);}
-else{
-t7=t6;
-f_17953(2,t7,C_SCHEME_FALSE);}}
-
-/* k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18065(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18065,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18071,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2479 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}
-
-/* k18069 in k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18071(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18071,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-f_17953(2,t2,lf[541]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18096,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2480 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[601]);}}
-
-/* k18094 in k18069 in k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18096(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 2481 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}
-else{
-t2=C_i_not(((C_word*)t0)[2]);
-if(C_truep(t2)){
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-f_17953(2,t3,lf[645]);}
-else{
-C_trace("compiler.scm: 2481 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}}
-else{
-if(C_truep(C_i_nullp(((C_word*)t0)[2]))){
-t3=((C_word*)t0)[5];
-f_17953(2,t3,lf[645]);}
-else{
-C_trace("compiler.scm: 2481 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}}}}
-
-/* k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17953,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_17956,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],tmp=(C_word)a,a+=22,tmp);
-t3=C_i_car(((C_word*)t0)[3]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18056,a[2]=((C_word*)t0)[8],a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t5=C_eqp(lf[645],t1);
-if(C_truep(t5)){
-C_trace("compiler.scm: 2485 butlast");
-((C_proc3)C_retrieve_symbol_proc(lf[647]))(3,*((C_word*)lf[647]+1),t4,((C_word*)t0)[7]);}
-else{
-t6=((C_word*)t0)[7];
-C_trace("compiler.scm: 2482 walk");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_17629(t7,t2,t3,t6,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);}}
-
-/* k18054 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18056(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2482 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_17629(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17956,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17959,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],tmp=(C_word)a,a+=23,tmp);
-t3=C_eqp(((C_word*)t0)[3],lf[645]);
-if(C_truep(t3)){
-C_trace("compiler.scm: 2490 debugging");
-((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),t2,lf[614],lf[646],((C_word*)t0)[4],((C_word*)t0)[7]);}
-else{
-t4=t2;
-f_17959(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17959,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17962,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
-t3=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[5]:C_SCHEME_FALSE);
-if(C_truep(t3)){
-C_trace("compiler.scm: 2492 bomb");
-((C_proc6)C_retrieve_symbol_proc(lf[514]))(6,*((C_word*)lf[514]+1),t2,lf[644],((C_word*)t0)[8],((C_word*)((C_word*)t0)[15])[1],((C_word*)t0)[5]);}
-else{
-t4=t2;
-f_17962(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_17991,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[17],a[10]=((C_word*)t0)[18],a[11]=((C_word*)t0)[19],a[12]=((C_word*)t0)[20],a[13]=((C_word*)t0)[21],a[14]=((C_word*)t0)[22],tmp=(C_word)a,a+=15,tmp);
-t3=C_i_cadr(((C_word*)t0)[11]);
-t4=C_fixnum_increase(((C_word*)((C_word*)t0)[19])[1]);
-t5=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[9]:C_i_memq(((C_word*)t0)[8],*((C_word*)lf[61]+1)));
-t6=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18007,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t5,a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[17],a[11]=t4,a[12]=((C_word*)t0)[5],a[13]=((C_word*)t0)[6],a[14]=((C_word*)t0)[7],a[15]=t3,a[16]=((C_word*)t0)[8],a[17]=t2,tmp=(C_word)a,a+=18,tmp);
-C_trace("compiler.scm: 2505 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t6,((C_word*)t0)[2],((C_word*)t0)[8],lf[591]);}
-
-/* k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18007(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18007,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18014,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-t4=((C_word*)t0)[12];
-if(C_truep(t4)){
-t5=t3;
-f_18014(t5,C_SCHEME_FALSE);}
-else{
-t5=((C_word*)((C_word*)t0)[2])[1];
-if(C_truep(C_fixnum_greaterp(t5,C_fix(0)))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18033,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2509 debugging");
-((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),t6,lf[614],lf[643],((C_word*)t0)[16],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t6=t3;
-f_18014(t6,C_SCHEME_FALSE);}}}
-
-/* k18031 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_18014(t2,C_SCHEME_TRUE);}
-
-/* k18012 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_18014(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18014,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18018,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=t2;
-f_18018(2,t3,((C_word*)t0)[3]);}
-else{
-C_trace("compiler.scm: 2511 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[2],((C_word*)t0)[16],lf[583]);}}
-
-/* k18016 in k18012 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_18018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2494 make-lambda-literal");
-((C_proc18)C_retrieve_proc(*((C_word*)lf[620]+1)))(18,*((C_word*)lf[620]+1),((C_word*)t0)[17],((C_word*)t0)[16],((C_word*)t0)[15],((C_word*)t0)[14],((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)((C_word*)t0)[10])[1],((C_word*)((C_word*)t0)[9])[1],((C_word*)((C_word*)t0)[8])[1],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k17989 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17991,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[14])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[14])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[13])+1,((C_word*)t0)[12]);
-t5=C_mutate(((C_word *)((C_word*)t0)[11])+1,((C_word*)t0)[10]);
-t6=C_mutate(((C_word *)((C_word*)t0)[9])+1,((C_word*)t0)[8]);
-t7=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t8=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
-t9=C_i_car(((C_word*)t0)[3]);
-t10=C_a_i_list(&a,1,t9);
-t11=((C_word*)t0)[2];
-t12=t11;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_record(&a,4,lf[504],lf[553],t10,C_SCHEME_END_OF_LIST));}
-
-/* k17871 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17873,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17888,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(1));
-t4=C_eqp(lf[509],t3);
-if(C_truep(t4)){
-t5=C_slot(((C_word*)t0)[3],C_fix(2));
-t6=C_i_car(t5);
-t7=t2;
-f_17888(t7,C_i_memq(t6,((C_word*)t0)[2]));}
-else{
-t5=t2;
-f_17888(t5,C_SCHEME_FALSE);}}
-
-/* k17886 in k17871 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17888(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17888,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_fixnum_increase(((C_word*)((C_word*)t0)[5])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-t6=t4;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[603],C_SCHEME_END_OF_LIST,t5));}
-else{
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t3));}}
-
-/* k17855 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17857(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17857,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[593],((C_word*)t0)[2],t2));}
-
-/* k17825 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17827(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17827,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[594],((C_word*)t0)[2],t1));}
-
-/* k17799 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2437 words");
-((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-
-/* k17795 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17797,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)((C_word*)t0)[10])[1],t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[10])+1,t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17793,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2438 mapwalk");
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_18752(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k17791 in k17795 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17793,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k17765 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2433 words");
-((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-
-/* k17761 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17763(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17763,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)((C_word*)t0)[5])[1],t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-t4=((C_word*)t0)[4];
-t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
-
-/* k17735 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17737,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k17709 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17711,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17556(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17556,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17560,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_17560(2,t5,t3);}
-else{
-t5=*((C_word*)lf[22]+1);
-if(C_truep(t5)){
-t6=t4;
-f_17560(2,t6,t5);}
-else{
-t6=*((C_word*)lf[12]+1);
-if(C_truep(t6)){
-t7=t4;
-f_17560(2,t7,t6);}
-else{
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17616,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t8=t2;
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t7,t8,lf[133]);}}}}
-
-/* k17614 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_17560(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],t2,lf[552]);}}
-
-/* k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17560(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17560,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17563,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17595,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2397 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[2],((C_word*)t0)[7],lf[544]);}
-
-/* k17593 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17595(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17595,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17602,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2398 variable-visible?");
-((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_17563(t2,C_SCHEME_FALSE);}}
-
-/* k17600 in k17593 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_17563(t2,C_i_not(t1));}
-
-/* k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17563(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17563,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17566,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t1)){
-t3=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=t2;
-f_17566(t5,t4);}
-else{
-t3=t2;
-f_17566(t3,C_SCHEME_UNDEFINED);}}
-
-/* k17564 in k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17566(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17566,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17582,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[6])){
-C_trace("compiler.scm: 2403 blockvar-literal");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_18892(t3,t2,((C_word*)t0)[5]);}
-else{
-C_trace("compiler.scm: 2404 literal");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18798(t3,t2,((C_word*)t0)[5]);}}
-
-/* k17580 in k17564 in k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17582(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17582,2,t0,t1);}
-t2=C_a_i_list(&a,4,t1,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[642],t2,C_SCHEME_END_OF_LIST));}
-
-/* walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_fcall f_17505(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17505,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17509,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2387 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t5,t2,t3);}
-
-/* k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17509,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-t3=t1;
-t4=C_a_i_list(&a,1,t3);
-t5=t2;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[640],t4,C_SCHEME_END_OF_LIST));}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17535,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2388 keyword?");
-((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t2,((C_word*)t0)[4]);}}
-
-/* k17533 in k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17535,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17551,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2388 literal");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_18798(t3,t2,((C_word*)t0)[4]);}
-else{
-C_trace("compiler.scm: 2389 walk-global");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_17556(t2,((C_word*)t0)[6],((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k17549 in k17533 in k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
-static void C_ccall f_17551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17551,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
-
-/* lambda-literal-direct in k5089 in k5086 */
-static void C_ccall f_17493(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17493,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(16)));}
-
-/* lambda-literal-body in k5089 in k5086 */
-static void C_ccall f_17484(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17484,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(15)));}
-
-/* lambda-literal-rest-argument-mode in k5089 in k5086 */
-static void C_ccall f_17475(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17475,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(14)));}
-
-/* lambda-literal-customizable in k5089 in k5086 */
-static void C_ccall f_17466(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17466,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(13)));}
-
-/* lambda-literal-looping in k5089 in k5086 */
-static void C_ccall f_17457(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17457,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(12)));}
-
-/* lambda-literal-closure-size in k5089 in k5086 */
-static void C_ccall f_17448(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17448,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(11)));}
-
-/* lambda-literal-directly-called in k5089 in k5086 */
-static void C_ccall f_17439(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17439,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(10)));}
-
-/* lambda-literal-allocated in k5089 in k5086 */
-static void C_ccall f_17430(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17430,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(9)));}
-
-/* lambda-literal-callee-signatures in k5089 in k5086 */
-static void C_ccall f_17421(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17421,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(8)));}
-
-/* lambda-literal-unboxed-temporaries in k5089 in k5086 */
-static void C_ccall f_17412(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17412,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(7)));}
-
-/* lambda-literal-temporaries in k5089 in k5086 */
-static void C_ccall f_17403(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17403,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(6)));}
-
-/* lambda-literal-rest-argument in k5089 in k5086 */
-static void C_ccall f_17394(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17394,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(5)));}
-
-/* lambda-literal-argument-count in k5089 in k5086 */
-static void C_ccall f_17385(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17385,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(4)));}
-
-/* lambda-literal-arguments in k5089 in k5086 */
-static void C_ccall f_17376(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17376,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(3)));}
-
-/* lambda-literal-external in k5089 in k5086 */
-static void C_ccall f_17367(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17367,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(2)));}
-
-/* lambda-literal-id in k5089 in k5086 */
-static void C_ccall f_17358(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17358,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[621]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(1)));}
-
-/* lambda-literal? in k5089 in k5086 */
-static void C_ccall f_17352(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17352,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[621]));}
-
-/* make-lambda-literal in k5089 in k5086 */
-static void C_ccall f_17346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13,C_word t14,C_word t15,C_word t16,C_word t17){
-C_word tmp;
-C_word t18;
-C_word ab[18],*a=ab;
-if(c!=18) C_bad_argc_2(c,18,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr18,(void*)f_17346,18,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17);}
-t18=t1;
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,C_a_i_record(&a,17,lf[621],t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17));}
-
-/* ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15586(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word ab[55],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_15586,4,t0,t1,t2,t3);}
-t4=C_fix(0);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_UNDEFINED;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_UNDEFINED;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15589,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t23=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15595,a[2]=t3,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
-t24=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15605,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t25=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15616,a[2]=t3,a[3]=t9,a[4]=t13,a[5]=t11,a[6]=t15,tmp=(C_word)a,a+=7,tmp));
-t26=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16051,a[2]=t3,a[3]=t17,a[4]=t19,a[5]=t21,a[6]=t9,tmp=(C_word)a,a+=7,tmp));
-t27=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17076,a[2]=t17,tmp=(C_word)a,a+=3,tmp));
-t28=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17122,tmp=(C_word)a,a+=2,tmp));
-t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17313,a[2]=t15,a[3]=t7,a[4]=t2,a[5]=t17,a[6]=t5,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2339 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t29,lf[579],lf[619]);}
-
-/* k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17313,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17316,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2340 gather");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15616(t3,t2,((C_word*)t0)[4],C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
-
-/* k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17316,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17319,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2341 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[618],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17319,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17322,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2342 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t2,lf[579],lf[617]);}
-
-/* k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17322(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17322,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17325,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2343 transform");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_16051(t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE);}
-
-/* k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17325(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17325,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17328,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_eqp(((C_word*)((C_word*)t0)[2])[1],C_fix(0));
-if(C_truep(t3)){
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17338,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17340,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#make-promise");
-t6=*((C_word*)lf[616]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
-
-/* a17339 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17340,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_length(*((C_word*)lf[61]+1)));}
-
-/* k17336 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2345 debugging");
-((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),((C_word*)t0)[3],lf[614],lf[615],((C_word*)((C_word*)t0)[2])[1],t1);}
-
-/* k17326 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17328(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17122(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17122,NULL,4,t1,t2,t3,t4);}
-t5=t2;
-t6=C_slot(t5,C_fix(2));
-t7=C_i_car(t6);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17129,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2315 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t8,t7,t4);}
-
-/* k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17129,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17133,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("g42784279");
-t3=t2;
-f_17133(t3,((C_word*)t0)[3],t1);}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* g4278 in k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17133(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17133,NULL,3,t0,t1,t2);}
-t3=C_fixnum_plus(t2,C_fix(1));
-t4=C_a_i_list(&a,1,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17154,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2318 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[2]);}
-
-/* k17152 in g4278 in k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17154,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[605],((C_word*)t0)[2],t2));}
-
-/* maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17076(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17076,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17082,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp));
-t12=((C_word*)t10)[1];
-f_17082(t12,t1,t2);}
-
-/* loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17082(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17082,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17109,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17116,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g42574258");
-t6=t3;
-f_17109(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17114 in loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17116,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop42414254");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_17082(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop42414254");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_17082(t6,((C_word*)t0)[3],t5);}}
-
-/* g4257 in loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17109(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17109,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2311 transform");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_16051(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16051(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16051,NULL,5,t0,t1,t2,t3,t4);}
-t5=t2;
-t6=C_slot(t5,C_fix(3));
-t7=t2;
-t8=C_slot(t7,C_fix(2));
-t9=t2;
-t10=C_slot(t9,C_fix(1));
-t11=C_eqp(t10,lf[98]);
-t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t6,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t8,a[11]=t10,a[12]=t1,a[13]=t2,tmp=(C_word)a,a+=14,tmp);
-if(C_truep(t11)){
-t13=t12;
-f_16085(t13,t11);}
-else{
-t13=C_eqp(t10,lf[138]);
-if(C_truep(t13)){
-t14=t12;
-f_16085(t14,t13);}
-else{
-t14=C_eqp(t10,lf[553]);
-t15=t12;
-f_16085(t15,(C_truep(t14)?t14:C_eqp(t10,lf[516])));}}}
-
-/* k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16085(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16085,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[13];
-t3=((C_word*)t0)[12];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_eqp(((C_word*)t0)[11],lf[509]);
-if(C_truep(t2)){
-t3=C_i_car(((C_word*)t0)[10]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16097,a[2]=t3,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[12],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2186 ref-var");
-f_17122(t4,((C_word*)t0)[13],((C_word*)t0)[7],((C_word*)t0)[6]);}
-else{
-t3=C_eqp(((C_word*)t0)[11],lf[123]);
-t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_16124(t5,t3);}
-else{
-t5=C_eqp(((C_word*)t0)[11],lf[505]);
-if(C_truep(t5)){
-t6=t4;
-f_16124(t6,t5);}
-else{
-t6=C_eqp(((C_word*)t0)[11],lf[270]);
-if(C_truep(t6)){
-t7=t4;
-f_16124(t7,t6);}
-else{
-t7=C_eqp(((C_word*)t0)[11],lf[271]);
-if(C_truep(t7)){
-t8=t4;
-f_16124(t8,t7);}
-else{
-t8=C_eqp(((C_word*)t0)[11],lf[343]);
-if(C_truep(t8)){
-t9=t4;
-f_16124(t9,t8);}
-else{
-t9=C_eqp(((C_word*)t0)[11],lf[100]);
-if(C_truep(t9)){
-t10=t4;
-f_16124(t10,t9);}
-else{
-t10=C_eqp(((C_word*)t0)[11],lf[251]);
-if(C_truep(t10)){
-t11=t4;
-f_16124(t11,t10);}
-else{
-t11=C_eqp(((C_word*)t0)[11],lf[610]);
-if(C_truep(t11)){
-t12=t4;
-f_16124(t12,t11);}
-else{
-t12=C_eqp(((C_word*)t0)[11],lf[611]);
-if(C_truep(t12)){
-t13=t4;
-f_16124(t13,t12);}
-else{
-t13=C_eqp(((C_word*)t0)[11],lf[612]);
-if(C_truep(t13)){
-t14=t4;
-f_16124(t14,t13);}
-else{
-t14=C_eqp(((C_word*)t0)[11],lf[532]);
-if(C_truep(t14)){
-t15=t4;
-f_16124(t15,t14);}
-else{
-t15=C_eqp(((C_word*)t0)[11],lf[613]);
-if(C_truep(t15)){
-t16=t4;
-f_16124(t16,t15);}
-else{
-t16=C_eqp(((C_word*)t0)[11],lf[104]);
-t17=t4;
-f_16124(t17,(C_truep(t16)?t16:C_eqp(((C_word*)t0)[11],lf[254])));}}}}}}}}}}}}}}}
-
-/* k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16124(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16124,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[13];
-t3=C_slot(t2,C_fix(1));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16145,a[2]=((C_word*)t0)[11],a[3]=t3,a[4]=((C_word*)t0)[12],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2194 maptransform");
-t5=((C_word*)((C_word*)t0)[10])[1];
-f_17076(t5,t4,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
-else{
-t2=C_eqp(((C_word*)t0)[6],lf[158]);
-if(C_truep(t2)){
-t3=C_i_car(((C_word*)t0)[11]);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16157,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[12],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 2198 test");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_15589(t5,t4,t3,lf[575]);}
-else{
-t3=C_eqp(((C_word*)t0)[6],lf[172]);
-t4=(C_truep(t3)?t3:C_eqp(((C_word*)t0)[6],lf[537]));
-if(C_truep(t4)){
-t5=C_i_caddr(((C_word*)t0)[11]);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_16258,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[3],a[8]=t5,a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 2214 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[12],t5,t6);}
-else{
-t5=C_eqp(((C_word*)t0)[6],lf[250]);
-if(C_truep(t5)){
-t6=C_i_car(((C_word*)t0)[11]);
-t7=C_i_car(((C_word*)t0)[9]);
-t8=C_slot(t7,C_fix(1));
-t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16747,a[2]=((C_word*)t0)[12],a[3]=t6,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t7,a[8]=((C_word*)t0)[5],a[9]=t8,tmp=(C_word)a,a+=10,tmp);
-t10=C_eqp(lf[98],t8);
-if(C_truep(t10)){
-t11=C_slot(t7,C_fix(2));
-t12=C_i_car(t11);
-C_trace("compiler.scm: 2274 immediate?");
-((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t9,t12);}
-else{
-t11=t9;
-f_16747(2,t11,C_SCHEME_FALSE);}}
-else{
-t6=C_eqp(((C_word*)t0)[6],lf[106]);
-if(C_truep(t6)){
-t7=(C_truep(*((C_word*)lf[34]+1))?C_a_i_list(&a,1,C_fix(2)):C_a_i_list(&a,1,C_fix(1)));
-t8=C_i_car(((C_word*)t0)[11]);
-t9=C_a_i_list(&a,2,t8,C_SCHEME_TRUE);
-t10=C_a_i_record(&a,4,lf[504],lf[553],t9,C_SCHEME_END_OF_LIST);
-if(C_truep(*((C_word*)lf[34]+1))){
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16958,a[2]=t7,a[3]=((C_word*)t0)[12],a[4]=t10,tmp=(C_word)a,a+=5,tmp);
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16962,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
-t13=C_i_car(((C_word*)t0)[11]);
-C_trace("compiler.scm: 2305 ##sys#make-lambda-info");
-((C_proc3)C_retrieve_symbol_proc(lf[596]))(3,*((C_word*)lf[596]+1),t12,t13);}
-else{
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=((C_word*)t0)[12];
-t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[504],lf[594],t7,t11));}}
-else{
-C_trace("compiler.scm: 2308 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),((C_word*)t0)[12],lf[609]);}}}}}}
-
-/* k16960 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2305 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),((C_word*)t0)[2],t1);}
-
-/* k16956 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16958,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[594],((C_word*)t0)[2],t3));}
-
-/* k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16747,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_eqp(lf[138],((C_word*)t0)[9]));
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16753,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 2276 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t3,((C_word*)t0)[3],((C_word*)t0)[5]);}
-
-/* k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16753,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-C_trace("g41984199");
-t3=t2;
-f_16757(t3,((C_word*)t0)[2],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16850,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[2],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2290 test");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_15589(t3,t2,((C_word*)t0)[3],lf[575]);}}
-
-/* k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16850,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_truep(((C_word*)t0)[8])?lf[603]:lf[604]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2294 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-else{
-t2=C_a_i_list(&a,1,((C_word*)t0)[2]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16894,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2298 transform");
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_16051(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* k16892 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16894(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16894,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[250],((C_word*)t0)[2],t2));}
-
-/* k16868 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16870(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16870,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16874,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2295 transform");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_16051(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k16872 in k16868 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16874(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16874,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
-
-/* g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16757(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16757,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16764,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=t2,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2278 test");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_15589(t4,t3,((C_word*)t0)[2],lf[575]);}
-
-/* k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16764(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16764,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_truep(((C_word*)t0)[8])?lf[603]:lf[604]);
-t3=C_fixnum_increase(((C_word*)t0)[7]);
-t4=C_a_i_list(&a,1,t3);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16805,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t4,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2282 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[3]);}
-else{
-t2=(C_truep(((C_word*)t0)[8])?lf[606]:lf[607]);
-t3=C_fixnum_increase(((C_word*)t0)[7]);
-t4=C_a_i_list(&a,1,t3);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16833,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t2,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 2288 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[3]);}}
-
-/* k16831 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16833,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16837,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2289 transform");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_16051(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k16835 in k16831 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16837,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
-t3=((C_word*)t0)[4];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-
-/* k16803 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16805,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[605],((C_word*)t0)[8],t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16793,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2283 transform");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_16051(t5,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k16791 in k16803 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16793,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
-
-/* a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16258(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_16258,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_16262,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=t4,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],a[12]=t1,a[13]=((C_word*)t0)[9],a[14]=((C_word*)t0)[10],a[15]=((C_word*)t0)[11],tmp=(C_word)a,a+=16,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16720,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2217 filter");
-((C_proc4)C_retrieve_symbol_proc(lf[602]))(4,*((C_word*)lf[602]+1),t5,t6,t2);}
-
-/* a16719 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16720(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16720,3,t0,t1,t2);}
-C_trace("compiler.scm: 2217 test");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t3,t1,t2,lf[575]);}
-
-/* k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16262,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_16265,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16634,a[2]=t1,a[3]=t6,a[4]=t3,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16685,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
-t15=((C_word*)t13)[1];
-f_16685(t15,t11,t1);}
-
-/* loop4007 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16685(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16685,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[96]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16714,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g40234024");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16712 in loop4007 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16714,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop40074020");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16685(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop40074020");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16685(t6,((C_word*)t0)[3],t5);}}
-
-/* k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16634,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16636,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_16636(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16636(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16636,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[162]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16669,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g40004001");
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k16667 in loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16669,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16649,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_16649(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_16649(t5,t4);}}
-
-/* k16647 in k16667 in loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16649(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop39803994");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_16636(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16265,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_16268,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
-C_trace("compiler.scm: 2219 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[136]);}
-
-/* k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16268,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[17])?C_i_car(((C_word*)t0)[16]):lf[589]);
-t3=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_16274,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[17],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=t2,a[18]=t1,a[19]=((C_word*)t0)[16],tmp=(C_word)a,a+=20,tmp);
-C_trace("compiler.scm: 2221 test");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t4,t3,t2,lf[590]);}
-
-/* k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16274,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t2,a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
-C_trace("compiler.scm: 2222 test");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t4,t3,((C_word*)t0)[17],lf[591]);}
-
-/* k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16280,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_16286,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=t2,tmp=(C_word)a,a+=22,tmp);
-if(C_truep(*((C_word*)lf[34]+1))){
-t4=C_i_cadr(((C_word*)t0)[20]);
-t5=t3;
-f_16286(t5,(C_truep(t4)?C_i_pairp(((C_word*)t0)[15]):C_SCHEME_FALSE));}
-else{
-t4=t3;
-f_16286(t4,C_SCHEME_FALSE);}}
-
-/* k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16286(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16286,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16289,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],a[17]=((C_word*)t0)[19],a[18]=((C_word*)t0)[20],a[19]=((C_word*)t0)[21],a[20]=t1,tmp=(C_word)a,a+=21,tmp);
-if(C_truep(((C_word*)t0)[6])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16601,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2228 test");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t4,t3,((C_word*)t0)[6],lf[575]);}
-else{
-t3=t2;
-f_16289(2,t3,C_SCHEME_FALSE);}}
-
-/* k16599 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16601,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2229 test");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t3,t2,((C_word*)t0)[6],lf[540]);}
-else{
-t2=((C_word*)t0)[4];
-f_16289(2,t2,C_SCHEME_FALSE);}}
-
-/* k16602 in k16599 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=C_i_cdr(t2);
-C_trace("compiler.scm: 2230 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[3],((C_word*)t0)[2],t3,lf[601],C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[3];
-f_16289(2,t2,C_SCHEME_FALSE);}}
-
-/* k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[40],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16289,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[20])?C_fixnum_plus(((C_word*)t0)[19],C_fix(2)):C_fixnum_plus(((C_word*)t0)[19],C_fix(1)));
-t3=C_a_i_list(&a,1,t2);
-t4=C_i_cadr(((C_word*)t0)[18]);
-t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_16524,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[20],a[12]=t3,a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=t4,a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16528,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16543,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp));
-t14=((C_word*)t12)[1];
-f_16543(t14,t10,((C_word*)t0)[2]);}
-
-/* loop4063 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16543(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(6);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_16543,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16570,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_16570(t3,t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-C_trace("loop40634076");
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-C_trace("loop40634076");
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g4079 in loop4063 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static C_word C_fcall f_16570(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t2=C_i_assq(t1,((C_word*)t0)[2]);
-if(C_truep(t2)){
-return(C_i_cdr(t2));}
-else{
-t3=t1;
-return(t3);}}
-
-/* k16526 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_truep(((C_word*)t0)[5])?C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]):C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=C_i_cdr(t2);
-C_trace("compiler.scm: 2240 build-lambda-list");
-((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}
-else{
-t3=((C_word*)t0)[5];
-C_trace("compiler.scm: 2240 build-lambda-list");
-((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}}
-
-/* k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16524,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[18],t1);
-t3=C_i_cadddr(((C_word*)t0)[17]);
-t4=C_a_i_list(&a,4,((C_word*)t0)[16],((C_word*)t0)[15],t2,t3);
-t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_16407,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=t4,a[12]=((C_word*)t0)[14],tmp=(C_word)a,a+=13,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16411,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t7=C_i_car(((C_word*)t0)[3]);
-C_trace("compiler.scm: 2249 transform");
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_16051(t8,t6,t7,((C_word*)t0)[18],((C_word*)t0)[6]);}
-
-/* k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16411(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16411,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16414,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_16422,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16443,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2254 unzip1");
-((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),t4,((C_word*)t0)[2]);}
-else{
-t3=t1;
-t4=((C_word*)t0)[4];
-f_16407(t4,C_a_i_list(&a,1,t3));}}
-
-/* k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16443,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16447,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16449,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_16449(t10,t6,((C_word*)t0)[2]);}
-
-/* loop4114 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16449(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16449,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16493,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_i_cdr(t3);
-C_trace("compiler.scm: 2255 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16491 in loop4114 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16493(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16493,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[593],C_SCHEME_END_OF_LIST,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t5=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t4);
-t6=C_mutate(((C_word *)((C_word*)t0)[6])+1,t4);
-t7=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41144127");
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_16449(t8,((C_word*)t0)[3],t7);}
-else{
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
-t6=C_mutate(((C_word *)((C_word*)t0)[6])+1,t4);
-t7=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41144127");
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_16449(t8,((C_word*)t0)[3],t7);}}
-
-/* k16445 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2251 fold-right");
-((C_proc6)C_retrieve_symbol_proc(lf[600]))(6,*((C_word*)lf[600]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a16421 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16422(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_16422,5,t0,t1,t2,t3,t4);}
-t5=C_a_i_list(&a,1,t2);
-t6=C_a_i_list(&a,2,t3,t4);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[158],t5,t6));}
-
-/* k16412 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16414,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_16407(t2,C_a_i_list(&a,1,t1));}
-
-/* k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16407(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16407,NULL,2,t0,t1);}
-t2=C_a_i_record(&a,4,lf[504],((C_word*)t0)[12],((C_word*)t0)[11],t1);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16318,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16357,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp));
-t11=((C_word*)t9)[1];
-f_16357(t11,t7,((C_word*)t0)[2]);}
-
-/* loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16357(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16357,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16384,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16395,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g41604161");
-t6=t3;
-f_16384(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16393 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16395,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41444157");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16357(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41444157");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16357(t6,((C_word*)t0)[3],t5);}}
-
-/* g4160 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16384(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16384,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16392,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2258 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,t2);}
-
-/* k16390 in g4160 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2258 ref-var");
-f_17122(((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16318(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16318,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16321,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16332,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16336,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16340,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16348,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2266 real-name");
-((C_proc3)C_retrieve_symbol_proc(lf[599]))(3,*((C_word*)lf[599]+1),t6,((C_word*)t0)[2]);}
-else{
-t3=t1;
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=((C_word*)t0)[6];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[594],((C_word*)t0)[5],t4));}}
-
-/* k16346 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16348,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=C_i_cdr(((C_word*)t0)[3]);
-t4=C_a_i_cons(&a,2,t2,t3);
-C_trace("compiler.scm: 2266 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),((C_word*)t0)[2],t4);}
-else{
-t2=C_i_cdr(((C_word*)t0)[3]);
-t3=C_a_i_cons(&a,2,lf[598],t2);
-C_trace("compiler.scm: 2266 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),((C_word*)t0)[2],t3);}}
-
-/* k16338 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2265 ##sys#make-lambda-info");
-((C_proc3)C_retrieve_symbol_proc(lf[596]))(3,*((C_word*)lf[596]+1),((C_word*)t0)[2],t1);}
-
-/* k16334 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16336(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2264 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),((C_word*)t0)[2],t1);}
-
-/* k16330 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16332,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-C_trace("compiler.scm: 2261 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k16319 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16321(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16321,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[594],((C_word*)t0)[2],t2));}
-
-/* k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16157,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 2199 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,((C_word*)t0)[9]);}
-
-/* k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16160(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16160,2,t0,t1);}
-if(C_truep(((C_word*)t0)[10])){
-t2=C_a_i_list(&a,1,t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16183,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t2,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t4=C_i_car(((C_word*)t0)[7]);
-C_trace("compiler.scm: 2203 transform");
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_16051(t5,t3,t4,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16241,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2210 maptransform");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_17076(t3,t2,((C_word*)t0)[7],((C_word*)t0)[5],((C_word*)t0)[4]);}}
-
-/* k16239 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16241,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t1));}
-
-/* k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16183,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16225,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 2206 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-
-/* k16223 in k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16225,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[593],C_SCHEME_END_OF_LIST,t2);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16213,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-t5=C_i_cadr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 2207 transform");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16051(t6,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k16211 in k16223 in k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16213,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[6],t1);
-t3=C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[5],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t4));}
-
-/* k16143 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16145(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16145,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k16095 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16097,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16103,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2187 test");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15589(t3,t2,((C_word*)t0)[2],lf[575]);}
-
-/* k16101 in k16095 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16103,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_list(&a,1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[592],C_SCHEME_END_OF_LIST,t2));}
-else{
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15616(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15616,NULL,5,t0,t1,t2,t3,t4);}
-t5=t2;
-t6=C_slot(t5,C_fix(3));
-t7=t2;
-t8=C_slot(t7,C_fix(2));
-t9=t2;
-t10=C_slot(t9,C_fix(1));
-t11=C_eqp(t10,lf[98]);
-t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_15650,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t4,a[8]=t3,a[9]=((C_word*)t0)[6],a[10]=t6,a[11]=t8,a[12]=t10,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
-if(C_truep(t11)){
-t13=t12;
-f_15650(t13,t11);}
-else{
-t13=C_eqp(t10,lf[509]);
-if(C_truep(t13)){
-t14=t12;
-f_15650(t14,t13);}
-else{
-t14=C_eqp(t10,lf[138]);
-if(C_truep(t14)){
-t15=t12;
-f_15650(t15,t14);}
-else{
-t15=C_eqp(t10,lf[553]);
-if(C_truep(t15)){
-t16=t12;
-f_15650(t16,t15);}
-else{
-t16=C_eqp(t10,lf[106]);
-t17=t12;
-f_15650(t17,(C_truep(t16)?t16:C_eqp(t10,lf[516])));}}}}}
-
-/* k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15650(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15650,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=C_eqp(((C_word*)t0)[12],lf[158]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15661,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15671,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,((C_word*)t0)[13],t3,t4);}
-else{
-t3=C_eqp(((C_word*)t0)[12],lf[505]);
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[10]);
-t5=C_i_car(((C_word*)t0)[11]);
-t6=C_i_cdr(((C_word*)t0)[11]);
-t7=C_i_pairp(t6);
-t8=(C_truep(t7)?C_i_cadr(((C_word*)t0)[11]):C_SCHEME_FALSE);
-t9=C_slot(t4,C_fix(1));
-t10=C_eqp(lf[509],t9);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15735,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-t12=(C_truep(t8)?t8:t10);
-if(C_truep(t12)){
-if(C_truep(t10)){
-t13=C_slot(t4,C_fix(2));
-t14=C_i_car(t13);
-t15=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_15790,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[4],a[5]=t14,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t11,a[9]=t5,a[10]=t8,tmp=(C_word)a,a+=11,tmp);
-t16=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15908,a[2]=t14,a[3]=((C_word*)t0)[3],a[4]=t15,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2137 test");
-t17=((C_word*)((C_word*)t0)[3])[1];
-f_15589(t17,t16,t14,lf[536]);}
-else{
-t13=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t14=C_a_i_cons(&a,2,t5,t13);
-C_trace("compiler.scm: 2130 node-parameters-set!");
-((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t11,((C_word*)t0)[6],t14);}}
-else{
-t13=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-C_trace("compiler.scm: 2130 node-parameters-set!");
-((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t11,((C_word*)t0)[6],t13);}}
-else{
-t4=C_eqp(((C_word*)t0)[12],lf[172]);
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[12],lf[537]));
-if(C_truep(t5)){
-t6=C_i_caddr(((C_word*)t0)[11]);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15954,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2163 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[13],t6,t7);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15993,a[2]=t7,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_15993(t9,((C_word*)t0)[13],((C_word*)t0)[10]);}}}}}
-
-/* loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15993(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15993,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16001,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16008,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g38203821");
-t6=t3;
-f_16001(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16006 in loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_16008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15993(t3,((C_word*)t0)[2],t2);}
-
-/* g3820 in loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_16001(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16001,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2173 gather");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_15616(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[19],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15954,5,t0,t1,t2,t3,t4);}
-t5=(C_truep(((C_word*)t0)[7])?C_i_car(((C_word*)t0)[6]):lf[589]);
-t6=C_i_car(((C_word*)t0)[5]);
-t7=((C_word*)t0)[4];
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17176,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t5,a[6]=t1,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[5],a[9]=t9,tmp=(C_word)a,a+=10,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17178,a[2]=t12,a[3]=t9,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t14=((C_word*)t12)[1];
-f_17178(t14,t10,t6);}
-
-/* walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17178(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17178,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=C_slot(t3,C_fix(3));
-t5=t2;
-t6=C_slot(t5,C_fix(2));
-t7=t2;
-t8=C_slot(t7,C_fix(1));
-t9=C_eqp(t8,lf[509]);
-if(C_truep(t9)){
-t10=C_i_car(t6);
-if(C_truep(C_i_memq(t10,((C_word*)t0)[4]))){
-t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17222,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2330 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t11,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[3])[1],t10);}
-else{
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_UNDEFINED);}}
-else{
-t10=C_eqp(t8,lf[98]);
-t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17231,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=t8,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t10)){
-t12=t11;
-f_17231(t12,t10);}
-else{
-t12=C_eqp(t8,lf[138]);
-if(C_truep(t12)){
-t13=t11;
-f_17231(t13,t12);}
-else{
-t13=C_eqp(t8,lf[106]);
-if(C_truep(t13)){
-t14=t11;
-f_17231(t14,t13);}
-else{
-t14=C_eqp(t8,lf[553]);
-if(C_truep(t14)){
-t15=t11;
-f_17231(t15,t14);}
-else{
-t15=C_eqp(t8,lf[100]);
-t16=t11;
-f_17231(t16,(C_truep(t15)?t15:C_eqp(t8,lf[516])));}}}}}}
-
-/* k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17231(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17231,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=C_eqp(((C_word*)t0)[7],lf[250]);
-if(C_truep(t2)){
-t3=C_i_car(((C_word*)t0)[6]);
-if(C_truep(C_i_memq(t3,((C_word*)t0)[5]))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17257,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2334 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t4,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[4])[1],t3);}
-else{
-t4=C_i_car(((C_word*)t0)[3]);
-C_trace("compiler.scm: 2335 walk");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_17178(t5,((C_word*)t0)[8],t4);}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17262,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_17262(t6,((C_word*)t0)[8],((C_word*)t0)[3]);}}}
-
-/* loop4341 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_17262(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17262,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17272,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-C_trace("g43484349");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_17178(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17270 in loop4341 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_17262(t3,((C_word*)t0)[2],t2);}
-
-/* k17255 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17257(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("compiler.scm: 2335 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_17178(t4,((C_word*)t0)[2],t3);}
-
-/* k17220 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_17176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17176,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[9])[1];
-t3=C_i_length(t2);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_15967,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 2169 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t4,((C_word*)t0)[2],((C_word*)t0)[5],lf[591],t3);}
-
-/* k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15967,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15970,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2170 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[6],lf[590],((C_word*)t0)[2]);}
-
-/* k15968 in k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15970(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15970,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15981,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2171 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15979 in k15968 in k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15981(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2171 gather");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15616(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15906 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_15790(2,t2,C_SCHEME_FALSE);}
-else{
-C_trace("compiler.scm: 2137 test");
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_15589(t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[555]);}}
-
-/* k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15790,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15796,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t1)){
-t3=t1;
-t4=C_slot(t3,C_fix(1));
-t5=t2;
-f_15796(t5,C_eqp(lf[172],t4));}
-else{
-t3=t2;
-f_15796(t3,C_SCHEME_FALSE);}}
-
-/* k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15796(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15796,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[11];
-t3=C_slot(t2,C_fix(2));
-t4=C_i_caddr(t3);
-t5=C_i_car(t3);
-t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15813,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t5,tmp=(C_word)a,a+=13,tmp);
-C_trace("compiler.scm: 2142 test");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t7,t6,((C_word*)t0)[5],lf[559]);}
-else{
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
-C_trace("compiler.scm: 2130 node-parameters-set!");
-((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[8],((C_word*)t0)[7],t3);}}
-
-/* k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15813,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15816,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
-C_trace("compiler.scm: 2143 test");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15589(t3,t2,((C_word*)t0)[6],lf[534]);}
-
-/* k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15816,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15819,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[2])){
-if(C_truep(t1)){
-t3=C_i_length(((C_word*)t0)[2]);
-t4=C_i_length(t1);
-t5=C_eqp(t3,t4);
-t6=t2;
-f_15819(t6,(C_truep(t5)?C_i_listp(((C_word*)t0)[3]):C_SCHEME_FALSE));}
-else{
-t3=t2;
-f_15819(t3,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_15819(t3,C_SCHEME_FALSE);}}
-
-/* k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15819(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15819,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_15822,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15837,a[2]=((C_word*)t0)[10],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[10])){
-if(C_truep(t1)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15858,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2150 llist-length");
-((C_proc3)C_retrieve_symbol_proc(lf[588]))(3,*((C_word*)lf[588]+1),t4,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_15837(t4,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_15837(t4,C_SCHEME_FALSE);}}
-
-/* k15856 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[3]);
-t3=C_i_length(t2);
-t4=C_eqp(t1,t3);
-t5=((C_word*)t0)[2];
-f_15837(t5,C_i_not(t4));}
-
-/* k15835 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15837(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15837,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15844,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2153 source-info->string");
-((C_proc3)C_retrieve_symbol_proc(lf[587]))(3,*((C_word*)lf[587]+1),t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_15822(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k15842 in k15835 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2151 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[586],t1);}
-
-/* k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15822,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_15825,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 2154 register-direct-call!");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15605(t3,t2,((C_word*)t0)[10]);}
-
-/* k15823 in k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15825,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15828,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[8])){
-C_trace("compiler.scm: 2155 register-customizable!");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15595(t3,t2,((C_word*)t0)[2],((C_word*)t0)[9]);}
-else{
-t3=C_a_i_list(&a,2,((C_word*)t0)[9],((C_word*)t0)[8]);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-C_trace("compiler.scm: 2130 node-parameters-set!");
-((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[5],((C_word*)t0)[4],t5);}}
-
-/* k15826 in k15823 in k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15828,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-C_trace("compiler.scm: 2130 node-parameters-set!");
-((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15735(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15735,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15740,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_15740(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15740(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15740,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15748,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15755,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g37913792");
-t6=t3;
-f_15748(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k15753 in loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15740(t3,((C_word*)t0)[2],t2);}
-
-/* g3791 in loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15748(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15748,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2160 gather");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_15616(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_15671,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15675,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15688,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
-t8=((C_word*)t6)[1];
-f_15688(t8,t4,t2);}
-
-/* loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15688(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15688,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15696,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15703,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g37213722");
-t6=t3;
-f_15696(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k15701 in loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15703(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15688(t3,((C_word*)t0)[2],t2);}
-
-/* g3721 in loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15696(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15696,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2122 gather");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_15616(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15673 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15675(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15675,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15686,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2123 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15684 in k15673 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2123 gather");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15616(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a15660 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15661(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15661,2,t0,t1);}
-t2=C_i_length(((C_word*)t0)[3]);
-C_trace("compiler.scm: 2121 split-at");
-((C_proc4)C_retrieve_symbol_proc(lf[318]))(4,*((C_word*)lf[318]+1),t1,((C_word*)t0)[2],t2);}
-
-/* register-direct-call! in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15605(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15605,NULL,3,t0,t1,t2);}
-t3=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15614,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2108 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t5,*((C_word*)lf[143]+1),*((C_word*)lf[61]+1),t2);}
-
-/* k15612 in register-direct-call! in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[61]+1 /* (set! direct-call-ids ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* register-customizable! in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15595(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15595,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15600,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 2103 lset-adjoin");
-((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t4,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[3])[1],t2);}
-
-/* k15598 in register-customizable! in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_ccall f_15600(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-C_trace("compiler.scm: 2104 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[583],C_SCHEME_TRUE);}
-
-/* test in ##compiler#perform-closure-conversion in k5089 in k5086 */
-static void C_fcall f_15589(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15589,NULL,4,t0,t1,t2,t3);}
-C_trace("compiler.scm: 2100 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,t3);}
-
-/* ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13640(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13640,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13644,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1713 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(3001),C_SCHEME_END_OF_LIST);}
-
-/* k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word ab[44],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13644,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13653,a[2]=t9,a[3]=t5,a[4]=t7,a[5]=t11,a[6]=t1,tmp=(C_word)a,a+=7,tmp));
-t17=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14252,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t18=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14286,a[2]=t1,tmp=(C_word)a,a+=3,tmp));
-t19=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14464,a[2]=t1,tmp=(C_word)a,a+=3,tmp));
-t20=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14470,tmp=(C_word)a,a+=2,tmp));
-t21=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14484,a[2]=t1,a[3]=t15,tmp=(C_word)a,a+=4,tmp));
-t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14509,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t3,a[5]=t13,a[6]=t1,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1881 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t22,lf[579],lf[581]);}
-
-/* k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14509,2,t0,t1);}
-t2=C_set_block_item(lf[52] /* current-program-size */,0,C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14513,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1883 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_13653(t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14513,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14516,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1886 debugging");
-((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t2,lf[579],lf[580]);}
-
-/* k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14516,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14519,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14525,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1887 ##sys#hash-table-for-each");
-((C_proc4)C_retrieve_symbol_proc(lf[578]))(4,*((C_word*)lf[578]+1),t2,t3,((C_word*)t0)[4]);}
-
-/* a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14525(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[64],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14525,4,t0,t1,t2,t3);}
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_END_OF_LIST;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_FALSE;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_END_OF_LIST;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_FALSE;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_FALSE;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_SCHEME_FALSE;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_SCHEME_FALSE;
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=C_fix(0);
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_fix(0);
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_14529,a[2]=t11,a[3]=t21,a[4]=t15,a[5]=t29,a[6]=t27,a[7]=t2,a[8]=((C_word*)t0)[2],a[9]=t23,a[10]=t13,a[11]=t19,a[12]=t25,a[13]=t3,a[14]=((C_word*)t0)[3],a[15]=((C_word*)t0)[4],a[16]=t1,a[17]=t9,a[18]=t7,a[19]=t5,tmp=(C_word)a,a+=20,tmp);
-t31=C_SCHEME_UNDEFINED;
-t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
-t33=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_15451,a[2]=t32,a[3]=t9,a[4]=t7,a[5]=t25,a[6]=t23,a[7]=t21,a[8]=t19,a[9]=t29,a[10]=t17,a[11]=t11,a[12]=t15,a[13]=t27,a[14]=t13,a[15]=t5,tmp=(C_word)a,a+=16,tmp));
-t34=((C_word*)t32)[1];
-f_15451(t34,t30,t3);}
-
-/* loop3246 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15451(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(15);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_15451,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_15459,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_15459(t3,t4);
-t6=C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g3253 in loop3246 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static C_word C_fcall f_15459(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_stack_check;
-t2=C_i_car(t1);
-t3=C_eqp(t2,lf[536]);
-if(C_truep(t3)){
-t4=C_set_block_item(((C_word*)t0)[14],0,C_SCHEME_TRUE);
-return(t4);}
-else{
-t4=C_eqp(t2,lf[559]);
-if(C_truep(t4)){
-t5=C_i_cdr(t1);
-t6=C_mutate(((C_word *)((C_word*)t0)[13])+1,t5);
-t7=C_i_length(((C_word*)((C_word*)t0)[13])[1]);
-t8=C_mutate(((C_word *)((C_word*)t0)[12])+1,t7);
-return(t8);}
-else{
-t5=C_eqp(t2,lf[529]);
-if(C_truep(t5)){
-t6=C_set_block_item(((C_word*)t0)[11],0,C_SCHEME_TRUE);
-return(t6);}
-else{
-t6=C_eqp(t2,lf[546]);
-if(C_truep(t6)){
-t7=C_i_cdr(t1);
-t8=C_mutate(((C_word *)((C_word*)t0)[10])+1,t7);
-return(t8);}
-else{
-t7=C_eqp(t2,lf[534]);
-if(C_truep(t7)){
-t8=C_i_cdr(t1);
-t9=C_mutate(((C_word *)((C_word*)t0)[9])+1,t8);
-t10=C_i_length(((C_word*)((C_word*)t0)[9])[1]);
-t11=C_mutate(((C_word *)((C_word*)t0)[8])+1,t10);
-return(t11);}
-else{
-t8=C_eqp(t2,lf[544]);
-if(C_truep(t8)){
-t9=C_set_block_item(((C_word*)t0)[7],0,C_SCHEME_TRUE);
-return(t9);}
-else{
-t9=C_eqp(t2,lf[545]);
-if(C_truep(t9)){
-t10=C_set_block_item(((C_word*)t0)[6],0,C_SCHEME_TRUE);
-return(t10);}
-else{
-t10=C_eqp(t2,lf[554]);
-if(C_truep(t10)){
-t11=C_set_block_item(((C_word*)t0)[5],0,C_SCHEME_TRUE);
-return(t11);}
-else{
-t11=C_eqp(t2,lf[530]);
-if(C_truep(t11)){
-t12=C_set_block_item(((C_word*)t0)[4],0,C_SCHEME_TRUE);
-return(t12);}
-else{
-t12=C_eqp(t2,lf[555]);
-if(C_truep(t12)){
-t13=C_i_cdr(t1);
-t14=C_mutate(((C_word *)((C_word*)t0)[3])+1,t13);
-return(t14);}
-else{
-t13=C_eqp(t2,lf[557]);
-if(C_truep(t13)){
-t14=C_i_cdr(t1);
-t15=C_mutate(((C_word *)((C_word*)t0)[2])+1,t14);
-return(t15);}
-else{
-t14=C_eqp(t2,lf[540]);
-if(C_truep(t14)){
-t15=C_SCHEME_UNDEFINED;
-return(t15);}
-else{
-return(C_SCHEME_UNDEFINED);}}}}}}}}}}}}}
-
-/* k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14529,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[19])[1];
-t3=(C_truep(t2)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[18])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[18])+1,t3);
-t5=((C_word*)((C_word*)t0)[19])[1];
-t6=(C_truep(t5)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[17])[1]);
-t7=C_mutate(((C_word *)((C_word*)t0)[17])+1,t6);
-t8=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_14540,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[17],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15402,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=t8,a[5]=((C_word*)t0)[18],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(*((C_word*)lf[62]+1))){
-t10=((C_word*)((C_word*)t0)[18])[1];
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15429,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t10)){
-t12=t11;
-f_15429(t12,t10);}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[12])[1])){
-t12=((C_word*)((C_word*)t0)[2])[1];
-t13=t11;
-f_15429(t13,t12);}
-else{
-t12=t11;
-f_15429(t12,C_SCHEME_FALSE);}}}
-else{
-t10=t9;
-f_15402(t10,C_SCHEME_FALSE);}}
-
-/* k15427 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15429(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=C_slot(t2,C_fix(1));
-t4=((C_word*)t0)[2];
-f_15402(t4,C_eqp(lf[172],t3));}
-else{
-t2=((C_word*)t0)[2];
-f_15402(t2,C_SCHEME_FALSE);}}
-
-/* k15400 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15402(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[5])[1];
-if(C_truep(t2)){
-t3=C_slot(t2,C_fix(2));
-t4=C_i_car(t3);
-C_trace("compiler.scm: 1934 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[4],t4,((C_word*)t0)[3]);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=C_slot(t3,C_fix(2));
-t5=C_i_car(t4);
-C_trace("compiler.scm: 1934 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[4],t5,((C_word*)t0)[3]);}}
-else{
-t2=((C_word*)t0)[4];
-f_14540(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14540,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_14543,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(*((C_word*)lf[62]+1))){
-if(C_truep(((C_word*)((C_word*)t0)[12])[1])){
-if(C_truep(C_i_nullp(((C_word*)((C_word*)t0)[10])[1]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15399,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=((C_word*)t0)[7];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[420]);}
-else{
-t4=t3;
-f_15344(t4,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_15344(t4,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_15344(t4,C_SCHEME_FALSE);}}
-
-/* k15397 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15399(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_15344(t2,C_i_not(t1));}
-
-/* k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15344(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15344,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15347,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
-C_trace("compiler.scm: 1943 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[116],lf[577],((C_word*)t0)[3]);}
-else{
-t3=t2;
-f_15347(2,t3,C_SCHEME_UNDEFINED);}}
-else{
-t2=((C_word*)t0)[4];
-f_14543(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15347,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15353,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15375,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1944 variable-visible?");
-((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t3,((C_word*)t0)[2]);}
-
-/* k15373 in k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15375(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-f_14543(2,t3,t2);}
-else{
-t2=((C_word*)t0)[3];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[2],t2,lf[310]);}}
-
-/* k15351 in k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-f_14543(2,t3,t2);}
-else{
-C_trace("compiler.scm: 1946 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[116],lf[576],((C_word*)t0)[2]);}}
-
-/* k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14543(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14543,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_14546,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[10])[1])){
-t3=((C_word*)((C_word*)t0)[2])[1];
-if(C_truep(t3)){
-C_trace("compiler.scm: 1950 quick-put!");
-f_14470(t2,((C_word*)t0)[12],lf[575],C_SCHEME_TRUE);}
-else{
-t4=t2;
-f_14546(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-t3=t2;
-f_14546(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14546(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14546,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14549,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[15])[1])){
-t3=((C_word*)((C_word*)t0)[15])[1];
-t4=C_slot(t3,C_fix(2));
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15115,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[11],a[5]=t2,a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-t6=((C_word*)((C_word*)t0)[15])[1];
-t7=C_slot(t6,C_fix(1));
-t8=C_eqp(lf[172],t7);
-if(C_truep(t8)){
-t9=C_i_cadr(t4);
-t10=C_i_not(t9);
-if(C_truep(t10)){
-t11=t5;
-f_15115(2,t11,t10);}
-else{
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15147,a[2]=((C_word*)t0)[13],tmp=(C_word)a,a+=3,tmp);
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15155,a[2]=t11,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15157,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
-t14=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15163,tmp=(C_word)a,a+=2,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t12,t13,t14);}}
-else{
-t9=t5;
-f_15115(2,t9,C_SCHEME_FALSE);}}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=C_slot(t3,C_fix(2));
-t5=((C_word*)((C_word*)t0)[2])[1];
-t6=C_slot(t5,C_fix(1));
-t7=C_eqp(lf[172],t6);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15202,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15208,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t2,t8,t9);}
-else{
-t8=t2;
-f_14549(2,t8,C_SCHEME_UNDEFINED);}}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15266,a[2]=t2,a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[5];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t3,t4,lf[435]);}}}
-
-/* k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15266,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15270,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("g33883389");
-t3=t2;
-f_15270(t3,((C_word*)t0)[2],t1);}
-else{
-t2=((C_word*)t0)[2];
-f_14549(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15270(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15270,NULL,3,t0,t1,t2);}
-t3=t2;
-if(C_truep(C_i_structurep(t3,lf[504]))){
-if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15288,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1982 debugging");
-((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t4,lf[573],lf[574],((C_word*)t0)[4]);}
-else{
-t4=t2;
-t5=C_slot(t4,C_fix(2));
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15329,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1988 quick-put!");
-f_14470(t6,((C_word*)t0)[2],lf[569],C_SCHEME_TRUE);}}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k15327 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1989 quick-put!");
-f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[557],((C_word*)t0)[2]);}
-
-/* k15286 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15288(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15288,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-t4=C_a_i_list(&a,1,lf[429]);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15293,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[435],C_SCHEME_TRUE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=C_i_car(t4);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[435],t7);}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k15291 in k15286 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-
-/* a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_15208,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15212,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15246,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1970 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[530]);}
-
-/* k15244 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
-C_trace("compiler.scm: 1972 quick-put!");
-f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[571],C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[3];
-f_15212(2,t2,C_SCHEME_UNDEFINED);}}
-else{
-t2=((C_word*)t0)[3];
-f_15212(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15212(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15212,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=C_i_not(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15221,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t3)){
-if(C_truep(t3)){
-C_trace("compiler.scm: 1977 quick-put!");
-f_14470(((C_word*)t0)[5],((C_word*)t0)[4],lf[569],C_SCHEME_TRUE);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15229,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1974 every");
-((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t4,t5,((C_word*)t0)[2]);}}
-
-/* a15228 in k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15229(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_15229,3,t0,t1,t2);}
-C_trace("compiler.scm: 1975 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,lf[530]);}
-
-/* k15219 in k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15221(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1977 quick-put!");
-f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[569],C_SCHEME_TRUE);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* a15201 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15202,2,t0,t1);}
-C_trace("compiler.scm: 1969 scan-free-variables");
-((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* a15162 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15163(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_15163r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_15163r(t0,t1,t2);}}
-
-static void C_ccall f_15163r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_list_ref(t2,C_fix(0)));}
-
-/* a15156 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15157,2,t0,t1);}
-C_trace("compiler.scm: 1961 scan-free-variables");
-((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k15153 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1959 every");
-((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a15146 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15147(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_15147,3,t0,t1,t2);}
-C_trace("compiler.scm: 1960 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,lf[530]);}
-
-/* k15113 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15115,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15121,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=C_eqp(C_fix(1),t3);
-if(C_truep(t4)){
-t5=((C_word*)((C_word*)t0)[2])[1];
-t6=t2;
-f_15121(t6,C_eqp(C_fix(1),t5));}
-else{
-t5=t2;
-f_15121(t5,C_SCHEME_FALSE);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[5];
-f_14549(2,t3,t2);}}
-
-/* k15119 in k15113 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15121(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1963 quick-put!");
-f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[568],C_SCHEME_TRUE);}
-else{
-C_trace("compiler.scm: 1964 quick-put!");
-f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[569],C_SCHEME_TRUE);}}
-
-/* k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14549,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15062,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[10],a[4]=t2,a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[14],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[14])[1])){
-t4=((C_word*)((C_word*)t0)[14])[1];
-t5=C_slot(t4,C_fix(1));
-t6=t3;
-f_15062(t6,C_eqp(lf[98],t5));}
-else{
-t4=t3;
-f_15062(t4,C_SCHEME_FALSE);}}
-
-/* k15060 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15062(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15062,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[6])[1];
-t3=C_slot(t2,C_fix(2));
-t4=C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1997 collapsable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t5,t4);}
-else{
-t2=((C_word*)t0)[4];
-f_14552(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k15069 in k15060 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15071(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-if(C_truep(t2)){
-C_trace("compiler.scm: 1999 quick-put!");
-f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[567],C_SCHEME_TRUE);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[4];
-f_14552(2,t4,t3);}}
-else{
-t2=((C_word*)((C_word*)t0)[2])[1];
-t3=C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-C_trace("compiler.scm: 1999 quick-put!");
-f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[567],C_SCHEME_TRUE);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=((C_word*)t0)[4];
-f_14552(2,t5,t4);}}}
-
-/* k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14552,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14555,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[14])[1])){
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14931,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[14],tmp=(C_word)a,a+=8,tmp);
-t6=((C_word*)((C_word*)t0)[14])[1];
-t7=C_slot(t6,C_fix(1));
-t8=C_eqp(lf[172],t7);
-if(C_truep(t8)){
-t9=((C_word*)((C_word*)t0)[3])[1];
-t10=((C_word*)((C_word*)t0)[2])[1];
-t11=t5;
-f_14931(t11,C_eqp(t9,t10));}
-else{
-t9=t5;
-f_14931(t9,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_14555(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14931(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14931,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[7])[1];
-t3=C_slot(t2,C_fix(2));
-if(C_truep(C_i_cadr(t3))){
-t4=C_i_caddr(t3);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14954,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2013 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[2],t4,t5);}
-else{
-t4=((C_word*)t0)[2];
-f_14555(2,t4,C_SCHEME_UNDEFINED);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-f_14555(2,t3,t2);}}
-
-/* a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[16],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14954,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14958,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_14958(2,t6,C_SCHEME_UNDEFINED);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14997,a[2]=t7,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_14997(t9,t5,t2);}}
-
-/* loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14997(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14997,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15005,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15033,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g34723473");
-t6=t3;
-f_15005(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k15031 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_14997(t3,((C_word*)t0)[2],t2);}
-
-/* g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15005(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15005,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15012,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15030,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2019 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t4,((C_word*)t0)[2],t2,lf[559]);}
-
-/* k15028 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15030(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15030,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_15012(t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15026,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2020 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}}
-
-/* k15024 in k15028 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_15012(t2,C_i_not(t1));}
-
-/* k15010 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_15012(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15012,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15015,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 2021 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[419],C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k15013 in k15010 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_15015(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
-
-/* k14956 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14958,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14964,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t3=C_i_memq(((C_word*)t0)[2],*((C_word*)lf[78]+1));
-t4=t2;
-f_14964(t4,C_i_not(t3));}
-else{
-t3=t2;
-f_14964(t3,C_SCHEME_FALSE);}}
-
-/* k14962 in k14956 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14964(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14964,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2027 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],t2,lf[565],C_SCHEME_TRUE);}
-else{
-if(C_truep(((C_word*)t0)[3])){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 2030 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],t4,lf[566],C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}}
-
-/* k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14555,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14558,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-t3=((C_word*)((C_word*)t0)[4])[1];
-if(C_truep(t3)){
-t4=t2;
-f_14558(2,t4,C_SCHEME_UNDEFINED);}
-else{
-if(C_truep(C_i_nullp(((C_word*)((C_word*)t0)[3])[1]))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14873,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[10])[1])){
-t5=((C_word*)((C_word*)t0)[10])[1];
-t6=C_slot(t5,C_fix(1));
-t7=C_eqp(lf[509],t6);
-t8=C_i_not(t7);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14885,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[10],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t8)){
-t10=t9;
-f_14885(t10,t8);}
-else{
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14899,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
-t11=((C_word*)((C_word*)t0)[10])[1];
-t12=C_slot(t11,C_fix(2));
-t13=C_i_car(t12);
-C_trace("compiler.scm: 2038 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t10,((C_word*)t0)[8],t13,lf[530]);}}
-else{
-t5=t4;
-f_14873(t5,C_SCHEME_FALSE);}}
-else{
-t4=t2;
-f_14558(2,t4,C_SCHEME_UNDEFINED);}}}
-
-/* k14897 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_14885(t2,C_i_not(t1));}
-
-/* k14883 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14885(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14885,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14892,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2039 expression-has-side-effects?");
-((C_proc4)C_retrieve_symbol_proc(lf[564]))(4,*((C_word*)lf[564]+1),t2,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[4];
-f_14873(t2,C_SCHEME_FALSE);}}
-
-/* k14890 in k14883 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_14873(t2,C_i_not(t1));}
-
-/* k14871 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14873(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-if(C_truep(t2)){
-C_trace("compiler.scm: 2041 quick-put!");
-f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[563],C_SCHEME_TRUE);}
-else{
-t3=((C_word*)t0)[4];
-f_14558(2,t3,C_SCHEME_UNDEFINED);}}
-else{
-t2=((C_word*)((C_word*)t0)[2])[1];
-if(C_truep(t2)){
-C_trace("compiler.scm: 2041 quick-put!");
-f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[563],C_SCHEME_TRUE);}
-else{
-t3=((C_word*)t0)[4];
-f_14558(2,t3,C_SCHEME_UNDEFINED);}}}
-
-/* k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14558(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14558,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14561,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=(C_truep(((C_word*)((C_word*)t0)[8])[1])?C_i_not(((C_word*)((C_word*)t0)[3])[1]):C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=((C_word*)((C_word*)t0)[8])[1];
-t5=C_slot(t4,C_fix(1));
-t6=C_eqp(lf[509],t5);
-if(C_truep(t6)){
-t7=((C_word*)((C_word*)t0)[8])[1];
-t8=C_slot(t7,C_fix(2));
-t9=C_i_car(t8);
-t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14753,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t9,a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 2053 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t10,((C_word*)t0)[6],t9,lf[559]);}
-else{
-t7=C_SCHEME_UNDEFINED;
-t8=t2;
-f_14561(2,t8,t7);}}
-else{
-t4=t2;
-f_14561(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14753,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14759,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14834,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2054 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[6],((C_word*)t0)[5],lf[536]);}
-
-/* k14832 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14834(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_14759(2,t2,C_SCHEME_FALSE);}
-else{
-C_trace("compiler.scm: 2054 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[555]);}}
-
-/* k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14759,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14762,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_14762(t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14824,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 2055 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[7],((C_word*)t0)[6],lf[529]);}}
-
-/* k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14824(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14824,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-f_14762(t2,C_SCHEME_FALSE);}
-else{
-if(C_truep(((C_word*)t0)[5])){
-t2=C_i_length(((C_word*)t0)[5]);
-t3=C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=((C_word*)((C_word*)t0)[4])[1];
-if(C_truep(t4)){
-t5=((C_word*)t0)[6];
-f_14762(t5,C_SCHEME_FALSE);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14816,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2059 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}}
-else{
-t4=((C_word*)t0)[6];
-f_14762(t4,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[6];
-f_14762(t2,C_SCHEME_FALSE);}}}
-
-/* k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14816,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_14762(t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14812,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2060 variable-visible?");
-((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}}
-
-/* k14810 in k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14812(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14812,2,t0,t1);}
-t2=C_i_not(t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-f_14762(t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14808,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2061 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2],lf[530]);}}
-
-/* k14806 in k14810 in k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_14762(t2,C_i_not(t1));}
-
-/* k14760 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14762(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14762,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14765,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2062 quick-put!");
-f_14470(t2,((C_word*)t0)[2],lf[562],((C_word*)t0)[4]);}
-else{
-t2=((C_word*)t0)[6];
-f_14561(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k14763 in k14760 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14765(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2063 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[561],C_SCHEME_TRUE);}
-
-/* k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14561(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14561,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14567,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=((C_word*)((C_word*)t0)[6])[1];
-t4=C_slot(t3,C_fix(1));
-t5=t2;
-f_14567(t5,C_eqp(lf[172],t4));}
-else{
-t3=t2;
-f_14567(t3,C_SCHEME_FALSE);}}
-
-/* k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14567(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14567,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[6])[1];
-t3=C_slot(t2,C_fix(2));
-if(C_truep(C_i_cadr(t3))){
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-else{
-t4=C_i_caddr(t3);
-t5=((C_word*)((C_word*)t0)[6])[1];
-t6=C_slot(t5,C_fix(3));
-t7=C_i_car(t6);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14593,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t7,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(t4))){
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-t10=C_slot(t7,C_fix(1));
-t11=t8;
-f_14593(t11,C_eqp(lf[505],t10));}
-else{
-t10=t8;
-f_14593(t10,C_SCHEME_FALSE);}}
-else{
-t9=t8;
-f_14593(t9,C_SCHEME_FALSE);}}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14593(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14593,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_slot(((C_word*)t0)[7],C_fix(3));
-t3=C_i_length(t2);
-t4=C_eqp(C_fix(2),t3);
-if(C_truep(t4)){
-t5=C_i_car(t2);
-t6=C_i_cadr(t2);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14619,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t5,tmp=(C_word)a,a+=7,tmp);
-t8=C_slot(t5,C_fix(1));
-t9=C_eqp(lf[509],t8);
-if(C_truep(t9)){
-t10=C_slot(t6,C_fix(1));
-t11=C_eqp(lf[509],t10);
-if(C_truep(t11)){
-t12=C_i_car(((C_word*)t0)[2]);
-t13=C_slot(t6,C_fix(2));
-t14=C_i_car(t13);
-t15=t7;
-f_14619(t15,C_eqp(t12,t14));}
-else{
-t12=t7;
-f_14619(t12,C_SCHEME_FALSE);}}
-else{
-t10=t7;
-f_14619(t10,C_SCHEME_FALSE);}}
-else{
-t5=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k14617 in k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14619(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14619,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_slot(((C_word*)t0)[6],C_fix(2));
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14625,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 2083 quick-put!");
-f_14470(t4,((C_word*)t0)[2],lf[562],t3);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k14623 in k14617 in k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14625(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 2084 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[561],C_SCHEME_TRUE);}
-
-/* k14517 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(*((C_word*)lf[51]+1))){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-else{
-t2=C_mutate((C_word*)lf[51]+1 /* (set! original-program-size ...) */,*((C_word*)lf[52]+1));
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}}
-
-/* contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14484(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14484,NULL,4,t0,t1,t2,t3);}
-t4=C_i_memq(t2,t3);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14494,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1876 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[2],t2,lf[543]);}}
-
-/* k14492 in contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14494(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14494,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14502,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1878 any");
-((C_proc4)C_retrieve_symbol_proc(lf[560]))(4,*((C_word*)lf[560]+1),((C_word*)t0)[2],t2,t1);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* a14501 in k14492 in contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14502(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14502,3,t0,t1,t2);}
-C_trace("compiler.scm: 1878 contains?");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_14484(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* quick-put! in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14470(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14470,NULL,4,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14478,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_i_cdr(t2);
-C_trace("compiler.scm: 1871 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t5,t3,t4,t6);}
-
-/* k14476 in quick-put! in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14478(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_set_cdr(((C_word*)t0)[2],t1));}
-
-/* ref in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14464(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14464,NULL,4,t0,t1,t2,t3);}
-C_trace("compiler.scm: 1868 collect!");
-((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t1,((C_word*)t0)[2],t2,lf[559],t3);}
-
-/* assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14286(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14286,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=t3;
-t7=C_slot(t6,C_fix(1));
-t8=C_eqp(lf[138],t7);
-if(C_truep(t8)){
-C_trace("compiler.scm: 1842 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t1,((C_word*)t0)[2],t2,lf[554],C_SCHEME_TRUE);}
-else{
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14299,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[2],a[5]=t4,a[6]=t2,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t10=t3;
-t11=C_slot(t10,C_fix(1));
-t12=C_eqp(lf[509],t11);
-if(C_truep(t12)){
-t13=t3;
-t14=C_slot(t13,C_fix(2));
-t15=C_i_car(t14);
-t16=t9;
-f_14299(t16,C_eqp(t2,t15));}
-else{
-t13=t9;
-f_14299(t13,C_SCHEME_FALSE);}}}
-
-/* k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14299(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14299,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_i_memq(((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_14311(t4,t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14415,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=((C_word*)t0)[6];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[310]);}}}
-
-/* k14413 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14415,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_14311(t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14425,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1847 variable-visible?");
-((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}}
-
-/* k14423 in k14413 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_14311(t2,C_i_not(t1));}
-
-/* k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14311(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14311,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1848 get-all");
-((C_proc6)C_retrieve_symbol_proc(lf[556]))(6,*((C_word*)lf[556]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[536],lf[555]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14356,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=*((C_word*)lf[41]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14392,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_14392(2,t5,t3);}
-else{
-t5=((C_word*)t0)[4];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[468]);}}}
-
-/* k14390 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14392,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14399,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1858 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[536]);}
-else{
-t2=((C_word*)t0)[4];
-f_14356(t2,C_SCHEME_FALSE);}}
-
-/* k14397 in k14390 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14399(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_14356(t2,C_i_not(t1));}
-
-/* k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14356(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14356,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1859 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[535]);}
-else{
-C_trace("compiler.scm: 1865 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}}
-
-/* k14357 in k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14365,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1860 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[557]);}
-
-/* k14363 in k14357 in k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1861 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[536],C_SCHEME_TRUE);}
-else{
-t2=C_i_not(((C_word*)t0)[4]);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[3],((C_word*)t0)[4]));
-if(C_truep(t3)){
-C_trace("compiler.scm: 1863 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[557],((C_word*)t0)[2]);}
-else{
-C_trace("compiler.scm: 1864 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[536],C_SCHEME_TRUE);}}}
-
-/* k14312 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1849 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[535]);}
-
-/* k14315 in k14312 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(C_i_assq(lf[536],((C_word*)t0)[7]))){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-else{
-if(C_truep(C_i_assq(lf[555],((C_word*)t0)[7]))){
-C_trace("compiler.scm: 1852 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}
-else{
-t2=C_i_not(t1);
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[3],t1));
-if(C_truep(t3)){
-C_trace("compiler.scm: 1854 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[555],((C_word*)t0)[2]);}
-else{
-C_trace("compiler.scm: 1855 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}}}}
-
-/* walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14252(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14252,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14258,a[2]=t7,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_14258(t9,t1,t2);}
-
-/* loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14258(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14258,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14266,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14273,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g31353136");
-t6=t3;
-f_14266(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k14271 in loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_14258(t3,((C_word*)t0)[2],t2);}
-
-/* g3135 in loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14266(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14266,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1838 walk");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_13653(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13653(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13653,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=t2;
-t7=C_slot(t6,C_fix(3));
-t8=t2;
-t9=C_slot(t8,C_fix(2));
-t10=t2;
-t11=C_slot(t10,C_fix(1));
-t12=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t13=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t12);
-t14=C_eqp(t11,lf[98]);
-t15=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_13690,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t7,a[6]=((C_word*)t0)[4],a[7]=t2,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t3,a[11]=t4,a[12]=t9,a[13]=t11,a[14]=t1,tmp=(C_word)a,a+=15,tmp);
-if(C_truep(t14)){
-t16=t15;
-f_13690(t16,t14);}
-else{
-t16=C_eqp(t11,lf[138]);
-t17=t15;
-f_13690(t17,(C_truep(t16)?t16:C_eqp(t11,lf[553])));}}
-
-/* k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13690(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13690,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=C_eqp(((C_word*)t0)[13],lf[509]);
-if(C_truep(t2)){
-t3=C_i_car(((C_word*)t0)[12]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13702,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[11],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1729 ref");
-t5=((C_word*)((C_word*)t0)[8])[1];
-f_14464(t5,t4,t3,((C_word*)t0)[7]);}
-else{
-t3=C_eqp(((C_word*)t0)[13],lf[516]);
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[12]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13745,a[2]=t4,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[14],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1739 ref");
-t6=((C_word*)((C_word*)t0)[8])[1];
-f_14464(t6,t5,t4,((C_word*)t0)[7]);}
-else{
-t4=C_eqp(((C_word*)t0)[13],lf[343]);
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[13],lf[532]));
-if(C_truep(t5)){
-t6=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t7=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t6);
-C_trace("compiler.scm: 1745 walkeach");
-t8=((C_word*)((C_word*)t0)[6])[1];
-f_14252(t8,((C_word*)t0)[14],((C_word*)t0)[5],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[4]);}
-else{
-t6=C_eqp(((C_word*)t0)[13],lf[505]);
-if(C_truep(t6)){
-t7=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t8=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t7);
-t9=C_i_car(((C_word*)t0)[5]);
-t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13781,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-t11=C_slot(t9,C_fix(1));
-t12=C_eqp(lf[509],t11);
-if(C_truep(t12)){
-t13=C_slot(t9,C_fix(2));
-t14=C_i_car(t13);
-t15=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[7]);
-C_trace("compiler.scm: 1752 collect!");
-((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t10,((C_word*)t0)[9],t14,lf[534],t15);}
-else{
-t13=t10;
-f_13781(2,t13,C_SCHEME_UNDEFINED);}}
-else{
-t7=C_eqp(((C_word*)t0)[13],lf[158]);
-t8=(C_truep(t7)?t7:C_eqp(((C_word*)t0)[13],lf[159]));
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13838,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[3],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 1757 append");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[160]+1)))(5,*((C_word*)lf[160]+1),t9,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);}
-else{
-t9=C_eqp(((C_word*)t0)[13],lf[171]);
-if(C_truep(t9)){
-t10=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t11=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t10);
-t12=C_i_car(((C_word*)t0)[12]);
-t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13905,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1770 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[14],t12,t13);}
-else{
-t10=C_eqp(((C_word*)t0)[13],lf[172]);
-t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[13],lf[537]));
-if(C_truep(t11)){
-t12=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t13=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t12);
-t14=C_i_caddr(((C_word*)t0)[12]);
-t15=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13971,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1783 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[14],t14,t15);}
-else{
-t12=C_eqp(((C_word*)t0)[13],lf[250]);
-t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[13],lf[168]));
-if(C_truep(t13)){
-t14=C_i_car(((C_word*)t0)[12]);
-t15=C_i_car(((C_word*)t0)[5]);
-t16=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14104,a[2]=t15,a[3]=((C_word*)t0)[2],a[4]=t14,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[3],a[11]=((C_word*)t0)[5],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(*((C_word*)lf[62]+1))){
-t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14166,a[2]=t15,a[3]=t14,a[4]=((C_word*)t0)[9],a[5]=t16,tmp=(C_word)a,a+=6,tmp);
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t17,t14,lf[552]);}
-else{
-t17=t16;
-f_14104(2,t17,C_SCHEME_UNDEFINED);}}
-else{
-t14=C_eqp(((C_word*)t0)[13],lf[106]);
-t15=(C_truep(t14)?t14:C_eqp(((C_word*)t0)[13],lf[270]));
-if(C_truep(t15)){
-t16=C_i_car(((C_word*)t0)[12]);
-t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14202,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14208,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[4],a[8]=t16,a[9]=t17,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(*((C_word*)lf[62]+1))){
-if(C_truep(((C_word*)t0)[4])){
-if(C_truep(C_i_symbolp(t16))){
-C_trace("compiler.scm: 1831 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t18,*((C_word*)lf[74]+1),t16);}
-else{
-t19=t18;
-f_14208(2,t19,C_SCHEME_FALSE);}}
-else{
-t19=t18;
-f_14208(2,t19,C_SCHEME_FALSE);}}
-else{
-t19=t18;
-f_14208(2,t19,C_SCHEME_FALSE);}}
-else{
-C_trace("compiler.scm: 1835 walkeach");
-t16=((C_word*)((C_word*)t0)[6])[1];
-f_14252(t16,((C_word*)t0)[14],((C_word*)t0)[5],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[4]);}}}}}}}}}}}
-
-/* k14206 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1832 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
-else{
-C_trace("compiler.scm: 1833 walkeach");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_14252(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[7]);}}
-
-/* k14200 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14202(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1833 walkeach");
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_14252(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14164 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14166,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14169,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_eqp(t1,lf[547]);
-if(C_truep(t3)){
-C_trace("compiler.scm: 1814 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[548],lf[549],((C_word*)t0)[3]);}
-else{
-t4=C_eqp(t1,lf[550]);
-if(C_truep(t4)){
-C_trace("compiler.scm: 1816 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[548],lf[551],((C_word*)t0)[3]);}
-else{
-C_trace("compiler.scm: 1817 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[546],((C_word*)t0)[2]);}}}
-
-/* k14167 in k14164 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14169(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1817 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[546],((C_word*)t0)[2]);}
-
-/* k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14104,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14107,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(C_i_memq(((C_word*)t0)[4],((C_word*)t0)[7]))){
-t3=t2;
-f_14107(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t4=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t3);
-if(C_truep(C_i_memq(((C_word*)t0)[4],((C_word*)t0)[8]))){
-C_trace("compiler.scm: 1821 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[529],C_SCHEME_TRUE);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14158,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1822 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[5],((C_word*)t0)[4],lf[530]);}}}
-
-/* k14156 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_14107(2,t2,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 1823 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}}
-
-/* k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14107,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14110,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14130,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1824 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[7],((C_word*)t0)[8]);}
-
-/* k14128 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1824 assign");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_14286(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14110(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14110,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14113,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(*((C_word*)lf[79]+1))){
-t3=t2;
-f_14113(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 1825 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[545],C_SCHEME_TRUE);}}
-
-/* k14111 in k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14113(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14113,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14116,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1826 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544],C_SCHEME_TRUE);}
-
-/* k14114 in k14111 in k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1827 walk");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_13653(t3,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13971,5,t0,t1,t2,t3,t4);}
-t5=C_i_car(((C_word*)t0)[9]);
-t6=*((C_word*)lf[52]+1);
-t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_13978,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t2,a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=t1,a[13]=t6,a[14]=((C_word*)t0)[8],tmp=(C_word)a,a+=15,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14083,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1789 collect!");
-((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t8,((C_word*)t0)[3],((C_word*)t0)[2],lf[543],t5);}
-else{
-t8=t7;
-f_13978(2,t8,C_SCHEME_UNDEFINED);}}
-
-/* k14081 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14083(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1790 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[542],((C_word*)t0)[2]);}
-
-/* k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13978(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13978,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_13981,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14051,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_14051(t6,t2,((C_word*)t0)[9]);}
-
-/* loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14051(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14051,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14059,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14069,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g30403041");
-t6=t3;
-f_14059(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k14067 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14069(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_14051(t3,((C_word*)t0)[2],t2);}
-
-/* g3040 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_14059(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14059,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14063,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1793 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t3,((C_word*)t0)[3],t2,lf[535],((C_word*)t0)[2]);}
-
-/* k14061 in g3040 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1794 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[536],C_SCHEME_TRUE);}
-
-/* k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13981(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13981,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_13984,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-if(C_truep(((C_word*)t0)[2])){
-C_trace("compiler.scm: 1797 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[540],lf[541]);}
-else{
-t3=t2;
-f_13984(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13984,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13987,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14043,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1798 simple-lambda-node?");
-((C_proc3)C_retrieve_symbol_proc(lf[539]))(3,*((C_word*)lf[539]+1),t3,((C_word*)t0)[12]);}
-
-/* k14041 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14043(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1798 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[538],C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[4];
-f_13987(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13987,2,t0,t1);}
-t2=*((C_word*)lf[79]+1);
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_13990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t2,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(*((C_word*)lf[80]+1))){
-t4=t3;
-f_13990(t4,C_SCHEME_UNDEFINED);}
-else{
-t4=C_mutate((C_word*)lf[80]+1 /* (set! toplevel-lambda-id ...) */,((C_word*)t0)[5]);
-t5=t3;
-f_13990(t5,t4);}}
-
-/* k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13990(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13990,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13993,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(C_i_cadr(((C_word*)t0)[2]))){
-t3=C_eqp(*((C_word*)lf[80]+1),((C_word*)t0)[5]);
-if(C_truep(t3)){
-t4=t2;
-f_13993(t4,C_SCHEME_UNDEFINED);}
-else{
-t4=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_FALSE);
-t5=t2;
-f_13993(t5,t4);}}
-else{
-t3=t2;
-f_13993(t3,C_SCHEME_UNDEFINED);}}
-
-/* k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13993(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13993,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13996,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[7]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14025,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1803 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14023 in k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_14025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1803 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_13653(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13994 in k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-t2=C_mutate((C_word*)lf[79]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[5]);
-t3=((C_word*)t0)[4];
-t4=C_slot(t3,C_fix(2));
-t5=C_i_cdddr(t4);
-t6=C_fixnum_difference(*((C_word*)lf[52]+1),((C_word*)t0)[3]);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_i_set_car(t5,t6));}
-
-/* a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13905(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[14],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13905,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13909,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13924,a[2]=t7,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp));
-t9=((C_word*)t7)[1];
-f_13924(t9,t5,t2);}
-
-/* loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13924(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13924,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13932,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13939,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g30083009");
-t6=t3;
-f_13932(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13937 in loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13924(t3,((C_word*)t0)[2],t2);}
-
-/* g3008 in loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13932(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13932,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1774 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t1,((C_word*)t0)[2],t2,lf[536],C_SCHEME_TRUE);}
-
-/* k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13909(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13909,2,t0,t1);}
-t2=*((C_word*)lf[79]+1);
-t3=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13913,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=C_i_car(((C_word*)t0)[6]);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13922,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=t4,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1778 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13920 in k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13922(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1778 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_13653(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k13911 in k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13913(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[79]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13838(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13838,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13843,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp));
-t5=((C_word*)t3)[1];
-f_13843(t5,((C_word*)t0)[3],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_fcall f_13843(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13843,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13861,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t4,a[5]=t1,a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1760 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t5,((C_word*)t0)[7],((C_word*)t0)[6]);}
-else{
-t4=C_i_car(t2);
-t5=C_i_car(t3);
-t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_13870,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=t5,a[9]=((C_word*)t0)[10],a[10]=t1,a[11]=((C_word*)t0)[5],a[12]=t3,a[13]=t2,tmp=(C_word)a,a+=14,tmp);
-C_trace("compiler.scm: 1763 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t6,((C_word*)t0)[2],t4,lf[535],((C_word*)t0)[8]);}}
-
-/* k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13870(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13870,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13873,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 1764 assign");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_14286(t3,t2,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[2],((C_word*)t0)[5]);}
-
-/* k13871 in k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13873,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13876,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1765 walk");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_13653(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13874 in k13871 in k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[5]);
-t3=C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1766 loop");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_13843(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k13859 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13861(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1760 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_13653(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k13779 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13781,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13784,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_car(((C_word*)t0)[8]);
-C_trace("compiler.scm: 1753 walk");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_13653(t4,t2,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-
-/* k13782 in k13779 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13784(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1754 walkeach");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_14252(t3,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13743 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t3=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t2);
-C_trace("compiler.scm: 1741 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}
-
-/* k13700 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13702(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13702,2,t0,t1);}
-if(C_truep(C_i_memq(((C_word*)t0)[6],((C_word*)t0)[5]))){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
-t3=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t2);
-if(C_truep(C_i_memq(((C_word*)t0)[6],((C_word*)t0)[3]))){
-C_trace("compiler.scm: 1733 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[2],((C_word*)t0)[6],lf[529],C_SCHEME_TRUE);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13733,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1734 get");
-((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t4,((C_word*)t0)[2],((C_word*)t0)[6],lf[530]);}}}
-
-/* k13731 in k13700 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
-static void C_ccall f_13733(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-C_trace("compiler.scm: 1735 put!");
-((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}}
-
-/* foreign-callback-stub-argument-types in k5089 in k5086 */
-static void C_ccall f_13631(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13631,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[520]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(5)));}
-
-/* foreign-callback-stub-return-type in k5089 in k5086 */
-static void C_ccall f_13622(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13622,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[520]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(4)));}
-
-/* foreign-callback-stub-qualifiers in k5089 in k5086 */
-static void C_ccall f_13613(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13613,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[520]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(3)));}
-
-/* foreign-callback-stub-name in k5089 in k5086 */
-static void C_ccall f_13604(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13604,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[520]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(2)));}
-
-/* foreign-callback-stub-id in k5089 in k5086 */
-static void C_ccall f_13595(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13595,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[520]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(1)));}
-
-/* foreign-callback-stub? in k5089 in k5086 */
-static void C_ccall f_13589(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13589,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[520]));}
-
-/* make-foreign-callback-stub in k5089 in k5086 */
-static void C_ccall f_13583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_13583,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,6,lf[520],t2,t3,t4,t5,t6));}
-
-/* ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12724(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[35],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12724,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12727,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-t16=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12784,a[2]=t8,a[3]=t10,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
-t17=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13256,a[2]=t12,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
-t18=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13432,a[2]=t12,tmp=(C_word)a,a+=3,tmp));
-t19=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13453,a[2]=t14,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
-t20=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13545,a[2]=t14,tmp=(C_word)a,a+=3,tmp));
-C_trace("compiler.scm: 1695 walk");
-t21=((C_word*)t6)[1];
-f_12784(t21,t1,t2,*((C_word*)lf[519]+1));}
-
-/* atomic? in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13545(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13545,3,t0,t1,t2);}
-t3=t2;
-t4=C_slot(t3,C_fix(1));
-t5=C_i_memq(t4,lf[518]);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-if(C_truep((C_truep(C_eqp(t4,lf[270]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[271]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[100]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[251]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[104]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[254]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
-t6=t2;
-t7=C_slot(t6,C_fix(3));
-C_trace("compiler.scm: 1693 every");
-((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t1,((C_word*)((C_word*)t0)[2])[1],t7);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}}
-
-/* walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_13453(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13453,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13459,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t3,tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_13459(t7,t1,t2,C_SCHEME_END_OF_LIST);}
-
-/* loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_13459(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13459,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13473,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1676 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t4,t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13479,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t5=C_i_car(t2);
-C_trace("compiler.scm: 1677 atomic?");
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_13545(3,t6,t4,t5);}}
-
-/* k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13479(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13479,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_i_car(((C_word*)t0)[6]);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
-C_trace("compiler.scm: 1678 loop");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_13459(t5,((C_word*)t0)[3],t2,t4);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13497,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1680 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[496]);}}
-
-/* k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13497,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13506,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1681 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t4,((C_word*)t0)[2],t2,t3);}
-
-/* a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13506(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13506,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13527,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_cdr(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13539,a[2]=t5,a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1686 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t6,((C_word*)t0)[5]);}
-
-/* k13537 in a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13539(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13539,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-C_trace("compiler.scm: 1685 loop");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_13459(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k13525 in a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13527(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13527,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-
-/* k13471 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13473(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1676 wk");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* walk-inline-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_13432(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13432,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13438,a[2]=t5,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1669 walk-arguments");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_13453(t7,t1,t4,t6);}
-
-/* a13437 in walk-inline-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13438(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13438,3,t0,t1,t2);}
-t3=((C_word*)t0)[4];
-t4=((C_word*)t0)[3];
-t5=C_a_i_record(&a,4,lf[504],t3,t4,t2);
-C_trace("compiler.scm: 1672 k");
-t6=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t1,t5);}
-
-/* walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_13256(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13256,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13260,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=t4,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 1645 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[508]);}
-
-/* k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13260,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13263,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1646 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-
-/* k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13263(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13263,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13342,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[7],a[9]=t2,a[10]=((C_word*)t0)[8],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 277 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[511]);}
-
-/* k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13342,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[11]);
-t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13329,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13333,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1650 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[11]);}
-
-/* k13331 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13333(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1650 k");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13329,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[10],t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13292,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13294,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1651 walk-arguments");
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_13453(t6,t4,((C_word*)t0)[2],t5);}
-
-/* a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13294(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13294,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13300,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1654 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t4,t1,((C_word*)t0)[2],t3);}
-
-/* a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13300(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13300,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13313,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13317,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1656 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t4,((C_word*)t0)[2]);}
-
-/* k13315 in a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1656 cons*");
-((C_proc5)C_retrieve_symbol_proc(lf[517]))(5,*((C_word*)lf[517]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k13311 in a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13313,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],t3,t1));}
-
-/* k13290 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13292,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-
-/* walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_12784(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12784,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=C_slot(t4,C_fix(3));
-t6=t2;
-t7=C_slot(t6,C_fix(2));
-t8=t2;
-t9=C_slot(t8,C_fix(1));
-t10=t2;
-t11=C_slot(t10,C_fix(1));
-t12=C_eqp(t11,lf[509]);
-t13=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12826,a[2]=((C_word*)t0)[2],a[3]=t9,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t7,a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t11,a[10]=t2,a[11]=t1,a[12]=t3,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(t12)){
-t14=t13;
-f_12826(t14,t12);}
-else{
-t14=C_eqp(t11,lf[98]);
-if(C_truep(t14)){
-t15=t13;
-f_12826(t15,t14);}
-else{
-t15=C_eqp(t11,lf[138]);
-if(C_truep(t15)){
-t16=t13;
-f_12826(t16,t15);}
-else{
-t16=C_eqp(t11,lf[106]);
-t17=t13;
-f_12826(t17,(C_truep(t16)?t16:C_eqp(t11,lf[516])));}}}}
-
-/* k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_12826(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12826,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 1601 k");
-t2=((C_word*)t0)[12];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[11],((C_word*)t0)[10]);}
-else{
-t2=C_eqp(((C_word*)t0)[9],lf[123]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12838,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1602 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[508]);}
-else{
-t3=C_eqp(((C_word*)t0)[9],lf[158]);
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12963,a[2]=t5,a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_12963(t7,((C_word*)t0)[11],((C_word*)t0)[6],((C_word*)t0)[8]);}
-else{
-t4=C_eqp(((C_word*)t0)[9],lf[171]);
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[9],lf[172]));
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13040,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 277 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[511]);}
-else{
-t6=C_eqp(((C_word*)t0)[9],lf[250]);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13053,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1625 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t7,lf[512]);}
-else{
-t7=C_eqp(((C_word*)t0)[9],lf[317]);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13122,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 277 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t8,lf[511]);}
-else{
-t8=C_eqp(((C_word*)t0)[9],lf[270]);
-t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13167,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[4],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t8)){
-t10=t9;
-f_13167(t10,t8);}
-else{
-t10=C_eqp(((C_word*)t0)[9],lf[271]);
-if(C_truep(t10)){
-t11=t9;
-f_13167(t11,t10);}
-else{
-t11=C_eqp(((C_word*)t0)[9],lf[100]);
-if(C_truep(t11)){
-t12=t9;
-f_13167(t12,t11);}
-else{
-t12=C_eqp(((C_word*)t0)[9],lf[251]);
-if(C_truep(t12)){
-t13=t9;
-f_13167(t13,t12);}
-else{
-t13=C_eqp(((C_word*)t0)[9],lf[104]);
-t14=t9;
-f_13167(t14,(C_truep(t13)?t13:C_eqp(((C_word*)t0)[9],lf[254])));}}}}}}}}}}}
-
-/* k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_13167(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13167,NULL,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 1639 walk-inline-call");
-t2=((C_word*)((C_word*)t0)[9])[1];
-f_13432(t2,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=C_eqp(((C_word*)t0)[3],lf[505]);
-if(C_truep(t2)){
-t3=C_i_car(((C_word*)t0)[5]);
-t4=C_i_cdr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 1640 walk-call");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_13256(t5,((C_word*)t0)[8],t3,t4,((C_word*)t0)[6],((C_word*)t0)[4]);}
-else{
-t3=C_eqp(((C_word*)t0)[3],lf[343]);
-if(C_truep(t3)){
-t4=C_i_car(((C_word*)t0)[6]);
-t5=((C_word*)t0)[8];
-t6=((C_word*)t0)[4];
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13352,a[2]=t6,a[3]=t5,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1659 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t7,lf[508]);}
-else{
-C_trace("compiler.scm: 1642 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),((C_word*)t0)[8],lf[515]);}}}}
-
-/* k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13352(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13352,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13355,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1660 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-
-/* k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13355,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 277 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[511]);}
-
-/* k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13426,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[7]);
-t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13413,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13417,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1664 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[7]);}
-
-/* k13415 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1664 k");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13411 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13413(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13413,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[6],t2);
-t4=C_a_i_list(&a,1,((C_word*)t0)[5]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13401,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1666 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[2]);}
-
-/* k13399 in k13411 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13401(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13401,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[343],((C_word*)t0)[5],t2);
-t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t4));}
-
-/* k13120 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13122,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13158,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-C_apply(5,0,t3,*((C_word*)lf[513]+1),t1,((C_word*)t0)[2]);}
-
-/* k13156 in k13120 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13158,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,*((C_word*)lf[66]+1));
-t3=C_mutate((C_word*)lf[66]+1 /* (set! foreign-callback-stubs ...) */,t2);
-t4=C_slot(((C_word*)t0)[6],C_fix(2));
-t5=C_i_car(t4);
-t6=C_slot(((C_word*)t0)[6],C_fix(3));
-C_trace("compiler.scm: 1636 cps-lambda");
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_12727(t7,((C_word*)t0)[4],((C_word*)t0)[3],t5,t6,((C_word*)t0)[2]);}
-
-/* k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13053(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13053,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13062,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1626 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t4,((C_word*)t0)[2],t2,t3);}
-
-/* a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13062(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13062,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,((C_word*)t0)[4]);
-t4=C_i_car(((C_word*)t0)[3]);
-t5=C_a_i_list(&a,1,t4);
-t6=C_a_i_list(&a,1,t2);
-t7=C_a_i_record(&a,4,lf[504],lf[250],t5,t6);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13092,a[2]=t3,a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13096,a[2]=t8,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1630 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t9,((C_word*)t0)[4]);}
-
-/* k13094 in a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13096(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1630 k");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13090 in a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13092(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13092,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-
-/* k13038 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1624 cps-lambda");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_12727(t3,((C_word*)t0)[4],t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_12963(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12963,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=C_i_car(t3);
-C_trace("compiler.scm: 1618 walk");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12784(t5,t1,t4,((C_word*)t0)[3]);}
-else{
-t4=C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12986,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1619 walk");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12784(t6,t1,t4,t5);}}
-
-/* a12985 in loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12986(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12986,3,t0,t1,t2);}
-t3=C_i_car(((C_word*)t0)[4]);
-t4=C_a_i_list(&a,1,t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13007,a[2]=t4,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t6=C_i_cdr(((C_word*)t0)[4]);
-t7=C_i_cdr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1623 loop");
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_12963(t8,t5,t6,t7);}
-
-/* k13005 in a12985 in loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_13007(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13007,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-
-/* k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12838(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12838,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12841,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1603 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-
-/* k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12841(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12841,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12842,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t3=C_a_i_list(&a,1,((C_word*)t0)[6]);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12948,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((C_word*)t0)[5],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 277 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t4,lf[511]);}
-
-/* k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12948,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[8]);
-t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12935,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12939,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1608 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[8]);}
-
-/* k12937 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1608 k");
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12935(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12935,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[7],t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12888,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_car(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12894,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1609 walk");
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t7,t4,t5,t6);}
-
-/* a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12894(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12894,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12911,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t4=C_i_cadr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1613 walk");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t5,t3,t4,((C_word*)t0)[2]);}
-
-/* k12909 in a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12911,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12915,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_caddr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1614 walk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12784(t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k12913 in k12909 in a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12915,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[123],C_SCHEME_END_OF_LIST,t2));}
-
-/* k12886 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12888(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12888,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-
-/* k1 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12842(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12842,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12859,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1604 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-
-/* k12857 in k1 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12859(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12859,2,t0,t1);}
-t2=C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],lf[510],t2));}
-
-/* cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_fcall f_12727(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12727,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12731,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=t5,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1589 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[508]);}
-
-/* k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12731,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[7]);
-t3=C_a_i_list(&a,4,((C_word*)t0)[6],C_SCHEME_TRUE,t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12755,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_car(((C_word*)t0)[3]);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12761,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1592 walk");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_12784(t7,t4,t5,t6);}
-
-/* a12760 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12761(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12761,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12778,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1594 varnode");
-((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-
-/* k12776 in a12760 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12778,2,t0,t1);}
-t2=C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],lf[506],t2));}
-
-/* k12753 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
-static void C_ccall f_12755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12755,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[4],t2);
-C_trace("compiler.scm: 1590 k");
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[2],t3);}
-
-/* ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_ccall f_12634(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[11],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_12634,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12637,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
-t9=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12666,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
-C_trace("compiler.scm: 1581 walk");
-t10=((C_word*)t7)[1];
-f_12666(t10,t1,t2);}
-
-/* walk in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_fcall f_12666(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12666,NULL,3,t0,t1,t2);}
-t3=C_i_not_pair_p(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t4=C_i_car(t2);
-if(C_truep(C_i_symbolp(t4))){
-t5=C_i_car(t2);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12685,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1576 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t6,C_retrieve(lf[502]),t5);}
-else{
-C_trace("compiler.scm: 1580 mapupdate");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_12637(t5,t1,t2);}}}
-
-/* k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_ccall f_12685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12685,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12691,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_assq(((C_word*)t0)[6],t2))){
-t4=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1579 mapupdate");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_12637(t5,((C_word*)t0)[4],t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12708,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1578 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t4,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
-
-/* k12706 in k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_ccall f_12708(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1578 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),((C_word*)t0)[3],C_retrieve(lf[502]),((C_word*)t0)[2],t1);}
-
-/* k12689 in k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_ccall f_12691(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1579 mapupdate");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12637(t3,((C_word*)t0)[2],t2);}
-
-/* mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_fcall f_12637(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12637,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12643,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_12643(t6,t1,t2);}
-
-/* loop in mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_fcall f_12643(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12643,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12653,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_i_car(t2);
-C_trace("compiler.scm: 1570 walk");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12666(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12651 in loop in mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
-static void C_ccall f_12653(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1571 loop");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12643(t3,((C_word*)t0)[2],t2);}
-
-/* ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12495(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12495,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12499,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cddr(t2);
-if(C_truep(C_i_pairp(t4))){
-t5=C_i_caddr(t2);
-t6=C_i_stringp(t5);
-t7=t3;
-f_12499(t7,C_i_not(t6));}
-else{
-t5=t3;
-f_12499(t5,C_SCHEME_FALSE);}}
-
-/* k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_fcall f_12499(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12499,NULL,2,t0,t1);}
-t2=(C_truep(t1)?C_i_cadr(((C_word*)t0)[3]):lf[501]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12505,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t4=(C_truep(t1)?C_i_caddr(((C_word*)t0)[3]):C_i_cadr(((C_word*)t0)[3]));
-C_trace("compiler.scm: 1555 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t3,t4);}
-
-/* k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12505,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12508,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(C_truep(((C_word*)t0)[3])?C_i_cdddr(((C_word*)t0)[2]):C_i_cddr(((C_word*)t0)[2]));
-C_apply(4,0,t2,*((C_word*)lf[229]+1),t3);}
-
-/* k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12508,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12511,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12558,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_12558(t10,t6,((C_word*)t0)[2]);}
-
-/* loop2538 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_fcall f_12558(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12558,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[500]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12587,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g25542555");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12585 in loop2538 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12587,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25382551");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12558(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25382551");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12558(t6,((C_word*)t0)[3],t5);}}
-
-/* k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12511,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12514,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12521,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1559 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t7,((C_word*)t0)[2]);}
-
-/* k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12521,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12523,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_12523(t5,((C_word*)t0)[2],t1);}
-
-/* loop2562 in k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_fcall f_12523(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12523,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[499]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12552,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g25782579");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12550 in loop2562 in k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12552,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25622575");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12523(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25622575");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12523(t6,((C_word*)t0)[3],t5);}}
-
-/* k12512 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
-static void C_ccall f_12514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1560 create-foreign-stub");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_TRUE);}
-
-/* ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_12396,4,t0,t1,t2,t3);}
-t4=C_i_cadr(t2);
-t5=C_i_caddr(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12406,a[2]=t5,a[3]=t3,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t7=C_i_cdddr(t2);
-C_apply(4,0,t6,*((C_word*)lf[229]+1),t7);}
-
-/* k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12406,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12409,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12456,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_12456(t10,t6,((C_word*)t0)[2]);}
-
-/* loop2481 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_fcall f_12456(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12456,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[500]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12485,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g24972498");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12483 in loop2481 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12485,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop24812494");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12456(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop24812494");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12456(t6,((C_word*)t0)[3],t5);}}
-
-/* k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12409,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12412,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12419,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1548 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t7,((C_word*)t0)[2]);}
-
-/* k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12419(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12419,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12421,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_12421(t5,((C_word*)t0)[2],t1);}
-
-/* loop2505 in k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_fcall f_12421(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12421,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[499]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12450,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g25212522");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12448 in loop2505 in k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12450(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12450,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25052518");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12421(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25052518");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12421(t6,((C_word*)t0)[3],t5);}}
-
-/* k12410 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
-static void C_ccall f_12412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1549 create-foreign-stub");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[6],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[2]);}
-
-/* ##compiler#expand-foreign-lambda in k5089 in k5086 */
-static void C_ccall f_12359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_12359,4,t0,t1,t2,t3);}
-t4=C_i_caddr(t2);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12366,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_symbolp(t4))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12385,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1535 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t6,t4);}
-else{
-if(C_truep(C_i_stringp(t4))){
-t6=t5;
-f_12366(2,t6,t4);}
-else{
-C_trace("compiler.scm: 1537 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),t5,lf[498],t4);}}}
-
-/* k12383 in ##compiler#expand-foreign-lambda in k5089 in k5086 */
-static void C_ccall f_12385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1535 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1);}
-
-/* k12364 in ##compiler#expand-foreign-lambda in k5089 in k5086 */
-static void C_ccall f_12366(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[4]);
-t3=C_i_cdddr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1540 create-foreign-stub");
-((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[3],t2,t1,t3,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2],((C_word*)t0)[2]);}
-
-/* ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12108(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
-C_word tmp;
-C_word t9;
-C_word t10;
-C_word ab[9],*a=ab;
-if(c!=9) C_bad_argc_2(c,9,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr9,(void*)f_12108,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12112,a[2]=t4,a[3]=t1,a[4]=t7,a[5]=t8,a[6]=t6,a[7]=t5,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 1506 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t9,t2);}
-
-/* k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12112(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12112,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12115,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 1507 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,((C_word*)t0)[2]);}
-
-/* k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12115,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12118,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=C_i_length(t1);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12353,tmp=(C_word)a,a+=2,tmp);
-C_trace("compiler.scm: 1508 list-tabulate");
-((C_proc4)C_retrieve_symbol_proc(lf[497]))(4,*((C_word*)lf[497]+1),t2,t3,t4);}
-
-/* a12352 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12353(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12353,3,t0,t1,t2);}
-C_trace("compiler.scm: 1508 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t1,lf[496]);}
-
-/* k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12118(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12118,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12121,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 1509 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[495]);}
-
-/* k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12121,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 1510 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-
-/* k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12124(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12124,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12127,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-C_trace("compiler.scm: 1511 estimate-foreign-result-size");
-((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t2,((C_word*)t0)[10]);}
-
-/* k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12127(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12127,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_12130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-if(C_truep(((C_word*)t0)[10])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12347,a[2]=((C_word*)t0)[12],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1512 string->symbol");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[493]+1)))(3,*((C_word*)lf[493]+1),t3,((C_word*)t0)[10]);}
-else{
-t3=t2;
-f_12130(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k12345 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1512 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12130,2,t0,t1);}
-t2=((C_word*)t0)[13];
-t3=((C_word*)t0)[12];
-t4=((C_word*)t0)[11];
-t5=((C_word*)t0)[10];
-t6=((C_word*)t0)[9];
-t7=((C_word*)t0)[8];
-t8=((C_word*)t0)[7];
-t9=((C_word*)t0)[6];
-t10=C_a_i_record(&a,9,lf[479],t2,t3,t4,t5,t6,t7,t8,t9);
-t11=C_a_i_cons(&a,2,t10,*((C_word*)lf[65]+1));
-t12=C_mutate((C_word*)lf[65]+1 /* (set! foreign-lambda-stubs ...) */,t11);
-t13=(C_truep(((C_word*)t0)[6])?C_fixnum_plus(((C_word*)t0)[5],C_fix(24)):((C_word*)t0)[5]);
-t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12140,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[12],a[5]=t13,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)t0)[7])){
-t15=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t16=C_a_i_cons(&a,2,lf[106],t15);
-t17=t14;
-f_12140(t17,C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
-else{
-t15=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
-t16=t14;
-f_12140(t16,C_a_i_cons(&a,2,lf[270],t15));}}
-
-/* k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_fcall f_12140(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12140,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12143,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12259,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_12259(t10,t6,((C_word*)t0)[8],((C_word*)t0)[2]);}
-
-/* loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_fcall f_12259(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12259,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12301,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12298,a[2]=t8,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1520 foreign-type-convert-argument");
-((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t9,t7,t8);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k12296 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1520 foreign-type-check");
-((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k12299 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12301(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12301,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12272,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_12272(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_12272(t5,t4);}}
-
-/* k12270 in k12299 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_fcall f_12272(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop24182432");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_12259(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12143,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12154,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
-t3=(C_truep(((C_word*)t0)[6])?lf[490]:C_SCHEME_END_OF_LIST);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12166,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=C_eqp(((C_word*)t0)[5],C_fix(0));
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12176,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t7=C_a_i_cons(&a,2,lf[491],t1);
-C_trace("compiler.scm: 1525 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t6,((C_word*)t0)[3],t7);}
-else{
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12183,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,a[8]=((C_word*)t0)[2],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 1526 final-foreign-type");
-((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t6,((C_word*)t0)[4]);}}
-
-/* k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12183,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12186,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 1527 words");
-((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),t2,((C_word*)t0)[2]);}
-
-/* k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[46],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12186,2,t0,t1);}
-t2=C_fixnum_plus(C_fix(2),t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[492],t3);
-t5=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[98],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t4,t7);
-t9=C_a_i_cons(&a,2,lf[271],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,((C_word*)t0)[8],t10);
-t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12205,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
-t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12209,a[2]=((C_word*)t0)[5],a[3]=t13,tmp=(C_word)a,a+=4,tmp);
-t15=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12213,a[2]=((C_word*)t0)[4],a[3]=t14,tmp=(C_word)a,a+=4,tmp);
-t16=C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[3]);
-C_trace("compiler.scm: 1530 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t15,((C_word*)t0)[2],t16);}
-
-/* k12211 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1530 finish-foreign-result");
-((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12207 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12209(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1529 foreign-type-convert-result");
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k12203 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12205,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,lf[158],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t6=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
-
-/* k12174 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1525 foreign-type-convert-result");
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k12164 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12166,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t3=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k12152 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12154,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[171],t2));}
-
-/* foreign-stub-callback in k5089 in k5086 */
-static void C_ccall f_12099(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12099,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(8)));}
-
-/* foreign-stub-cps in k5089 in k5086 */
-static void C_ccall f_12090(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12090,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(7)));}
-
-/* foreign-stub-body in k5089 in k5086 */
-static void C_ccall f_12081(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12081,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(6)));}
-
-/* foreign-stub-argument-names in k5089 in k5086 */
-static void C_ccall f_12072(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12072,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(5)));}
-
-/* foreign-stub-argument-types in k5089 in k5086 */
-static void C_ccall f_12063(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12063,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(4)));}
-
-/* foreign-stub-name in k5089 in k5086 */
-static void C_ccall f_12054(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12054,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(3)));}
-
-/* foreign-stub-return-type in k5089 in k5086 */
-static void C_ccall f_12045(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12045,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(2)));}
-
-/* foreign-stub-id in k5089 in k5086 */
-static void C_ccall f_12036(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12036,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[479]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(1)));}
-
-/* foreign-stub? in k5089 in k5086 */
-static void C_ccall f_12030(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12030,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[479]));}
-
-/* make-foreign-stub in k5089 in k5086 */
-static void C_ccall f_12024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9){
-C_word tmp;
-C_word t10;
-C_word ab[10],*a=ab;
-if(c!=10) C_bad_argc_2(c,10,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr10,(void*)f_12024,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_record(&a,9,lf[479],t2,t3,t4,t5,t6,t7,t8,t9));}
-
-/* ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[23],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10414,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10417,tmp=(C_word)a,a+=2,tmp));
-t13=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10465,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t14=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10471,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t15=C_set_block_item(t11,0,C_retrieve(lf[127]));
-t16=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10481,a[2]=t9,a[3]=t7,a[4]=t5,a[5]=t11,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t17=t16;
-f_10481(t17,t1);}
-
-/* a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10481(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10481,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10485,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[6]))){
-t3=t2;
-f_10485(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 1286 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t2,lf[477],((C_word*)t0)[6]);}}
-
-/* k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10485,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10488,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1288 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-
-/* k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word t130;
-C_word t131;
-C_word t132;
-C_word t133;
-C_word t134;
-C_word t135;
-C_word t136;
-C_word t137;
-C_word t138;
-C_word t139;
-C_word t140;
-C_word t141;
-C_word t142;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10491,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t3=C_eqp(t1,lf[358]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10497,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t5=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1290 stripu");
-t6=((C_word*)((C_word*)t0)[5])[1];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t4=C_eqp(t1,lf[365]);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10582,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1300 check-decl");
-f_10417(t5,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
-else{
-t5=C_eqp(t1,lf[8]);
-if(C_truep(t5)){
-t6=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t6))){
-t7=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[370]));
-t8=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[371]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10630,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10634,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-t9=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1309 stripa");
-t10=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t10,t8,t9);}}
-else{
-t6=C_eqp(t1,lf[9]);
-if(C_truep(t6)){
-t7=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t7))){
-t8=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[373]));
-t9=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[374]);}
-else{
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10659,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10663,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-t10=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1313 stripa");
-t11=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t11,t9,t10);}}
-else{
-t7=C_eqp(t1,lf[376]);
-if(C_truep(t7)){
-t8=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t8))){
-t9=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[370]));
-t10=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[373]));
-t11=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[377]);}
-else{
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10688,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t10=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1319 stripa");
-t11=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t11,t9,t10);}}
-else{
-t8=C_eqp(t1,lf[6]);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10713,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1323 check-decl");
-f_10417(t9,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
-else{
-t9=C_eqp(t1,lf[381]);
-t10=(C_truep(t9)?t9:C_eqp(t1,lf[382]));
-if(C_truep(t10)){
-t11=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[381]);
-t12=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[383]);}
-else{
-t11=C_eqp(t1,lf[7]);
-if(C_truep(t11)){
-t12=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[7]);
-t13=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[384]);}
-else{
-t12=C_eqp(t1,lf[12]);
-if(C_truep(t12)){
-t13=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_TRUE);
-t14=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[385]);}
-else{
-t13=C_eqp(t1,lf[386]);
-if(C_truep(t13)){
-t14=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_FALSE);
-t15=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[387]);}
-else{
-t14=C_eqp(t1,lf[388]);
-if(C_truep(t14)){
-t15=C_set_block_item(lf[22] /* no-bound-checks */,0,C_SCHEME_TRUE);
-t16=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[389]);}
-else{
-t15=C_eqp(t1,lf[390]);
-if(C_truep(t15)){
-t16=C_set_block_item(lf[23] /* no-argc-checks */,0,C_SCHEME_TRUE);
-t17=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[391]);}
-else{
-t16=C_eqp(t1,lf[392]);
-if(C_truep(t16)){
-t17=C_set_block_item(lf[24] /* no-procedure-checks */,0,C_SCHEME_TRUE);
-t18=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[393]);}
-else{
-t17=C_eqp(t1,lf[394]);
-if(C_truep(t17)){
-t18=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_TRUE);
-t19=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[395]);}
-else{
-t18=C_eqp(t1,lf[396]);
-if(C_truep(t18)){
-t19=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_FALSE);
-t20=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[397]);}
-else{
-t19=C_eqp(t1,lf[398]);
-if(C_truep(t19)){
-t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10797,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10801,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
-t22=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1336 strip");
-t23=((C_word*)((C_word*)t0)[2])[1];
-f_10471(t23,t21,t22);}
-else{
-t20=C_eqp(t1,lf[401]);
-if(C_truep(t20)){
-t21=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10816,tmp=(C_word)a,a+=2,tmp);
-t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10851,a[2]=t21,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t23=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1338 stripa");
-t24=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t24,t22,t23);}
-else{
-t21=C_eqp(t1,lf[403]);
-if(C_truep(t21)){
-t22=C_set_block_item(lf[26] /* safe-globals-flag */,0,C_SCHEME_TRUE);
-t23=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[404]);}
-else{
-t22=C_eqp(t1,lf[405]);
-if(C_truep(t22)){
-t23=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10871,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t24=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10913,tmp=(C_word)a,a+=2,tmp);
-t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10948,a[2]=t24,a[3]=t23,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1343 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t25,C_retrieve(lf[370]),C_retrieve(lf[373]));}
-else{
-t23=C_eqp(t1,lf[406]);
-if(C_truep(t23)){
-t24=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10957,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t25=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1348 stripa");
-t26=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t26,t24,t25);}
-else{
-t24=C_eqp(t1,lf[407]);
-if(C_truep(t24)){
-t25=C_i_cdr(((C_word*)t0)[6]);
-t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11048,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t25,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1353 every");
-((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t26,*((C_word*)lf[412]+1),t25);}
-else{
-t25=C_eqp(t1,lf[413]);
-if(C_truep(t25)){
-t26=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
-t27=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[414]);}
-else{
-t26=C_eqp(t1,lf[415]);
-if(C_truep(t26)){
-t27=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_FALSE);
-t28=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[416]);}
-else{
-t27=C_eqp(t1,lf[417]);
-if(C_truep(t27)){
-t28=C_set_block_item(lf[35] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
-t29=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[418]);}
-else{
-t28=C_eqp(t1,lf[419]);
-if(C_truep(t28)){
-t29=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11087,tmp=(C_word)a,a+=2,tmp);
-t30=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11122,a[2]=t29,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t31=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1360 stripa");
-t32=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t32,t30,t31);}
-else{
-t29=C_eqp(t1,lf[421]);
-if(C_truep(t29)){
-t30=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11135,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1362 check-decl");
-f_10417(t30,((C_word*)t0)[6],C_fix(1),C_SCHEME_END_OF_LIST);}
-else{
-t30=C_eqp(t1,lf[439]);
-if(C_truep(t30)){
-t31=C_set_block_item(lf[191] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
-t32=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[440]);}
-else{
-t31=C_eqp(t1,lf[441]);
-t32=(C_truep(t31)?t31:C_eqp(t1,lf[442]));
-if(C_truep(t32)){
-t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11402,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t34=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1407 stripa");
-t35=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t35,t33,t34);}
-else{
-t33=C_eqp(t1,lf[444]);
-if(C_truep(t33)){
-t34=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
-t35=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11449,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t36=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1413 stripa");
-t37=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t37,t35,t36);}
-else{
-t34=C_eqp(t1,lf[446]);
-if(C_truep(t34)){
-t35=C_set_block_item(lf[31] /* external-protos-first */,0,C_SCHEME_TRUE);
-t36=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t36+1)))(2,t36,lf[447]);}
-else{
-t35=C_eqp(t1,lf[448]);
-if(C_truep(t35)){
-t36=C_set_block_item(lf[32] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
-t37=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t37+1)))(2,t37,lf[449]);}
-else{
-t36=C_eqp(t1,lf[427]);
-if(C_truep(t36)){
-t37=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t37))){
-t38=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
-t39=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t39+1)))(2,t39,lf[450]);}
-else{
-t38=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11511,tmp=(C_word)a,a+=2,tmp);
-t39=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11546,a[2]=t38,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t40=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1423 stripa");
-t41=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t41,t39,t40);}}
-else{
-t37=C_eqp(t1,lf[452]);
-if(C_truep(t37)){
-t38=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11563,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1425 check-decl");
-f_10417(t38,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
-else{
-t38=C_eqp(t1,lf[455]);
-if(C_truep(t38)){
-t39=C_i_cdr(((C_word*)t0)[6]);
-t40=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11591,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t39,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1434 every");
-((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t40,*((C_word*)lf[458]+1),t39);}
-else{
-t39=C_eqp(t1,lf[459]);
-if(C_truep(t39)){
-t40=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11608,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t41=C_SCHEME_END_OF_LIST;
-t42=(*a=C_VECTOR_TYPE|1,a[1]=t41,tmp=(C_word)a,a+=2,tmp);
-t43=C_SCHEME_FALSE;
-t44=(*a=C_VECTOR_TYPE|1,a[1]=t43,tmp=(C_word)a,a+=2,tmp);
-t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11612,a[2]=t40,tmp=(C_word)a,a+=3,tmp);
-t46=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11616,a[2]=t45,a[3]=t42,a[4]=t44,tmp=(C_word)a,a+=5,tmp);
-t47=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1451 strip");
-t48=((C_word*)((C_word*)t0)[2])[1];
-f_10471(t48,t46,t47);}
-else{
-t40=C_eqp(t1,lf[463]);
-if(C_truep(t40)){
-t41=C_set_block_item(lf[21] /* emit-profile */,0,C_SCHEME_TRUE);
-t42=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t42))){
-t43=C_mutate((C_word*)lf[37]+1 /* (set! profiled-procedures ...) */,lf[176]);
-t44=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t44+1)))(2,t44,lf[464]);}
-else{
-t43=C_mutate((C_word*)lf[465]+1 /* (set! profiled-propcedures ...) */,lf[177]);
-t44=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11744,tmp=(C_word)a,a+=2,tmp);
-t45=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11779,a[2]=t44,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t46=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1460 stripa");
-t47=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t47,t45,t46);}}
-else{
-t41=C_eqp(t1,lf[466]);
-if(C_truep(t41)){
-t42=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t42))){
-t43=C_set_block_item(lf[41] /* local-definitions */,0,C_SCHEME_TRUE);
-t44=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t44+1)))(2,t44,lf[467]);}
-else{
-t43=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11805,tmp=(C_word)a,a+=2,tmp);
-t44=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11840,a[2]=t43,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t45=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1467 stripa");
-t46=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t46,t44,t45);}}
-else{
-t42=C_eqp(t1,lf[433]);
-if(C_truep(t42)){
-t43=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
-t44=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
-t45=C_i_cdr(((C_word*)t0)[6]);
-if(C_truep(C_i_nullp(t45))){
-t46=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_TRUE);
-t47=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t47+1)))(2,t47,lf[469]);}
-else{
-t46=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11868,tmp=(C_word)a,a+=2,tmp);
-t47=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11903,a[2]=t46,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t48=C_i_cdr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1475 stripa");
-t49=((C_word*)((C_word*)t0)[3])[1];
-f_10465(t49,t47,t48);}}
-else{
-t43=C_eqp(t1,lf[470]);
-if(C_truep(t43)){
-t44=C_i_cdr(((C_word*)t0)[6]);
-t45=C_SCHEME_UNDEFINED;
-t46=(*a=C_VECTOR_TYPE|1,a[1]=t45,tmp=(C_word)a,a+=2,tmp);
-t47=C_set_block_item(t46,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11926,a[2]=t46,tmp=(C_word)a,a+=3,tmp));
-t48=((C_word*)t46)[1];
-f_11926(t48,t2,t44);}
-else{
-t44=C_eqp(t1,lf[474]);
-if(C_truep(t44)){
-t45=C_set_block_item(lf[45] /* do-scrutinize */,0,C_SCHEME_TRUE);
-t46=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t46+1)))(2,t46,lf[475]);}
-else{
-C_trace("compiler.scm: 1487 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[240],lf[476],((C_word*)t0)[6]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-
-/* loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11926(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11926,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11985,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11941,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_listp(t4))){
-t6=C_i_car(t4);
-if(C_truep(C_i_symbolp(t6))){
-t7=C_i_length(t4);
-t8=t5;
-f_11941(t8,C_eqp(C_fix(2),t7));}
-else{
-t7=t5;
-f_11941(t7,C_SCHEME_FALSE);}}
-else{
-t6=t5;
-f_11941(t6,C_SCHEME_FALSE);}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11939 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11941(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11941,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11944,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_car(((C_word*)t0)[3]);
-t4=C_i_cadr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1480 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[472],t4);}
-else{
-C_trace("compiler.scm: 1483 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[473],((C_word*)t0)[3]);}}
-
-/* k11942 in k11939 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11944(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1481 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[471],C_SCHEME_TRUE);}
-
-/* k11983 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11985(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11926(t3,((C_word*)t0)[2],t2);}
-
-/* k11901 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11903(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11867 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11868(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11868,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,lf[451]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11874,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11872 in a11867 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11874(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-
-/* k11838 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11804 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11805(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11805,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11811,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[468],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[468],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11809 in a11804 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[468],t1);}
-
-/* k11777 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11743 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11744(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11744,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11750,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[178],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[178],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11748 in a11743 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[178],t1);}
-
-/* k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11616,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11618,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_11618(t5,((C_word*)t0)[2],t1);}
-
-/* loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11618(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11618,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11716,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-if(C_truep(C_i_symbolp(t4))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11659,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11663,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1443 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t6,t4);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11669,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_listp(t4))){
-t6=C_i_length(t4);
-t7=C_eqp(C_fix(2),t6);
-if(C_truep(t7)){
-t8=C_i_car(t4);
-if(C_truep(C_i_symbolp(t8))){
-t9=C_i_cadr(t4);
-t10=t5;
-f_11669(t10,C_a_i_string(&a,1,t9));}
-else{
-t9=t5;
-f_11669(t9,C_SCHEME_FALSE);}}
-else{
-t8=t5;
-f_11669(t8,C_SCHEME_FALSE);}}
-else{
-t6=t5;
-f_11669(t6,C_SCHEME_FALSE);}}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11667 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11669(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11669,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[3]);
-t3=C_i_cadr(((C_word*)t0)[3]);
-t4=((C_word*)t0)[2];
-f_11716(2,t4,C_a_i_cons(&a,2,t2,t3));}
-else{
-C_trace("compiler.scm: 1448 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[462],((C_word*)t0)[3]);}}
-
-/* k11661 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1443 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),((C_word*)t0)[2],t1,lf[461]);}
-
-/* k11657 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11659,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_11716(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k11714 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11716(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11716,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop21762189");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11618(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop21762189");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11618(t6,((C_word*)t0)[3],t5);}}
-
-/* k11610 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11612(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1439 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],*((C_word*)lf[38]+1),t1);}
-
-/* k11606 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[38]+1 /* (set! import-libraries ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[460]);}
-
-/* k11589 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11591,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11595,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1435 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[4],*((C_word*)lf[36]+1));}
-else{
-C_trace("compiler.scm: 1436 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],lf[457],((C_word*)t0)[2]);}}
-
-/* k11593 in k11589 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11595(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[36]+1 /* (set! constant-declarations ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[456]);}
-
-/* k11561 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[4]);
-if(C_truep(C_i_numberp(t2))){
-t3=C_mutate((C_word*)lf[33]+1 /* (set! inline-max-size ...) */,t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[453]);}
-else{
-C_trace("compiler.scm: 1429 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[454],((C_word*)t0)[4]);}}
-
-/* k11544 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11546(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11510 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11511(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11511,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,lf[451]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11517,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11515 in a11510 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11517(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[430],t1);}
-
-/* k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11449,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11454,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_11454(t5,((C_word*)t0)[2],t1);}
-
-/* loop2130 in k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11454(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11454,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[445]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11464,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g21372138");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11462 in loop2130 in k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11454(t3,((C_word*)t0)[2],t2);}
-
-/* k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11402,2,t0,t1);}
-if(C_truep(C_i_nullp(t1))){
-t2=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[443]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11414,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_11414(t5,((C_word*)t0)[2],t1);}}
-
-/* loop2116 in k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_11414(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11414,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[132]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11424,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g21232124");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11422 in loop2116 in k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11414(t3,((C_word*)t0)[2],t2);}
-
-/* k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11135,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11138,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_cadr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1363 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-
-/* k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11138,2,t0,t1);}
-t2=C_eqp(t1,lf[8]);
-if(C_truep(t2)){
-t3=C_i_cddr(((C_word*)t0)[7]);
-if(C_truep(C_i_nullp(t3))){
-t4=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[422]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11155,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11159,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cddr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1369 stripa");
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_10465(t7,t5,t6);}}
-else{
-t3=C_eqp(t1,lf[9]);
-if(C_truep(t3)){
-t4=C_i_cddr(((C_word*)t0)[7]);
-if(C_truep(C_i_nullp(t4))){
-t5=C_set_block_item(lf[9] /* extended-bindings */,0,C_SCHEME_END_OF_LIST);
-t6=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[425]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11184,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11188,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=C_i_cddr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1375 stripa");
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_10465(t8,t6,t7);}}
-else{
-t4=C_eqp(t1,lf[427]);
-if(C_truep(t4)){
-t5=C_i_cddr(((C_word*)t0)[7]);
-if(C_truep(C_i_nullp(t5))){
-t6=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_FALSE);
-t7=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[428]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11214,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11249,a[2]=t6,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t8=C_i_cddr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1381 stripa");
-t9=((C_word*)((C_word*)t0)[5])[1];
-f_10465(t9,t7,t8);}}
-else{
-t5=C_eqp(t1,lf[376]);
-if(C_truep(t5)){
-t6=C_i_cddr(((C_word*)t0)[7]);
-if(C_truep(C_i_nullp(t6))){
-t7=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
-t8=C_set_block_item(lf[9] /* extended-bindings */,0,C_SCHEME_END_OF_LIST);
-t9=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[431]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11274,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t8=C_i_cddr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1387 stripa");
-t9=((C_word*)((C_word*)t0)[5])[1];
-f_10465(t9,t7,t8);}}
-else{
-t6=C_eqp(t1,lf[433]);
-if(C_truep(t6)){
-t7=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
-t8=C_i_cddr(((C_word*)t0)[7]);
-if(C_truep(C_i_nullp(t8))){
-t9=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_FALSE);
-t10=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[434]);}
-else{
-t9=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11309,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11344,a[2]=t9,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t11=C_i_cddr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1396 stripa");
-t12=((C_word*)((C_word*)t0)[5])[1];
-f_10465(t12,t10,t11);}}
-else{
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11355,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 1398 check-decl");
-f_10417(t7,((C_word*)t0)[7],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}}}}}}
-
-/* k11353 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11358,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1399 strip");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_10471(t4,t2,t3);}
-
-/* k11356 in k11353 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=C_eqp(t1,lf[394]);
-if(C_truep(t2)){
-t3=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_FALSE);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[436]);}
-else{
-t3=C_eqp(t1,lf[386]);
-if(C_truep(t3)){
-t4=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_TRUE);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[437]);}
-else{
-C_trace("compiler.scm: 1403 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[438],t1);}}}
-
-/* k11342 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11308 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11309(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11309,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,lf[429]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11315,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11313 in a11308 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11315(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-
-/* k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11274,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11278,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1388 lset-difference");
-((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),t2,*((C_word*)lf[143]+1),C_retrieve(lf[370]),t1);}
-
-/* k11276 in k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11278,2,t0,t1);}
-t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11282,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1389 lset-difference");
-((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),t3,*((C_word*)lf[143]+1),C_retrieve(lf[373]),((C_word*)t0)[2]);}
-
-/* k11280 in k11276 in k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[432]);}
-
-/* k11247 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11249(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11213 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11214(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11214,3,t0,t1,t2);}
-t3=C_a_i_list(&a,1,lf[429]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11220,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11218 in a11213 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[430],t1);}
-
-/* k11186 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11188(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1374 lset-difference");
-((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),((C_word*)t0)[2],*((C_word*)lf[143]+1),C_retrieve(lf[373]),t1);}
-
-/* k11182 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[426]);}
-
-/* k11157 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1368 lset-difference");
-((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),((C_word*)t0)[2],*((C_word*)lf[143]+1),C_retrieve(lf[370]),t1);}
-
-/* k11153 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[423]);}
-
-/* k11120 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a11086 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11087,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11093,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[420],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[420],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11091 in a11086 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[420],t1);}
-
-/* k11046 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11048(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11048,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11052,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1354 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,*((C_word*)lf[13]+1),((C_word*)t0)[4]);}
-else{
-C_trace("compiler.scm: 1355 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),((C_word*)t0)[3],lf[409],lf[410],((C_word*)t0)[2]);}}
-
-/* k11050 in k11046 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11052(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[13]+1 /* (set! foreign-declarations ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[408]);}
-
-/* k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10960,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10998,tmp=(C_word)a,a+=2,tmp);
-C_trace("for-each");
-t4=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,t1);}
-
-/* a10997 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10998(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10998,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11004,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11002 in a10997 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_11004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-
-/* k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[2],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10965,tmp=(C_word)a,a+=2,tmp);
-C_trace("for-each");
-t3=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* a10964 in k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10965(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10965,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10971,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10969 in a10964 in k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k10946 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a10912 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10913(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10913,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10919,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10917 in a10912 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-
-/* k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10871(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10871,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10876,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10911,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1346 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,C_retrieve(lf[370]),C_retrieve(lf[373]));}
-
-/* k10909 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a10875 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10876(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10876,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10882,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10880 in a10875 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k10849 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[402]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a10815 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10816(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10816,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10822,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10820 in a10815 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k10799 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1336 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,C_retrieve(lf[399]));}
-
-/* k10795 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[399]+1 /* (set! disabled-warnings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[400]);}
-
-/* k10711 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10713,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10717,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1324 strip");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_10471(t4,t2,t3);}
-
-/* k10715 in k10711 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10717(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[380]);}
-
-/* k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10688,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10692,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1320 lset-intersection");
-((C_proc5)C_retrieve_symbol_proc(lf[379]))(5,*((C_word*)lf[379]+1),t2,*((C_word*)lf[143]+1),t1,C_retrieve(lf[370]));}
-
-/* k10690 in k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10692(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10692,2,t0,t1);}
-t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10696,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1321 lset-intersection");
-((C_proc5)C_retrieve_symbol_proc(lf[379]))(5,*((C_word*)lf[379]+1),t3,*((C_word*)lf[143]+1),((C_word*)t0)[2],C_retrieve(lf[373]));}
-
-/* k10694 in k10690 in k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[378]);}
-
-/* k10661 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1313 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,*((C_word*)lf[9]+1));}
-
-/* k10657 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[375]);}
-
-/* k10632 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1309 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,*((C_word*)lf[8]+1));}
-
-/* k10628 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10630(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[372]);}
-
-/* k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10582(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10582,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10585,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1301 stripu");
-t4=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
-
-/* k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10585(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10585,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10588,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10609,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1302 stringify");
-((C_proc3)C_retrieve_symbol_proc(lf[361]))(3,*((C_word*)lf[361]+1),t3,t1);}
-
-/* k10607 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1302 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),((C_word*)t0)[2],t1);}
-
-/* k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10588(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10588,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10591,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10595,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(*((C_word*)lf[5]+1))){
-t4=C_i_string_equal_p(*((C_word*)lf[5]+1),t1);
-t5=t3;
-f_10595(t5,C_i_not(t4));}
-else{
-t4=t3;
-f_10595(t4,C_SCHEME_FALSE);}}
-
-/* k10593 in k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10595(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 1304 compiler-warning");
-((C_proc4)C_retrieve_symbol_proc(lf[115]))(4,*((C_word*)lf[115]+1),((C_word*)t0)[4],lf[367],lf[368]);}
-else{
-t2=C_mutate((C_word*)lf[5]+1 /* (set! unit-name ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[369]);}}
-
-/* k10589 in k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[5]+1 /* (set! unit-name ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[366]);}
-
-/* k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10497,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10500,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t2,C_retrieve(lf[364]),t1);}
-
-/* k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10500(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10500,2,t0,t1);}
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10509,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10562,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10568,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1293 ##sys#hash-table-update!");
-((C_proc6)C_retrieve_symbol_proc(lf[144]))(6,*((C_word*)lf[144]+1),t2,*((C_word*)lf[83]+1),lf[362],t3,t4);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[363]);}}
-
-/* a10567 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10568,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* a10561 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10562(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10562,3,t0,t1,t2);}
-t3=C_retrieve(lf[142]);
-C_trace("g17901791");
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[143]+1),((C_word*)t0)[2],t2);}
-
-/* k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10509,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10512,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10518,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_10518(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10518(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10518,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10556,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10553,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1297 stringify");
-((C_proc3)C_retrieve_symbol_proc(lf[361]))(3,*((C_word*)lf[361]+1),t5,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10551 in loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10553(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1297 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),((C_word*)t0)[2],t1);}
-
-/* k10554 in loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10556(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10556,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17951808");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10518(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17951808");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10518(t6,((C_word*)t0)[3],t5);}}
-
-/* k10510 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10512,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1298 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,*((C_word*)lf[11]+1),t1);}
-
-/* k10514 in k10510 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[11]+1 /* (set! used-units ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[359]);}
-
-/* k10489 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[357]);}
-
-/* strip in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10471(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10471,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1281 ##sys#strip-syntax");
-((C_proc4)C_retrieve_symbol_proc(lf[127]))(4,*((C_word*)lf[127]+1),t1,t2,((C_word*)t0)[2]);}
-
-/* stripa in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10465(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10465,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1279 ##sys#strip-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t1,t2,((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* check-decl in ##compiler#process-declaration in k5089 in k5086 */
-static void C_fcall f_10417(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10417,NULL,4,t1,t2,t3,t4);}
-t5=C_i_cdr(t2);
-t6=C_i_length(t5);
-t7=C_fixnum_lessp(t6,t3);
-if(C_truep(t7)){
-if(C_truep(t7)){
-C_trace("compiler.scm: 1277 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[356],t2);}
-else{
-t8=C_SCHEME_UNDEFINED;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-else{
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10440,a[2]=t2,a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_nullp(t4))){
-if(C_truep(C_fixnum_greaterp(t6,C_fix(99999)))){
-C_trace("compiler.scm: 1277 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[356],t2);}
-else{
-t9=C_SCHEME_UNDEFINED;
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
-else{
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-t10=t8;
-f_10440(2,t10,C_i_car(t4));}
-else{
-C_trace("##sys#error");
-t10=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t8,lf[0],t4);}}}}
-
-/* k10438 in check-decl in ##compiler#process-declaration in k5089 in k5086 */
-static void C_ccall f_10440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],t1))){
-C_trace("compiler.scm: 1277 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[3],lf[356],((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5248(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[63],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5248,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_SCHEME_UNDEFINED;
-t22=(*a=C_VECTOR_TYPE|1,a[1]=t21,tmp=(C_word)a,a+=2,tmp);
-t23=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5251,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-t24=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5290,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
-t25=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5305,a[2]=t8,tmp=(C_word)a,a+=3,tmp));
-t26=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5318,tmp=(C_word)a,a+=2,tmp));
-t27=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5378,a[2]=t8,tmp=(C_word)a,a+=3,tmp));
-t28=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5424,a[2]=t8,a[3]=t20,tmp=(C_word)a,a+=4,tmp));
-t29=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5594,tmp=(C_word)a,a+=2,tmp));
-t30=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5724,a[2]=t10,a[3]=t14,a[4]=t22,a[5]=t4,a[6]=t18,a[7]=t8,a[8]=t12,a[9]=t20,a[10]=t16,tmp=(C_word)a,a+=11,tmp));
-t31=C_set_block_item(t22,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10324,a[2]=t20,tmp=(C_word)a,a+=3,tmp));
-t32=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10371,a[2]=t2,a[3]=t1,a[4]=t20,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_memq(lf[136],C_retrieve(lf[354])))){
-t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10409,a[2]=t2,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1258 newline");
-((C_proc2)C_retrieve_proc(*((C_word*)lf[355]+1)))(2,*((C_word*)lf[355]+1),t33);}
-else{
-t33=t32;
-f_10371(2,t33,C_SCHEME_UNDEFINED);}}
-
-/* k10407 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1258 pretty-print");
-((C_proc3)C_retrieve_symbol_proc(lf[217]))(3,*((C_word*)lf[217]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10371,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10374,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1259 ##sys#clear-trace-buffer");
-((C_proc2)C_retrieve_symbol_proc(lf[353]))(2,*((C_word*)lf[353]+1),t2);}
-
-/* k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10389,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10393,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1263 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t3,*((C_word*)lf[76]+1));}
-
-/* k10391 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10393,2,t0,t1);}
-t2=C_set_block_item(lf[76] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10403,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1267 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,C_retrieve(lf[352]),*((C_word*)lf[9]+1));}
-
-/* k10401 in k10391 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10403(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10403,2,t0,t1);}
-t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
-t3=((C_word*)t0)[4];
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t5=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* k10387 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10389(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10389,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[151],t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10385,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1269 ##sys#current-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t3);}
-
-/* k10383 in k10387 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1261 walk");
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1,C_SCHEME_FALSE);}
-
-/* mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_10324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10324,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10330,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp));
-t12=((C_word*)t10)[1];
-f_10330(t12,t1,t2);}
-
-/* loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_10330(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10330,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10357,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10364,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g17231724");
-t6=t3;
-f_10357(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10362 in loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10364,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17071720");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10330(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17071720");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10330(t6,((C_word*)t0)[3],t5);}}
-
-/* g1723 in loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_10357(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10357,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1256 walk");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5724(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5724,NULL,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_i_symbolp(t2))){
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5734,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5740,a[2]=t6,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[10],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 514 keyword?");
-((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t7,t2);}
-else{
-if(C_truep(C_i_not_pair_p(t2))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5768,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 521 constant?");
-((C_proc3)C_retrieve_symbol_proc(lf[121]))(3,*((C_word*)lf[121]+1),t6,t2);}
-else{
-t6=C_i_car(t2);
-if(C_truep(C_i_symbolp(t6))){
-t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5787,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=t5,a[11]=t4,a[12]=t3,a[13]=((C_word*)t0)[9],a[14]=t2,tmp=(C_word)a,a+=15,tmp);
-C_trace("compiler.scm: 525 get-line");
-((C_proc3)C_retrieve_symbol_proc(lf[268]))(3,*((C_word*)lf[268]+1),t7,t2);}
-else{
-if(C_truep(C_i_listp(t2))){
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10252,a[2]=t5,a[3]=((C_word*)t0)[9],a[4]=t4,a[5]=t3,a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
-t8=C_i_car(t2);
-C_trace("compiler.scm: 1241 constant?");
-((C_proc3)C_retrieve_symbol_proc(lf[121]))(3,*((C_word*)lf[121]+1),t7,t8);}
-else{
-C_trace("compiler.scm: 1239 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[351],t2);}}}}}
-
-/* k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10252,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10255,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1242 emit-syntax-trace-info");
-((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10264,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1247 emit-syntax-trace-info");
-((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}}
-
-/* k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10264,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10267,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1248 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-
-/* k10265 in k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10267,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[7]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t1,t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10294,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t5,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t7=C_i_cdr(((C_word*)t0)[7]);
-C_trace("##sys#append");
-t8=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t7,C_SCHEME_END_OF_LIST);}
-
-/* k10292 in k10265 in k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10294(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10294,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=C_a_i_cons(&a,2,lf[159],t4);
-C_trace("compiler.scm: 1249 walk");
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t6,((C_word*)t0)[5],t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10253 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10255,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10258,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1243 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[240],lf[350],((C_word*)t0)[4]);}
-
-/* k10256 in k10253 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1244 mapwalk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_10324(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5787(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5787,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5790,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-C_trace("compiler.scm: 526 emit-syntax-trace-info");
-((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[14],C_SCHEME_FALSE);}
-
-/* k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5790,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(C_i_listp(((C_word*)t0)[15]))){
-t3=t2;
-f_5793(2,t3,C_SCHEME_UNDEFINED);}
-else{
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[15],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[263]))(2,*((C_word*)lf[263]+1),t3);}
-else{
-C_trace("compiler.scm: 530 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t2,lf[348],((C_word*)t0)[15]);}}}
-
-/* k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10222,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10225,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[347],t1);}
-
-/* k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10225,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10228,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[260]+1)))(4,*((C_word*)lf[260]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10231,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[346],((C_word*)t0)[2]);}
-
-/* k10229 in k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10231,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10234,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[259]))(3,*((C_word*)lf[259]+1),t2,((C_word*)t0)[2]);}
-
-/* k10232 in k10229 in k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10234(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 529 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5793,2,t0,t1);}
-t2=C_mutate((C_word*)lf[122]+1 /* (set! syntax-error-culprit ...) */,((C_word*)t0)[15]);
-t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5797,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-t4=C_i_car(((C_word*)t0)[15]);
-C_trace("compiler.scm: 532 lookup");
-t5=((C_word*)((C_word*)t0)[8])[1];
-f_5290(t5,t3,t4,((C_word*)t0)[12]);}
-
-/* k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5797,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5800,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,tmp=(C_word)a,a+=17,tmp);
-if(C_truep(C_i_symbolp(t1))){
-C_trace("compiler.scm: 533 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,t1,lf[106]);}
-else{
-t3=t2;
-f_5800(2,t3,C_SCHEME_FALSE);}}
-
-/* k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5800(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5800,2,t0,t1);}
-t2=(C_truep(t1)?t1:((C_word*)t0)[16]);
-t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5806,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-C_trace("compiler.scm: 534 ##sys#expand");
-((C_proc5)C_retrieve_symbol_proc(lf[345]))(5,*((C_word*)lf[345]+1),t3,((C_word*)t0)[15],((C_word*)t0)[12],*((C_word*)lf[47]+1));}
-
-/* k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5806,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[16],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_5818,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
-if(C_truep(*((C_word*)lf[56]+1))){
-C_trace("compiler.scm: 538 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[55]+1),((C_word*)t0)[10]);}
-else{
-t4=t3;
-f_5818(2,t4,C_SCHEME_FALSE);}}
-else{
-C_trace("compiler.scm: 536 walk");
-t3=((C_word*)((C_word*)t0)[15])[1];
-f_5724(t3,((C_word*)t0)[11],t1,((C_word*)t0)[14],((C_word*)t0)[13],((C_word*)t0)[12]);}}
-
-/* k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5818,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5822,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[17],tmp=(C_word)a,a+=7,tmp);
-C_trace("g329330");
-t3=t2;
-f_5822(t3,((C_word*)t0)[12],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5840,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[12],a[16]=((C_word*)t0)[11],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(((C_word*)t0)[3])){
-C_trace("compiler.scm: 543 update-line-number-database!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[344]+1)))(4,*((C_word*)lf[344]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-else{
-t3=t2;
-f_5840(2,t3,C_SCHEME_UNDEFINED);}}}
-
-/* k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5840,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[16],lf[123]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5849,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 547 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t3,lf[123],((C_word*)t0)[14],lf[126],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t3=C_eqp(((C_word*)t0)[16],lf[98]);
-t4=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5907,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_5907(t5,t3);}
-else{
-t5=C_eqp(((C_word*)t0)[16],lf[240]);
-t6=t4;
-f_5907(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[16],lf[200])));}}}
-
-/* k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5907(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5907,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5910,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 556 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t2,((C_word*)t0)[14],((C_word*)t0)[15],lf[128],C_SCHEME_FALSE,((C_word*)t0)[13]);}
-else{
-t2=C_eqp(((C_word*)t0)[14],lf[129]);
-if(C_truep(t2)){
-if(C_truep(*((C_word*)lf[12]+1))){
-t3=((C_word*)t0)[16];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[130]);}
-else{
-t3=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 562 walk");
-t4=((C_word*)((C_word*)t0)[12])[1];
-f_5724(t4,((C_word*)t0)[16],t3,((C_word*)t0)[11],((C_word*)t0)[13],((C_word*)t0)[10]);}}
-else{
-t3=C_eqp(((C_word*)t0)[14],lf[131]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5950,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 565 cadadr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[137]+1)))(3,*((C_word*)lf[137]+1),t4,((C_word*)t0)[15]);}
-else{
-t4=C_eqp(((C_word*)t0)[14],lf[138]);
-t5=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_6008(t6,t4);}
-else{
-t6=C_eqp(((C_word*)t0)[14],lf[343]);
-t7=t5;
-f_6008(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[14],lf[106])));}}}}}
-
-/* k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6008(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word t130;
-C_word t131;
-C_word t132;
-C_word t133;
-C_word t134;
-C_word t135;
-C_word t136;
-C_word t137;
-C_word t138;
-C_word t139;
-C_word t140;
-C_word t141;
-C_word t142;
-C_word t143;
-C_word t144;
-C_word t145;
-C_word t146;
-C_word t147;
-C_word t148;
-C_word t149;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6008,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[16];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[15]);}
-else{
-t2=C_eqp(((C_word*)t0)[14],lf[100]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6029,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 578 caadr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[139]+1)))(3,*((C_word*)lf[139]+1),t3,((C_word*)t0)[15]);}
-else{
-t3=C_eqp(((C_word*)t0)[14],lf[104]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6058,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[16],tmp=(C_word)a,a+=8,tmp);
-t5=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 582 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t4,t5);}
-else{
-t4=C_eqp(((C_word*)t0)[14],lf[140]);
-if(C_truep(t4)){
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6083,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
-t10=C_i_cdr(((C_word*)t0)[15]);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6104,a[2]=t6,a[3]=t12,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
-t14=((C_word*)t12)[1];
-f_6104(t14,t9,t10);}
-else{
-t5=C_eqp(((C_word*)t0)[14],lf[148]);
-if(C_truep(t5)){
-t6=C_i_caddr(((C_word*)t0)[15]);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6153,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6157,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-t9=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 597 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t8,t9);}
-else{
-t6=C_eqp(((C_word*)t0)[14],lf[158]);
-t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[14],lf[159]));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6244,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 617 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t8,lf[158],((C_word*)t0)[15],lf[164],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t8=C_eqp(((C_word*)t0)[14],lf[165]);
-t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[14],lf[166]));
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6456,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 632 ##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[125]))(5,*((C_word*)lf[125]+1),t10,lf[165],((C_word*)t0)[15],lf[170]);}
-else{
-t10=C_eqp(((C_word*)t0)[14],lf[171]);
-t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[14],lf[172]));
-if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6613,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 647 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t12,lf[171],((C_word*)t0)[15],lf[184],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t12=C_eqp(((C_word*)t0)[14],lf[185]);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6942,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 693 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t13,lf[185],((C_word*)t0)[15],lf[187],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t13=C_eqp(((C_word*)t0)[14],lf[188]);
-if(C_truep(t13)){
-t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7029,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 709 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t14,lf[188],((C_word*)t0)[15],lf[189],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t14=C_eqp(((C_word*)t0)[14],lf[190]);
-if(C_truep(t14)){
-t15=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7150,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
-t16=C_i_car(((C_word*)t0)[15]);
-t17=C_i_cadr(((C_word*)t0)[15]);
-if(C_truep(C_i_pairp(t17))){
-C_trace("compiler.scm: 727 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t15,t16,((C_word*)t0)[15],lf[197],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-C_trace("compiler.scm: 727 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t15,t16,((C_word*)t0)[15],lf[198],C_SCHEME_FALSE,((C_word*)t0)[11]);}}
-else{
-t15=C_eqp(((C_word*)t0)[14],lf[199]);
-if(C_truep(t15)){
-t16=C_i_cadr(((C_word*)t0)[15]);
-t17=C_i_caddr(((C_word*)t0)[15]);
-t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7295,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t17,a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 755 ##sys#strip-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t18,t16,((C_word*)t0)[11],C_SCHEME_FALSE);}
-else{
-t16=C_eqp(((C_word*)t0)[14],lf[204]);
-if(C_truep(t16)){
-t17=C_SCHEME_END_OF_LIST;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_FALSE;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7402,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
-t22=C_i_cadr(((C_word*)t0)[15]);
-t23=C_SCHEME_UNDEFINED;
-t24=(*a=C_VECTOR_TYPE|1,a[1]=t23,tmp=(C_word)a,a+=2,tmp);
-t25=C_set_block_item(t24,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7509,a[2]=t18,a[3]=t24,a[4]=t20,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[11],tmp=(C_word)a,a+=7,tmp));
-t26=((C_word*)t24)[1];
-f_7509(t26,t21,t22);}
-else{
-t17=C_eqp(((C_word*)t0)[14],lf[208]);
-if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7596,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
-t19=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 807 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t18,t19);}
-else{
-t18=C_eqp(((C_word*)t0)[14],lf[248]);
-if(C_truep(t18)){
-t19=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8121,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
-t20=C_i_cddr(((C_word*)t0)[15]);
-C_trace("##sys#append");
-t21=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t21+1)))(4,t21,t19,t20,C_SCHEME_END_OF_LIST);}
-else{
-t19=C_eqp(((C_word*)t0)[14],lf[249]);
-if(C_truep(t19)){
-t20=C_i_cadr(((C_word*)t0)[15]);
-t21=C_i_cddr(((C_word*)t0)[15]);
-t22=C_SCHEME_END_OF_LIST;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_SCHEME_FALSE;
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8140,a[2]=((C_word*)t0)[11],a[3]=t21,a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=t20,a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[16],tmp=(C_word)a,a+=9,tmp);
-t27=C_SCHEME_UNDEFINED;
-t28=(*a=C_VECTOR_TYPE|1,a[1]=t27,tmp=(C_word)a,a+=2,tmp);
-t29=C_set_block_item(t28,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8223,a[2]=t23,a[3]=t28,a[4]=t25,tmp=(C_word)a,a+=5,tmp));
-t30=((C_word*)t28)[1];
-f_8223(t30,t26,t20);}
-else{
-t20=C_eqp(((C_word*)t0)[14],lf[250]);
-t21=(C_truep(t20)?t20:C_eqp(((C_word*)t0)[14],lf[168]));
-if(C_truep(t21)){
-t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8268,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 911 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t22,lf[250],((C_word*)t0)[15],lf[269],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t22=C_eqp(((C_word*)t0)[14],lf[270]);
-if(C_truep(t22)){
-t23=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8601,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
-t24=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 963 unquotify");
-t25=((C_word*)((C_word*)t0)[4])[1];
-f_5378(t25,t23,t24,((C_word*)t0)[11]);}
-else{
-t23=C_eqp(((C_word*)t0)[14],lf[271]);
-if(C_truep(t23)){
-t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8634,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
-t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8648,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t26=C_i_cadr(((C_word*)t0)[15]);
-C_trace("map");
-t27=*((C_word*)lf[272]+1);
-((C_proc4)(void*)(*((C_word*)t27+1)))(4,t27,t24,t25,t26);}
-else{
-t24=C_eqp(((C_word*)t0)[14],lf[251]);
-if(C_truep(t24)){
-t25=C_i_cadr(((C_word*)t0)[15]);
-t26=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8681,a[2]=((C_word*)t0)[16],a[3]=t25,tmp=(C_word)a,a+=4,tmp);
-t27=C_i_caddr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 971 walk");
-t28=((C_word*)((C_word*)t0)[13])[1];
-f_5724(t28,t26,t27,((C_word*)t0)[12],((C_word*)t0)[11],C_SCHEME_FALSE);}
-else{
-t25=C_eqp(((C_word*)t0)[14],lf[254]);
-if(C_truep(t25)){
-t26=C_i_cadr(((C_word*)t0)[15]);
-t27=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8710,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],a[7]=t26,tmp=(C_word)a,a+=8,tmp);
-t28=C_i_caddr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 976 walk");
-t29=((C_word*)((C_word*)t0)[13])[1];
-f_5724(t29,t27,t28,((C_word*)t0)[12],((C_word*)t0)[11],C_SCHEME_FALSE);}
-else{
-t26=C_eqp(((C_word*)t0)[14],lf[273]);
-t27=(C_truep(t26)?t26:C_eqp(((C_word*)t0)[14],lf[274]));
-if(C_truep(t27)){
-t28=C_i_cadr(((C_word*)t0)[15]);
-t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8741,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=t28,a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 981 eval/meta");
-f_5594(t29,t28);}
-else{
-t28=C_eqp(((C_word*)t0)[14],lf[275]);
-t29=(C_truep(t28)?t28:C_eqp(((C_word*)t0)[14],lf[276]));
-if(C_truep(t29)){
-t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8756,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
-t31=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 985 eval/meta");
-f_5594(t30,t31);}
-else{
-t30=C_eqp(((C_word*)t0)[14],lf[175]);
-t31=(C_truep(t30)?t30:C_eqp(((C_word*)t0)[14],lf[151]));
-if(C_truep(t31)){
-t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8772,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 989 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t32,lf[175],((C_word*)t0)[15],lf[279],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-t32=C_eqp(((C_word*)t0)[14],lf[280]);
-if(C_truep(t32)){
-t33=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8839,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1001 expand-foreign-lambda");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[281]+1)))(4,*((C_word*)lf[281]+1),t33,((C_word*)t0)[15],C_SCHEME_FALSE);}
-else{
-t33=C_eqp(((C_word*)t0)[14],lf[282]);
-if(C_truep(t33)){
-t34=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8852,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1004 expand-foreign-lambda");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[281]+1)))(4,*((C_word*)lf[281]+1),t34,((C_word*)t0)[15],C_SCHEME_TRUE);}
-else{
-t34=C_eqp(((C_word*)t0)[14],lf[283]);
-if(C_truep(t34)){
-t35=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8865,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1007 expand-foreign-lambda*");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[284]+1)))(4,*((C_word*)lf[284]+1),t35,((C_word*)t0)[15],C_SCHEME_FALSE);}
-else{
-t35=C_eqp(((C_word*)t0)[14],lf[285]);
-if(C_truep(t35)){
-t36=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8878,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1010 expand-foreign-lambda*");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[284]+1)))(4,*((C_word*)lf[284]+1),t36,((C_word*)t0)[15],C_SCHEME_TRUE);}
-else{
-t36=C_eqp(((C_word*)t0)[14],lf[286]);
-if(C_truep(t36)){
-t37=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8891,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1013 expand-foreign-primitive");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[287]+1)))(3,*((C_word*)lf[287]+1),t37,((C_word*)t0)[15]);}
-else{
-t37=C_eqp(((C_word*)t0)[14],lf[288]);
-if(C_truep(t37)){
-t38=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8900,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
-t39=C_i_cadr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 1016 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t38,t39);}
-else{
-t38=C_eqp(((C_word*)t0)[14],lf[291]);
-if(C_truep(t38)){
-t39=C_i_cadr(((C_word*)t0)[15]);
-t40=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8957,a[2]=t39,a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
-t41=C_i_caddr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 1031 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t40,t41);}
-else{
-t39=C_eqp(((C_word*)t0)[14],lf[296]);
-if(C_truep(t39)){
-t40=C_i_cadr(((C_word*)t0)[15]);
-t41=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9121,a[2]=t40,a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[15],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1054 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t41,t40);}
-else{
-t40=C_eqp(((C_word*)t0)[14],lf[301]);
-if(C_truep(t40)){
-t41=C_i_cadr(((C_word*)t0)[15]);
-t42=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9177,a[2]=((C_word*)t0)[11],a[3]=t41,a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
-t43=C_i_caddr(((C_word*)t0)[15]);
-C_trace("compiler.scm: 1068 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t42,t43);}
-else{
-t41=C_eqp(((C_word*)t0)[14],lf[305]);
-if(C_truep(t41)){
-t42=C_i_cadr(((C_word*)t0)[15]);
-t43=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9338,a[2]=t42,a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
-t44=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9342,a[2]=t43,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1094 cdaddr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[307]+1)))(3,*((C_word*)lf[307]+1),t44,((C_word*)t0)[15]);}
-else{
-t42=C_eqp(((C_word*)t0)[14],lf[308]);
-if(C_truep(t42)){
-t43=C_i_cadr(((C_word*)t0)[15]);
-t44=C_i_caddr(((C_word*)t0)[15]);
-t45=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9357,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[16],a[6]=t43,tmp=(C_word)a,a+=7,tmp);
-t46=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9488,a[2]=t43,a[3]=t44,tmp=(C_word)a,a+=4,tmp);
-C_trace("call-with-current-continuation");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[237]+1)))(3,*((C_word*)lf[237]+1),t45,t46);}
-else{
-t43=C_eqp(((C_word*)t0)[14],lf[315]);
-if(C_truep(t43)){
-t44=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9563,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp);
-t45=C_SCHEME_END_OF_LIST;
-t46=(*a=C_VECTOR_TYPE|1,a[1]=t45,tmp=(C_word)a,a+=2,tmp);
-t47=C_SCHEME_FALSE;
-t48=(*a=C_VECTOR_TYPE|1,a[1]=t47,tmp=(C_word)a,a+=2,tmp);
-t49=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9567,a[2]=t44,tmp=(C_word)a,a+=3,tmp);
-t50=C_i_cdr(((C_word*)t0)[15]);
-t51=C_SCHEME_UNDEFINED;
-t52=(*a=C_VECTOR_TYPE|1,a[1]=t51,tmp=(C_word)a,a+=2,tmp);
-t53=C_set_block_item(t52,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9573,a[2]=t46,a[3]=t52,a[4]=t48,a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp));
-t54=((C_word*)t52)[1];
-f_9573(t54,t49,t50);}
-else{
-t44=C_eqp(((C_word*)t0)[14],lf[317]);
-if(C_truep(t44)){
-t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9622,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
-t46=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9632,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,((C_word*)t0)[16],t45,t46);}
-else{
-t45=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9943,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
-t46=C_eqp(lf[340],((C_word*)t0)[14]);
-if(C_truep(t46)){
-t47=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9983,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1220 ##sys#check-syntax");
-((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t47,lf[340],((C_word*)t0)[15],lf[342],C_SCHEME_FALSE,((C_word*)t0)[11]);}
-else{
-C_trace("compiler.scm: 1236 handle-call");
-t47=t45;
-f_9943(t47,((C_word*)t0)[16]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-
-/* k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9983,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[7]);
-if(C_truep(C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10116,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1223 lookup");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5290(t4,t3,t2,((C_word*)t0)[4]);}
-else{
-t3=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[98],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,C_SCHEME_FALSE,t5);
-t7=C_a_i_cons(&a,2,C_fix(0),t6);
-t8=C_a_i_cons(&a,2,t2,t7);
-t9=C_a_i_cons(&a,2,lf[341],t8);
-C_trace("compiler.scm: 1234 walk");
-t10=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t10,((C_word*)t0)[3],t9,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
-
-/* k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10116,2,t0,t1);}
-t2=C_i_assq(t1,*((C_word*)lf[75]+1));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9999,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("g16661667");
-t4=t3;
-f_9999(t4,((C_word*)t0)[3],t2);}
-else{
-t3=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[72]+1));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10045,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-C_trace("g16741675");
-t5=t4;
-f_10045(t5,((C_word*)t0)[3],t3);}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[2],*((C_word*)lf[78]+1)))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10077,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1231 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t4,((C_word*)t0)[2]);}
-else{
-t4=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[98],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
-t8=C_a_i_cons(&a,2,C_fix(0),t7);
-t9=C_a_i_cons(&a,2,((C_word*)t0)[2],t8);
-t10=C_a_i_cons(&a,2,lf[341],t9);
-C_trace("compiler.scm: 1233 walk");
-t11=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t11,((C_word*)t0)[3],t10,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}}}
-
-/* k10075 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_10077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10077,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[297],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[100],t4));}
-
-/* g1674 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_10045(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10045,NULL,3,t0,t1,t2);}
-t3=C_i_cdr(t2);
-C_trace("compiler.scm: 1229 walk");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* g1666 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9999(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9999,NULL,3,t0,t1,t2);}
-t3=C_i_cadr(t2);
-t4=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[98],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
-t8=C_a_i_cons(&a,2,C_fix(0),t7);
-t9=C_a_i_cons(&a,2,t3,t8);
-t10=C_a_i_cons(&a,2,lf[341],t9);
-C_trace("compiler.scm: 1225 walk");
-t11=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t11,t1,t10,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9943(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9943,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9947,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1209 mapwalk");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_10324(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9947(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9947,2,t0,t1);}
-t2=C_i_car(t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9953,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1211 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[53]+1),t2);}
-
-/* k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9953,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9956,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9967,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t4=C_i_cdr(t1);
-C_trace("compiler.scm: 1216 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t3,((C_word*)t0)[5],((C_word*)t0)[4],t4);}
-else{
-C_trace("compiler.scm: 1216 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t3,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
-else{
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[5]);}}
-
-/* k9965 in k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9967,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-C_trace("compiler.scm: 1213 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),((C_word*)t0)[3],*((C_word*)lf[53]+1),((C_word*)t0)[2],t2);}
-
-/* k9954 in k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[18],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9632,4,t0,t1,t2,t3);}
-t4=C_i_car(t3);
-t5=C_i_car(t2);
-t6=C_i_cadr(t5);
-t7=C_i_caddr(t2);
-t8=C_i_cadr(t7);
-t9=C_i_cadddr(t2);
-t10=C_i_cadr(t9);
-t11=C_i_cadr(t4);
-t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9651,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t10,a[5]=((C_word*)t0)[3],a[6]=t6,a[7]=t4,a[8]=t8,a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[6],a[12]=t11,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9923,a[2]=t12,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1139 valid-c-identifier?");
-((C_proc3)C_retrieve_symbol_proc(lf[339]))(3,*((C_word*)lf[339]+1),t13,t6);}
-
-/* k9921 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9923,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],*((C_word*)lf[78]+1));
-t3=C_mutate((C_word*)lf[78]+1 /* (set! callback-names ...) */,t2);
-t4=((C_word*)t0)[2];
-f_9651(2,t4,t3);}
-else{
-C_trace("compiler.scm: 1141 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[338],((C_word*)t0)[3]);}}
-
-/* k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9651(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9651,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9654,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-t3=C_i_listp(((C_word*)t0)[12]);
-t4=C_i_not(t3);
-if(C_truep(t4)){
-if(C_truep(t4)){
-C_trace("compiler.scm: 1146 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}
-else{
-t5=t2;
-f_9654(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t5=C_i_listp(((C_word*)t0)[4]);
-t6=C_i_not(t5);
-if(C_truep(t6)){
-if(C_truep(t6)){
-C_trace("compiler.scm: 1146 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}
-else{
-t7=t2;
-f_9654(2,t7,C_SCHEME_UNDEFINED);}}
-else{
-t7=C_i_length(((C_word*)t0)[12]);
-t8=C_i_length(((C_word*)t0)[4]);
-t9=C_eqp(t7,t8);
-if(C_truep(t9)){
-t10=t2;
-f_9654(2,t10,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 1146 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}}}}
-
-/* k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9654,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9661,a[2]=((C_word*)t0)[13],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9665,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=t2,tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 1150 mapwalk");
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_10324(t4,t3,((C_word*)t0)[2],((C_word*)t0)[10],((C_word*)t0)[9]);}
-
-/* k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9665,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9673,a[2]=t1,a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9697,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t2,a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9838,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t7=((C_word*)t5)[1];
-f_9838(t7,t3,((C_word*)t0)[10],((C_word*)t0)[2]);}
-
-/* loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9838(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9838,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=C_i_car(t2);
-t5=C_i_car(t3);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9874,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=t1,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9878,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9882,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1163 final-foreign-type");
-((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t8,t5);}}
-
-/* k9880 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1163 finish-foreign-result");
-((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k9876 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1162 foreign-type-convert-result");
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k9872 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9874(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9874,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[6],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9862,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cdr(((C_word*)t0)[4]);
-t5=C_i_cdr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 1165 loop");
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_9838(t6,t3,t4,t5);}
-
-/* k9860 in k9872 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9862(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9862,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9697,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9705,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9717,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9721,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[319]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[320]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[321]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[322]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9747,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cddr(((C_word*)t0)[4]);
-C_trace("##sys#append");
-t7=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[324]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[325]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[326]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[327]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[328]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[329]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
-C_trace("compiler.scm: 1187 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t4,lf[330],((C_word*)t0)[5],((C_word*)t0)[3]);}
-else{
-if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[331]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[332]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[333]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[334]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9829,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t6=C_i_cddr(((C_word*)t0)[4]);
-C_trace("##sys#append");
-t7=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-else{
-t5=C_i_cddr(((C_word*)t0)[4]);
-C_trace("##sys#append");
-t6=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t5,C_SCHEME_END_OF_LIST);}}}}
-
-/* k9827 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9829(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9829,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,lf[159],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[335],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9793,a[2]=((C_word*)t0)[4],a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1199 macro-alias");
-t8=((C_word*)((C_word*)t0)[3])[1];
-f_5305(t8,t7,lf[336],((C_word*)t0)[2]);}
-
-/* k9791 in k9827 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9793,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[335],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[323],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[335],t4);
-t6=C_a_i_cons(&a,2,t1,t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,((C_word*)t0)[3],t7);
-t9=C_a_i_cons(&a,2,lf[159],t8);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t11=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,((C_word*)t0)[2],t10,C_SCHEME_END_OF_LIST);}
-
-/* k9745 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9747,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,lf[159],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[323],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t7=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t6,C_SCHEME_END_OF_LIST);}
-
-/* k9719 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9721(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9715 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9717(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9717,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,lf[159],t2);
-C_trace("compiler.scm: 1166 foreign-type-convert-argument");
-((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),((C_word*)t0)[3],t3,((C_word*)t0)[2]);}
-
-/* k9703 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9705(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9705,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,lf[159],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=C_a_i_cons(&a,2,lf[172],t6);
-C_trace("compiler.scm: 1151 walk");
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k9671 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9673,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t3=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k9659 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9661(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9661,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[317],t1));}
-
-/* a9621 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9622,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 1133 split-at");
-((C_proc4)C_retrieve_symbol_proc(lf[318]))(4,*((C_word*)lf[318]+1),t1,t2,C_fix(4));}
-
-/* loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9573(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9573,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9600,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9607,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g15751576");
-t6=t3;
-f_9600(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9605 in loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9607,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop15591572");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9573(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop15591572");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9573(t6,((C_word*)t0)[3],t5);}}
-
-/* g1575 in loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9600(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9600,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1128 process-declaration");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[316]+1)))(4,*((C_word*)lf[316]+1),t1,t2,((C_word*)t0)[2]);}
-
-/* k9565 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9561 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9563,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[151],t1);
-C_trace("compiler.scm: 1125 walk");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9488(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9488,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9494,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9506,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("with-exception-handler");
-((C_proc4)C_retrieve_symbol_proc(lf[236]))(4,*((C_word*)lf[236]+1),t1,t3,t4);}
-
-/* a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9506(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9506,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9512,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9536,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a9535 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9536(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_9536r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_9536r(t0,t1,t2);}}
-
-static void C_ccall f_9536r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9542,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("k14871492");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a9541 in a9535 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9542,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a9511 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9512,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9519,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 1106 collapsable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t2,((C_word*)t0)[2]);}
-
-/* k9517 in a9511 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9519,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-else{
-t2=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,*((C_word*)lf[77]+1),t2);
-t4=C_a_i_cons(&a,2,lf[159],t3);
-C_trace("compiler.scm: 1108 eval");
-((C_proc3)C_retrieve_symbol_proc(lf[147]))(3,*((C_word*)lf[147]+1),((C_word*)t0)[3],t4);}}
-
-/* a9493 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9494(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9494,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9500,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("k14871492");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a9499 in a9493 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9500(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9500,2,t0,t1);}
-C_trace("compiler.scm: 1104 quit");
-((C_proc5)C_retrieve_symbol_proc(lf[313]))(5,*((C_word*)lf[313]+1),t1,lf[314],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9357,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9360,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("g14901491");
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9360,2,t0,t1);}
-t2=C_set_block_item(lf[58] /* constants-used */,0,C_SCHEME_TRUE);
-t3=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[98],t3);
-t5=C_a_i_list(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,t5,*((C_word*)lf[77]+1));
-t7=C_mutate((C_word*)lf[77]+1 /* (set! defconstant-bindings ...) */,t6);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9371,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1113 collapsable-literal?");
-((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t8,t1);}
-
-/* k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9371,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9374,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-t3=C_a_i_list(&a,1,((C_word*)t0)[6]);
-C_trace("compiler.scm: 1114 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[57]+1),((C_word*)t0)[5],t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9381,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1117 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[311]);}}
-
-/* k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9381,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9384,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_a_i_list(&a,1,t1);
-C_trace("compiler.scm: 1118 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[57]+1),((C_word*)t0)[2],t3);}
-
-/* k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9384(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9384,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9387,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1119 hide-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[6]);}
-
-/* k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9387,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9417,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[6];
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9392,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[310],C_SCHEME_TRUE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=C_i_car(t4);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[310],t7);}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k9390 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[310],t1);}
-
-/* k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9417,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9447,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[6];
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9422,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],C_SCHEME_TRUE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=C_i_car(t4);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k9420 in k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k9445 in k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9447,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[98],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=C_a_i_cons(&a,2,lf[292],t5);
-C_trace("compiler.scm: 1122 walk");
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t7,((C_word*)t0)[4],t6,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k9372 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[309]);}
-
-/* k9340 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9336 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9338,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[172],t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9333,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1095 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t3,*((C_word*)lf[55]+1),((C_word*)t0)[2],t2);}
-
-/* k9331 in k9336 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9333(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_set_block_item(lf[56] /* inline-table-used */,0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[306]);}
-
-/* k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9177(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9177,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1069 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-
-/* k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9180,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9183,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 1070 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-
-/* k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9183,2,t0,t1);}
-t2=C_i_cddddr(((C_word*)t0)[10]);
-t3=C_i_pairp(t2);
-t4=(C_truep(t3)?C_i_cadddr(((C_word*)t0)[10]):C_SCHEME_FALSE);
-t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9189,a[2]=((C_word*)t0)[10],a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t1,a[12]=((C_word*)t0)[9],tmp=(C_word)a,a+=13,tmp);
-C_trace("compiler.scm: 1072 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t5,((C_word*)t0)[9],((C_word*)t0)[3]);}
-
-/* k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9189,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);
-t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[75]+1));
-t4=C_mutate((C_word*)lf[75]+1 /* (set! location-pointer-map ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9261,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9300,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1076 estimate-foreign-result-location-size");
-((C_proc3)C_retrieve_symbol_proc(lf[304]))(3,*((C_word*)lf[304]+1),t6,((C_word*)t0)[10]);}
-
-/* k9298 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1076 words");
-((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-
-/* k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9261(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9261,2,t0,t1);}
-t2=C_fixnum_plus(C_fix(2),t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[302],t3);
-t5=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[98],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t4,t7);
-t9=C_a_i_cons(&a,2,lf[271],t8);
-t10=C_a_i_list(&a,2,((C_word*)t0)[11],t9);
-t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9224,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t11,tmp=(C_word)a,a+=10,tmp);
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t14=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t15=C_a_i_cons(&a,2,((C_word*)t0)[5],t14);
-t16=C_a_i_cons(&a,2,lf[168],t15);
-t17=t13;
-f_9228(t17,C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
-else{
-t14=t13;
-f_9228(t14,C_SCHEME_END_OF_LIST);}}
-
-/* k9226 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9228(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9228,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9236,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[3])){
-C_trace("compiler.scm: 1088 fifth");
-((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t2,((C_word*)t0)[2]);}
-else{
-t3=C_i_cadddr(((C_word*)t0)[2]);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t5=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[4],t1,t4);}}
-
-/* k9234 in k9226 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9236(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9236,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t3=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k9222 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9224(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9224,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[151],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
-t5=C_a_i_cons(&a,2,lf[158],t4);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9204,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t5,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 1089 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9202 in k9222 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1075 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9121,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_i_caddr(((C_word*)t0)[4]);
-t5=C_i_cadddr(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9130,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t5,a[6]=t4,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 1057 make-random-name");
-((C_proc2)C_retrieve_symbol_proc(lf[88]))(2,*((C_word*)lf[88]+1),t6);}
-
-/* k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9130,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9133,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[5])){
-t3=t2;
-f_9133(t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9161,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9165,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1058 fifth");
-((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t4,((C_word*)t0)[2]);}}
-
-/* k9163 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9165(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1058 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1);}
-
-/* k9159 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_9133(t3,t2);}
-
-/* k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9133(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9133,NULL,2,t0,t1);}
-t2=C_a_i_vector(&a,3,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[67]+1));
-t4=C_mutate((C_word*)lf[67]+1 /* (set! external-variables ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9153,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 1061 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),t5,lf[299],((C_word*)((C_word*)t0)[7])[1]);}
-
-/* k9151 in k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9153,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[4],lf[297],t1);
-t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[64]+1));
-t4=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9145,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1063 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t5,((C_word*)t0)[2],((C_word*)t0)[4],*((C_word*)lf[72]+1));}
-
-/* k9143 in k9151 in k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9145(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[72]+1 /* (set! external-to-pointer ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[298]);}
-
-/* k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8957,2,t0,t1);}
-t2=C_i_cdddr(((C_word*)t0)[8]);
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8969,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1034 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9105,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 1049 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t3,*((C_word*)lf[63]+1),((C_word*)t0)[2],t1);}}
-
-/* k9103 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[295]);}
-
-/* k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8969,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8972,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 1035 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-
-/* k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8972,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8975,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-t3=C_a_i_vector(&a,3,((C_word*)t0)[3],((C_word*)t0)[9],t1);
-C_trace("compiler.scm: 1036 ##sys#hash-table-set!");
-((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[63]+1),((C_word*)t0)[2],t3);}
-
-/* k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8975,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9005,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=((C_word*)t0)[8];
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8980,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],C_SCHEME_TRUE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=C_i_car(t4);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k8978 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9005(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9005,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9035,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=((C_word*)t0)[7];
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9010,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],C_SCHEME_TRUE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=C_i_car(t4);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
-else{
-C_trace("##sys#error");
-t7=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k9008 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9035,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9038,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1039 hide-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[8]);}
-
-/* k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9038,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9041,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 1040 hide-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[7]);}
-
-/* k9039 in k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_9041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9041,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[9]);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[8],t3);
-t5=C_a_i_cons(&a,2,lf[292],t4);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9072,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t5,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t7=C_i_cdr(((C_word*)t0)[9]);
-if(C_truep(C_i_pairp(t7))){
-t8=C_i_cadr(((C_word*)t0)[9]);
-t9=t6;
-f_9072(t9,C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
-else{
-t8=t6;
-f_9072(t8,C_a_i_cons(&a,2,lf[293],C_SCHEME_END_OF_LIST));}}
-
-/* k9070 in k9039 in k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_9072(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9072,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,lf[292],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
-t6=C_a_i_cons(&a,2,lf[151],t5);
-C_trace("compiler.scm: 1041 walk");
-t7=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t7,((C_word*)t0)[5],t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8900(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8900,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8903,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_caddr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 1017 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-
-/* k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8903(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8903,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8906,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cdddr(((C_word*)t0)[2]);
-if(C_truep(C_i_pairp(t3))){
-t4=t2;
-f_8906(2,t4,C_i_cadddr(((C_word*)t0)[2]));}
-else{
-C_trace("compiler.scm: 1020 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t2,((C_word*)t0)[4]);}}
-
-/* k8904 in k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8906(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8906,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8918,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_stringp(t1))){
-t3=t1;
-t4=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t3);
-t5=C_a_i_cons(&a,2,t4,*((C_word*)lf[64]+1));
-t6=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t5);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[290]);}
-else{
-C_trace("compiler.scm: 1025 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t2,t1);}}
-
-/* k8916 in k8904 in k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8918,2,t0,t1);}
-t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
-t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[64]+1));
-t4=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[289]);}
-
-/* k8889 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8891(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1013 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8876 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1010 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8863 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8865(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1007 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8850 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8852(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1004 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8837 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 1001 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8772(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8772,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[7]);
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8785,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t4=C_i_cdr(((C_word*)t0)[7]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8791,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_8791(t8,t3,t4);}
-else{
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[278]);}}
-
-/* fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8791(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8791,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8811,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 996 walk");
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8818,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 997 walk");
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
-
-/* k8816 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8818(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8818,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8822,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 997 fold");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8791(t3,t2,((C_word*)t0)[2]);}
-
-/* k8820 in k8816 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8822,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k8809 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8811,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,1,t1));}
-
-/* k8783 in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 991 canonicalize-begin-body");
-((C_proc3)C_retrieve_symbol_proc(lf[243]))(3,*((C_word*)lf[243]+1),((C_word*)t0)[2],t1);}
-
-/* k8754 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8756(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[277]);}
-
-/* k8739 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8741(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 982 walk");
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5724(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8708 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8710,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8718,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cadddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 977 walk");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k8716 in k8708 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8718(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8718,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[254],t4));}
-
-/* k8679 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8681,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[251],t3));}
-
-/* a8647 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8648(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8648,3,t0,t1,t2);}
-C_trace("g13471348");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5378(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8634,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8638,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8642,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_i_cddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 968 mapwalk");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_10324(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8640 in k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8636 in k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8638,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[271],t2));}
-
-/* k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8601,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8605,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8609,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_i_cddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 963 mapwalk");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_10324(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8607 in k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8603 in k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8605,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[270],t2));}
-
-/* k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8268,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8274,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 913 lookup");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5290(t4,t3,t2,((C_word*)t0)[4]);}
-
-/* k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8274,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8277,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 914 get-line");
-((C_proc3)C_retrieve_symbol_proc(lf[268]))(3,*((C_word*)lf[268]+1),t4,((C_word*)t0)[7]);}
-
-/* k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8277,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[8]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8283,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[7])[1],C_retrieve(lf[114])))){
-C_trace("compiler.scm: 917 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t3,lf[116],lf[267],((C_word*)((C_word*)t0)[7])[1]);}
-else{
-t4=t3;
-f_8283(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8283,2,t0,t1);}
-t2=C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[64]+1));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8290,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-C_trace("g12311232");
-t4=t3;
-f_8290(t4,((C_word*)t0)[4],t2);}
-else{
-t3=C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[75]+1));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8366,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-C_trace("g12411242");
-t5=t4;
-f_8366(t5,((C_word*)t0)[4],t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8438,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[9])[1],((C_word*)t0)[7]))){
-t5=t4;
-f_8438(2,t5,C_SCHEME_UNDEFINED);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8509,a[2]=t4,a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 944 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t5,((C_word*)((C_word*)t0)[9])[1],lf[106]);}}}}
-
-/* k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8509,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8512,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_8512(2,t3,t1);}
-else{
-C_trace("compiler.scm: 945 ##sys#alias-global-hook");
-((C_proc4)C_retrieve_symbol_proc(lf[105]))(4,*((C_word*)lf[105]+1),t2,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_TRUE);}}
-
-/* k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8512,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-if(C_truep(*((C_word*)lf[26]+1))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)((C_word*)t0)[3])[1];
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8520,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t5))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[266],C_SCHEME_TRUE);}
-else{
-t7=C_i_cdr(t5);
-if(C_truep(C_i_nullp(t7))){
-t8=C_i_car(t5);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[266],t8);}
-else{
-C_trace("##sys#error");
-t8=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[2];
-f_8438(2,t4,t3);}}
-
-/* k8518 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-
-/* k8543 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8545,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8550,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[133],C_SCHEME_TRUE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[133],t6);}
-else{
-C_trace("##sys#error");
-t6=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k8548 in k8543 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8550(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8438(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8438,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8441,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8477,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 949 ##sys#macro?");
-((C_proc3)C_retrieve_symbol_proc(lf[265]))(3,*((C_word*)lf[265]+1),t3,((C_word*)((C_word*)t0)[9])[1]);}
-
-/* k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8477(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8477,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8480,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8490,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8493,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[263]))(2,*((C_word*)lf[263]+1),t4);}
-else{
-C_trace("compiler.scm: 950 compiler-warning");
-((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),t2,lf[116],lf[258],((C_word*)((C_word*)t0)[3])[1],lf[264]);}}
-else{
-t2=((C_word*)t0)[4];
-f_8441(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8493(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8493,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8496,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[262],t1);}
-
-/* k8494 in k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8496,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8499,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[260]+1)))(4,*((C_word*)lf[260]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k8497 in k8494 in k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8499(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[259]))(3,*((C_word*)lf[259]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8488 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 950 compiler-warning");
-((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[116],lf[258],((C_word*)((C_word*)t0)[2])[1],t1);}
-
-/* k8478 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8480(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(*((C_word*)lf[35]+1))){
-C_trace("compiler.scm: 954 ##sys#undefine-macro!");
-((C_proc3)C_retrieve_symbol_proc(lf[257]))(3,*((C_word*)lf[257]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-f_8441(2,t3,t2);}}
-
-/* k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8441(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8441,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8444,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8471,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 955 keyword?");
-((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t3,((C_word*)((C_word*)t0)[8])[1]);}
-
-/* k8469 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8471(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 956 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[240],lf[256],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t2=((C_word*)t0)[3];
-f_8444(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8444,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8447,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_i_pairp(((C_word*)((C_word*)t0)[8])[1]))){
-C_trace("compiler.scm: 958 syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[250],lf[255],((C_word*)((C_word*)t0)[8])[1]);}
-else{
-t3=t2;
-f_8447(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k8445 in k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8447,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8462,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 960 walk");
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8460 in k8445 in k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8462(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8462,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[250],t3));}
-
-/* g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8366(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8366,NULL,3,t0,t1,t2);}
-t3=C_i_caddr(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8373,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 934 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t4);}
-
-/* k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8373(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8373,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8432,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 936 foreign-type-convert-argument");
-((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t2,((C_word*)t0)[2],((C_word*)t0)[8]);}
-
-/* k8430 in k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8432,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t6=C_i_cadr(((C_word*)t0)[6]);
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8420,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t5,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 940 foreign-type-check");
-((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),t7,((C_word*)t0)[8],((C_word*)t0)[7]);}
-
-/* k8418 in k8430 in k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8420(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8420,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=C_a_i_cons(&a,2,lf[254],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
-t8=C_a_i_cons(&a,2,lf[158],t7);
-C_trace("compiler.scm: 935 walk");
-t9=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t9,((C_word*)t0)[4],t8,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8290(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8290,NULL,3,t0,t1,t2);}
-t3=C_i_cadr(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8297,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 924 gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t4);}
-
-/* k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8297(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8297,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8356,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 926 foreign-type-convert-argument");
-((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
-
-/* k8354 in k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8356,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_i_caddr(((C_word*)t0)[7]);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,t5,t6);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8336,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t7,tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 929 foreign-type-check");
-((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),t8,((C_word*)t0)[8],((C_word*)t0)[6]);}
-
-/* k8334 in k8354 in k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8336(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8336,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,lf[251],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=C_a_i_cons(&a,2,lf[158],t6);
-C_trace("compiler.scm: 925 walk");
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* loop1156 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8223(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8223,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[96]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8252,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g11721173");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8250 in loop1156 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8252,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11561169");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8223(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11561169");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8223(t6,((C_word*)t0)[3],t5);}}
-
-/* k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8140,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8143,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8172,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8174,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_8174(t11,t7,((C_word*)t0)[6],t1);}
-
-/* loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8174(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8174,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[162]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8207,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g12001201");
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k8205 in loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8207,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8187,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_8187(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_8187(t5,t4);}}
-
-/* k8185 in k8205 in loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8187(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop11801194");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8174(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k8170 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 901 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8143,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8146,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8164,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 904 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t3,((C_word*)t0)[2],t1,*((C_word*)lf[47]+1));}
-
-/* k8162 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8164,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8168,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 905 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8166 in k8162 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 903 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k8144 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8146(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8146,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8149,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 907 set-real-names!");
-f_5318(t2,((C_word*)t0)[5],((C_word*)t0)[2]);}
-
-/* k8147 in k8144 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8149,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[172],t3));}
-
-/* k8119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8121,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[172],t1);
-t3=C_i_cadr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 895 walk");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t4,((C_word*)t0)[4],t2,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
-
-/* k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7596(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7596,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[8]);
-t3=C_eqp(C_SCHEME_TRUE,t2);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7602,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_7602(2,t5,t3);}
-else{
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8004,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t10=C_i_caddr(((C_word*)t0)[8]);
-C_trace("compiler.scm: 822 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t9,t10);}}
-
-/* k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8004,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8006,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_8006(t5,((C_word*)t0)[2],t1);}
-
-/* loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8006(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8006,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8033,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8084,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g965966");
-t6=t3;
-f_8033(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8082 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_8084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8084,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop949962");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8006(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop949962");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8006(t6,((C_word*)t0)[3],t5);}}
-
-/* g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8033(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8033,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_symbolp(t2))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8046,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8057,tmp=(C_word)a,a+=2,tmp);
-t5=t3;
-f_8046(t5,f_8057(t2));}
-else{
-t4=t3;
-f_8046(t4,C_SCHEME_FALSE);}}}
-
-/* loop in g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static C_word C_fcall f_8057(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-t2=C_i_nullp(t1);
-if(C_truep(t2)){
-return(t2);}
-else{
-t3=C_i_car(t1);
-if(C_truep(C_i_symbolp(t3))){
-t4=C_i_cdr(t1);
-t6=t4;
-t1=t6;
-goto loop;}
-else{
-return(C_SCHEME_FALSE);}}}
-
-/* k8044 in g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_8046(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[3]);}
-else{
-C_trace("compiler.scm: 819 ##sys#syntax-error-hook");
-((C_proc6)C_retrieve_symbol_proc(lf[244]))(6,*((C_word*)lf[244]+1),((C_word*)t0)[4],lf[245],lf[247],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7602,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[9])[1];
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7605,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[9],a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7994,a[2]=((C_word*)t0)[7],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 824 ##sys#current-module");
-((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t4);}
-
-/* k7992 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 825 ##sys#syntax-error-hook");
-((C_proc5)C_retrieve_symbol_proc(lf[244]))(5,*((C_word*)lf[244]+1),((C_word*)t0)[3],lf[245],lf[246],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_7605(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7605,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7610,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7879,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-
-/* a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7879(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7879,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7883,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7918,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_retrieve(lf[108]);
-t7=C_retrieve(lf[109]);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7922,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t9,tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 879 ##sys#meta-macro-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t10);}
-
-/* k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7922(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7922,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7923,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=t3,a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7941,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7943,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#dynamic-wind");
-t7=*((C_word*)lf[112]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,t4,t6,t4);}
-
-/* a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7943,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7949,a[2]=t3,a[3]=t7,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_7949(t9,t1,((C_word*)t0)[2]);}
-
-/* loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7949(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7949,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7976,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7987,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g11301131");
-t6=t3;
-f_7976(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7985 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7987,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11141127");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7949(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11141127");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7949(t6,((C_word*)t0)[3],t5);}}
-
-/* g1130 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7976(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7976,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 885 ##sys#current-meta-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t3);}
-
-/* k7982 in g1130 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 882 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* k7939 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 877 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7923,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7927,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("g109410951102");
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7927,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7930,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("g109410951102");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7930,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7934,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g109610971103");
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k7932 in k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7934,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7937,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g109610971103");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k7935 in k7932 in k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k7916 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 876 canonicalize-begin-body");
-((C_proc3)C_retrieve_symbol_proc(lf[243]))(3,*((C_word*)lf[243]+1),((C_word*)t0)[2],t1);}
-
-/* k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7883,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7886,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7889,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_7889(t6,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7889(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7889,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,((C_word*)t0)[3]);
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7899,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7910,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 890 caar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t5,t2);}}
-
-/* k7908 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7910,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7914,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 890 cdar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),t2,((C_word*)t0)[2]);}
-
-/* k7912 in k7908 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 890 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[201],t1);}
-
-/* k7897 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7889(t3,((C_word*)t0)[2],t2);}
-
-/* k7884 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7610,2,t0,t1);}
-t2=C_retrieve(lf[108]);
-t3=C_retrieve(lf[192]);
-t4=C_retrieve(lf[109]);
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7614,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=t3,a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-C_trace("compiler.scm: 828 ##sys#register-module");
-((C_proc4)C_retrieve_symbol_proc(lf[242]))(4,*((C_word*)lf[242]+1),t5,((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7614,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_retrieve(lf[209]);
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7615,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=t7,a[6]=t5,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7642,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-C_trace("##sys#dynamic-wind");
-t10=*((C_word*)lf[112]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,((C_word*)t0)[2],t8,t9,t8);}
-
-/* a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7642,2,t0,t1);}
-t2=C_i_cdddr(((C_word*)t0)[7]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7652,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_7652(t6,t1,t2,C_SCHEME_END_OF_LIST);}
-
-/* loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7652(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7652,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7662,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7709,tmp=(C_word)a,a+=2,tmp);
-C_trace("call-with-current-continuation");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[237]+1)))(3,*((C_word*)lf[237]+1),t4,t5);}
-else{
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7763,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(t2))){
-if(C_truep(C_i_nullp(t3))){
-t5=C_i_car(t2);
-if(C_truep(C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7873,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[7],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 857 caar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t6,t2);}
-else{
-t6=t4;
-f_7763(2,t6,C_SCHEME_UNDEFINED);}}
-else{
-t5=t4;
-f_7763(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t5=t4;
-f_7763(2,t5,C_SCHEME_UNDEFINED);}}}
-
-/* k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7873,2,t0,t1);}
-if(C_truep(C_i_symbolp(t1))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7816,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7869,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 858 caar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t3,((C_word*)t0)[4]);}
-else{
-t2=((C_word*)t0)[6];
-f_7763(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k7867 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 858 lookup");
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_5290(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k7814 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7816,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7819,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_7819(2,t3,t1);}
-else{
-C_trace("compiler.scm: 858 caar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t2,((C_word*)t0)[2]);}}
-
-/* k7817 in k7814 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-t2=t1;
-if(C_truep((C_truep(C_eqp(t2,lf[238]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[239]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t3=((C_word*)t0)[3];
-f_7763(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=C_i_assq(lf[238],C_retrieve(lf[209]));
-t4=C_i_cdr(t3);
-t5=C_eqp(t1,t4);
-if(C_truep(t5)){
-t6=((C_word*)t0)[3];
-f_7763(2,t6,C_SCHEME_UNDEFINED);}
-else{
-t6=C_i_assq(lf[239],C_retrieve(lf[209]));
-t7=C_i_cdr(t6);
-t8=C_eqp(t1,t7);
-if(C_truep(t8)){
-t9=((C_word*)t0)[3];
-f_7763(2,t9,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 863 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[240],lf[241],((C_word*)t0)[2]);}}}}
-
-/* k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7763(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7763,2,t0,t1);}
-t2=C_i_cdr(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7778,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=C_i_car(((C_word*)t0)[7]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7786,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 872 ##sys#current-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t5);}
-
-/* k7784 in k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7786(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 869 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* k7776 in k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7778,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-C_trace("compiler.scm: 867 loop");
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_7652(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7709,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7715,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7734,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("with-exception-handler");
-((C_proc4)C_retrieve_symbol_proc(lf[236]))(4,*((C_word*)lf[236]+1),t1,t3,t4);}
-
-/* a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7734,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7740,tmp=(C_word)a,a+=2,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7750,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a7749 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7750(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7750r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7750r(t0,t1,t2);}}
-
-static void C_ccall f_7750r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7756,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("k10371042");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a7755 in a7749 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7756(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7756,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a7739 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7740,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7748,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 839 ##sys#current-module");
-((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t2);}
-
-/* k7746 in a7739 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 839 ##sys#finalize-module");
-((C_proc3)C_retrieve_symbol_proc(lf[235]))(3,*((C_word*)lf[235]+1),((C_word*)t0)[2],t1);}
-
-/* a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7715,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7721,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("k10371042");
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7721(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7721,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7725,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7732,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 837 current-error-port");
-((C_proc2)C_retrieve_symbol_proc(lf[234]))(2,*((C_word*)lf[234]+1),t3);}
-
-/* k7730 in a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7732(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 837 print-error-message");
-((C_proc4)C_retrieve_symbol_proc(lf[233]))(4,*((C_word*)lf[233]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7723 in a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 838 exit");
-((C_proc3)C_retrieve_symbol_proc(lf[232]))(3,*((C_word*)lf[232]+1),((C_word*)t0)[2],C_fix(1));}
-
-/* k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7662,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7665,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g10401041");
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7665,2,t0,t1);}
-t2=*((C_word*)lf[39]+1);
-t3=(C_truep(t2)?t2:C_i_assq(((C_word*)t0)[4],*((C_word*)lf[38]+1)));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7672,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("g10591060");
-t5=t4;
-f_7672(t5,((C_word*)t0)[2],t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7693,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 849 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t4,((C_word*)t0)[3]);}}
-
-/* k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7693(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7693,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7697,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(*((C_word*)lf[40]+1))){
-C_trace("compiler.scm: 848 values");
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7704,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 852 ##sys#current-module");
-((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}}
-
-/* k7702 in k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 852 ##sys#compiled-module-registration");
-((C_proc3)C_retrieve_symbol_proc(lf[228]))(3,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1);}
-
-/* k7695 in k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 848 values");
-C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7672(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7672,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7676,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5636,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(*((C_word*)lf[39]+1))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5719,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 491 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t6,t4);}
-else{
-t6=t5;
-f_5636(2,t6,C_i_cdr(t2));}}
-
-/* k5717 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 491 string-append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),((C_word*)t0)[2],t1,lf[230]);}
-
-/* k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5636,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5639,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5712,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 493 ##sys#current-module");
-((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}
-
-/* k5710 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5712(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 493 ##sys#compiled-module-registration");
-((C_proc3)C_retrieve_symbol_proc(lf[228]))(3,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1);}
-
-/* k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5639(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5639,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5642,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5705,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 495 file-exists?");
-((C_proc3)C_retrieve_symbol_proc(lf[227]))(3,*((C_word*)lf[227]+1),t3,((C_word*)t0)[5]);}
-
-/* k5703 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5705(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 496 read-file");
-((C_proc3)C_retrieve_symbol_proc(lf[226]))(3,*((C_word*)lf[226]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_5642(2,t2,C_SCHEME_FALSE);}}
-
-/* k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5642,2,t0,t1);}
-if(C_truep(C_i_equalp(((C_word*)t0)[7],t1))){
-if(C_truep(*((C_word*)lf[50]+1))){
-C_trace("compiler.scm: 499 print");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[6],lf[212],((C_word*)t0)[5],lf[213],((C_word*)t0)[4],lf[214]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f20080,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 845 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t2,((C_word*)t0)[2]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5657,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(*((C_word*)lf[50]+1))){
-C_trace("compiler.scm: 503 print");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),t2,lf[223],((C_word*)t0)[5],lf[224],((C_word*)t0)[4],lf[225]);}
-else{
-t3=t2;
-f_5657(2,t3,C_SCHEME_UNDEFINED);}}}
-
-/* k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5657,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5662,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 505 with-output-to-file");
-((C_proc4)C_retrieve_symbol_proc(lf[222]))(4,*((C_word*)lf[222]+1),((C_word*)t0)[2],((C_word*)t0)[3],t2);}
-
-/* a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5662,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5666,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5699,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 508 chicken-version");
-((C_proc2)C_retrieve_symbol_proc(lf[221]))(2,*((C_word*)lf[221]+1),t3);}
-
-/* k5697 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5699(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 507 print");
-((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[3],lf[218],((C_word*)t0)[2],lf[219],t1,lf[220]);}
-
-/* k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5666,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5669,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5674,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_5674(t6,t2,((C_word*)t0)[2]);}
-
-/* loop258 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5674(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5674,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[217]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5684,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g265266");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5682 in loop258 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5684(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5674(t3,((C_word*)t0)[2],t2);}
-
-/* k5667 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 510 print");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],lf[216]);}
-
-/* f20080 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f20080(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 844 values");
-C_values(4,0,((C_word*)t0)[2],t1,lf[215]);}
-
-/* k7674 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7676,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7683,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 845 reverse");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t2,((C_word*)t0)[2]);}
-
-/* k7681 in k7674 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 844 values");
-C_values(4,0,((C_word*)t0)[2],t1,lf[210]);}
-
-/* swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7615(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7615,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_trace("g100110021013");
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7619,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7622,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-C_trace("g100110021013");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
-
-/* k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7622,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7626,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("g100310041014");
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7626,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("g100310041014");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7629,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g100510061015");
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k7631 in k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7633,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7636,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g100510061015");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k7634 in k7631 in k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7509(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7509,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7536,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g901902");
-t6=t3;
-f_7536(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7581 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7583(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7583,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop885898");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7509(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop885898");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7509(t6,((C_word*)t0)[3],t5);}}
-
-/* g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7536(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7536,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 782 ##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[125]))(5,*((C_word*)lf[125]+1),t3,lf[206],t2,lf[207]);}
-
-/* k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7540,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7543,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_car(((C_word*)t0)[4]);
-C_trace("compiler.scm: 783 ##sys#strip-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t2,t3,((C_word*)t0)[3],C_SCHEME_FALSE);}
-
-/* k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7543(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7543,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7550,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[4]);
-if(C_truep(C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7564,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7568,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cadr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 787 eval/meta");
-f_5594(t5,t6);}
-else{
-t4=t2;
-f_7550(t4,C_SCHEME_FALSE);}}
-
-/* k7566 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 787 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-
-/* k7562 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7564(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7564,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_7550(t2,C_a_i_cons(&a,2,t1,((C_word*)t0)[2]));}
-
-/* k7548 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7550(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7550,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7554,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 788 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,((C_word*)t0)[2],lf[201]);}
-
-/* k7552 in k7548 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7554(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7554,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7402,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7407,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7449,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7463,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 790 dynamic-wind");
-((C_proc5)C_retrieve_symbol_proc(lf[205]))(5,*((C_word*)lf[205]+1),((C_word*)t0)[2],t2,t3,t4);}
-
-/* a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7463(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7463,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7469,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_7469(t5,t1,((C_word*)t0)[2]);}
-
-/* loop927 in a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7469(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7469,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7492,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=C_i_car(t4);
-t6=C_i_caddr(t4);
-C_trace("compiler.scm: 803 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t5,lf[201],t6);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7490 in loop927 in a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7469(t3,((C_word*)t0)[2],t2);}
-
-/* a7448 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7449,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7457,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 798 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
-
-/* k7455 in a7448 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 797 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7407(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7407,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7413,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t3)[1];
-f_7413(t5,t1,((C_word*)t0)[2]);}
-
-/* loop913 in a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7413(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7413,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7436,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=C_i_car(t4);
-t6=C_i_cadr(t4);
-C_trace("compiler.scm: 794 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t5,lf[201],t6);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7434 in loop913 in a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7413(t3,((C_word*)t0)[2],t2);}
-
-/* k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7295(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7295,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7298,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7389,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7393,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 760 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t1,lf[201]);}
-else{
-t3=t2;
-f_7298(t3,C_SCHEME_UNDEFINED);}}
-
-/* k7391 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 758 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k7387 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7389(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_7298(t3,t2);}
-
-/* k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7298(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7298,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7301,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7377,a[2]=((C_word*)t0)[9],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7385,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 765 eval/meta");
-f_5594(t4,((C_word*)t0)[3]);}
-else{
-C_trace("compiler.scm: 761 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,((C_word*)t0)[9],lf[201],C_SCHEME_FALSE);}}
-
-/* k7383 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 765 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-
-/* k7375 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7377(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7377,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7381,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 766 ##sys#current-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t2);}
-
-/* k7379 in k7375 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7381,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-C_trace("compiler.scm: 761 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[201],t2);}
-
-/* k7299 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7301(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[42],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7301,2,t0,t1);}
-if(C_truep(C_retrieve(lf[191]))){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[200],t2);
-t4=C_a_i_cons(&a,2,lf[201],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[98],t4);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7331,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t3,a[8]=t5,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t7=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,lf[186],t7);
-t9=C_a_i_cons(&a,2,lf[192],C_SCHEME_END_OF_LIST);
-t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=C_a_i_cons(&a,2,t8,t10);
-t12=C_a_i_cons(&a,2,lf[202],t11);
-t13=t6;
-f_7331(t13,C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST));}
-else{
-t7=t6;
-f_7331(t7,C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST));}}
-else{
-C_trace("compiler.scm: 767 walk");
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5724(t2,((C_word*)t0)[6],lf[203],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* k7329 in k7299 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7331(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7331,NULL,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=C_a_i_cons(&a,2,lf[95],t3);
-C_trace("compiler.scm: 767 walk");
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t5,((C_word*)t0)[5],t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7150,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7153,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-if(C_truep(C_i_pairp(t3))){
-C_trace("compiler.scm: 733 caadr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[139]+1)))(3,*((C_word*)lf[139]+1),t2,((C_word*)t0)[2]);}
-else{
-t4=t2;
-f_7153(2,t4,C_i_cadr(((C_word*)t0)[2]));}}
-
-/* k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7153,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7156,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-if(C_truep(C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7237,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 735 cdadr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[196]+1)))(3,*((C_word*)lf[196]+1),t4,((C_word*)t0)[2]);}
-else{
-t4=t2;
-f_7156(t4,C_i_caddr(((C_word*)t0)[2]));}}
-
-/* k7235 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7237,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7241,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-C_trace("##sys#append");
-t4=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k7239 in k7235 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7241,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_7156(t3,C_a_i_cons(&a,2,lf[172],t2));}
-
-/* k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7156(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7156,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7159,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 737 lookup");
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_5290(t3,t2,((C_word*)t0)[9],((C_word*)t0)[5]);}
-
-/* k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7159,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7162,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7223,a[2]=((C_word*)t0)[8],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 738 ##sys#current-module");
-((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}
-
-/* k7221 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 738 ##sys#register-syntax-export");
-((C_proc5)C_retrieve_symbol_proc(lf[195]))(5,*((C_word*)lf[195]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7162(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7162,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7165,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7211,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 741 ##sys#current-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t3);}
-
-/* k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7215,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7219,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 742 eval/meta");
-f_5594(t3,((C_word*)t0)[2]);}
-
-/* k7217 in k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 742 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-
-/* k7213 in k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7215(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 739 ##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[193]))(5,*((C_word*)lf[193]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7163 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7165(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7165,2,t0,t1);}
-if(C_truep(C_retrieve(lf[191]))){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[98],t2);
-t4=C_a_i_cons(&a,2,lf[192],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[186],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t4,t7);
-t9=C_a_i_cons(&a,2,t3,t8);
-t10=C_a_i_cons(&a,2,lf[193],t9);
-C_trace("compiler.scm: 743 walk");
-t11=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t11,((C_word*)t0)[5],t10,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-C_trace("compiler.scm: 743 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],lf[194],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7029,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7032,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t7=C_i_cadr(((C_word*)t0)[4]);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7087,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_7087(t11,t6,t7);}
-
-/* loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7087(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7087,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7114,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7137,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g824825");
-t6=t3;
-f_7114(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7135 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7137,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop808821");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7087(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop808821");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7087(t6,((C_word*)t0)[3],t5);}}
-
-/* g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7114(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7114,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7126,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7130,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cadr(t2);
-C_trace("compiler.scm: 715 eval/meta");
-f_5594(t5,t6);}
-
-/* k7128 in g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 714 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-
-/* k7124 in g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7126(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7126,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,3,((C_word*)t0)[2],C_SCHEME_FALSE,t1));}
-
-/* k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7032(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7032,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7035,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 717 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,t1,((C_word*)t0)[2]);}
-
-/* k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7035,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7038,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7051,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_7051(t6,t2,((C_word*)t0)[2]);}
-
-/* loop833 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_7051(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7051,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7059,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_7059(t3,t4);
-t6=C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g840 in loop833 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static C_word C_fcall f_7059(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=C_i_cdr(t1);
-return(C_i_set_car(t2,((C_word*)t0)[2]));}
-
-/* k7036 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7038,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7045,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 723 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
-
-/* k7043 in k7036 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 722 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6942,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6945,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6960,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_i_cadr(((C_word*)t0)[4]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6966,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_6966(t12,t7,t8);}
-
-/* loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6966(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6966,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6993,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7016,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g797798");
-t6=t3;
-f_6993(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7014 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7016(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7016,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop781794");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6966(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop781794");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6966(t6,((C_word*)t0)[3],t5);}}
-
-/* g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6993(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6993,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7005,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7009,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cadr(t2);
-C_trace("compiler.scm: 700 eval/meta");
-f_5594(t5,t6);}
-
-/* k7007 in g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7009(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 699 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-
-/* k7003 in g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_7005(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7005,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k6958 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 694 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k6943 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6945,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6952,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 704 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,t1,*((C_word*)lf[47]+1));}
-
-/* k6950 in k6943 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6952(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 703 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6613,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[10]);
-t3=t2;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_i_cddr(((C_word*)t0)[10]);
-t6=t5;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6622,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t7,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6919,a[2]=t8,a[3]=((C_word*)t0)[8],a[4]=t7,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 650 ##sys#extended-lambda-list?");
-((C_proc3)C_retrieve_symbol_proc(lf[183]))(3,*((C_word*)lf[183]+1),t9,((C_word*)t4)[1]);}
-
-/* k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6919,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6924,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6930,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-else{
-t2=((C_word*)t0)[2];
-f_6622(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* a6929 in k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6930,4,t0,t1,t2,t3);}
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* a6923 in k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6924,2,t0,t1);}
-C_trace("compiler.scm: 653 ##sys#expand-extended-lambda-list");
-((C_proc6)C_retrieve_symbol_proc(lf[182]))(6,*((C_word*)lf[182]+1),t1,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],*((C_word*)lf[134]+1),((C_word*)t0)[2]);}
-
-/* k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6622,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6627,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 655 decompose-lambda-list");
-((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t2);}
-
-/* a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6627(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[25],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6627,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6631,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=t4,a[7]=t2,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=t1,a[12]=((C_word*)t0)[8],a[13]=((C_word*)t0)[9],tmp=(C_word)a,a+=14,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6883,a[2]=t6,a[3]=t11,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
-t13=((C_word*)t11)[1];
-f_6883(t13,t9,t2);}
-
-/* loop657 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6883(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6883,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[96]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6912,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g673674");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6910 in loop657 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6912(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6912,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop657670");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6883(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop657670");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6883(t6,((C_word*)t0)[3],t5);}}
-
-/* k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6631,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6634,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6832,a[2]=((C_word*)t0)[12],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6834,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_6834(t11,t7,((C_word*)t0)[7],t1);}
-
-/* loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6834(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6834,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[162]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6867,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g701702");
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k6865 in loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6867,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6847,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_6847(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_6847(t5,t4);}}
-
-/* k6845 in k6865 in loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6847(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop681695");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_6834(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k6830 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6832(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 659 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6634,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6637,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-C_trace("compiler.scm: 660 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,((C_word*)((C_word*)t0)[2])[1],t1,*((C_word*)lf[47]+1));}
-
-/* k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6637(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6637,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6640,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=t1,a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],tmp=(C_word)a,a+=13,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6828,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 661 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[8],((C_word*)t0)[2]);}
-
-/* k6826 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 661 walk");
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6640(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6640,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6643,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6824,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 665 posq");
-((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t3,((C_word*)t0)[3],((C_word*)t0)[4]);}
-else{
-C_trace("compiler.scm: 663 build-lambda-list");
-((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),t2,((C_word*)t0)[5],((C_word*)t0)[2],C_SCHEME_FALSE);}}
-
-/* k6822 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6824(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_list_ref(((C_word*)t0)[4],t1);
-C_trace("compiler.scm: 663 build-lambda-list");
-((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2],t2);}
-
-/* k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6643(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6643,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,lf[171],t3);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6649,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=t1,a[7]=t4,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 667 set-real-names!");
-f_5318(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6649(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6649,2,t0,t1);}
-t2=C_i_not(((C_word*)t0)[10]);
-t3=(C_truep(t2)?t2:C_i_assq(((C_word*)t0)[10],((C_word*)t0)[9]));
-if(C_truep(t3)){
-t4=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[7]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6664,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6772,a[2]=((C_word*)t0)[10],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6799,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 671 lookup");
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_5290(t7,t6,((C_word*)t0)[2],((C_word*)t0)[9]);}}
-
-/* k6797 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_6772(t3,C_eqp(lf[171],t2));}
-else{
-t2=((C_word*)t0)[3];
-f_6772(t2,C_eqp(lf[171],((C_word*)t0)[2]));}}
-
-/* k6770 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6772(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-if(C_truep(*((C_word*)lf[21]+1))){
-t2=C_eqp(*((C_word*)lf[37]+1),lf[176]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-f_6664(2,t3,t2);}
-else{
-t3=C_eqp(*((C_word*)lf[37]+1),lf[177]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[2];
-C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],t4,lf[178]);}
-else{
-t4=((C_word*)t0)[3];
-f_6664(2,t4,C_SCHEME_FALSE);}}}
-else{
-t2=((C_word*)t0)[3];
-f_6664(2,t2,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[3];
-f_6664(2,t2,C_SCHEME_FALSE);}}
-
-/* k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6664,2,t0,t1);}
-if(C_truep(t1)){
-C_trace("compiler.scm: 677 expand-profile-lambda");
-((C_proc5)C_retrieve_symbol_proc(lf[173]))(5,*((C_word*)lf[173]+1),((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6673,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_length(((C_word*)t0)[4]);
-if(C_truep(C_fixnum_greaterp(t3,C_fix(1)))){
-t4=C_i_car(((C_word*)t0)[4]);
-if(C_truep(C_i_symbolp(t4))){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6695,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6751,a[2]=((C_word*)t0)[4],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t7=C_i_car(((C_word*)t0)[4]);
-C_trace("compiler.scm: 681 lookup");
-t8=((C_word*)((C_word*)t0)[3])[1];
-f_5290(t8,t6,t7,((C_word*)t0)[2]);}
-else{
-t5=t2;
-f_6673(t5,C_SCHEME_FALSE);}}
-else{
-t4=t2;
-f_6673(t4,C_SCHEME_FALSE);}}}
-
-/* k6749 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6751(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_6695(t3,C_eqp(lf[175],t2));}
-else{
-t2=C_i_car(((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-f_6695(t3,C_eqp(lf[175],t2));}}
-
-/* k6693 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6695(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6695,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[5]);
-t3=C_i_stringp(t2);
-if(C_truep(t3)){
-t4=((C_word*)t0)[4];
-f_6673(t4,t3);}
-else{
-if(C_truep(C_i_listp(t2))){
-t4=C_i_length(t2);
-t5=C_eqp(t4,C_fix(2));
-if(C_truep(t5)){
-t6=C_i_car(t2);
-if(C_truep(C_i_symbolp(t6))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6729,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t8=C_i_car(t2);
-C_trace("compiler.scm: 687 lookup");
-t9=((C_word*)((C_word*)t0)[3])[1];
-f_5290(t9,t7,t8,((C_word*)t0)[2]);}
-else{
-t7=((C_word*)t0)[4];
-f_6673(t7,C_SCHEME_FALSE);}}
-else{
-t6=((C_word*)t0)[4];
-f_6673(t6,C_SCHEME_FALSE);}}
-else{
-t4=((C_word*)t0)[4];
-f_6673(t4,C_SCHEME_FALSE);}}}
-else{
-t2=((C_word*)t0)[4];
-f_6673(t2,C_SCHEME_FALSE);}}
-
-/* k6727 in k6693 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6729(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_6673(t3,C_eqp(lf[98],t2));}
-else{
-t2=C_i_car(((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-f_6673(t3,C_eqp(lf[98],t2));}}
-
-/* k6671 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6673(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 688 process-lambda-documentation");
-((C_proc5)C_retrieve_symbol_proc(lf[174]))(5,*((C_word*)lf[174]+1),((C_word*)t0)[4],((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}
-
-/* k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6456(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6456,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=C_i_cddr(((C_word*)t0)[7]);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6477,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6559,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_6559(t12,t8,t2);}
-
-/* loop584 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6559(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6559,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_a_i_list(&a,2,t4,lf[169]);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-C_trace("loop584597");
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-C_trace("loop584597");
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6477(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6477,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6481,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6485,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6503,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_6503(t11,t7,((C_word*)t0)[2]);}
-
-/* loop608 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6503(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6503,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_i_cadr(t3);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,t4,t6);
-t8=C_a_i_cons(&a,2,lf[168],t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t10=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t9);
-t11=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t12=C_slot(t2,C_fix(1));
-C_trace("loop608621");
-t18=t1;
-t19=t12;
-t1=t18;
-t2=t19;
-goto loop;}
-else{
-t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t9);
-t11=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t12=C_slot(t2,C_fix(1));
-C_trace("loop608621");
-t18=t1;
-t19=t12;
-t1=t18;
-t2=t19;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6483 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6485,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6501,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("##sys#append");
-t3=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k6499 in k6483 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6501,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,lf[159],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-C_trace("##sys#append");
-t5=*((C_word*)lf[167]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* k6479 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6481(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6481,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=C_a_i_cons(&a,2,lf[159],t2);
-C_trace("compiler.scm: 635 walk");
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6244,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[8]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6250,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-C_trace("compiler.scm: 619 unzip1");
-((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),t3,t2);}
-
-/* k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6250,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6253,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6411,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_6411(t10,t6,t1);}
-
-/* loop487 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6411(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6411,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[96]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6440,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g503504");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6438 in loop487 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6440,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop487500");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6411(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop487500");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6411(t6,((C_word*)t0)[3],t5);}}
-
-/* k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6253,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6256,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6360,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6362,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_6362(t11,t7,((C_word*)t0)[2],t1);}
-
-/* loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6362(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6362,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[162]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6395,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g531532");
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k6393 in loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6395,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6375,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_6375(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_6375(t5,t4);}}
-
-/* k6373 in k6393 in loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6375(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop511525");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_6362(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k6358 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 621 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6256,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6259,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=t1,a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-C_trace("compiler.scm: 622 set-real-names!");
-f_5318(t2,((C_word*)t0)[8],((C_word*)t0)[2]);}
-
-/* k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6259,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6270,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6292,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp));
-t10=((C_word*)t8)[1];
-f_6292(t10,t6,((C_word*)t0)[6],((C_word*)t0)[2]);}
-
-/* loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6292(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6292,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6323,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6342,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-C_trace("g562563");
-t10=t6;
-f_6323(t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k6340 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6342,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6305,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_6305(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_6305(t5,t4);}}
-
-/* k6303 in k6340 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6305(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-C_trace("loop542556");
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_6292(t5,((C_word*)t0)[2],t3,t4);}
-
-/* g562 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6323(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6323,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6331,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=C_i_cadr(t3);
-t6=C_i_car(t3);
-C_trace("compiler.scm: 625 walk");
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t7,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t6);}
-
-/* k6329 in g562 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6331,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,((C_word*)t0)[2],t1));}
-
-/* k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6270,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6278,a[2]=((C_word*)t0)[8],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6282,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t4=C_i_cddr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 627 ##sys#canonicalize-body");
-((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t3,t4,((C_word*)t0)[6],*((C_word*)lf[47]+1));}
-
-/* k6280 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6282,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6286,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 628 append");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6284 in k6280 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 627 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6276 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6278,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[158],t3));}
-
-/* k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6157,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6159,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_6159(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6159(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6159,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[149]);}
-else{
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6174,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6180,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("##sys#call-with-values");
-C_call_with_values(4,0,t1,t4,t5);}}
-
-/* a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[15],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6180,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6184,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6206,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t3)){
-t6=t3;
-if(C_truep(t6)){
-t7=t4;
-f_6184(2,t7,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 611 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t4,lf[152],lf[153],((C_word*)t0)[2]);}}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[2]))){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6218,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 606 feature?");
-((C_proc3)C_retrieve_symbol_proc(lf[157]))(3,*((C_word*)lf[157]+1),t6,((C_word*)t0)[2]);}
-else{
-C_trace("compiler.scm: 611 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t4,lf[152],lf[153],((C_word*)t0)[2]);}}}
-
-/* k6216 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6218,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-f_6184(2,t3,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 611 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[4],lf[152],lf[153],((C_word*)t0)[3]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6228,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 608 ##sys#canonicalize-extension-path");
-((C_proc4)C_retrieve_symbol_proc(lf[155]))(4,*((C_word*)lf[155]+1),t2,((C_word*)t0)[3],lf[156]);}}
-
-/* k6226 in k6216 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 607 ##sys#find-extension");
-((C_proc4)C_retrieve_symbol_proc(lf[154]))(4,*((C_word*)lf[154]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* k6204 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6206(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-f_6184(2,t2,C_SCHEME_UNDEFINED);}
-else{
-C_trace("compiler.scm: 611 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[152],lf[153],((C_word*)t0)[2]);}}
-
-/* k6182 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6184,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6199,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cdr(((C_word*)t0)[3]);
-C_trace("compiler.scm: 613 loop");
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_6159(t4,t2,t3);}
-
-/* k6197 in k6182 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6199(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6199,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[151],t3));}
-
-/* a6173 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6174,2,t0,t1);}
-C_trace("compiler.scm: 602 ##sys#do-the-right-thing");
-((C_proc5)C_retrieve_symbol_proc(lf[150]))(5,*((C_word*)lf[150]+1),t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-
-/* k6151 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 596 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop410 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_6104(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6104,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[147]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6133,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-C_trace("g426427");
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6131 in loop410 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6133,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop410423");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6104(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop410423");
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6104(t6,((C_word*)t0)[3],t5);}}
-
-/* k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6083(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6083,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6086,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t2,C_retrieve(lf[146]),t1);}
-
-/* k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6086(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6086,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6089,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6097,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 588 ##sys#hash-table-update!");
-((C_proc6)C_retrieve_symbol_proc(lf[144]))(6,*((C_word*)lf[144]+1),t2,*((C_word*)lf[83]+1),lf[145],t3,t4);}
-
-/* a6096 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6097,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* a6090 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6091(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6091,3,t0,t1,t2);}
-t3=C_retrieve(lf[142]);
-C_trace("g438439");
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[143]+1),t2,((C_word*)t0)[2]);}
-
-/* k6087 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[141]);}
-
-/* k6056 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6058(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6058,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6066,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=C_i_caddr(((C_word*)t0)[6]);
-C_trace("compiler.scm: 583 walk");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6064 in k6056 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6066(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6066,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[104],t3));}
-
-/* k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6029,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6037,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6041,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 578 cadadr");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[137]+1)))(3,*((C_word*)lf[137]+1),t3,((C_word*)t0)[2]);}
-
-/* k6039 in k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 578 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),((C_word*)t0)[2],t1);}
-
-/* k6035 in k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_6037(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6037,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[100],t4));}
-
-/* k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5950,2,t0,t1);}
-t2=C_i_assoc(t1,*((C_word*)lf[54]+1));
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cdr(t2));}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5962,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 568 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[136]);}}
-
-/* k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5966,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 569 alist-cons");
-((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t2,((C_word*)t0)[2],t1,*((C_word*)lf[54]+1));}
-
-/* k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5966,2,t0,t1);}
-t2=C_mutate((C_word*)lf[54]+1 /* (set! immutable-constants ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5996,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5971,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t5))){
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[133],C_SCHEME_TRUE);}
-else{
-t7=C_i_cdr(t5);
-if(C_truep(C_i_nullp(t7))){
-t8=C_i_car(t5);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[133],t8);}
-else{
-C_trace("##sys#error");
-t8=*((C_word*)lf[134]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
-
-/* k5969 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-
-/* k5994 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5996,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 571 hide-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[2]);}
-
-/* k5997 in k5994 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5999(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* k5908 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5910,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5921,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-C_trace("compiler.scm: 557 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-
-/* k5919 in k5908 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5921,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[98],t2));}
-
-/* k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5849(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5849,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5860,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=C_i_cadr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 549 walk");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5860,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5868,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=C_i_caddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 550 walk");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k5866 in k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5868(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5876,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cdddr(((C_word*)t0)[5]);
-if(C_truep(C_i_nullp(t3))){
-t4=C_a_i_cons(&a,2,lf[124],C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t1,t4);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
-t7=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,lf[123],t6));}
-else{
-t4=C_i_cadddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 553 walk");
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_5724(t5,t2,t4,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}}
-
-/* k5874 in k5866 in k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5876,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[123],t4));}
-
-/* g329 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5822(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5822,NULL,3,t0,t1,t2);}
-t3=C_i_cdr(((C_word*)t0)[6]);
-t4=C_a_i_cons(&a,2,t2,t3);
-C_trace("compiler.scm: 540 walk");
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t5,t1,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5766 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5768(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5768,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[98],t2));}
-else{
-C_trace("compiler.scm: 523 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[2],lf[120],((C_word*)t0)[3]);}}
-
-/* k5738 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5740,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[98],t2);
-C_trace("compiler.scm: 519 resolve-variable");
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_5424(t4,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[8],C_retrieve(lf[114])))){
-C_trace("compiler.scm: 516 compiler-warning");
-((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[116],lf[117],((C_word*)t0)[8]);}
-else{
-C_trace("compiler.scm: 519 resolve-variable");
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5424(t2,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}}
-
-/* k5732 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 519 resolve-variable");
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5424(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5594(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5594,NULL,2,t1,t2);}
-t3=C_retrieve(lf[108]);
-t4=C_retrieve(lf[109]);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5598,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-C_trace("compiler.scm: 482 ##sys#meta-macro-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t7);}
-
-/* k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5598,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5599,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5619,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("##sys#dynamic-wind");
-t6=*((C_word*)lf[112]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t4,t5,t4);}
-
-/* a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5619,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5623,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5630,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 486 ##sys#current-meta-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t3);}
-
-/* k5628 in a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5630(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 483 ##sys#compile-to-closure");
-((C_proc5)C_retrieve_symbol_proc(lf[110]))(5,*((C_word*)lf[110]+1),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-
-/* k5621 in a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("g236237");
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5599(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5599,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5603,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-C_trace("g218219226");
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5603(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5603,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5606,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-C_trace("g218219226");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5606,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g220221227");
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k5608 in k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5610,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5613,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-C_trace("g220221227");
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k5611 in k5608 in k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5424(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5424,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5428,a[2]=t2,a[3]=t1,a[4]=t5,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-C_trace("compiler.scm: 449 lookup");
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_5290(t7,t6,t2,t4);}
-
-/* k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5428,2,t0,t1);}
-t2=C_retrieve(lf[99]);
-if(C_truep(C_i_symbolp(t1))){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5440,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(*((C_word*)lf[58]+1))){
-C_trace("compiler.scm: 452 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[57]+1),t1);}
-else{
-t4=t3;
-f_5440(2,t4,C_SCHEME_FALSE);}}
-else{
-t3=((C_word*)t0)[2];
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5440,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5444,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("g175176");
-t3=t2;
-f_5444(t3,((C_word*)t0)[3],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(*((C_word*)lf[56]+1))){
-C_trace("compiler.scm: 454 ##sys#hash-table-ref");
-((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t2,*((C_word*)lf[55]+1),((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_5458(2,t3,C_SCHEME_FALSE);}}}
-
-/* k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5458,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5462,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("g181182");
-t3=t2;
-f_5462(t3,((C_word*)t0)[3],t1);}
-else{
-t2=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[64]+1));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5476,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("g185186");
-t4=t3;
-f_5476(t4,((C_word*)t0)[3],t2);}
-else{
-t3=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[75]+1));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5523,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-C_trace("g197198");
-t5=t4;
-f_5523(t5,((C_word*)t0)[3],t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5566,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 476 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,((C_word*)t0)[2],lf[106]);}}}}
-
-/* k5564 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[3],((C_word*)t0)[2]))){
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-C_trace("compiler.scm: 477 ##sys#alias-global-hook");
-((C_proc4)C_retrieve_symbol_proc(lf[105]))(4,*((C_word*)lf[105]+1),((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE);}}}
-
-/* g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5523(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5523,NULL,3,t0,t1,t2);}
-t3=C_i_caddr(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5530,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 469 final-foreign-type");
-((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t4,t3);}
-
-/* k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5530,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=C_i_cadr(((C_word*)t0)[7]);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,t2,t4);
-t6=C_a_i_cons(&a,2,lf[104],t5);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5544,a[2]=((C_word*)t0)[8],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 473 finish-foreign-result");
-((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),t8,t1,t6);}
-
-/* k5542 in k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 472 foreign-type-convert-result");
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5538 in k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 471 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5476(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5476,NULL,3,t0,t1,t2);}
-t3=C_i_cadr(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5483,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-C_trace("compiler.scm: 459 final-foreign-type");
-((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t4,t3);}
-
-/* k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5483(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5483,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[8]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,t2,t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[100],t5);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5493,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5497,a[2]=((C_word*)t0)[7],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 463 finish-foreign-result");
-((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),t8,t1,t6);}
-
-/* k5495 in k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 462 foreign-type-convert-result");
-((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5491 in k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5493(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 461 walk");
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_5724(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* g181 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5462(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5462,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 455 walk");
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* g175 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5444(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5444,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-C_trace("compiler.scm: 453 walk");
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_5724(t4,t1,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* unquotify in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5378(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5378,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_listp(t2))){
-t4=C_i_length(t2);
-t5=C_eqp(C_fix(2),t4);
-if(C_truep(t5)){
-t6=C_i_car(t2);
-if(C_truep(C_i_symbolp(t6))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5410,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t8=C_i_car(t2);
-C_trace("compiler.scm: 444 lookup");
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_5290(t9,t7,t8,t3);}
-else{
-t7=t2;
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}}
-else{
-t6=t2;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-else{
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k5408 in unquotify in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_eqp(lf[98],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cadr(((C_word*)t0)[2]));}
-else{
-t3=((C_word*)t0)[2];
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5318(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5318,NULL,3,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5324,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
-t7=((C_word*)t5)[1];
-f_5324(t7,t1,t2,t3);}
-
-/* loop131 in set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5324(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5324,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5339,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t7=C_slot(t2,C_fix(0));
-t8=C_slot(t3,C_fix(0));
-C_trace("compiler.scm: 433 set-real-name!");
-((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t6,t7,t8);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k5337 in loop131 in set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5339(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_5324(t4,((C_word*)t0)[2],t2,t3);}
-
-/* macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5305(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5305,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5309,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-C_trace("compiler.scm: 428 gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t4,t2);}
-
-/* k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5309(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5309,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5312,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5316,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 429 lookup");
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_5290(t4,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5314 in k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_trace("compiler.scm: 429 ##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[94],t1);}
-
-/* k5310 in k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5312(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5290(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5290,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5294,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 423 find-id");
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_5251(t5,t4,t2,t3);}
-
-/* k5292 in lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5294(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5294,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5300,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("compiler.scm: 424 ##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,((C_word*)t0)[2],lf[94]);}}
-
-/* k5298 in k5292 in lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-
-/* find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5251(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5251,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5264,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5288,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-C_trace("compiler.scm: 419 caar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t5,t3);}}
-
-/* k5286 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5288(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5288,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5284,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 419 cdar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),t3,((C_word*)t0)[2]);}
-else{
-t3=((C_word*)t0)[3];
-f_5264(t3,C_SCHEME_FALSE);}}
-
-/* k5282 in k5286 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_ccall f_5284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_5264(t2,C_i_symbolp(t1));}
-
-/* k5262 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
-static void C_fcall f_5264(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-C_trace("compiler.scm: 419 cdar");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 420 find-id");
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_5251(t3,((C_word*)t0)[5],((C_word*)t0)[2],t2);}}
-
-/* ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5187,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5191,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[53]+1))){
-C_trace("compiler.scm: 394 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[53]+1),C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5246,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 395 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,*((C_word*)lf[16]+1),C_SCHEME_END_OF_LIST);}}
-
-/* k5244 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[53]+1 /* (set! line-number-database-2 ...) */,t1);
-t3=((C_word*)t0)[2];
-f_5191(2,t3,t2);}
-
-/* k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5191,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5194,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[55]+1))){
-C_trace("compiler.scm: 397 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[55]+1),C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5239,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 398 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
-
-/* k5237 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[55]+1 /* (set! inline-table ...) */,t1);
-t3=((C_word*)t0)[2];
-f_5194(2,t3,t2);}
-
-/* k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5194(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5194,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5197,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[57]+1))){
-C_trace("compiler.scm: 400 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[57]+1),C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5232,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 401 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
-
-/* k5230 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5232(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[57]+1 /* (set! constant-table ...) */,t1);
-t3=((C_word*)t0)[2];
-f_5197(2,t3,t2);}
-
-/* k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5197(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5197,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5201,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 402 make-random-name");
-((C_proc3)C_retrieve_symbol_proc(lf[88]))(3,*((C_word*)lf[88]+1),t2,lf[89]);}
-
-/* k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5201(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5201,2,t0,t1);}
-t2=C_mutate((C_word*)lf[71]+1 /* (set! profile-info-vector-name ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5205,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 403 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(997),C_SCHEME_END_OF_LIST);}
-
-/* k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5205(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5205,2,t0,t1);}
-t2=C_mutate((C_word*)lf[74]+1 /* (set! real-name-table ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5208,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[83]+1))){
-C_trace("compiler.scm: 405 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t3,*((C_word*)lf[83]+1),C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5225,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 406 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t4,C_fix(301),C_SCHEME_END_OF_LIST);}}
-
-/* k5223 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[83]+1 /* (set! file-requirements ...) */,t1);
-t3=((C_word*)t0)[2];
-f_5208(2,t3,t2);}
-
-/* k5206 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5208,2,t0,t1);}
-if(C_truep(*((C_word*)lf[63]+1))){
-C_trace("compiler.scm: 408 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),((C_word*)t0)[2],*((C_word*)lf[63]+1),C_SCHEME_END_OF_LIST);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5218,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 409 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,C_fix(301),C_SCHEME_END_OF_LIST);}}
-
-/* k5216 in k5206 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
-static void C_ccall f_5218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[63]+1 /* (set! foreign-type-table ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* d in k5089 in k5086 */
-static void C_ccall f_5093(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_5093r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_5093r(t0,t1,t2,t3);}}
-
-static void C_ccall f_5093r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-if(C_truep(C_i_nullp(t3))){
-C_trace("compiler.scm: 269 pp");
-((C_proc3)C_retrieve_symbol_proc(lf[3]))(3,*((C_word*)lf[3]+1),t1,t2);}
-else{
-C_apply(5,0,t1,*((C_word*)lf[4]+1),t2,t3);}}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[1110] = {
-{"toplevel:compiler_scm",(void*)C_compiler_toplevel},
-{"f_5088:compiler_scm",(void*)f_5088},
-{"f_5091:compiler_scm",(void*)f_5091},
-{"f_17502:compiler_scm",(void*)f_17502},
-{"f_19009:compiler_scm",(void*)f_19009},
-{"f_19012:compiler_scm",(void*)f_19012},
-{"f_19015:compiler_scm",(void*)f_19015},
-{"f_19018:compiler_scm",(void*)f_19018},
-{"f_19021:compiler_scm",(void*)f_19021},
-{"f_18924:compiler_scm",(void*)f_18924},
-{"f_18951:compiler_scm",(void*)f_18951},
-{"f_18892:compiler_scm",(void*)f_18892},
-{"f_18908:compiler_scm",(void*)f_18908},
-{"f_18915:compiler_scm",(void*)f_18915},
-{"f_18922:compiler_scm",(void*)f_18922},
-{"f_18896:compiler_scm",(void*)f_18896},
-{"f_18906:compiler_scm",(void*)f_18906},
-{"f_18878:compiler_scm",(void*)f_18878},
-{"f_18886:compiler_scm",(void*)f_18886},
-{"f_18798:compiler_scm",(void*)f_18798},
-{"f_18805:compiler_scm",(void*)f_18805},
-{"f_18867:compiler_scm",(void*)f_18867},
-{"f_18857:compiler_scm",(void*)f_18857},
-{"f_18831:compiler_scm",(void*)f_18831},
-{"f_18817:compiler_scm",(void*)f_18817},
-{"f_18752:compiler_scm",(void*)f_18752},
-{"f_18758:compiler_scm",(void*)f_18758},
-{"f_18792:compiler_scm",(void*)f_18792},
-{"f_18785:compiler_scm",(void*)f_18785},
-{"f_17629:compiler_scm",(void*)f_17629},
-{"f_18741:compiler_scm",(void*)f_18741},
-{"f_18632:compiler_scm",(void*)f_18632},
-{"f_18658:compiler_scm",(void*)f_18658},
-{"f_18691:compiler_scm",(void*)f_18691},
-{"f_18694:compiler_scm",(void*)f_18694},
-{"f_18713:compiler_scm",(void*)f_18713},
-{"f_18701:compiler_scm",(void*)f_18701},
-{"f_18669:compiler_scm",(void*)f_18669},
-{"f_18680:compiler_scm",(void*)f_18680},
-{"f_18648:compiler_scm",(void*)f_18648},
-{"f_18577:compiler_scm",(void*)f_18577},
-{"f_18580:compiler_scm",(void*)f_18580},
-{"f_18583:compiler_scm",(void*)f_18583},
-{"f_18603:compiler_scm",(void*)f_18603},
-{"f_18565:compiler_scm",(void*)f_18565},
-{"f_18466:compiler_scm",(void*)f_18466},
-{"f_18536:compiler_scm",(void*)f_18536},
-{"f_18555:compiler_scm",(void*)f_18555},
-{"f_18530:compiler_scm",(void*)f_18530},
-{"f_18514:compiler_scm",(void*)f_18514},
-{"f_18487:compiler_scm",(void*)f_18487},
-{"f_18490:compiler_scm",(void*)f_18490},
-{"f_18432:compiler_scm",(void*)f_18432},
-{"f_18444:compiler_scm",(void*)f_18444},
-{"f_18383:compiler_scm",(void*)f_18383},
-{"f_18401:compiler_scm",(void*)f_18401},
-{"f_18386:compiler_scm",(void*)f_18386},
-{"f_18398:compiler_scm",(void*)f_18398},
-{"f_18225:compiler_scm",(void*)f_18225},
-{"f_18359:compiler_scm",(void*)f_18359},
-{"f_18348:compiler_scm",(void*)f_18348},
-{"f_18264:compiler_scm",(void*)f_18264},
-{"f_18344:compiler_scm",(void*)f_18344},
-{"f_18270:compiler_scm",(void*)f_18270},
-{"f_18276:compiler_scm",(void*)f_18276},
-{"f_18308:compiler_scm",(void*)f_18308},
-{"f_18300:compiler_scm",(void*)f_18300},
-{"f_18229:compiler_scm",(void*)f_18229},
-{"f_18250:compiler_scm",(void*)f_18250},
-{"f_18182:compiler_scm",(void*)f_18182},
-{"f_18198:compiler_scm",(void*)f_18198},
-{"f_18202:compiler_scm",(void*)f_18202},
-{"f_18135:compiler_scm",(void*)f_18135},
-{"f_18147:compiler_scm",(void*)f_18147},
-{"f_18151:compiler_scm",(void*)f_18151},
-{"f_18139:compiler_scm",(void*)f_18139},
-{"f_17946:compiler_scm",(void*)f_17946},
-{"f_18065:compiler_scm",(void*)f_18065},
-{"f_18071:compiler_scm",(void*)f_18071},
-{"f_18096:compiler_scm",(void*)f_18096},
-{"f_17953:compiler_scm",(void*)f_17953},
-{"f_18056:compiler_scm",(void*)f_18056},
-{"f_17956:compiler_scm",(void*)f_17956},
-{"f_17959:compiler_scm",(void*)f_17959},
-{"f_17962:compiler_scm",(void*)f_17962},
-{"f_18007:compiler_scm",(void*)f_18007},
-{"f_18033:compiler_scm",(void*)f_18033},
-{"f_18014:compiler_scm",(void*)f_18014},
-{"f_18018:compiler_scm",(void*)f_18018},
-{"f_17991:compiler_scm",(void*)f_17991},
-{"f_17873:compiler_scm",(void*)f_17873},
-{"f_17888:compiler_scm",(void*)f_17888},
-{"f_17857:compiler_scm",(void*)f_17857},
-{"f_17827:compiler_scm",(void*)f_17827},
-{"f_17801:compiler_scm",(void*)f_17801},
-{"f_17797:compiler_scm",(void*)f_17797},
-{"f_17793:compiler_scm",(void*)f_17793},
-{"f_17767:compiler_scm",(void*)f_17767},
-{"f_17763:compiler_scm",(void*)f_17763},
-{"f_17737:compiler_scm",(void*)f_17737},
-{"f_17711:compiler_scm",(void*)f_17711},
-{"f_17556:compiler_scm",(void*)f_17556},
-{"f_17616:compiler_scm",(void*)f_17616},
-{"f_17560:compiler_scm",(void*)f_17560},
-{"f_17595:compiler_scm",(void*)f_17595},
-{"f_17602:compiler_scm",(void*)f_17602},
-{"f_17563:compiler_scm",(void*)f_17563},
-{"f_17566:compiler_scm",(void*)f_17566},
-{"f_17582:compiler_scm",(void*)f_17582},
-{"f_17505:compiler_scm",(void*)f_17505},
-{"f_17509:compiler_scm",(void*)f_17509},
-{"f_17535:compiler_scm",(void*)f_17535},
-{"f_17551:compiler_scm",(void*)f_17551},
-{"f_17493:compiler_scm",(void*)f_17493},
-{"f_17484:compiler_scm",(void*)f_17484},
-{"f_17475:compiler_scm",(void*)f_17475},
-{"f_17466:compiler_scm",(void*)f_17466},
-{"f_17457:compiler_scm",(void*)f_17457},
-{"f_17448:compiler_scm",(void*)f_17448},
-{"f_17439:compiler_scm",(void*)f_17439},
-{"f_17430:compiler_scm",(void*)f_17430},
-{"f_17421:compiler_scm",(void*)f_17421},
-{"f_17412:compiler_scm",(void*)f_17412},
-{"f_17403:compiler_scm",(void*)f_17403},
-{"f_17394:compiler_scm",(void*)f_17394},
-{"f_17385:compiler_scm",(void*)f_17385},
-{"f_17376:compiler_scm",(void*)f_17376},
-{"f_17367:compiler_scm",(void*)f_17367},
-{"f_17358:compiler_scm",(void*)f_17358},
-{"f_17352:compiler_scm",(void*)f_17352},
-{"f_17346:compiler_scm",(void*)f_17346},
-{"f_15586:compiler_scm",(void*)f_15586},
-{"f_17313:compiler_scm",(void*)f_17313},
-{"f_17316:compiler_scm",(void*)f_17316},
-{"f_17319:compiler_scm",(void*)f_17319},
-{"f_17322:compiler_scm",(void*)f_17322},
-{"f_17325:compiler_scm",(void*)f_17325},
-{"f_17340:compiler_scm",(void*)f_17340},
-{"f_17338:compiler_scm",(void*)f_17338},
-{"f_17328:compiler_scm",(void*)f_17328},
-{"f_17122:compiler_scm",(void*)f_17122},
-{"f_17129:compiler_scm",(void*)f_17129},
-{"f_17133:compiler_scm",(void*)f_17133},
-{"f_17154:compiler_scm",(void*)f_17154},
-{"f_17076:compiler_scm",(void*)f_17076},
-{"f_17082:compiler_scm",(void*)f_17082},
-{"f_17116:compiler_scm",(void*)f_17116},
-{"f_17109:compiler_scm",(void*)f_17109},
-{"f_16051:compiler_scm",(void*)f_16051},
-{"f_16085:compiler_scm",(void*)f_16085},
-{"f_16124:compiler_scm",(void*)f_16124},
-{"f_16962:compiler_scm",(void*)f_16962},
-{"f_16958:compiler_scm",(void*)f_16958},
-{"f_16747:compiler_scm",(void*)f_16747},
-{"f_16753:compiler_scm",(void*)f_16753},
-{"f_16850:compiler_scm",(void*)f_16850},
-{"f_16894:compiler_scm",(void*)f_16894},
-{"f_16870:compiler_scm",(void*)f_16870},
-{"f_16874:compiler_scm",(void*)f_16874},
-{"f_16757:compiler_scm",(void*)f_16757},
-{"f_16764:compiler_scm",(void*)f_16764},
-{"f_16833:compiler_scm",(void*)f_16833},
-{"f_16837:compiler_scm",(void*)f_16837},
-{"f_16805:compiler_scm",(void*)f_16805},
-{"f_16793:compiler_scm",(void*)f_16793},
-{"f_16258:compiler_scm",(void*)f_16258},
-{"f_16720:compiler_scm",(void*)f_16720},
-{"f_16262:compiler_scm",(void*)f_16262},
-{"f_16685:compiler_scm",(void*)f_16685},
-{"f_16714:compiler_scm",(void*)f_16714},
-{"f_16634:compiler_scm",(void*)f_16634},
-{"f_16636:compiler_scm",(void*)f_16636},
-{"f_16669:compiler_scm",(void*)f_16669},
-{"f_16649:compiler_scm",(void*)f_16649},
-{"f_16265:compiler_scm",(void*)f_16265},
-{"f_16268:compiler_scm",(void*)f_16268},
-{"f_16274:compiler_scm",(void*)f_16274},
-{"f_16280:compiler_scm",(void*)f_16280},
-{"f_16286:compiler_scm",(void*)f_16286},
-{"f_16601:compiler_scm",(void*)f_16601},
-{"f_16604:compiler_scm",(void*)f_16604},
-{"f_16289:compiler_scm",(void*)f_16289},
-{"f_16543:compiler_scm",(void*)f_16543},
-{"f_16570:compiler_scm",(void*)f_16570},
-{"f_16528:compiler_scm",(void*)f_16528},
-{"f_16524:compiler_scm",(void*)f_16524},
-{"f_16411:compiler_scm",(void*)f_16411},
-{"f_16443:compiler_scm",(void*)f_16443},
-{"f_16449:compiler_scm",(void*)f_16449},
-{"f_16493:compiler_scm",(void*)f_16493},
-{"f_16447:compiler_scm",(void*)f_16447},
-{"f_16422:compiler_scm",(void*)f_16422},
-{"f_16414:compiler_scm",(void*)f_16414},
-{"f_16407:compiler_scm",(void*)f_16407},
-{"f_16357:compiler_scm",(void*)f_16357},
-{"f_16395:compiler_scm",(void*)f_16395},
-{"f_16384:compiler_scm",(void*)f_16384},
-{"f_16392:compiler_scm",(void*)f_16392},
-{"f_16318:compiler_scm",(void*)f_16318},
-{"f_16348:compiler_scm",(void*)f_16348},
-{"f_16340:compiler_scm",(void*)f_16340},
-{"f_16336:compiler_scm",(void*)f_16336},
-{"f_16332:compiler_scm",(void*)f_16332},
-{"f_16321:compiler_scm",(void*)f_16321},
-{"f_16157:compiler_scm",(void*)f_16157},
-{"f_16160:compiler_scm",(void*)f_16160},
-{"f_16241:compiler_scm",(void*)f_16241},
-{"f_16183:compiler_scm",(void*)f_16183},
-{"f_16225:compiler_scm",(void*)f_16225},
-{"f_16213:compiler_scm",(void*)f_16213},
-{"f_16145:compiler_scm",(void*)f_16145},
-{"f_16097:compiler_scm",(void*)f_16097},
-{"f_16103:compiler_scm",(void*)f_16103},
-{"f_15616:compiler_scm",(void*)f_15616},
-{"f_15650:compiler_scm",(void*)f_15650},
-{"f_15993:compiler_scm",(void*)f_15993},
-{"f_16008:compiler_scm",(void*)f_16008},
-{"f_16001:compiler_scm",(void*)f_16001},
-{"f_15954:compiler_scm",(void*)f_15954},
-{"f_17178:compiler_scm",(void*)f_17178},
-{"f_17231:compiler_scm",(void*)f_17231},
-{"f_17262:compiler_scm",(void*)f_17262},
-{"f_17272:compiler_scm",(void*)f_17272},
-{"f_17257:compiler_scm",(void*)f_17257},
-{"f_17222:compiler_scm",(void*)f_17222},
-{"f_17176:compiler_scm",(void*)f_17176},
-{"f_15967:compiler_scm",(void*)f_15967},
-{"f_15970:compiler_scm",(void*)f_15970},
-{"f_15981:compiler_scm",(void*)f_15981},
-{"f_15908:compiler_scm",(void*)f_15908},
-{"f_15790:compiler_scm",(void*)f_15790},
-{"f_15796:compiler_scm",(void*)f_15796},
-{"f_15813:compiler_scm",(void*)f_15813},
-{"f_15816:compiler_scm",(void*)f_15816},
-{"f_15819:compiler_scm",(void*)f_15819},
-{"f_15858:compiler_scm",(void*)f_15858},
-{"f_15837:compiler_scm",(void*)f_15837},
-{"f_15844:compiler_scm",(void*)f_15844},
-{"f_15822:compiler_scm",(void*)f_15822},
-{"f_15825:compiler_scm",(void*)f_15825},
-{"f_15828:compiler_scm",(void*)f_15828},
-{"f_15735:compiler_scm",(void*)f_15735},
-{"f_15740:compiler_scm",(void*)f_15740},
-{"f_15755:compiler_scm",(void*)f_15755},
-{"f_15748:compiler_scm",(void*)f_15748},
-{"f_15671:compiler_scm",(void*)f_15671},
-{"f_15688:compiler_scm",(void*)f_15688},
-{"f_15703:compiler_scm",(void*)f_15703},
-{"f_15696:compiler_scm",(void*)f_15696},
-{"f_15675:compiler_scm",(void*)f_15675},
-{"f_15686:compiler_scm",(void*)f_15686},
-{"f_15661:compiler_scm",(void*)f_15661},
-{"f_15605:compiler_scm",(void*)f_15605},
-{"f_15614:compiler_scm",(void*)f_15614},
-{"f_15595:compiler_scm",(void*)f_15595},
-{"f_15600:compiler_scm",(void*)f_15600},
-{"f_15589:compiler_scm",(void*)f_15589},
-{"f_13640:compiler_scm",(void*)f_13640},
-{"f_13644:compiler_scm",(void*)f_13644},
-{"f_14509:compiler_scm",(void*)f_14509},
-{"f_14513:compiler_scm",(void*)f_14513},
-{"f_14516:compiler_scm",(void*)f_14516},
-{"f_14525:compiler_scm",(void*)f_14525},
-{"f_15451:compiler_scm",(void*)f_15451},
-{"f_15459:compiler_scm",(void*)f_15459},
-{"f_14529:compiler_scm",(void*)f_14529},
-{"f_15429:compiler_scm",(void*)f_15429},
-{"f_15402:compiler_scm",(void*)f_15402},
-{"f_14540:compiler_scm",(void*)f_14540},
-{"f_15399:compiler_scm",(void*)f_15399},
-{"f_15344:compiler_scm",(void*)f_15344},
-{"f_15347:compiler_scm",(void*)f_15347},
-{"f_15375:compiler_scm",(void*)f_15375},
-{"f_15353:compiler_scm",(void*)f_15353},
-{"f_14543:compiler_scm",(void*)f_14543},
-{"f_14546:compiler_scm",(void*)f_14546},
-{"f_15266:compiler_scm",(void*)f_15266},
-{"f_15270:compiler_scm",(void*)f_15270},
-{"f_15329:compiler_scm",(void*)f_15329},
-{"f_15288:compiler_scm",(void*)f_15288},
-{"f_15293:compiler_scm",(void*)f_15293},
-{"f_15208:compiler_scm",(void*)f_15208},
-{"f_15246:compiler_scm",(void*)f_15246},
-{"f_15212:compiler_scm",(void*)f_15212},
-{"f_15229:compiler_scm",(void*)f_15229},
-{"f_15221:compiler_scm",(void*)f_15221},
-{"f_15202:compiler_scm",(void*)f_15202},
-{"f_15163:compiler_scm",(void*)f_15163},
-{"f_15157:compiler_scm",(void*)f_15157},
-{"f_15155:compiler_scm",(void*)f_15155},
-{"f_15147:compiler_scm",(void*)f_15147},
-{"f_15115:compiler_scm",(void*)f_15115},
-{"f_15121:compiler_scm",(void*)f_15121},
-{"f_14549:compiler_scm",(void*)f_14549},
-{"f_15062:compiler_scm",(void*)f_15062},
-{"f_15071:compiler_scm",(void*)f_15071},
-{"f_14552:compiler_scm",(void*)f_14552},
-{"f_14931:compiler_scm",(void*)f_14931},
-{"f_14954:compiler_scm",(void*)f_14954},
-{"f_14997:compiler_scm",(void*)f_14997},
-{"f_15033:compiler_scm",(void*)f_15033},
-{"f_15005:compiler_scm",(void*)f_15005},
-{"f_15030:compiler_scm",(void*)f_15030},
-{"f_15026:compiler_scm",(void*)f_15026},
-{"f_15012:compiler_scm",(void*)f_15012},
-{"f_15015:compiler_scm",(void*)f_15015},
-{"f_14958:compiler_scm",(void*)f_14958},
-{"f_14964:compiler_scm",(void*)f_14964},
-{"f_14555:compiler_scm",(void*)f_14555},
-{"f_14899:compiler_scm",(void*)f_14899},
-{"f_14885:compiler_scm",(void*)f_14885},
-{"f_14892:compiler_scm",(void*)f_14892},
-{"f_14873:compiler_scm",(void*)f_14873},
-{"f_14558:compiler_scm",(void*)f_14558},
-{"f_14753:compiler_scm",(void*)f_14753},
-{"f_14834:compiler_scm",(void*)f_14834},
-{"f_14759:compiler_scm",(void*)f_14759},
-{"f_14824:compiler_scm",(void*)f_14824},
-{"f_14816:compiler_scm",(void*)f_14816},
-{"f_14812:compiler_scm",(void*)f_14812},
-{"f_14808:compiler_scm",(void*)f_14808},
-{"f_14762:compiler_scm",(void*)f_14762},
-{"f_14765:compiler_scm",(void*)f_14765},
-{"f_14561:compiler_scm",(void*)f_14561},
-{"f_14567:compiler_scm",(void*)f_14567},
-{"f_14593:compiler_scm",(void*)f_14593},
-{"f_14619:compiler_scm",(void*)f_14619},
-{"f_14625:compiler_scm",(void*)f_14625},
-{"f_14519:compiler_scm",(void*)f_14519},
-{"f_14484:compiler_scm",(void*)f_14484},
-{"f_14494:compiler_scm",(void*)f_14494},
-{"f_14502:compiler_scm",(void*)f_14502},
-{"f_14470:compiler_scm",(void*)f_14470},
-{"f_14478:compiler_scm",(void*)f_14478},
-{"f_14464:compiler_scm",(void*)f_14464},
-{"f_14286:compiler_scm",(void*)f_14286},
-{"f_14299:compiler_scm",(void*)f_14299},
-{"f_14415:compiler_scm",(void*)f_14415},
-{"f_14425:compiler_scm",(void*)f_14425},
-{"f_14311:compiler_scm",(void*)f_14311},
-{"f_14392:compiler_scm",(void*)f_14392},
-{"f_14399:compiler_scm",(void*)f_14399},
-{"f_14356:compiler_scm",(void*)f_14356},
-{"f_14359:compiler_scm",(void*)f_14359},
-{"f_14365:compiler_scm",(void*)f_14365},
-{"f_14314:compiler_scm",(void*)f_14314},
-{"f_14317:compiler_scm",(void*)f_14317},
-{"f_14252:compiler_scm",(void*)f_14252},
-{"f_14258:compiler_scm",(void*)f_14258},
-{"f_14273:compiler_scm",(void*)f_14273},
-{"f_14266:compiler_scm",(void*)f_14266},
-{"f_13653:compiler_scm",(void*)f_13653},
-{"f_13690:compiler_scm",(void*)f_13690},
-{"f_14208:compiler_scm",(void*)f_14208},
-{"f_14202:compiler_scm",(void*)f_14202},
-{"f_14166:compiler_scm",(void*)f_14166},
-{"f_14169:compiler_scm",(void*)f_14169},
-{"f_14104:compiler_scm",(void*)f_14104},
-{"f_14158:compiler_scm",(void*)f_14158},
-{"f_14107:compiler_scm",(void*)f_14107},
-{"f_14130:compiler_scm",(void*)f_14130},
-{"f_14110:compiler_scm",(void*)f_14110},
-{"f_14113:compiler_scm",(void*)f_14113},
-{"f_14116:compiler_scm",(void*)f_14116},
-{"f_13971:compiler_scm",(void*)f_13971},
-{"f_14083:compiler_scm",(void*)f_14083},
-{"f_13978:compiler_scm",(void*)f_13978},
-{"f_14051:compiler_scm",(void*)f_14051},
-{"f_14069:compiler_scm",(void*)f_14069},
-{"f_14059:compiler_scm",(void*)f_14059},
-{"f_14063:compiler_scm",(void*)f_14063},
-{"f_13981:compiler_scm",(void*)f_13981},
-{"f_13984:compiler_scm",(void*)f_13984},
-{"f_14043:compiler_scm",(void*)f_14043},
-{"f_13987:compiler_scm",(void*)f_13987},
-{"f_13990:compiler_scm",(void*)f_13990},
-{"f_13993:compiler_scm",(void*)f_13993},
-{"f_14025:compiler_scm",(void*)f_14025},
-{"f_13996:compiler_scm",(void*)f_13996},
-{"f_13905:compiler_scm",(void*)f_13905},
-{"f_13924:compiler_scm",(void*)f_13924},
-{"f_13939:compiler_scm",(void*)f_13939},
-{"f_13932:compiler_scm",(void*)f_13932},
-{"f_13909:compiler_scm",(void*)f_13909},
-{"f_13922:compiler_scm",(void*)f_13922},
-{"f_13913:compiler_scm",(void*)f_13913},
-{"f_13838:compiler_scm",(void*)f_13838},
-{"f_13843:compiler_scm",(void*)f_13843},
-{"f_13870:compiler_scm",(void*)f_13870},
-{"f_13873:compiler_scm",(void*)f_13873},
-{"f_13876:compiler_scm",(void*)f_13876},
-{"f_13861:compiler_scm",(void*)f_13861},
-{"f_13781:compiler_scm",(void*)f_13781},
-{"f_13784:compiler_scm",(void*)f_13784},
-{"f_13745:compiler_scm",(void*)f_13745},
-{"f_13702:compiler_scm",(void*)f_13702},
-{"f_13733:compiler_scm",(void*)f_13733},
-{"f_13631:compiler_scm",(void*)f_13631},
-{"f_13622:compiler_scm",(void*)f_13622},
-{"f_13613:compiler_scm",(void*)f_13613},
-{"f_13604:compiler_scm",(void*)f_13604},
-{"f_13595:compiler_scm",(void*)f_13595},
-{"f_13589:compiler_scm",(void*)f_13589},
-{"f_13583:compiler_scm",(void*)f_13583},
-{"f_12724:compiler_scm",(void*)f_12724},
-{"f_13545:compiler_scm",(void*)f_13545},
-{"f_13453:compiler_scm",(void*)f_13453},
-{"f_13459:compiler_scm",(void*)f_13459},
-{"f_13479:compiler_scm",(void*)f_13479},
-{"f_13497:compiler_scm",(void*)f_13497},
-{"f_13506:compiler_scm",(void*)f_13506},
-{"f_13539:compiler_scm",(void*)f_13539},
-{"f_13527:compiler_scm",(void*)f_13527},
-{"f_13473:compiler_scm",(void*)f_13473},
-{"f_13432:compiler_scm",(void*)f_13432},
-{"f_13438:compiler_scm",(void*)f_13438},
-{"f_13256:compiler_scm",(void*)f_13256},
-{"f_13260:compiler_scm",(void*)f_13260},
-{"f_13263:compiler_scm",(void*)f_13263},
-{"f_13342:compiler_scm",(void*)f_13342},
-{"f_13333:compiler_scm",(void*)f_13333},
-{"f_13329:compiler_scm",(void*)f_13329},
-{"f_13294:compiler_scm",(void*)f_13294},
-{"f_13300:compiler_scm",(void*)f_13300},
-{"f_13317:compiler_scm",(void*)f_13317},
-{"f_13313:compiler_scm",(void*)f_13313},
-{"f_13292:compiler_scm",(void*)f_13292},
-{"f_12784:compiler_scm",(void*)f_12784},
-{"f_12826:compiler_scm",(void*)f_12826},
-{"f_13167:compiler_scm",(void*)f_13167},
-{"f_13352:compiler_scm",(void*)f_13352},
-{"f_13355:compiler_scm",(void*)f_13355},
-{"f_13426:compiler_scm",(void*)f_13426},
-{"f_13417:compiler_scm",(void*)f_13417},
-{"f_13413:compiler_scm",(void*)f_13413},
-{"f_13401:compiler_scm",(void*)f_13401},
-{"f_13122:compiler_scm",(void*)f_13122},
-{"f_13158:compiler_scm",(void*)f_13158},
-{"f_13053:compiler_scm",(void*)f_13053},
-{"f_13062:compiler_scm",(void*)f_13062},
-{"f_13096:compiler_scm",(void*)f_13096},
-{"f_13092:compiler_scm",(void*)f_13092},
-{"f_13040:compiler_scm",(void*)f_13040},
-{"f_12963:compiler_scm",(void*)f_12963},
-{"f_12986:compiler_scm",(void*)f_12986},
-{"f_13007:compiler_scm",(void*)f_13007},
-{"f_12838:compiler_scm",(void*)f_12838},
-{"f_12841:compiler_scm",(void*)f_12841},
-{"f_12948:compiler_scm",(void*)f_12948},
-{"f_12939:compiler_scm",(void*)f_12939},
-{"f_12935:compiler_scm",(void*)f_12935},
-{"f_12894:compiler_scm",(void*)f_12894},
-{"f_12911:compiler_scm",(void*)f_12911},
-{"f_12915:compiler_scm",(void*)f_12915},
-{"f_12888:compiler_scm",(void*)f_12888},
-{"f_12842:compiler_scm",(void*)f_12842},
-{"f_12859:compiler_scm",(void*)f_12859},
-{"f_12727:compiler_scm",(void*)f_12727},
-{"f_12731:compiler_scm",(void*)f_12731},
-{"f_12761:compiler_scm",(void*)f_12761},
-{"f_12778:compiler_scm",(void*)f_12778},
-{"f_12755:compiler_scm",(void*)f_12755},
-{"f_12634:compiler_scm",(void*)f_12634},
-{"f_12666:compiler_scm",(void*)f_12666},
-{"f_12685:compiler_scm",(void*)f_12685},
-{"f_12708:compiler_scm",(void*)f_12708},
-{"f_12691:compiler_scm",(void*)f_12691},
-{"f_12637:compiler_scm",(void*)f_12637},
-{"f_12643:compiler_scm",(void*)f_12643},
-{"f_12653:compiler_scm",(void*)f_12653},
-{"f_12495:compiler_scm",(void*)f_12495},
-{"f_12499:compiler_scm",(void*)f_12499},
-{"f_12505:compiler_scm",(void*)f_12505},
-{"f_12508:compiler_scm",(void*)f_12508},
-{"f_12558:compiler_scm",(void*)f_12558},
-{"f_12587:compiler_scm",(void*)f_12587},
-{"f_12511:compiler_scm",(void*)f_12511},
-{"f_12521:compiler_scm",(void*)f_12521},
-{"f_12523:compiler_scm",(void*)f_12523},
-{"f_12552:compiler_scm",(void*)f_12552},
-{"f_12514:compiler_scm",(void*)f_12514},
-{"f_12396:compiler_scm",(void*)f_12396},
-{"f_12406:compiler_scm",(void*)f_12406},
-{"f_12456:compiler_scm",(void*)f_12456},
-{"f_12485:compiler_scm",(void*)f_12485},
-{"f_12409:compiler_scm",(void*)f_12409},
-{"f_12419:compiler_scm",(void*)f_12419},
-{"f_12421:compiler_scm",(void*)f_12421},
-{"f_12450:compiler_scm",(void*)f_12450},
-{"f_12412:compiler_scm",(void*)f_12412},
-{"f_12359:compiler_scm",(void*)f_12359},
-{"f_12385:compiler_scm",(void*)f_12385},
-{"f_12366:compiler_scm",(void*)f_12366},
-{"f_12108:compiler_scm",(void*)f_12108},
-{"f_12112:compiler_scm",(void*)f_12112},
-{"f_12115:compiler_scm",(void*)f_12115},
-{"f_12353:compiler_scm",(void*)f_12353},
-{"f_12118:compiler_scm",(void*)f_12118},
-{"f_12121:compiler_scm",(void*)f_12121},
-{"f_12124:compiler_scm",(void*)f_12124},
-{"f_12127:compiler_scm",(void*)f_12127},
-{"f_12347:compiler_scm",(void*)f_12347},
-{"f_12130:compiler_scm",(void*)f_12130},
-{"f_12140:compiler_scm",(void*)f_12140},
-{"f_12259:compiler_scm",(void*)f_12259},
-{"f_12298:compiler_scm",(void*)f_12298},
-{"f_12301:compiler_scm",(void*)f_12301},
-{"f_12272:compiler_scm",(void*)f_12272},
-{"f_12143:compiler_scm",(void*)f_12143},
-{"f_12183:compiler_scm",(void*)f_12183},
-{"f_12186:compiler_scm",(void*)f_12186},
-{"f_12213:compiler_scm",(void*)f_12213},
-{"f_12209:compiler_scm",(void*)f_12209},
-{"f_12205:compiler_scm",(void*)f_12205},
-{"f_12176:compiler_scm",(void*)f_12176},
-{"f_12166:compiler_scm",(void*)f_12166},
-{"f_12154:compiler_scm",(void*)f_12154},
-{"f_12099:compiler_scm",(void*)f_12099},
-{"f_12090:compiler_scm",(void*)f_12090},
-{"f_12081:compiler_scm",(void*)f_12081},
-{"f_12072:compiler_scm",(void*)f_12072},
-{"f_12063:compiler_scm",(void*)f_12063},
-{"f_12054:compiler_scm",(void*)f_12054},
-{"f_12045:compiler_scm",(void*)f_12045},
-{"f_12036:compiler_scm",(void*)f_12036},
-{"f_12030:compiler_scm",(void*)f_12030},
-{"f_12024:compiler_scm",(void*)f_12024},
-{"f_10414:compiler_scm",(void*)f_10414},
-{"f_10481:compiler_scm",(void*)f_10481},
-{"f_10485:compiler_scm",(void*)f_10485},
-{"f_10488:compiler_scm",(void*)f_10488},
-{"f_11926:compiler_scm",(void*)f_11926},
-{"f_11941:compiler_scm",(void*)f_11941},
-{"f_11944:compiler_scm",(void*)f_11944},
-{"f_11985:compiler_scm",(void*)f_11985},
-{"f_11903:compiler_scm",(void*)f_11903},
-{"f_11868:compiler_scm",(void*)f_11868},
-{"f_11874:compiler_scm",(void*)f_11874},
-{"f_11840:compiler_scm",(void*)f_11840},
-{"f_11805:compiler_scm",(void*)f_11805},
-{"f_11811:compiler_scm",(void*)f_11811},
-{"f_11779:compiler_scm",(void*)f_11779},
-{"f_11744:compiler_scm",(void*)f_11744},
-{"f_11750:compiler_scm",(void*)f_11750},
-{"f_11616:compiler_scm",(void*)f_11616},
-{"f_11618:compiler_scm",(void*)f_11618},
-{"f_11669:compiler_scm",(void*)f_11669},
-{"f_11663:compiler_scm",(void*)f_11663},
-{"f_11659:compiler_scm",(void*)f_11659},
-{"f_11716:compiler_scm",(void*)f_11716},
-{"f_11612:compiler_scm",(void*)f_11612},
-{"f_11608:compiler_scm",(void*)f_11608},
-{"f_11591:compiler_scm",(void*)f_11591},
-{"f_11595:compiler_scm",(void*)f_11595},
-{"f_11563:compiler_scm",(void*)f_11563},
-{"f_11546:compiler_scm",(void*)f_11546},
-{"f_11511:compiler_scm",(void*)f_11511},
-{"f_11517:compiler_scm",(void*)f_11517},
-{"f_11449:compiler_scm",(void*)f_11449},
-{"f_11454:compiler_scm",(void*)f_11454},
-{"f_11464:compiler_scm",(void*)f_11464},
-{"f_11402:compiler_scm",(void*)f_11402},
-{"f_11414:compiler_scm",(void*)f_11414},
-{"f_11424:compiler_scm",(void*)f_11424},
-{"f_11135:compiler_scm",(void*)f_11135},
-{"f_11138:compiler_scm",(void*)f_11138},
-{"f_11355:compiler_scm",(void*)f_11355},
-{"f_11358:compiler_scm",(void*)f_11358},
-{"f_11344:compiler_scm",(void*)f_11344},
-{"f_11309:compiler_scm",(void*)f_11309},
-{"f_11315:compiler_scm",(void*)f_11315},
-{"f_11274:compiler_scm",(void*)f_11274},
-{"f_11278:compiler_scm",(void*)f_11278},
-{"f_11282:compiler_scm",(void*)f_11282},
-{"f_11249:compiler_scm",(void*)f_11249},
-{"f_11214:compiler_scm",(void*)f_11214},
-{"f_11220:compiler_scm",(void*)f_11220},
-{"f_11188:compiler_scm",(void*)f_11188},
-{"f_11184:compiler_scm",(void*)f_11184},
-{"f_11159:compiler_scm",(void*)f_11159},
-{"f_11155:compiler_scm",(void*)f_11155},
-{"f_11122:compiler_scm",(void*)f_11122},
-{"f_11087:compiler_scm",(void*)f_11087},
-{"f_11093:compiler_scm",(void*)f_11093},
-{"f_11048:compiler_scm",(void*)f_11048},
-{"f_11052:compiler_scm",(void*)f_11052},
-{"f_10957:compiler_scm",(void*)f_10957},
-{"f_10998:compiler_scm",(void*)f_10998},
-{"f_11004:compiler_scm",(void*)f_11004},
-{"f_10960:compiler_scm",(void*)f_10960},
-{"f_10965:compiler_scm",(void*)f_10965},
-{"f_10971:compiler_scm",(void*)f_10971},
-{"f_10948:compiler_scm",(void*)f_10948},
-{"f_10913:compiler_scm",(void*)f_10913},
-{"f_10919:compiler_scm",(void*)f_10919},
-{"f_10871:compiler_scm",(void*)f_10871},
-{"f_10911:compiler_scm",(void*)f_10911},
-{"f_10876:compiler_scm",(void*)f_10876},
-{"f_10882:compiler_scm",(void*)f_10882},
-{"f_10851:compiler_scm",(void*)f_10851},
-{"f_10816:compiler_scm",(void*)f_10816},
-{"f_10822:compiler_scm",(void*)f_10822},
-{"f_10801:compiler_scm",(void*)f_10801},
-{"f_10797:compiler_scm",(void*)f_10797},
-{"f_10713:compiler_scm",(void*)f_10713},
-{"f_10717:compiler_scm",(void*)f_10717},
-{"f_10688:compiler_scm",(void*)f_10688},
-{"f_10692:compiler_scm",(void*)f_10692},
-{"f_10696:compiler_scm",(void*)f_10696},
-{"f_10663:compiler_scm",(void*)f_10663},
-{"f_10659:compiler_scm",(void*)f_10659},
-{"f_10634:compiler_scm",(void*)f_10634},
-{"f_10630:compiler_scm",(void*)f_10630},
-{"f_10582:compiler_scm",(void*)f_10582},
-{"f_10585:compiler_scm",(void*)f_10585},
-{"f_10609:compiler_scm",(void*)f_10609},
-{"f_10588:compiler_scm",(void*)f_10588},
-{"f_10595:compiler_scm",(void*)f_10595},
-{"f_10591:compiler_scm",(void*)f_10591},
-{"f_10497:compiler_scm",(void*)f_10497},
-{"f_10500:compiler_scm",(void*)f_10500},
-{"f_10568:compiler_scm",(void*)f_10568},
-{"f_10562:compiler_scm",(void*)f_10562},
-{"f_10509:compiler_scm",(void*)f_10509},
-{"f_10518:compiler_scm",(void*)f_10518},
-{"f_10553:compiler_scm",(void*)f_10553},
-{"f_10556:compiler_scm",(void*)f_10556},
-{"f_10512:compiler_scm",(void*)f_10512},
-{"f_10516:compiler_scm",(void*)f_10516},
-{"f_10491:compiler_scm",(void*)f_10491},
-{"f_10471:compiler_scm",(void*)f_10471},
-{"f_10465:compiler_scm",(void*)f_10465},
-{"f_10417:compiler_scm",(void*)f_10417},
-{"f_10440:compiler_scm",(void*)f_10440},
-{"f_5248:compiler_scm",(void*)f_5248},
-{"f_10409:compiler_scm",(void*)f_10409},
-{"f_10371:compiler_scm",(void*)f_10371},
-{"f_10374:compiler_scm",(void*)f_10374},
-{"f_10393:compiler_scm",(void*)f_10393},
-{"f_10403:compiler_scm",(void*)f_10403},
-{"f_10389:compiler_scm",(void*)f_10389},
-{"f_10385:compiler_scm",(void*)f_10385},
-{"f_10324:compiler_scm",(void*)f_10324},
-{"f_10330:compiler_scm",(void*)f_10330},
-{"f_10364:compiler_scm",(void*)f_10364},
-{"f_10357:compiler_scm",(void*)f_10357},
-{"f_5724:compiler_scm",(void*)f_5724},
-{"f_10252:compiler_scm",(void*)f_10252},
-{"f_10264:compiler_scm",(void*)f_10264},
-{"f_10267:compiler_scm",(void*)f_10267},
-{"f_10294:compiler_scm",(void*)f_10294},
-{"f_10255:compiler_scm",(void*)f_10255},
-{"f_10258:compiler_scm",(void*)f_10258},
-{"f_5787:compiler_scm",(void*)f_5787},
-{"f_5790:compiler_scm",(void*)f_5790},
-{"f_10222:compiler_scm",(void*)f_10222},
-{"f_10225:compiler_scm",(void*)f_10225},
-{"f_10228:compiler_scm",(void*)f_10228},
-{"f_10231:compiler_scm",(void*)f_10231},
-{"f_10234:compiler_scm",(void*)f_10234},
-{"f_5793:compiler_scm",(void*)f_5793},
-{"f_5797:compiler_scm",(void*)f_5797},
-{"f_5800:compiler_scm",(void*)f_5800},
-{"f_5806:compiler_scm",(void*)f_5806},
-{"f_5818:compiler_scm",(void*)f_5818},
-{"f_5840:compiler_scm",(void*)f_5840},
-{"f_5907:compiler_scm",(void*)f_5907},
-{"f_6008:compiler_scm",(void*)f_6008},
-{"f_9983:compiler_scm",(void*)f_9983},
-{"f_10116:compiler_scm",(void*)f_10116},
-{"f_10077:compiler_scm",(void*)f_10077},
-{"f_10045:compiler_scm",(void*)f_10045},
-{"f_9999:compiler_scm",(void*)f_9999},
-{"f_9943:compiler_scm",(void*)f_9943},
-{"f_9947:compiler_scm",(void*)f_9947},
-{"f_9953:compiler_scm",(void*)f_9953},
-{"f_9967:compiler_scm",(void*)f_9967},
-{"f_9956:compiler_scm",(void*)f_9956},
-{"f_9632:compiler_scm",(void*)f_9632},
-{"f_9923:compiler_scm",(void*)f_9923},
-{"f_9651:compiler_scm",(void*)f_9651},
-{"f_9654:compiler_scm",(void*)f_9654},
-{"f_9665:compiler_scm",(void*)f_9665},
-{"f_9838:compiler_scm",(void*)f_9838},
-{"f_9882:compiler_scm",(void*)f_9882},
-{"f_9878:compiler_scm",(void*)f_9878},
-{"f_9874:compiler_scm",(void*)f_9874},
-{"f_9862:compiler_scm",(void*)f_9862},
-{"f_9697:compiler_scm",(void*)f_9697},
-{"f_9829:compiler_scm",(void*)f_9829},
-{"f_9793:compiler_scm",(void*)f_9793},
-{"f_9747:compiler_scm",(void*)f_9747},
-{"f_9721:compiler_scm",(void*)f_9721},
-{"f_9717:compiler_scm",(void*)f_9717},
-{"f_9705:compiler_scm",(void*)f_9705},
-{"f_9673:compiler_scm",(void*)f_9673},
-{"f_9661:compiler_scm",(void*)f_9661},
-{"f_9622:compiler_scm",(void*)f_9622},
-{"f_9573:compiler_scm",(void*)f_9573},
-{"f_9607:compiler_scm",(void*)f_9607},
-{"f_9600:compiler_scm",(void*)f_9600},
-{"f_9567:compiler_scm",(void*)f_9567},
-{"f_9563:compiler_scm",(void*)f_9563},
-{"f_9488:compiler_scm",(void*)f_9488},
-{"f_9506:compiler_scm",(void*)f_9506},
-{"f_9536:compiler_scm",(void*)f_9536},
-{"f_9542:compiler_scm",(void*)f_9542},
-{"f_9512:compiler_scm",(void*)f_9512},
-{"f_9519:compiler_scm",(void*)f_9519},
-{"f_9494:compiler_scm",(void*)f_9494},
-{"f_9500:compiler_scm",(void*)f_9500},
-{"f_9357:compiler_scm",(void*)f_9357},
-{"f_9360:compiler_scm",(void*)f_9360},
-{"f_9371:compiler_scm",(void*)f_9371},
-{"f_9381:compiler_scm",(void*)f_9381},
-{"f_9384:compiler_scm",(void*)f_9384},
-{"f_9387:compiler_scm",(void*)f_9387},
-{"f_9392:compiler_scm",(void*)f_9392},
-{"f_9417:compiler_scm",(void*)f_9417},
-{"f_9422:compiler_scm",(void*)f_9422},
-{"f_9447:compiler_scm",(void*)f_9447},
-{"f_9374:compiler_scm",(void*)f_9374},
-{"f_9342:compiler_scm",(void*)f_9342},
-{"f_9338:compiler_scm",(void*)f_9338},
-{"f_9333:compiler_scm",(void*)f_9333},
-{"f_9177:compiler_scm",(void*)f_9177},
-{"f_9180:compiler_scm",(void*)f_9180},
-{"f_9183:compiler_scm",(void*)f_9183},
-{"f_9189:compiler_scm",(void*)f_9189},
-{"f_9300:compiler_scm",(void*)f_9300},
-{"f_9261:compiler_scm",(void*)f_9261},
-{"f_9228:compiler_scm",(void*)f_9228},
-{"f_9236:compiler_scm",(void*)f_9236},
-{"f_9224:compiler_scm",(void*)f_9224},
-{"f_9204:compiler_scm",(void*)f_9204},
-{"f_9121:compiler_scm",(void*)f_9121},
-{"f_9130:compiler_scm",(void*)f_9130},
-{"f_9165:compiler_scm",(void*)f_9165},
-{"f_9161:compiler_scm",(void*)f_9161},
-{"f_9133:compiler_scm",(void*)f_9133},
-{"f_9153:compiler_scm",(void*)f_9153},
-{"f_9145:compiler_scm",(void*)f_9145},
-{"f_8957:compiler_scm",(void*)f_8957},
-{"f_9105:compiler_scm",(void*)f_9105},
-{"f_8969:compiler_scm",(void*)f_8969},
-{"f_8972:compiler_scm",(void*)f_8972},
-{"f_8975:compiler_scm",(void*)f_8975},
-{"f_8980:compiler_scm",(void*)f_8980},
-{"f_9005:compiler_scm",(void*)f_9005},
-{"f_9010:compiler_scm",(void*)f_9010},
-{"f_9035:compiler_scm",(void*)f_9035},
-{"f_9038:compiler_scm",(void*)f_9038},
-{"f_9041:compiler_scm",(void*)f_9041},
-{"f_9072:compiler_scm",(void*)f_9072},
-{"f_8900:compiler_scm",(void*)f_8900},
-{"f_8903:compiler_scm",(void*)f_8903},
-{"f_8906:compiler_scm",(void*)f_8906},
-{"f_8918:compiler_scm",(void*)f_8918},
-{"f_8891:compiler_scm",(void*)f_8891},
-{"f_8878:compiler_scm",(void*)f_8878},
-{"f_8865:compiler_scm",(void*)f_8865},
-{"f_8852:compiler_scm",(void*)f_8852},
-{"f_8839:compiler_scm",(void*)f_8839},
-{"f_8772:compiler_scm",(void*)f_8772},
-{"f_8791:compiler_scm",(void*)f_8791},
-{"f_8818:compiler_scm",(void*)f_8818},
-{"f_8822:compiler_scm",(void*)f_8822},
-{"f_8811:compiler_scm",(void*)f_8811},
-{"f_8785:compiler_scm",(void*)f_8785},
-{"f_8756:compiler_scm",(void*)f_8756},
-{"f_8741:compiler_scm",(void*)f_8741},
-{"f_8710:compiler_scm",(void*)f_8710},
-{"f_8718:compiler_scm",(void*)f_8718},
-{"f_8681:compiler_scm",(void*)f_8681},
-{"f_8648:compiler_scm",(void*)f_8648},
-{"f_8634:compiler_scm",(void*)f_8634},
-{"f_8642:compiler_scm",(void*)f_8642},
-{"f_8638:compiler_scm",(void*)f_8638},
-{"f_8601:compiler_scm",(void*)f_8601},
-{"f_8609:compiler_scm",(void*)f_8609},
-{"f_8605:compiler_scm",(void*)f_8605},
-{"f_8268:compiler_scm",(void*)f_8268},
-{"f_8274:compiler_scm",(void*)f_8274},
-{"f_8277:compiler_scm",(void*)f_8277},
-{"f_8283:compiler_scm",(void*)f_8283},
-{"f_8509:compiler_scm",(void*)f_8509},
-{"f_8512:compiler_scm",(void*)f_8512},
-{"f_8520:compiler_scm",(void*)f_8520},
-{"f_8545:compiler_scm",(void*)f_8545},
-{"f_8550:compiler_scm",(void*)f_8550},
-{"f_8438:compiler_scm",(void*)f_8438},
-{"f_8477:compiler_scm",(void*)f_8477},
-{"f_8493:compiler_scm",(void*)f_8493},
-{"f_8496:compiler_scm",(void*)f_8496},
-{"f_8499:compiler_scm",(void*)f_8499},
-{"f_8490:compiler_scm",(void*)f_8490},
-{"f_8480:compiler_scm",(void*)f_8480},
-{"f_8441:compiler_scm",(void*)f_8441},
-{"f_8471:compiler_scm",(void*)f_8471},
-{"f_8444:compiler_scm",(void*)f_8444},
-{"f_8447:compiler_scm",(void*)f_8447},
-{"f_8462:compiler_scm",(void*)f_8462},
-{"f_8366:compiler_scm",(void*)f_8366},
-{"f_8373:compiler_scm",(void*)f_8373},
-{"f_8432:compiler_scm",(void*)f_8432},
-{"f_8420:compiler_scm",(void*)f_8420},
-{"f_8290:compiler_scm",(void*)f_8290},
-{"f_8297:compiler_scm",(void*)f_8297},
-{"f_8356:compiler_scm",(void*)f_8356},
-{"f_8336:compiler_scm",(void*)f_8336},
-{"f_8223:compiler_scm",(void*)f_8223},
-{"f_8252:compiler_scm",(void*)f_8252},
-{"f_8140:compiler_scm",(void*)f_8140},
-{"f_8174:compiler_scm",(void*)f_8174},
-{"f_8207:compiler_scm",(void*)f_8207},
-{"f_8187:compiler_scm",(void*)f_8187},
-{"f_8172:compiler_scm",(void*)f_8172},
-{"f_8143:compiler_scm",(void*)f_8143},
-{"f_8164:compiler_scm",(void*)f_8164},
-{"f_8168:compiler_scm",(void*)f_8168},
-{"f_8146:compiler_scm",(void*)f_8146},
-{"f_8149:compiler_scm",(void*)f_8149},
-{"f_8121:compiler_scm",(void*)f_8121},
-{"f_7596:compiler_scm",(void*)f_7596},
-{"f_8004:compiler_scm",(void*)f_8004},
-{"f_8006:compiler_scm",(void*)f_8006},
-{"f_8084:compiler_scm",(void*)f_8084},
-{"f_8033:compiler_scm",(void*)f_8033},
-{"f_8057:compiler_scm",(void*)f_8057},
-{"f_8046:compiler_scm",(void*)f_8046},
-{"f_7602:compiler_scm",(void*)f_7602},
-{"f_7994:compiler_scm",(void*)f_7994},
-{"f_7605:compiler_scm",(void*)f_7605},
-{"f_7879:compiler_scm",(void*)f_7879},
-{"f_7922:compiler_scm",(void*)f_7922},
-{"f_7943:compiler_scm",(void*)f_7943},
-{"f_7949:compiler_scm",(void*)f_7949},
-{"f_7987:compiler_scm",(void*)f_7987},
-{"f_7976:compiler_scm",(void*)f_7976},
-{"f_7984:compiler_scm",(void*)f_7984},
-{"f_7941:compiler_scm",(void*)f_7941},
-{"f_7923:compiler_scm",(void*)f_7923},
-{"f_7927:compiler_scm",(void*)f_7927},
-{"f_7930:compiler_scm",(void*)f_7930},
-{"f_7934:compiler_scm",(void*)f_7934},
-{"f_7937:compiler_scm",(void*)f_7937},
-{"f_7918:compiler_scm",(void*)f_7918},
-{"f_7883:compiler_scm",(void*)f_7883},
-{"f_7889:compiler_scm",(void*)f_7889},
-{"f_7910:compiler_scm",(void*)f_7910},
-{"f_7914:compiler_scm",(void*)f_7914},
-{"f_7899:compiler_scm",(void*)f_7899},
-{"f_7886:compiler_scm",(void*)f_7886},
-{"f_7610:compiler_scm",(void*)f_7610},
-{"f_7614:compiler_scm",(void*)f_7614},
-{"f_7642:compiler_scm",(void*)f_7642},
-{"f_7652:compiler_scm",(void*)f_7652},
-{"f_7873:compiler_scm",(void*)f_7873},
-{"f_7869:compiler_scm",(void*)f_7869},
-{"f_7816:compiler_scm",(void*)f_7816},
-{"f_7819:compiler_scm",(void*)f_7819},
-{"f_7763:compiler_scm",(void*)f_7763},
-{"f_7786:compiler_scm",(void*)f_7786},
-{"f_7778:compiler_scm",(void*)f_7778},
-{"f_7709:compiler_scm",(void*)f_7709},
-{"f_7734:compiler_scm",(void*)f_7734},
-{"f_7750:compiler_scm",(void*)f_7750},
-{"f_7756:compiler_scm",(void*)f_7756},
-{"f_7740:compiler_scm",(void*)f_7740},
-{"f_7748:compiler_scm",(void*)f_7748},
-{"f_7715:compiler_scm",(void*)f_7715},
-{"f_7721:compiler_scm",(void*)f_7721},
-{"f_7732:compiler_scm",(void*)f_7732},
-{"f_7725:compiler_scm",(void*)f_7725},
-{"f_7662:compiler_scm",(void*)f_7662},
-{"f_7665:compiler_scm",(void*)f_7665},
-{"f_7693:compiler_scm",(void*)f_7693},
-{"f_7704:compiler_scm",(void*)f_7704},
-{"f_7697:compiler_scm",(void*)f_7697},
-{"f_7672:compiler_scm",(void*)f_7672},
-{"f_5719:compiler_scm",(void*)f_5719},
-{"f_5636:compiler_scm",(void*)f_5636},
-{"f_5712:compiler_scm",(void*)f_5712},
-{"f_5639:compiler_scm",(void*)f_5639},
-{"f_5705:compiler_scm",(void*)f_5705},
-{"f_5642:compiler_scm",(void*)f_5642},
-{"f_5657:compiler_scm",(void*)f_5657},
-{"f_5662:compiler_scm",(void*)f_5662},
-{"f_5699:compiler_scm",(void*)f_5699},
-{"f_5666:compiler_scm",(void*)f_5666},
-{"f_5674:compiler_scm",(void*)f_5674},
-{"f_5684:compiler_scm",(void*)f_5684},
-{"f_5669:compiler_scm",(void*)f_5669},
-{"f20080:compiler_scm",(void*)f20080},
-{"f_7676:compiler_scm",(void*)f_7676},
-{"f_7683:compiler_scm",(void*)f_7683},
-{"f_7615:compiler_scm",(void*)f_7615},
-{"f_7619:compiler_scm",(void*)f_7619},
-{"f_7622:compiler_scm",(void*)f_7622},
-{"f_7626:compiler_scm",(void*)f_7626},
-{"f_7629:compiler_scm",(void*)f_7629},
-{"f_7633:compiler_scm",(void*)f_7633},
-{"f_7636:compiler_scm",(void*)f_7636},
-{"f_7509:compiler_scm",(void*)f_7509},
-{"f_7583:compiler_scm",(void*)f_7583},
-{"f_7536:compiler_scm",(void*)f_7536},
-{"f_7540:compiler_scm",(void*)f_7540},
-{"f_7543:compiler_scm",(void*)f_7543},
-{"f_7568:compiler_scm",(void*)f_7568},
-{"f_7564:compiler_scm",(void*)f_7564},
-{"f_7550:compiler_scm",(void*)f_7550},
-{"f_7554:compiler_scm",(void*)f_7554},
-{"f_7402:compiler_scm",(void*)f_7402},
-{"f_7463:compiler_scm",(void*)f_7463},
-{"f_7469:compiler_scm",(void*)f_7469},
-{"f_7492:compiler_scm",(void*)f_7492},
-{"f_7449:compiler_scm",(void*)f_7449},
-{"f_7457:compiler_scm",(void*)f_7457},
-{"f_7407:compiler_scm",(void*)f_7407},
-{"f_7413:compiler_scm",(void*)f_7413},
-{"f_7436:compiler_scm",(void*)f_7436},
-{"f_7295:compiler_scm",(void*)f_7295},
-{"f_7393:compiler_scm",(void*)f_7393},
-{"f_7389:compiler_scm",(void*)f_7389},
-{"f_7298:compiler_scm",(void*)f_7298},
-{"f_7385:compiler_scm",(void*)f_7385},
-{"f_7377:compiler_scm",(void*)f_7377},
-{"f_7381:compiler_scm",(void*)f_7381},
-{"f_7301:compiler_scm",(void*)f_7301},
-{"f_7331:compiler_scm",(void*)f_7331},
-{"f_7150:compiler_scm",(void*)f_7150},
-{"f_7153:compiler_scm",(void*)f_7153},
-{"f_7237:compiler_scm",(void*)f_7237},
-{"f_7241:compiler_scm",(void*)f_7241},
-{"f_7156:compiler_scm",(void*)f_7156},
-{"f_7159:compiler_scm",(void*)f_7159},
-{"f_7223:compiler_scm",(void*)f_7223},
-{"f_7162:compiler_scm",(void*)f_7162},
-{"f_7211:compiler_scm",(void*)f_7211},
-{"f_7219:compiler_scm",(void*)f_7219},
-{"f_7215:compiler_scm",(void*)f_7215},
-{"f_7165:compiler_scm",(void*)f_7165},
-{"f_7029:compiler_scm",(void*)f_7029},
-{"f_7087:compiler_scm",(void*)f_7087},
-{"f_7137:compiler_scm",(void*)f_7137},
-{"f_7114:compiler_scm",(void*)f_7114},
-{"f_7130:compiler_scm",(void*)f_7130},
-{"f_7126:compiler_scm",(void*)f_7126},
-{"f_7032:compiler_scm",(void*)f_7032},
-{"f_7035:compiler_scm",(void*)f_7035},
-{"f_7051:compiler_scm",(void*)f_7051},
-{"f_7059:compiler_scm",(void*)f_7059},
-{"f_7038:compiler_scm",(void*)f_7038},
-{"f_7045:compiler_scm",(void*)f_7045},
-{"f_6942:compiler_scm",(void*)f_6942},
-{"f_6966:compiler_scm",(void*)f_6966},
-{"f_7016:compiler_scm",(void*)f_7016},
-{"f_6993:compiler_scm",(void*)f_6993},
-{"f_7009:compiler_scm",(void*)f_7009},
-{"f_7005:compiler_scm",(void*)f_7005},
-{"f_6960:compiler_scm",(void*)f_6960},
-{"f_6945:compiler_scm",(void*)f_6945},
-{"f_6952:compiler_scm",(void*)f_6952},
-{"f_6613:compiler_scm",(void*)f_6613},
-{"f_6919:compiler_scm",(void*)f_6919},
-{"f_6930:compiler_scm",(void*)f_6930},
-{"f_6924:compiler_scm",(void*)f_6924},
-{"f_6622:compiler_scm",(void*)f_6622},
-{"f_6627:compiler_scm",(void*)f_6627},
-{"f_6883:compiler_scm",(void*)f_6883},
-{"f_6912:compiler_scm",(void*)f_6912},
-{"f_6631:compiler_scm",(void*)f_6631},
-{"f_6834:compiler_scm",(void*)f_6834},
-{"f_6867:compiler_scm",(void*)f_6867},
-{"f_6847:compiler_scm",(void*)f_6847},
-{"f_6832:compiler_scm",(void*)f_6832},
-{"f_6634:compiler_scm",(void*)f_6634},
-{"f_6637:compiler_scm",(void*)f_6637},
-{"f_6828:compiler_scm",(void*)f_6828},
-{"f_6640:compiler_scm",(void*)f_6640},
-{"f_6824:compiler_scm",(void*)f_6824},
-{"f_6643:compiler_scm",(void*)f_6643},
-{"f_6649:compiler_scm",(void*)f_6649},
-{"f_6799:compiler_scm",(void*)f_6799},
-{"f_6772:compiler_scm",(void*)f_6772},
-{"f_6664:compiler_scm",(void*)f_6664},
-{"f_6751:compiler_scm",(void*)f_6751},
-{"f_6695:compiler_scm",(void*)f_6695},
-{"f_6729:compiler_scm",(void*)f_6729},
-{"f_6673:compiler_scm",(void*)f_6673},
-{"f_6456:compiler_scm",(void*)f_6456},
-{"f_6559:compiler_scm",(void*)f_6559},
-{"f_6477:compiler_scm",(void*)f_6477},
-{"f_6503:compiler_scm",(void*)f_6503},
-{"f_6485:compiler_scm",(void*)f_6485},
-{"f_6501:compiler_scm",(void*)f_6501},
-{"f_6481:compiler_scm",(void*)f_6481},
-{"f_6244:compiler_scm",(void*)f_6244},
-{"f_6250:compiler_scm",(void*)f_6250},
-{"f_6411:compiler_scm",(void*)f_6411},
-{"f_6440:compiler_scm",(void*)f_6440},
-{"f_6253:compiler_scm",(void*)f_6253},
-{"f_6362:compiler_scm",(void*)f_6362},
-{"f_6395:compiler_scm",(void*)f_6395},
-{"f_6375:compiler_scm",(void*)f_6375},
-{"f_6360:compiler_scm",(void*)f_6360},
-{"f_6256:compiler_scm",(void*)f_6256},
-{"f_6259:compiler_scm",(void*)f_6259},
-{"f_6292:compiler_scm",(void*)f_6292},
-{"f_6342:compiler_scm",(void*)f_6342},
-{"f_6305:compiler_scm",(void*)f_6305},
-{"f_6323:compiler_scm",(void*)f_6323},
-{"f_6331:compiler_scm",(void*)f_6331},
-{"f_6270:compiler_scm",(void*)f_6270},
-{"f_6282:compiler_scm",(void*)f_6282},
-{"f_6286:compiler_scm",(void*)f_6286},
-{"f_6278:compiler_scm",(void*)f_6278},
-{"f_6157:compiler_scm",(void*)f_6157},
-{"f_6159:compiler_scm",(void*)f_6159},
-{"f_6180:compiler_scm",(void*)f_6180},
-{"f_6218:compiler_scm",(void*)f_6218},
-{"f_6228:compiler_scm",(void*)f_6228},
-{"f_6206:compiler_scm",(void*)f_6206},
-{"f_6184:compiler_scm",(void*)f_6184},
-{"f_6199:compiler_scm",(void*)f_6199},
-{"f_6174:compiler_scm",(void*)f_6174},
-{"f_6153:compiler_scm",(void*)f_6153},
-{"f_6104:compiler_scm",(void*)f_6104},
-{"f_6133:compiler_scm",(void*)f_6133},
-{"f_6083:compiler_scm",(void*)f_6083},
-{"f_6086:compiler_scm",(void*)f_6086},
-{"f_6097:compiler_scm",(void*)f_6097},
-{"f_6091:compiler_scm",(void*)f_6091},
-{"f_6089:compiler_scm",(void*)f_6089},
-{"f_6058:compiler_scm",(void*)f_6058},
-{"f_6066:compiler_scm",(void*)f_6066},
-{"f_6029:compiler_scm",(void*)f_6029},
-{"f_6041:compiler_scm",(void*)f_6041},
-{"f_6037:compiler_scm",(void*)f_6037},
-{"f_5950:compiler_scm",(void*)f_5950},
-{"f_5962:compiler_scm",(void*)f_5962},
-{"f_5966:compiler_scm",(void*)f_5966},
-{"f_5971:compiler_scm",(void*)f_5971},
-{"f_5996:compiler_scm",(void*)f_5996},
-{"f_5999:compiler_scm",(void*)f_5999},
-{"f_5910:compiler_scm",(void*)f_5910},
-{"f_5921:compiler_scm",(void*)f_5921},
-{"f_5849:compiler_scm",(void*)f_5849},
-{"f_5860:compiler_scm",(void*)f_5860},
-{"f_5868:compiler_scm",(void*)f_5868},
-{"f_5876:compiler_scm",(void*)f_5876},
-{"f_5822:compiler_scm",(void*)f_5822},
-{"f_5768:compiler_scm",(void*)f_5768},
-{"f_5740:compiler_scm",(void*)f_5740},
-{"f_5734:compiler_scm",(void*)f_5734},
-{"f_5594:compiler_scm",(void*)f_5594},
-{"f_5598:compiler_scm",(void*)f_5598},
-{"f_5619:compiler_scm",(void*)f_5619},
-{"f_5630:compiler_scm",(void*)f_5630},
-{"f_5623:compiler_scm",(void*)f_5623},
-{"f_5599:compiler_scm",(void*)f_5599},
-{"f_5603:compiler_scm",(void*)f_5603},
-{"f_5606:compiler_scm",(void*)f_5606},
-{"f_5610:compiler_scm",(void*)f_5610},
-{"f_5613:compiler_scm",(void*)f_5613},
-{"f_5424:compiler_scm",(void*)f_5424},
-{"f_5428:compiler_scm",(void*)f_5428},
-{"f_5440:compiler_scm",(void*)f_5440},
-{"f_5458:compiler_scm",(void*)f_5458},
-{"f_5566:compiler_scm",(void*)f_5566},
-{"f_5523:compiler_scm",(void*)f_5523},
-{"f_5530:compiler_scm",(void*)f_5530},
-{"f_5544:compiler_scm",(void*)f_5544},
-{"f_5540:compiler_scm",(void*)f_5540},
-{"f_5476:compiler_scm",(void*)f_5476},
-{"f_5483:compiler_scm",(void*)f_5483},
-{"f_5497:compiler_scm",(void*)f_5497},
-{"f_5493:compiler_scm",(void*)f_5493},
-{"f_5462:compiler_scm",(void*)f_5462},
-{"f_5444:compiler_scm",(void*)f_5444},
-{"f_5378:compiler_scm",(void*)f_5378},
-{"f_5410:compiler_scm",(void*)f_5410},
-{"f_5318:compiler_scm",(void*)f_5318},
-{"f_5324:compiler_scm",(void*)f_5324},
-{"f_5339:compiler_scm",(void*)f_5339},
-{"f_5305:compiler_scm",(void*)f_5305},
-{"f_5309:compiler_scm",(void*)f_5309},
-{"f_5316:compiler_scm",(void*)f_5316},
-{"f_5312:compiler_scm",(void*)f_5312},
-{"f_5290:compiler_scm",(void*)f_5290},
-{"f_5294:compiler_scm",(void*)f_5294},
-{"f_5300:compiler_scm",(void*)f_5300},
-{"f_5251:compiler_scm",(void*)f_5251},
-{"f_5288:compiler_scm",(void*)f_5288},
-{"f_5284:compiler_scm",(void*)f_5284},
-{"f_5264:compiler_scm",(void*)f_5264},
-{"f_5187:compiler_scm",(void*)f_5187},
-{"f_5246:compiler_scm",(void*)f_5246},
-{"f_5191:compiler_scm",(void*)f_5191},
-{"f_5239:compiler_scm",(void*)f_5239},
-{"f_5194:compiler_scm",(void*)f_5194},
-{"f_5232:compiler_scm",(void*)f_5232},
-{"f_5197:compiler_scm",(void*)f_5197},
-{"f_5201:compiler_scm",(void*)f_5201},
-{"f_5205:compiler_scm",(void*)f_5205},
-{"f_5225:compiler_scm",(void*)f_5225},
-{"f_5208:compiler_scm",(void*)f_5208},
-{"f_5218:compiler_scm",(void*)f_5218},
-{"f_5093:compiler_scm",(void*)f_5093},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/data-structures.c b/bootstrap/data-structures.c
deleted file mode 100644
index 2d40db10..00000000
--- a/bootstrap/data-structures.c
+++ /dev/null
@@ -1,7724 +0,0 @@
-/* Generated from data-structures.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:33
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: data-structures.scm -optimize-level 2 -include-path . -include-path ./ -inline -explicit-use -no-trace -output-file data-structures.c -extend ./private-namespace.scm
- unit: data_structures
-*/
-
-#include "chicken.h"
-
-#define C_mem_compare(to, from, n) C_fix(C_memcmp(C_c_string(to), C_c_string(from), C_unfix(n)))
-
-static C_PTABLE_ENTRY *create_ptable(void);
-
-static C_TLS C_word lf[116];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,14),40,105,100,101,110,116,105,116,121,32,120,50,54,41,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,17),40,102,95,49,50,57,55,32,46,32,97,114,103,115,50,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,13),40,112,114,111,106,101,99,116,32,110,50,56,41,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,114,101,100,115,51,52,41,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,48,53,32,120,51,50,41,0,0,0,0};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,19),40,99,111,110,106,111,105,110,32,46,32,112,114,101,100,115,51,49,41,0,0,0,0,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,114,101,100,115,52,57,41,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,51,56,32,120,52,55,41,0,0,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,19),40,100,105,115,106,111,105,110,32,46,32,112,114,101,100,115,52,54,41,0,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,14),40,102,95,49,51,56,52,32,46,32,95,54,51,41,0,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,14),40,102,95,49,51,56,54,32,46,32,95,54,52,41,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,19),40,99,111,110,115,116,97,110,116,108,121,32,46,32,120,115,54,49,41,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),40,102,95,49,51,57,56,32,120,54,55,32,121,54,56,41};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,13),40,102,108,105,112,32,112,114,111,99,54,54,41,0,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,48,54,32,46,32,97,114,103,115,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,16),40,99,111,109,112,108,101,109,101,110,116,32,112,54,57,41};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,49,52,51,50,41,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,50,55,32,46,32,97,114,103,115,55,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,18),40,114,101,99,32,102,48,55,52,32,46,32,102,110,115,55,53,41,0,0,0,0,0,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,17),40,99,111,109,112,111,115,101,32,46,32,102,110,115,55,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,12),40,102,95,49,52,55,56,32,120,56,52,41,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,102,110,115,56,49,41,0,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,11),40,111,32,46,32,102,110,115,55,57,41,0,0,0,0,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,108,115,116,57,50,41,0,0,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,14),40,102,95,49,52,57,51,32,108,115,116,57,48,41,0,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,17),40,108,105,115,116,45,111,102,63,32,112,114,101,100,56,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,13),40,110,111,111,112,32,46,32,95,49,48,49,41,0,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,15),40,102,95,49,53,52,53,32,46,32,95,49,49,48,41,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,112,114,111,99,115,49,49,51,41,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,18),40,102,95,49,53,53,57,32,46,32,97,114,103,115,49,49,49,41,0,0,0,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,17),40,101,97,99,104,32,46,32,112,114,111,99,115,49,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,11),40,97,110,121,63,32,120,49,49,57,41,0,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,12),40,110,111,110,101,63,32,120,49,50,49,41,0,0,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,16),40,97,108,119,97,121,115,63,32,46,32,95,49,50,51,41};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,15),40,110,101,118,101,114,63,32,46,32,95,49,50,53,41,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,49,48,32,46,32,120,115,49,50,57,41};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,32),40,108,101,102,116,45,115,101,99,116,105,111,110,32,112,114,111,99,49,50,55,32,46,32,97,114,103,115,49,50,56,41};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,50,56,32,46,32,120,115,49,51,53,41};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,33),40,114,105,103,104,116,45,115,101,99,116,105,111,110,32,112,114,111,99,49,51,50,32,46,32,97,114,103,115,49,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,12),40,97,116,111,109,63,32,120,49,51,56,41,0,0,0,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,17),40,116,97,105,108,63,32,120,49,52,48,32,121,49,52,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,110,115,49,54,48,41,0,0,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,25),40,105,110,116,101,114,115,112,101,114,115,101,32,108,115,116,49,53,55,32,120,49,53,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,49,54,54,41,0,0,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,16),40,98,117,116,108,97,115,116,32,108,115,116,49,54,52,41};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,105,115,116,115,49,55,53,32,114,101,115,116,49,55,54,41,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,21),40,102,108,97,116,116,101,110,32,46,32,108,105,115,116,115,48,49,55,51,41,0,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,28),40,100,111,108,111,111,112,50,48,53,32,104,100,50,48,57,32,116,108,50,49,48,32,99,50,49,49,41,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,108,115,116,49,57,55,32,105,49,57,56,41,0,0,0,0,0,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,18),40,99,104,111,112,32,108,115,116,49,56,55,32,110,49,56,56,41,0,0,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,115,50,50,49,41,0,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,23),40,106,111,105,110,32,108,115,116,115,50,49,55,32,46,32,108,115,116,50,49,56,41,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,98,108,115,116,50,52,48,32,108,115,116,50,52,49,41,0,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,25),40,99,111,109,112,114,101,115,115,32,98,108,115,116,50,51,54,32,108,115,116,50,51,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,54,51,32,103,50,55,51,50,55,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,17),40,97,50,48,53,56,32,120,51,48,56,32,121,51,48,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,11),40,103,51,48,50,32,120,51,48,52,41,0,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,56,54,32,103,50,57,54,51,48,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,24),40,115,104,117,102,102,108,101,32,108,50,53,56,32,114,97,110,100,111,109,50,53,57,41};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,51,51,56,41,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,20),40,102,95,50,49,53,54,32,120,51,51,53,32,108,115,116,51,51,54,41,0,0,0,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,44),40,97,108,105,115,116,45,117,112,100,97,116,101,33,32,120,51,49,55,32,121,51,49,56,32,108,115,116,51,49,57,32,46,32,116,109,112,51,49,54,51,50,48,41,0,0,0,0};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,51,56,52,41,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,20),40,102,95,50,50,52,55,32,120,51,56,49,32,108,115,116,51,56,50,41,0,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,27),40,98,111,100,121,51,54,50,32,99,109,112,51,55,49,32,100,101,102,97,117,108,116,51,55,50,41,0,0,0,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,27),40,100,101,102,45,100,101,102,97,117,108,116,51,54,53,32,37,99,109,112,51,54,48,51,57,51,41,0,0,0,0,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,12),40,100,101,102,45,99,109,112,51,54,52,41,0,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,35),40,97,108,105,115,116,45,114,101,102,32,120,51,53,52,32,108,115,116,51,53,53,32,46,32,116,109,112,51,53,51,51,53,54,41,0,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,108,52,48,57,41,0,0,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,29),40,114,97,115,115,111,99,32,120,52,48,48,32,108,115,116,52,48,49,32,46,32,116,115,116,52,48,50,41,0,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,106,52,51,48,32,107,52,51,49,41};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,29),40,114,101,118,45,115,116,114,105,110,103,45,97,112,112,101,110,100,32,108,52,50,51,32,105,52,50,52,41,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,28),40,114,101,118,101,114,115,101,45,115,116,114,105,110,103,45,97,112,112,101,110,100,32,108,52,50,49,41,0,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,15),40,45,62,115,116,114,105,110,103,32,120,52,51,57,41,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,52,53,50,32,103,52,54,50,52,54,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,16),40,99,111,110,99,32,46,32,97,114,103,115,52,52,57,41};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,24),40,108,111,111,112,32,105,115,116,97,114,116,52,56,50,32,105,101,110,100,52,56,51,41};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,52),40,116,114,97,118,101,114,115,101,32,119,104,105,99,104,52,55,52,32,119,104,101,114,101,52,55,53,32,115,116,97,114,116,52,55,54,32,116,101,115,116,52,55,55,32,108,111,99,52,55,56,41,0,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,17),40,97,50,54,48,57,32,105,52,57,55,32,108,52,57,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,32,119,104,105,99,104,52,57,52,32,119,104,101,114,101,52,57,53,32,115,116,97,114,116,52,57,54,41,0,0,0,0,0,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,17),40,97,50,54,49,56,32,105,53,48,50,32,108,53,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,53),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,45,99,105,32,119,104,105,99,104,52,57,57,32,119,104,101,114,101,53,48,48,32,115,116,97,114,116,53,48,49,41,0,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,47),40,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,32,119,104,105,99,104,53,49,51,32,119,104,101,114,101,53,49,52,32,46,32,116,109,112,53,49,50,53,49,53,41,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,50),40,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,45,99,105,32,119,104,105,99,104,53,50,56,32,119,104,101,114,101,53,50,57,32,46,32,116,109,112,53,50,55,53,51,48,41,0,0,0,0,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,29),40,115,116,114,105,110,103,45,99,111,109,112,97,114,101,51,32,115,49,53,51,55,32,115,50,53,51,56,41,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,32),40,115,116,114,105,110,103,45,99,111,109,112,97,114,101,51,45,99,105,32,115,49,53,52,55,32,115,50,53,52,56,41};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,56),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,61,63,32,115,49,53,53,55,32,115,50,53,53,56,32,115,116,97,114,116,49,53,53,57,32,115,116,97,114,116,50,53,54,48,32,110,53,54,49,41};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,36),40,98,111,100,121,53,56,56,32,115,116,97,114,116,49,53,57,56,32,115,116,97,114,116,50,53,57,57,32,108,101,110,54,48,48,41,0,0,0,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,40),40,100,101,102,45,108,101,110,53,57,50,32,37,115,116,97,114,116,49,53,56,53,54,48,50,32,37,115,116,97,114,116,50,53,56,54,54,48,51,41};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,29),40,100,101,102,45,115,116,97,114,116,50,53,57,49,32,37,115,116,97,114,116,49,53,56,53,54,48,53,41,0,0,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,115,116,97,114,116,49,53,57,48,41,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,37),40,115,117,98,115,116,114,105,110,103,61,63,32,115,49,53,55,57,32,115,50,53,56,48,32,46,32,116,109,112,53,55,56,53,56,49,41,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,59),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,45,99,105,61,63,32,115,49,54,49,52,32,115,50,54,49,53,32,115,116,97,114,116,49,54,49,54,32,115,116,97,114,116,50,54,49,55,32,110,54,49,56,41,0,0,0,0,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,36),40,98,111,100,121,54,52,53,32,115,116,97,114,116,49,54,53,53,32,115,116,97,114,116,50,54,53,54,32,108,101,110,54,53,55,41,0,0,0,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,40),40,100,101,102,45,108,101,110,54,52,57,32,37,115,116,97,114,116,49,54,52,50,54,53,57,32,37,115,116,97,114,116,50,54,52,51,54,54,48,41};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,29),40,100,101,102,45,115,116,97,114,116,50,54,52,56,32,37,115,116,97,114,116,49,54,52,50,54,54,50,41,0,0,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,115,116,97,114,116,49,54,52,55,41,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,40),40,115,117,98,115,116,114,105,110,103,45,99,105,61,63,32,115,49,54,51,54,32,115,50,54,51,55,32,46,32,116,109,112,54,51,53,54,51,56,41};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,27),40,97,100,100,32,102,114,111,109,54,55,57,32,116,111,54,56,48,32,108,97,115,116,54,56,49,41,0,0,0,0,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,11),40,115,99,97,110,32,106,55,48,57,41,0,0,0,0,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,27),40,108,111,111,112,32,105,54,56,53,32,108,97,115,116,54,56,54,32,102,114,111,109,54,56,55,41,0,0,0,0,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,42),40,115,116,114,105,110,103,45,115,112,108,105,116,32,115,116,114,54,55,48,32,46,32,100,101,108,115,116,114,45,97,110,100,45,102,108,97,103,54,55,49,41,0,0,0,0,0,0};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,50,32,110,50,55,53,52,41,0,0,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,49,32,115,115,55,52,51,32,110,55,52,52,41,0,0,0,0,0,0};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,40),40,115,116,114,105,110,103,45,105,110,116,101,114,115,112,101,114,115,101,32,115,116,114,115,55,51,52,32,46,32,116,109,112,55,51,51,55,51,53,41};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,13),40,102,95,51,50,51,50,32,99,55,55,57,41,0,0,0};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,15),40,105,110,115,116,114,105,110,103,32,115,55,55,55,41,0};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,105,56,49,54,32,106,56,49,55,41};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,13),40,102,95,51,52,48,49,32,99,55,57,54,41,0,0,0};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,41),40,115,116,114,105,110,103,45,116,114,97,110,115,108,97,116,101,32,115,116,114,55,55,50,32,102,114,111,109,55,55,51,32,46,32,116,111,55,55,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,115,109,97,112,56,52,55,41,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,37),40,99,111,108,108,101,99,116,32,105,56,52,50,32,102,114,111,109,56,52,51,32,116,111,116,97,108,56,52,52,32,102,115,56,52,53,41,0,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,34),40,115,116,114,105,110,103,45,116,114,97,110,115,108,97,116,101,42,32,115,116,114,56,51,56,32,115,109,97,112,56,51,57,41,0,0,0,0,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,116,111,116,97,108,56,54,54,32,112,111,115,56,54,55,41,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,27),40,115,116,114,105,110,103,45,99,104,111,112,32,115,116,114,56,54,50,32,108,101,110,56,54,51,41,0,0,0,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,33),40,115,116,114,105,110,103,45,99,104,111,109,112,32,115,116,114,56,56,52,32,46,32,116,109,112,56,56,51,56,56,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,57,48,57,32,105,57,49,51,41};
-static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,108,97,115,116,57,50,49,32,110,101,120,116,57,50,50,41,0,0};
-static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,25),40,115,111,114,116,101,100,63,32,115,101,113,57,48,48,32,108,101,115,115,63,57,48,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,120,57,52,50,32,97,57,52,51,32,121,57,52,52,32,98,57,52,53,41,0,0,0,0,0,0};
-static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,26),40,109,101,114,103,101,32,97,57,51,50,32,98,57,51,51,32,108,101,115,115,63,57,51,52,41,0,0,0,0,0,0};
-static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,114,57,53,56,32,97,57,53,57,32,98,57,54,48,41,0,0,0};
-static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,27),40,109,101,114,103,101,33,32,97,57,52,56,32,98,57,52,57,32,108,101,115,115,63,57,53,48,41,0,0,0,0,0};
-static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,11),40,115,116,101,112,32,110,57,55,48,41,0,0,0,0,0};
-static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,21),40,100,111,108,111,111,112,57,57,52,32,112,57,57,56,32,105,57,57,57,41,0,0,0};
-static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,23),40,115,111,114,116,33,32,115,101,113,57,54,55,32,108,101,115,115,63,57,54,56,41,0};
-static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,24),40,115,111,114,116,32,115,101,113,49,48,48,53,32,108,101,115,115,63,49,48,48,54,41};
-static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,97,116,49,48,50,54,41,0,0,0};
-static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,20),40,105,110,115,101,114,116,32,120,49,48,50,51,32,121,49,48,50,52,41,0,0,0,0};
-static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,97,116,49,48,51,54,41,0,0,0};
-static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,14),40,108,111,111,107,117,112,32,120,49,48,51,52,41,0,0};
-static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,13),40,103,49,48,53,53,32,118,49,48,53,55,41,0,0,0};
-static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,52,56,32,103,49,48,53,50,49,48,53,52,41,0,0,0,0};
-static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,26),40,118,105,115,105,116,32,117,49,48,52,52,32,97,100,106,45,108,105,115,116,49,48,52,53,41,0,0,0,0,0,0};
-static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,15),40,103,49,48,56,52,32,100,101,102,49,48,56,54,41,0};
-static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,55,55,32,103,49,48,56,49,49,48,56,51,41,0,0,0,0};
-static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,15),40,103,49,48,55,48,32,100,101,102,49,48,55,50,41,0};
-static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,49,53,32,103,49,48,49,57,49,48,54,57,41,0,0,0,0};
-static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,35),40,116,111,112,111,108,111,103,105,99,97,108,45,115,111,114,116,32,100,97,103,49,48,48,56,32,112,114,101,100,49,48,48,57,41,0,0,0,0,0};
-static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,112,115,49,49,48,51,32,112,101,49,49,48,52,41,0,0,0,0};
-static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,32),40,98,105,110,97,114,121,45,115,101,97,114,99,104,32,118,101,99,49,48,57,55,32,112,114,111,99,49,48,57,56,41};
-static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,12),40,109,97,107,101,45,113,117,101,117,101,41,0,0,0,0};
-static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,14),40,113,117,101,117,101,63,32,120,49,49,50,51,41,0,0};
-static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,20),40,113,117,101,117,101,45,101,109,112,116,121,63,32,113,49,49,50,53,41,0,0,0,0};
-static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,19),40,113,117,101,117,101,45,102,105,114,115,116,32,113,49,49,50,55,41,0,0,0,0,0};
-static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,18),40,113,117,101,117,101,45,108,97,115,116,32,113,49,49,51,55,41,0,0,0,0,0,0};
-static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,28),40,113,117,101,117,101,45,97,100,100,33,32,113,49,49,52,56,32,100,97,116,117,109,49,49,52,57,41,0,0,0,0};
-static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,21),40,113,117,101,117,101,45,114,101,109,111,118,101,33,32,113,49,49,54,48,41,0,0,0};
-static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,19),40,113,117,101,117,101,45,62,108,105,115,116,32,113,49,49,55,52,41,0,0,0,0,0};
-static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,20),40,100,111,108,111,111,112,49,49,55,56,32,108,115,116,49,49,56,50,41,0,0,0,0};
-static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,22),40,108,105,115,116,45,62,113,117,101,117,101,32,108,115,116,48,49,49,55,55,41,0,0};
-static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,33),40,113,117,101,117,101,45,112,117,115,104,45,98,97,99,107,33,32,113,49,49,57,50,32,105,116,101,109,49,49,57,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,50,48,55,41,0,0,0,0};
-static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,42),40,113,117,101,117,101,45,112,117,115,104,45,98,97,99,107,45,108,105,115,116,33,32,113,49,49,57,57,32,105,116,101,109,108,105,115,116,49,50,48,48,41,0,0,0,0,0,0};
-static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-C_noret_decl(C_data_structures_toplevel)
-C_externexport void C_ccall C_data_structures_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1290)
-static void C_ccall f_1290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4737)
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4747)
-static void C_ccall f_4747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4766)
-static C_word C_fcall f_4766(C_word t0);
-C_noret_decl(f_4708)
-static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4654)
-static void C_ccall f_4654(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4673)
-static void C_fcall f_4673(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4683)
-static void C_ccall f_4683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4665)
-static void C_ccall f_4665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4645)
-static void C_ccall f_4645(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4609)
-static void C_ccall f_4609(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4619)
-static void C_ccall f_4619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4577)
-static void C_ccall f_4577(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4556)
-static void C_ccall f_4556(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4566)
-static void C_ccall f_4566(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4535)
-static void C_ccall f_4535(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4545)
-static void C_ccall f_4545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4522)
-static void C_ccall f_4522(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4516)
-static void C_ccall f_4516(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4510)
-static void C_ccall f_4510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4427)
-static void C_ccall f_4427(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4505)
-static void C_ccall f_4505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4431)
-static void C_fcall f_4431(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4445)
-static void C_fcall f_4445(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4455)
-static void C_ccall f_4455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4164)
-static void C_ccall f_4164(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4391)
-static void C_fcall f_4391(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4414)
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4399)
-static void C_fcall f_4399(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4314)
-static void C_ccall f_4314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4381)
-static void C_ccall f_4381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4385)
-static void C_ccall f_4385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4317)
-static void C_ccall f_4317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4326)
-static void C_fcall f_4326(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4366)
-static void C_ccall f_4366(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4334)
-static void C_fcall f_4334(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4338)
-static void C_ccall f_4338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4320)
-static void C_ccall f_4320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4255)
-static void C_fcall f_4255(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4259)
-static void C_ccall f_4259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4268)
-static void C_fcall f_4268(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4300)
-static void C_ccall f_4300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4276)
-static void C_fcall f_4276(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4280)
-static void C_ccall f_4280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4262)
-static void C_ccall f_4262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4220)
-static void C_fcall f_4220(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4226)
-static void C_fcall f_4226(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4253)
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4239)
-static void C_ccall f_4239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4173)
-static void C_fcall f_4173(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4179)
-static void C_fcall f_4179(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4218)
-static void C_ccall f_4218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4200)
-static void C_ccall f_4200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4137)
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4162)
-static void C_ccall f_4162(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4155)
-static void C_ccall f_4155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4151)
-static void C_ccall f_4151(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4004)
-static void C_ccall f_4004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4094)
-static void C_ccall f_4094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4101)
-static void C_ccall f_4101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4103)
-static void C_fcall f_4103(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4007)
-static void C_fcall f_4007(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4058)
-static void C_ccall f_4058(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4017)
-static void C_ccall f_4017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4020)
-static void C_ccall f_4020(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4026)
-static void C_ccall f_4026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3872)
-static void C_ccall f_3872(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3954)
-static void C_ccall f_3954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3977)
-static void C_ccall f_3977(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3957)
-static void C_ccall f_3957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3875)
-static void C_fcall f_3875(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3882)
-static void C_ccall f_3882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3773)
-static void C_ccall f_3773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3807)
-static void C_fcall f_3807(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3814)
-static void C_ccall f_3814(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3862)
-static void C_ccall f_3862(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3834)
-static void C_ccall f_3834(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3664)
-static void C_ccall f_3664(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3739)
-static void C_fcall f_3739(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3767)
-static void C_ccall f_3767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3691)
-static void C_fcall f_3691(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3701)
-static void C_ccall f_3701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3612)
-static void C_ccall f_3612(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3612)
-static void C_ccall f_3612r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3616)
-static void C_ccall f_3616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3548)
-static void C_ccall f_3548(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3563)
-static void C_fcall f_3563(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3594)
-static void C_ccall f_3594(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3598)
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3583)
-static void C_ccall f_3583(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3426)
-static void C_ccall f_3426(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3438)
-static void C_fcall f_3438(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3471)
-static void C_fcall f_3471(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3536)
-static void C_ccall f_3536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3510)
-static void C_fcall f_3510(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3466)
-static void C_ccall f_3466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3452)
-static void C_ccall f_3452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3224)
-static void C_ccall f_3224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_3224)
-static void C_ccall f_3224r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_3418)
-static void C_ccall f_3418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3401)
-static void C_ccall f_3401(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3261)
-static void C_ccall f_3261(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3264)
-static void C_ccall f_3264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3276)
-static void C_ccall f_3276(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3281)
-static void C_fcall f_3281(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3300)
-static void C_ccall f_3300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3227)
-static void C_fcall f_3227(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3232)
-static void C_ccall f_3232(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3238)
-static C_word C_fcall f_3238(C_word t0,C_word t1);
-C_noret_decl(f_3109)
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3109)
-static void C_ccall f_3109r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3113)
-static void C_ccall f_3113(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3127)
-static void C_fcall f_3127(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3137)
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3142)
-static C_word C_fcall f_3142(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_2974)
-static void C_ccall f_2974(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2974)
-static void C_ccall f_2974r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3015)
-static void C_fcall f_3015(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3042)
-static void C_fcall f_3042(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3081)
-static void C_ccall f_3081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3025)
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2995)
-static void C_fcall f_2995(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3010)
-static void C_ccall f_3010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2894)
-static void C_ccall f_2894(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2894)
-static void C_ccall f_2894r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2911)
-static void C_fcall f_2911(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2906)
-static void C_fcall f_2906(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2901)
-static void C_fcall f_2901(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2896)
-static void C_fcall f_2896(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2857)
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_2867)
-static void C_fcall f_2867(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2777)
-static void C_ccall f_2777(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2777)
-static void C_ccall f_2777r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2794)
-static void C_fcall f_2794(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2789)
-static void C_fcall f_2789(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2784)
-static void C_fcall f_2784(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2779)
-static void C_fcall f_2779(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2740)
-static void C_ccall f_2740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_2750)
-static void C_fcall f_2750(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2709)
-static void C_ccall f_2709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2678)
-static void C_ccall f_2678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2650)
-static void C_ccall f_2650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2650)
-static void C_ccall f_2650r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2654)
-static void C_ccall f_2654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2622)
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2622)
-static void C_ccall f_2622r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2626)
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2613)
-static void C_ccall f_2613(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2619)
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2604)
-static void C_ccall f_2604(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2610)
-static void C_ccall f_2610(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2557)
-static void C_fcall f_2557(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2578)
-static void C_fcall f_2578(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2591)
-static void C_ccall f_2591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2512)
-static void C_ccall f_2512(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_2512)
-static void C_ccall f_2512r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_2522)
-static void C_fcall f_2522(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2551)
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2520)
-static void C_ccall f_2520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2467)
-static void C_ccall f_2467(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2504)
-static void C_ccall f_2504(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2507)
-static void C_ccall f_2507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2390)
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2393)
-static void C_fcall f_2393(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2409)
-static void C_ccall f_2409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2418)
-static void C_fcall f_2418(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2340)
-static void C_ccall f_2340(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2340)
-static void C_ccall f_2340r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2352)
-static void C_fcall f_2352(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2371)
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2216)
-static void C_ccall f_2216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2216)
-static void C_ccall f_2216r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2292)
-static void C_fcall f_2292(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2287)
-static void C_fcall f_2287(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2218)
-static void C_fcall f_2218(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2247)
-static void C_ccall f_2247(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2253)
-static void C_fcall f_2253(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2269)
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2222)
-static void C_fcall f_2222(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2225)
-static void C_ccall f_2225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2117)
-static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_2117)
-static void C_ccall f_2117r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_2121)
-static void C_ccall f_2121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2156)
-static void C_ccall f_2156(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2162)
-static void C_fcall f_2162(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2178)
-static void C_ccall f_2178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2124)
-static void C_fcall f_2124(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2127)
-static void C_ccall f_2127(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2007)
-static void C_ccall f_2007(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2073)
-static void C_fcall f_2073(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2111)
-static void C_ccall f_2111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2100)
-static void C_fcall f_2100(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2108)
-static void C_ccall f_2108(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2057)
-static void C_ccall f_2057(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2059)
-static void C_ccall f_2059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2018)
-static void C_ccall f_2018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2020)
-static void C_fcall f_2020(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2049)
-static void C_ccall f_2049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1927)
-static void C_ccall f_1927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1936)
-static void C_fcall f_1936(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1978)
-static void C_ccall f_1978(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1868)
-static void C_ccall f_1868(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1868)
-static void C_ccall f_1868r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1880)
-static void C_fcall f_1880(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1915)
-static void C_ccall f_1915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1783)
-static void C_ccall f_1783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1790)
-static void C_ccall f_1790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1798)
-static void C_fcall f_1798(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1819)
-static void C_fcall f_1819(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1833)
-static void C_ccall f_1833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1837)
-static void C_ccall f_1837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1742)
-static void C_ccall f_1742(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1742)
-static void C_ccall f_1742r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1748)
-static void C_fcall f_1748(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1781)
-static void C_ccall f_1781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1774)
-static void C_ccall f_1774(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1710)
-static void C_ccall f_1710(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1719)
-static void C_fcall f_1719(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1740)
-static void C_ccall f_1740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1677)
-static void C_ccall f_1677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1683)
-static void C_fcall f_1683(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1708)
-static void C_ccall f_1708(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1649)
-static void C_ccall f_1649(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1661)
-static C_word C_fcall f_1661(C_word t0,C_word t1);
-C_noret_decl(f_1646)
-static void C_ccall f_1646(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1620)
-static void C_ccall f_1620(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1620)
-static void C_ccall f_1620r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1624)
-static void C_ccall f_1624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1627)
-static void C_ccall f_1627(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1628)
-static void C_ccall f_1628(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1628)
-static void C_ccall f_1628r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1644)
-static void C_ccall f_1644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1640)
-static void C_ccall f_1640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1636)
-static void C_ccall f_1636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1605)
-static void C_ccall f_1605(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1605)
-static void C_ccall f_1605r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1609)
-static void C_ccall f_1609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1610)
-static void C_ccall f_1610(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1610)
-static void C_ccall f_1610r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1618)
-static void C_ccall f_1618(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1602)
-static void C_ccall f_1602(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1599)
-static void C_ccall f_1599(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1596)
-static void C_ccall f_1596(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1593)
-static void C_ccall f_1593(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1537)
-static void C_ccall f_1537(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1537)
-static void C_ccall f_1537r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1559)
-static void C_ccall f_1559(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1559)
-static void C_ccall f_1559r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1565)
-static void C_fcall f_1565(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1584)
-static void C_ccall f_1584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1545)
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1531)
-static void C_ccall f_1531(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1491)
-static void C_ccall f_1491(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1493)
-static void C_ccall f_1493(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1499)
-static void C_fcall f_1499(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1518)
-static void C_ccall f_1518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1452)
-static void C_ccall f_1452(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1452)
-static void C_ccall f_1452r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1464)
-static void C_fcall f_1464(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1478)
-static void C_ccall f_1478(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1486)
-static void C_ccall f_1486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1489)
-static void C_ccall f_1489(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1416)
-static void C_ccall f_1416(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1416)
-static void C_ccall f_1416r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1419)
-static void C_ccall f_1419(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1419)
-static void C_ccall f_1419r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1427)
-static void C_ccall f_1427(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1427)
-static void C_ccall f_1427r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1433)
-static void C_ccall f_1433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1441)
-static void C_ccall f_1441(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1404)
-static void C_ccall f_1404(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1406)
-static void C_ccall f_1406(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1406)
-static void C_ccall f_1406r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1414)
-static void C_ccall f_1414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1396)
-static void C_ccall f_1396(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1398)
-static void C_ccall f_1398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1373)
-static void C_ccall f_1373(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1373)
-static void C_ccall f_1373r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1386)
-static void C_ccall f_1386(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1384)
-static void C_ccall f_1384(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1336)
-static void C_ccall f_1336(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1336)
-static void C_ccall f_1336r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1338)
-static void C_ccall f_1338(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1344)
-static void C_fcall f_1344(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1357)
-static void C_ccall f_1357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1303)
-static void C_ccall f_1303(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1303)
-static void C_ccall f_1303r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1305)
-static void C_ccall f_1305(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1311)
-static void C_fcall f_1311(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1327)
-static void C_ccall f_1327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1295)
-static void C_ccall f_1295(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1297)
-static void C_ccall f_1297(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1297)
-static void C_ccall f_1297r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1292)
-static void C_ccall f_1292(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-
-C_noret_decl(trf_4673)
-static void C_fcall trf_4673(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4673(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4673(t0,t1,t2);}
-
-C_noret_decl(trf_4431)
-static void C_fcall trf_4431(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4431(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4431(t0,t1);}
-
-C_noret_decl(trf_4445)
-static void C_fcall trf_4445(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4445(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4445(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4391)
-static void C_fcall trf_4391(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4391(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4391(t0,t1,t2);}
-
-C_noret_decl(trf_4399)
-static void C_fcall trf_4399(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4399(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4399(t0,t1,t2);}
-
-C_noret_decl(trf_4326)
-static void C_fcall trf_4326(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4326(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4326(t0,t1,t2);}
-
-C_noret_decl(trf_4334)
-static void C_fcall trf_4334(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4334(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4334(t0,t1,t2);}
-
-C_noret_decl(trf_4255)
-static void C_fcall trf_4255(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4255(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4255(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4268)
-static void C_fcall trf_4268(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4268(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4268(t0,t1,t2);}
-
-C_noret_decl(trf_4276)
-static void C_fcall trf_4276(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4276(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4276(t0,t1,t2);}
-
-C_noret_decl(trf_4220)
-static void C_fcall trf_4220(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4220(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4220(t0,t1,t2);}
-
-C_noret_decl(trf_4226)
-static void C_fcall trf_4226(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4226(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4226(t0,t1,t2);}
-
-C_noret_decl(trf_4173)
-static void C_fcall trf_4173(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4173(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4173(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4179)
-static void C_fcall trf_4179(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4179(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4179(t0,t1,t2);}
-
-C_noret_decl(trf_4103)
-static void C_fcall trf_4103(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4103(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4103(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4007)
-static void C_fcall trf_4007(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4007(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4007(t0,t1,t2);}
-
-C_noret_decl(trf_3875)
-static void C_fcall trf_3875(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3875(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_3875(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_3807)
-static void C_fcall trf_3807(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3807(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_3807(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_3739)
-static void C_fcall trf_3739(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3739(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3739(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3691)
-static void C_fcall trf_3691(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3691(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3691(t0,t1,t2);}
-
-C_noret_decl(trf_3563)
-static void C_fcall trf_3563(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3563(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3563(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3438)
-static void C_fcall trf_3438(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3438(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_3438(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_3471)
-static void C_fcall trf_3471(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3471(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3471(t0,t1,t2);}
-
-C_noret_decl(trf_3510)
-static void C_fcall trf_3510(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3510(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3510(t0,t1);}
-
-C_noret_decl(trf_3281)
-static void C_fcall trf_3281(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3281(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3281(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3227)
-static void C_fcall trf_3227(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3227(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3227(t0,t1);}
-
-C_noret_decl(trf_3127)
-static void C_fcall trf_3127(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3127(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3127(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3015)
-static void C_fcall trf_3015(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3015(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_3015(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_3042)
-static void C_fcall trf_3042(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3042(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3042(t0,t1,t2);}
-
-C_noret_decl(trf_2995)
-static void C_fcall trf_2995(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2995(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2995(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2911)
-static void C_fcall trf_2911(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2911(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2911(t0,t1);}
-
-C_noret_decl(trf_2906)
-static void C_fcall trf_2906(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2906(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2906(t0,t1,t2);}
-
-C_noret_decl(trf_2901)
-static void C_fcall trf_2901(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2901(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2901(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2896)
-static void C_fcall trf_2896(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2896(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2896(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2867)
-static void C_fcall trf_2867(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2867(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2867(t0,t1);}
-
-C_noret_decl(trf_2794)
-static void C_fcall trf_2794(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2794(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2794(t0,t1);}
-
-C_noret_decl(trf_2789)
-static void C_fcall trf_2789(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2789(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2789(t0,t1,t2);}
-
-C_noret_decl(trf_2784)
-static void C_fcall trf_2784(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2784(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2784(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2779)
-static void C_fcall trf_2779(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2779(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2779(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2750)
-static void C_fcall trf_2750(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2750(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2750(t0,t1);}
-
-C_noret_decl(trf_2557)
-static void C_fcall trf_2557(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2557(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2557(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2578)
-static void C_fcall trf_2578(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2578(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2578(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2522)
-static void C_fcall trf_2522(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2522(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2522(t0,t1,t2);}
-
-C_noret_decl(trf_2393)
-static void C_fcall trf_2393(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2393(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2393(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2418)
-static void C_fcall trf_2418(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2418(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2418(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2352)
-static void C_fcall trf_2352(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2352(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2352(t0,t1,t2);}
-
-C_noret_decl(trf_2292)
-static void C_fcall trf_2292(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2292(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2292(t0,t1);}
-
-C_noret_decl(trf_2287)
-static void C_fcall trf_2287(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2287(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2287(t0,t1,t2);}
-
-C_noret_decl(trf_2218)
-static void C_fcall trf_2218(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2218(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2218(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2253)
-static void C_fcall trf_2253(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2253(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2253(t0,t1,t2);}
-
-C_noret_decl(trf_2222)
-static void C_fcall trf_2222(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2222(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2222(t0,t1);}
-
-C_noret_decl(trf_2162)
-static void C_fcall trf_2162(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2162(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2162(t0,t1,t2);}
-
-C_noret_decl(trf_2124)
-static void C_fcall trf_2124(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2124(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2124(t0,t1);}
-
-C_noret_decl(trf_2073)
-static void C_fcall trf_2073(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2073(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2073(t0,t1,t2);}
-
-C_noret_decl(trf_2100)
-static void C_fcall trf_2100(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2100(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2100(t0,t1,t2);}
-
-C_noret_decl(trf_2020)
-static void C_fcall trf_2020(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2020(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2020(t0,t1,t2);}
-
-C_noret_decl(trf_1936)
-static void C_fcall trf_1936(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1936(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1936(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1880)
-static void C_fcall trf_1880(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1880(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1880(t0,t1,t2);}
-
-C_noret_decl(trf_1798)
-static void C_fcall trf_1798(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1798(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1798(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1819)
-static void C_fcall trf_1819(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1819(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1819(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1748)
-static void C_fcall trf_1748(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1748(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1748(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1719)
-static void C_fcall trf_1719(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1719(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1719(t0,t1,t2);}
-
-C_noret_decl(trf_1683)
-static void C_fcall trf_1683(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1683(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1683(t0,t1,t2);}
-
-C_noret_decl(trf_1565)
-static void C_fcall trf_1565(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1565(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1565(t0,t1,t2);}
-
-C_noret_decl(trf_1499)
-static void C_fcall trf_1499(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1499(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1499(t0,t1,t2);}
-
-C_noret_decl(trf_1464)
-static void C_fcall trf_1464(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1464(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1464(t0,t1,t2);}
-
-C_noret_decl(trf_1344)
-static void C_fcall trf_1344(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1344(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1344(t0,t1,t2);}
-
-C_noret_decl(trf_1311)
-static void C_fcall trf_1311(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1311(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1311(t0,t1,t2);}
-
-C_noret_decl(tr7)
-static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
-C_regparm static void C_fcall tr7(C_proc7 k){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-(k)(7,t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr5r)
-static void C_fcall tr5r(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5r(C_proc5 k){
-int n;
-C_word *a,t5;
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t5=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-C_noret_decl(tr2rv)
-static void C_fcall tr2rv(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2rv(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n+1);
-t2=C_restore_rest_vector(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr4rv)
-static void C_fcall tr4rv(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4rv(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n+1);
-t4=C_restore_rest_vector(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3rv)
-static void C_fcall tr3rv(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3rv(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n+1);
-t3=C_restore_rest_vector(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_data_structures_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("data_structures_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(1040)){
-C_save(t1);
-C_rereclaim2(1040*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,116);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],8,"identity");
-lf[3]=C_h_intern(&lf[3],7,"project");
-lf[4]=C_h_intern(&lf[4],7,"conjoin");
-lf[5]=C_h_intern(&lf[5],7,"disjoin");
-lf[6]=C_h_intern(&lf[6],10,"constantly");
-lf[7]=C_h_intern(&lf[7],4,"flip");
-lf[8]=C_h_intern(&lf[8],10,"complement");
-lf[9]=C_h_intern(&lf[9],7,"compose");
-lf[10]=C_h_intern(&lf[10],6,"values");
-lf[11]=C_h_intern(&lf[11],1,"o");
-lf[12]=C_h_intern(&lf[12],8,"list-of\077");
-lf[13]=C_h_intern(&lf[13],4,"noop");
-lf[14]=C_h_intern(&lf[14],19,"\003sysundefined-value");
-lf[15]=C_h_intern(&lf[15],4,"each");
-lf[16]=C_h_intern(&lf[16],4,"any\077");
-lf[17]=C_h_intern(&lf[17],5,"none\077");
-lf[18]=C_h_intern(&lf[18],7,"always\077");
-lf[19]=C_h_intern(&lf[19],6,"never\077");
-lf[20]=C_h_intern(&lf[20],12,"left-section");
-lf[21]=C_h_intern(&lf[21],10,"\003sysappend");
-lf[22]=C_h_intern(&lf[22],17,"\003syscheck-closure");
-lf[23]=C_h_intern(&lf[23],7,"reverse");
-lf[24]=C_h_intern(&lf[24],13,"right-section");
-lf[25]=C_h_intern(&lf[25],5,"atom\077");
-lf[26]=C_h_intern(&lf[26],5,"tail\077");
-lf[27]=C_h_intern(&lf[27],11,"intersperse");
-lf[28]=C_h_intern(&lf[28],7,"butlast");
-lf[29]=C_h_intern(&lf[29],7,"flatten");
-lf[30]=C_h_intern(&lf[30],4,"chop");
-lf[31]=C_h_intern(&lf[31],9,"\003syserror");
-lf[32]=C_decode_literal(C_heaptop,"\376B\000\000\030invalid numeric argument");
-lf[33]=C_h_intern(&lf[33],4,"join");
-lf[34]=C_h_intern(&lf[34],27,"\003syserror-not-a-proper-list");
-lf[35]=C_h_intern(&lf[35],8,"compress");
-lf[36]=C_decode_literal(C_heaptop,"\376B\000\000%bad argument type - not a proper list");
-lf[37]=C_h_intern(&lf[37],15,"\003syssignal-hook");
-lf[38]=C_h_intern(&lf[38],11,"\000type-error");
-lf[39]=C_h_intern(&lf[39],7,"shuffle");
-lf[40]=C_h_intern(&lf[40],3,"cdr");
-lf[41]=C_h_intern(&lf[41],5,"sort!");
-lf[42]=C_h_intern(&lf[42],13,"alist-update!");
-lf[43]=C_h_intern(&lf[43],3,"eq\077");
-lf[44]=C_h_intern(&lf[44],4,"assq");
-lf[45]=C_h_intern(&lf[45],4,"eqv\077");
-lf[46]=C_h_intern(&lf[46],4,"assv");
-lf[47]=C_h_intern(&lf[47],6,"equal\077");
-lf[48]=C_h_intern(&lf[48],5,"assoc");
-lf[49]=C_h_intern(&lf[49],9,"alist-ref");
-lf[50]=C_h_intern(&lf[50],6,"rassoc");
-lf[51]=C_h_intern(&lf[51],21,"reverse-string-append");
-lf[52]=C_h_intern(&lf[52],11,"make-string");
-lf[53]=C_h_intern(&lf[53],18,"open-output-string");
-lf[54]=C_h_intern(&lf[54],7,"display");
-lf[55]=C_h_intern(&lf[55],6,"string");
-lf[56]=C_h_intern(&lf[56],17,"get-output-string");
-lf[57]=C_h_intern(&lf[57],8,"->string");
-lf[58]=C_h_intern(&lf[58],14,"symbol->string");
-lf[59]=C_h_intern(&lf[59],18,"\003sysnumber->string");
-lf[60]=C_h_intern(&lf[60],13,"string-append");
-lf[61]=C_h_intern(&lf[61],4,"conc");
-lf[62]=C_h_intern(&lf[62],19,"\003syssubstring-index");
-lf[63]=C_h_intern(&lf[63],15,"substring-index");
-lf[64]=C_h_intern(&lf[64],22,"\003syssubstring-index-ci");
-lf[65]=C_h_intern(&lf[65],18,"substring-index-ci");
-lf[66]=C_h_intern(&lf[66],15,"string-compare3");
-lf[67]=C_h_intern(&lf[67],18,"string-compare3-ci");
-lf[68]=C_h_intern(&lf[68],15,"\003syssubstring=\077");
-lf[69]=C_h_intern(&lf[69],11,"substring=\077");
-lf[70]=C_h_intern(&lf[70],18,"\003syssubstring-ci=\077");
-lf[71]=C_h_intern(&lf[71],14,"substring-ci=\077");
-lf[72]=C_h_intern(&lf[72],12,"string-split");
-lf[73]=C_decode_literal(C_heaptop,"\376B\000\000\003\011\012 ");
-lf[74]=C_h_intern(&lf[74],13,"\003syssubstring");
-lf[75]=C_h_intern(&lf[75],18,"string-intersperse");
-lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[77]=C_h_intern(&lf[77],19,"\003sysallocate-vector");
-lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[79]=C_h_intern(&lf[79],12,"list->string");
-lf[80]=C_h_intern(&lf[80],16,"string-translate");
-lf[81]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid translation destination");
-lf[82]=C_h_intern(&lf[82],17,"string-translate*");
-lf[83]=C_h_intern(&lf[83],21,"\003sysfragments->string");
-lf[84]=C_h_intern(&lf[84],11,"string-chop");
-lf[85]=C_h_intern(&lf[85],12,"string-chomp");
-lf[86]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[87]=C_h_intern(&lf[87],7,"sorted\077");
-lf[88]=C_h_intern(&lf[88],5,"merge");
-lf[89]=C_h_intern(&lf[89],6,"merge!");
-lf[90]=C_h_intern(&lf[90],12,"vector->list");
-lf[91]=C_h_intern(&lf[91],4,"sort");
-lf[92]=C_h_intern(&lf[92],12,"list->vector");
-lf[93]=C_h_intern(&lf[93],6,"append");
-lf[94]=C_h_intern(&lf[94],16,"topological-sort");
-lf[95]=C_h_intern(&lf[95],4,"caar");
-lf[96]=C_h_intern(&lf[96],4,"cdar");
-lf[97]=C_h_intern(&lf[97],7,"colored");
-lf[98]=C_h_intern(&lf[98],13,"binary-search");
-lf[99]=C_h_intern(&lf[99],10,"make-queue");
-lf[100]=C_h_intern(&lf[100],5,"queue");
-lf[101]=C_h_intern(&lf[101],6,"queue\077");
-lf[102]=C_h_intern(&lf[102],12,"queue-empty\077");
-lf[103]=C_h_intern(&lf[103],11,"queue-first");
-lf[104]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
-lf[105]=C_h_intern(&lf[105],10,"queue-last");
-lf[106]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
-lf[107]=C_h_intern(&lf[107],10,"queue-add!");
-lf[108]=C_h_intern(&lf[108],13,"queue-remove!");
-lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
-lf[110]=C_h_intern(&lf[110],11,"queue->list");
-lf[111]=C_h_intern(&lf[111],11,"list->queue");
-lf[112]=C_h_intern(&lf[112],16,"queue-push-back!");
-lf[113]=C_h_intern(&lf[113],21,"queue-push-back-list!");
-lf[114]=C_h_intern(&lf[114],17,"register-feature!");
-lf[115]=C_h_intern(&lf[115],15,"data-structures");
-C_register_lf2(lf,116,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c326 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1290,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* data-structures.scm: 72 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[114]+1)))(3,*((C_word*)lf[114]+1),t3,lf[115]);}
-
-/* k1288 */
-static void C_ccall f_1290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word ab[216],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1290,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! identity ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1292,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate((C_word*)lf[3]+1 /* (set! project ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1295,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[4]+1 /* (set! conjoin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1303,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[5]+1 /* (set! disjoin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1336,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[6]+1 /* (set! constantly ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1373,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[7]+1 /* (set! flip ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1396,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[8]+1 /* (set! complement ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1404,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[9]+1 /* (set! compose ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1416,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[11]+1 /* (set! o ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1452,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[12]+1 /* (set! list-of? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1491,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[13]+1 /* (set! noop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1531,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[15]+1 /* (set! each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1537,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[16]+1 /* (set! any? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1593,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[17]+1 /* (set! none? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1596,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[18]+1 /* (set! always? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1599,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[19]+1 /* (set! never? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1602,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[20]+1 /* (set! left-section ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1605,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
-t19=*((C_word*)lf[23]+1);
-t20=C_mutate((C_word*)lf[24]+1 /* (set! right-section ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1620,a[2]=t19,a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp));
-t21=C_mutate((C_word*)lf[25]+1 /* (set! atom? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1646,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[26]+1 /* (set! tail? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1649,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
-t23=C_mutate((C_word*)lf[27]+1 /* (set! intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1677,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
-t24=C_mutate((C_word*)lf[28]+1 /* (set! butlast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1710,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
-t25=C_mutate((C_word*)lf[29]+1 /* (set! flatten ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1742,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
-t26=*((C_word*)lf[23]+1);
-t27=C_mutate((C_word*)lf[30]+1 /* (set! chop ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1783,a[2]=t26,a[3]=((C_word)li50),tmp=(C_word)a,a+=4,tmp));
-t28=C_mutate((C_word*)lf[33]+1 /* (set! join ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1868,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
-t29=C_mutate((C_word*)lf[35]+1 /* (set! compress ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1927,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
-t30=C_mutate((C_word*)lf[39]+1 /* (set! shuffle ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2007,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp));
-t31=C_mutate((C_word*)lf[42]+1 /* (set! alist-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2117,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
-t32=C_mutate((C_word*)lf[49]+1 /* (set! alist-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2216,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
-t33=C_mutate((C_word*)lf[50]+1 /* (set! rassoc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2340,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp));
-t34=C_mutate((C_word*)lf[51]+1 /* (set! reverse-string-append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2390,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp));
-t35=*((C_word*)lf[53]+1);
-t36=*((C_word*)lf[54]+1);
-t37=*((C_word*)lf[55]+1);
-t38=*((C_word*)lf[56]+1);
-t39=C_mutate((C_word*)lf[57]+1 /* (set! ->string ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2467,a[2]=t35,a[3]=t36,a[4]=t38,a[5]=t37,a[6]=((C_word)li74),tmp=(C_word)a,a+=7,tmp));
-t40=*((C_word*)lf[60]+1);
-t41=C_mutate((C_word*)lf[61]+1 /* (set! conc ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2512,a[2]=t40,a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp));
-t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2557,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp);
-t43=C_mutate((C_word*)lf[62]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2604,a[2]=t42,a[3]=((C_word)li80),tmp=(C_word)a,a+=4,tmp));
-t44=C_mutate((C_word*)lf[64]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2613,a[2]=t42,a[3]=((C_word)li82),tmp=(C_word)a,a+=4,tmp));
-t45=C_mutate((C_word*)lf[63]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2622,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
-t46=C_mutate((C_word*)lf[65]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2650,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
-t47=C_mutate((C_word*)lf[66]+1 /* (set! string-compare3 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2678,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp));
-t48=C_mutate((C_word*)lf[67]+1 /* (set! string-compare3-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2709,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp));
-t49=C_mutate((C_word*)lf[68]+1 /* (set! substring=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2740,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp));
-t50=C_mutate((C_word*)lf[69]+1 /* (set! substring=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2777,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp));
-t51=C_mutate((C_word*)lf[70]+1 /* (set! substring-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2857,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
-t52=C_mutate((C_word*)lf[71]+1 /* (set! substring-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2894,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
-t53=C_mutate((C_word*)lf[72]+1 /* (set! string-split ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2974,a[2]=((C_word)li102),tmp=(C_word)a,a+=3,tmp));
-t54=C_mutate((C_word*)lf[75]+1 /* (set! string-intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3109,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp));
-t55=*((C_word*)lf[52]+1);
-t56=*((C_word*)lf[79]+1);
-t57=C_mutate((C_word*)lf[80]+1 /* (set! string-translate ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3224,a[2]=t56,a[3]=t55,a[4]=((C_word)li111),tmp=(C_word)a,a+=5,tmp));
-t58=C_mutate((C_word*)lf[82]+1 /* (set! string-translate* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3426,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
-t59=C_mutate((C_word*)lf[84]+1 /* (set! string-chop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3548,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
-t60=C_mutate((C_word*)lf[85]+1 /* (set! string-chomp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3612,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
-t61=C_mutate((C_word*)lf[87]+1 /* (set! sorted? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3664,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp));
-t62=C_mutate((C_word*)lf[88]+1 /* (set! merge ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3773,a[2]=((C_word)li122),tmp=(C_word)a,a+=3,tmp));
-t63=C_mutate((C_word*)lf[89]+1 /* (set! merge! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3872,a[2]=((C_word)li124),tmp=(C_word)a,a+=3,tmp));
-t64=C_mutate((C_word*)lf[41]+1 /* (set! sort! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4004,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp));
-t65=C_mutate((C_word*)lf[91]+1 /* (set! sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4137,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp));
-t66=C_mutate((C_word*)lf[94]+1 /* (set! topological-sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4164,a[2]=((C_word)li140),tmp=(C_word)a,a+=3,tmp));
-t67=*((C_word*)lf[92]+1);
-t68=C_mutate((C_word*)lf[98]+1 /* (set! binary-search ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4427,a[2]=t67,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
-t69=C_mutate((C_word*)lf[99]+1 /* (set! make-queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4510,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp));
-t70=C_mutate((C_word*)lf[101]+1 /* (set! queue? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4516,a[2]=((C_word)li144),tmp=(C_word)a,a+=3,tmp));
-t71=C_mutate((C_word*)lf[102]+1 /* (set! queue-empty? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4522,a[2]=((C_word)li145),tmp=(C_word)a,a+=3,tmp));
-t72=C_mutate((C_word*)lf[103]+1 /* (set! queue-first ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4535,a[2]=((C_word)li146),tmp=(C_word)a,a+=3,tmp));
-t73=C_mutate((C_word*)lf[105]+1 /* (set! queue-last ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4556,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp));
-t74=C_mutate((C_word*)lf[107]+1 /* (set! queue-add! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4577,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp));
-t75=C_mutate((C_word*)lf[108]+1 /* (set! queue-remove! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4609,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp));
-t76=C_mutate((C_word*)lf[110]+1 /* (set! queue->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4645,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp));
-t77=C_mutate((C_word*)lf[111]+1 /* (set! list->queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4654,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp));
-t78=C_mutate((C_word*)lf[112]+1 /* (set! queue-push-back! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4708,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp));
-t79=C_mutate((C_word*)lf[113]+1 /* (set! queue-push-back-list! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4737,a[2]=((C_word)li155),tmp=(C_word)a,a+=3,tmp));
-t80=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t80+1)))(2,t80,C_SCHEME_UNDEFINED);}
-
-/* queue-push-back-list! in k1288 */
-static void C_ccall f_4737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4737,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[113]);
-t5=(C_word)C_i_check_list_2(t3,lf[113]);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4747,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t7=(C_word)C_slot(t2,C_fix(1));
-/* data-structures.scm: 952 append */
-t8=*((C_word*)lf[93]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t3,t7);}
-
-/* k4745 in queue-push-back-list! in k1288 */
-static void C_ccall f_4747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4747,2,t0,t1);}
-t2=(C_word)C_eqp(t1,C_SCHEME_END_OF_LIST);
-if(C_truep(t2)){
-t3=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t1);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(2),C_SCHEME_END_OF_LIST));}
-else{
-t3=t1;
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4766,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
-t5=f_4766(t3);
-t6=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t1);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(2),t5));}}
-
-/* doloop1207 in k4745 in queue-push-back-list! in k1288 */
-static C_word C_fcall f_4766(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-t2=(C_word)C_slot(t1,C_fix(1));
-t3=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=t1;
-return(t4);}
-else{
-t4=(C_word)C_slot(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}}
-
-/* queue-push-back! in k1288 */
-static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4708,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[112]);
-t5=(C_word)C_slot(t2,C_fix(1));
-t6=(C_word)C_a_i_cons(&a,2,t3,t5);
-t7=(C_word)C_i_setslot(t2,C_fix(1),t6);
-t8=(C_word)C_slot(t2,C_fix(2));
-t9=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t8);
-if(C_truep(t9)){
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_i_setslot(t2,C_fix(2),t6));}
-else{
-t10=C_SCHEME_UNDEFINED;
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,t10);}}
-
-/* list->queue in k1288 */
-static void C_ccall f_4654(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4654,3,t0,t1,t2);}
-t3=(C_word)C_i_check_list_2(t2,lf[111]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4665,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,3,lf[100],t2,C_SCHEME_END_OF_LIST));}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4673,a[2]=t2,a[3]=t7,a[4]=((C_word)li151),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_4673(t9,t4,t2);}}
-
-/* doloop1178 in list->queue in k1288 */
-static void C_fcall f_4673(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4673,NULL,3,t0,t1,t2);}
-t3=(C_word)C_slot(t2,C_fix(1));
-t4=(C_word)C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=t2;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4683,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t6=(C_word)C_i_not((C_word)C_blockp(t2));
-t7=(C_truep(t6)?t6:(C_word)C_i_not((C_word)C_pairp(t2)));
-if(C_truep(t7)){
-/* data-structures.scm: 928 ##sys#error-not-a-proper-list */
-t8=*((C_word*)lf[34]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,((C_word*)t0)[2],lf[111]);}
-else{
-t8=(C_word)C_slot(t2,C_fix(1));
-t11=t1;
-t12=t8;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* k4681 in doloop1178 in list->queue in k1288 */
-static void C_ccall f_4683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4673(t3,((C_word*)t0)[2],t2);}
-
-/* k4663 in list->queue in k1288 */
-static void C_ccall f_4665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4665,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[100],((C_word*)t0)[2],t1));}
-
-/* queue->list in k1288 */
-static void C_ccall f_4645(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4645,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[110]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(t2,C_fix(1)));}
-
-/* queue-remove! in k1288 */
-static void C_ccall f_4609(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4609,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[108]);
-t4=(C_word)C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4619,a[2]=t1,a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
-if(C_truep(t6)){
-/* data-structures.scm: 906 ##sys#error */
-t7=*((C_word*)lf[31]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[108],lf[109],t2);}
-else{
-t7=t5;
-f_4619(2,t7,C_SCHEME_UNDEFINED);}}
-
-/* k4617 in queue-remove! in k1288 */
-static void C_ccall f_4619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t2);
-t4=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t2);
-if(C_truep(t4)){
-t5=(C_word)C_i_set_i_slot(((C_word*)t0)[3],C_fix(2),C_SCHEME_END_OF_LIST);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_slot(((C_word*)t0)[4],C_fix(0)));}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_slot(((C_word*)t0)[4],C_fix(0)));}}
-
-/* queue-add! in k1288 */
-static void C_ccall f_4577(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4577,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[107]);
-t5=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_slot(t2,C_fix(1));
-t7=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t6);
-if(C_truep(t7)){
-t8=(C_word)C_i_setslot(t2,C_fix(1),t5);
-t9=(C_word)C_i_setslot(t2,C_fix(2),t5);
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-else{
-t8=(C_word)C_slot(t2,C_fix(2));
-t9=(C_word)C_i_setslot(t8,C_fix(1),t5);
-t10=(C_word)C_i_setslot(t2,C_fix(2),t5);
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_UNDEFINED);}}
-
-/* queue-last in k1288 */
-static void C_ccall f_4556(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4556,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[105]);
-t4=(C_word)C_slot(t2,C_fix(2));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4566,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
-if(C_truep(t6)){
-/* data-structures.scm: 887 ##sys#error */
-t7=*((C_word*)lf[31]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[105],lf[106],t2);}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
-
-/* k4564 in queue-last in k1288 */
-static void C_ccall f_4566(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_slot(((C_word*)t0)[2],C_fix(0)));}
-
-/* queue-first in k1288 */
-static void C_ccall f_4535(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4535,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[103]);
-t4=(C_word)C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4545,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
-if(C_truep(t6)){
-/* data-structures.scm: 876 ##sys#error */
-t7=*((C_word*)lf[31]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[103],lf[104],t2);}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
-
-/* k4543 in queue-first in k1288 */
-static void C_ccall f_4545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_slot(((C_word*)t0)[2],C_fix(0)));}
-
-/* queue-empty? in k1288 */
-static void C_ccall f_4522(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4522,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[102]);
-t4=(C_word)C_slot(t2,C_fix(1));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4));}
-
-/* queue? in k1288 */
-static void C_ccall f_4516(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4516,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[100]));}
-
-/* make-queue in k1288 */
-static void C_ccall f_4510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4510,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[100],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
-
-/* binary-search in k1288 */
-static void C_ccall f_4427(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4427,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4431,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)t4)[1]))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4505,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 833 list->vector */
-t7=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,((C_word*)t4)[1]);}
-else{
-t6=t5;
-f_4431(t6,(C_word)C_i_check_vector_2(((C_word*)t4)[1],lf[98]));}}
-
-/* k4503 in binary-search in k1288 */
-static void C_ccall f_4505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_4431(t3,t2);}
-
-/* k4429 in binary-search in k1288 */
-static void C_fcall f_4431(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4431,NULL,2,t0,t1);}
-t2=(C_word)C_block_size(((C_word*)((C_word*)t0)[4])[1]);
-if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4445,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li141),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_4445(t6,((C_word*)t0)[2],C_fix(0),t2);}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* loop in k4429 in binary-search in k1288 */
-static void C_fcall f_4445(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4445,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_fixnum_difference(t3,t2);
-t5=(C_word)C_fixnum_divide(t4,C_fix(2));
-t6=(C_word)C_fixnum_plus(t2,t5);
-t7=(C_word)C_slot(((C_word*)((C_word*)t0)[4])[1],t6);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4455,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t6,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* data-structures.scm: 841 proc */
-t9=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t9))(3,t9,t8,t7);}
-
-/* k4453 in loop in k4429 in binary-search in k1288 */
-static void C_ccall f_4455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_word)C_eqp(t1,C_fix(0));
-if(C_truep(t2)){
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[5]);}
-else{
-if(C_truep((C_word)C_fixnum_lessp(t1,C_fix(0)))){
-t3=(C_word)C_eqp(((C_word*)t0)[4],((C_word*)t0)[5]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-/* data-structures.scm: 843 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4445(t4,((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[5]);}}
-else{
-t3=(C_word)C_eqp(((C_word*)t0)[2],((C_word*)t0)[5]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-/* data-structures.scm: 844 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4445(t4,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}}}}
-
-/* topological-sort in k1288 */
-static void C_ccall f_4164(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[41],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4164,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4173,a[2]=t3,a[3]=t5,a[4]=((C_word)li130),tmp=(C_word)a,a+=5,tmp));
-t15=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4220,a[2]=t5,a[3]=t3,a[4]=((C_word)li132),tmp=(C_word)a,a+=5,tmp));
-t16=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4255,a[2]=t9,a[3]=t11,a[4]=t13,a[5]=t7,a[6]=((C_word)li135),tmp=(C_word)a,a+=7,tmp));
-t17=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4314,a[2]=t11,a[3]=t13,a[4]=t2,a[5]=t1,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
-t18=(C_word)C_i_cdr(t2);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4391,a[2]=t20,a[3]=t9,a[4]=((C_word)li139),tmp=(C_word)a,a+=5,tmp));
-t22=((C_word*)t20)[1];
-f_4391(t22,t17,t18);}}
-
-/* loop1015 in topological-sort in k1288 */
-static void C_fcall f_4391(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4391,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4399,a[2]=((C_word*)t0)[3],a[3]=((C_word)li138),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4414,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g10701071 */
-t6=t3;
-f_4399(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4412 in loop1015 in topological-sort in k1288 */
-static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4391(t3,((C_word*)t0)[2],t2);}
-
-/* g1070 in loop1015 in topological-sort in k1288 */
-static void C_fcall f_4399(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4399,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-/* data-structures.scm: 815 insert */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_4173(t5,t1,t3,t4);}
-
-/* k4312 in topological-sort in k1288 */
-static void C_ccall f_4314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4381,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 818 caar */
-t4=*((C_word*)lf[95]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-
-/* k4379 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4381,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4385,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 818 cdar */
-t3=*((C_word*)lf[96]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k4383 in k4379 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 818 visit */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_4255(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k4315 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4317,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4320,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4326,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li137),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_4326(t7,t2,t3);}
-
-/* loop1077 in k4315 in k4312 in topological-sort in k1288 */
-static void C_fcall f_4326(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4326,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4334,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li136),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4366,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g10841085 */
-t6=t3;
-f_4334(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4364 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4366(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4326(t3,((C_word*)t0)[2],t2);}
-
-/* g1084 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
-static void C_fcall f_4334(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4334,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4338,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_car(t2);
-/* data-structures.scm: 820 lookup */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_4220(t5,t3,t4);}
-
-/* k4336 in g1084 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=(C_word)C_eqp(t1,lf[97]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 822 visit */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_4255(t5,((C_word*)t0)[4],t3,t4);}}
-
-/* k4318 in k4315 in k4312 in topological-sort in k1288 */
-static void C_ccall f_4320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* visit in topological-sort in k1288 */
-static void C_fcall f_4255(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4255,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4259,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* data-structures.scm: 803 insert */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_4173(t5,t4,t2,lf[97]);}
-
-/* k4257 in visit in topological-sort in k1288 */
-static void C_ccall f_4259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4259,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4262,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4268,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li134),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_4268(t6,t2,((C_word*)t0)[2]);}
-
-/* loop1048 in k4257 in visit in topological-sort in k1288 */
-static void C_fcall f_4268(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4268,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li133),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4300,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g10551056 */
-t6=t3;
-f_4276(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4298 in loop1048 in k4257 in visit in topological-sort in k1288 */
-static void C_ccall f_4300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4268(t3,((C_word*)t0)[2],t2);}
-
-/* g1055 in loop1048 in k4257 in visit in topological-sort in k1288 */
-static void C_fcall f_4276(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4276,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4280,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 806 lookup */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_4220(t4,t3,t2);}
-
-/* k4278 in g1055 in loop1048 in k4257 in visit in topological-sort in k1288 */
-static void C_ccall f_4280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_word)C_eqp(t1,lf[97]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-if(C_truep(t1)){
-t3=t1;
-/* data-structures.scm: 808 visit */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4255(t4,((C_word*)t0)[4],((C_word*)t0)[2],t3);}
-else{
-/* data-structures.scm: 808 visit */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_4255(t3,((C_word*)t0)[4],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}}
-
-/* k4260 in k4257 in visit in topological-sort in k1288 */
-static void C_ccall f_4262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4262,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* lookup in topological-sort in k1288 */
-static void C_fcall f_4220(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4220,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4226,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word)li131),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_4226(t6,t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* loop in lookup in topological-sort in k1288 */
-static void C_fcall f_4226(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4226,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4239,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4253,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 798 caar */
-t5=*((C_word*)lf[95]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k4251 in loop in lookup in topological-sort in k1288 */
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 798 pred */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k4237 in loop in lookup in topological-sort in k1288 */
-static void C_ccall f_4239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* data-structures.scm: 798 cdar */
-t2=*((C_word*)lf[96]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 799 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_4226(t3,((C_word*)t0)[4],t2);}}
-
-/* insert in topological-sort in k1288 */
-static void C_fcall f_4173(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4173,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4179,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word)li129),tmp=(C_word)a,a+=8,tmp));
-t7=((C_word*)t5)[1];
-f_4179(t7,t1,((C_word*)((C_word*)t0)[3])[1]);}
-
-/* loop in insert in topological-sort in k1288 */
-static void C_fcall f_4179(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4179,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)((C_word*)t0)[4])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[4])+1,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4200,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4218,a[2]=((C_word*)t0)[6],a[3]=t3,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 792 caar */
-t5=*((C_word*)lf[95]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k4216 in loop in insert in topological-sort in k1288 */
-static void C_ccall f_4218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 792 pred */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k4198 in loop in insert in topological-sort in k1288 */
-static void C_ccall f_4200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_set_cdr(t2,((C_word*)t0)[3]));}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* data-structures.scm: 793 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_4179(t3,((C_word*)t0)[4],t2);}}
-
-/* sort in k1288 */
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4137,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_vectorp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4151,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4155,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 775 vector->list */
-t6=*((C_word*)lf[90]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4162,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 776 append */
-t5=*((C_word*)lf[93]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_SCHEME_END_OF_LIST);}}
-
-/* k4160 in sort in k1288 */
-static void C_ccall f_4162(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 776 sort! */
-t2=*((C_word*)lf[41]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4153 in sort in k1288 */
-static void C_ccall f_4155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 775 sort! */
-t2=*((C_word*)lf[41]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4149 in sort in k1288 */
-static void C_ccall f_4151(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 775 list->vector */
-t2=*((C_word*)lf[92]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* sort! in k1288 */
-static void C_ccall f_4004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[17],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4004,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4007,a[2]=t4,a[3]=t6,a[4]=t3,a[5]=((C_word)li125),tmp=(C_word)a,a+=6,tmp));
-if(C_truep((C_word)C_i_vectorp(((C_word*)t4)[1]))){
-t8=(C_word)C_i_vector_length(((C_word*)t4)[1]);
-t9=((C_word*)t4)[1];
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4094,a[2]=t8,a[3]=t6,a[4]=t1,a[5]=t9,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-/* data-structures.scm: 758 vector->list */
-t11=*((C_word*)lf[90]+1);
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t10,((C_word*)t4)[1]);}
-else{
-t8=(C_word)C_i_length(((C_word*)t4)[1]);
-/* data-structures.scm: 764 step */
-t9=((C_word*)t6)[1];
-f_4007(t9,t1,t8);}}
-
-/* k4092 in sort! in k1288 */
-static void C_ccall f_4094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4094,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4101,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 759 step */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_4007(t4,t3,((C_word*)t0)[2]);}
-
-/* k4099 in k4092 in sort! in k1288 */
-static void C_ccall f_4101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4101,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4103,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4103(t5,((C_word*)t0)[2],t1,C_fix(0));}
-
-/* doloop994 in k4099 in k4092 in sort! in k1288 */
-static void C_fcall f_4103(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4103,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[3]);}
-else{
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_vector_set(((C_word*)t0)[3],t3,t4);
-t6=(C_word)C_i_cdr(t2);
-t7=(C_word)C_a_i_plus(&a,2,t3,C_fix(1));
-t9=t1;
-t10=t6;
-t11=t7;
-t1=t9;
-t2=t10;
-t3=t11;
-goto loop;}}
-
-/* step in sort! in k1288 */
-static void C_fcall f_4007(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4007,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_greaterp(t2,C_fix(2)))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4017,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-C_quotient(4,0,t3,t2,C_fix(2));}
-else{
-if(C_truep((C_word)C_i_nequalp(t2,C_fix(2)))){
-t3=(C_word)C_i_car(((C_word*)((C_word*)t0)[2])[1]);
-t4=(C_word)C_i_cadr(((C_word*)((C_word*)t0)[2])[1]);
-t5=((C_word*)((C_word*)t0)[2])[1];
-t6=(C_word)C_i_cddr(((C_word*)((C_word*)t0)[2])[1]);
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4058,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 743 less? */
-t9=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t9))(4,t9,t8,t4,t3);}
-else{
-if(C_truep((C_word)C_i_nequalp(t2,C_fix(1)))){
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=(C_word)C_i_cdr(((C_word*)((C_word*)t0)[2])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
-t6=(C_word)C_i_set_cdr(t3,C_SCHEME_END_OF_LIST);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}}}}
-
-/* k4056 in step in sort! in k1288 */
-static void C_ccall f_4058(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_set_car(((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t4=(C_word)C_i_set_car(t3,((C_word*)t0)[3]);
-t5=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t6=(C_word)C_i_set_cdr(t5,C_SCHEME_END_OF_LIST);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,((C_word*)t0)[5]);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_set_cdr(t2,C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[5]);}}
-
-/* k4015 in step in sort! in k1288 */
-static void C_ccall f_4017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4017,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4020,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* data-structures.scm: 734 step */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_4007(t3,t2,t1);}
-
-/* k4018 in k4015 in step in sort! in k1288 */
-static void C_ccall f_4020(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4020,2,t0,t1);}
-t2=(C_word)C_a_i_minus(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4026,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 736 step */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_4007(t4,t3,t2);}
-
-/* k4024 in k4018 in k4015 in step in sort! in k1288 */
-static void C_ccall f_4026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 737 merge! */
-t2=*((C_word*)lf[89]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* merge! in k1288 */
-static void C_ccall f_3872(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[13],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3872,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3875,a[2]=t4,a[3]=t6,a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp));
-if(C_truep((C_word)C_i_nullp(t2))){
-t8=t3;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}
-else{
-if(C_truep((C_word)C_i_nullp(t3))){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t2);}
-else{
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3954,a[2]=t6,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t9=(C_word)C_i_car(t3);
-t10=(C_word)C_i_car(t2);
-/* data-structures.scm: 711 less? */
-t11=t4;
-((C_proc4)C_retrieve_proc(t11))(4,t11,t8,t9,t10);}}}
-
-/* k3952 in merge! in k1288 */
-static void C_ccall f_3954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3954,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3957,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=(C_word)C_i_set_cdr(((C_word*)t0)[5],((C_word*)t0)[3]);
-t5=((C_word*)t0)[5];
-t6=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* data-structures.scm: 714 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3875(t5,t2,((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3977,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=(C_word)C_i_set_cdr(((C_word*)t0)[3],((C_word*)t0)[5]);
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 719 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3875(t5,t2,((C_word*)t0)[3],t4,((C_word*)t0)[5]);}}}
-
-/* k3975 in k3952 in merge! in k1288 */
-static void C_ccall f_3977(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k3955 in k3952 in merge! in k1288 */
-static void C_ccall f_3957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* loop in merge! in k1288 */
-static void C_fcall f_3875(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3875,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3882,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t6=(C_word)C_i_car(t4);
-t7=(C_word)C_i_car(t3);
-/* data-structures.scm: 696 less? */
-t8=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t8))(4,t8,t5,t6,t7);}
-
-/* k3880 in loop in merge! in k1288 */
-static void C_ccall f_3882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_set_cdr(((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_cdr(((C_word*)t0)[5],((C_word*)t0)[3]));}
-else{
-t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* data-structures.scm: 701 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3875(t5,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
-else{
-t2=(C_word)C_i_set_cdr(((C_word*)t0)[6],((C_word*)t0)[3]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_cdr(((C_word*)t0)[3],((C_word*)t0)[5]));}
-else{
-t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 707 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3875(t5,((C_word*)t0)[4],((C_word*)t0)[3],t4,((C_word*)t0)[5]);}}}
-
-/* merge in k1288 */
-static void C_ccall f_3773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3773,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t5=t3;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}
-else{
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_i_cdr(t2);
-t7=(C_word)C_i_car(t3);
-t8=(C_word)C_i_cdr(t3);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3807,a[2]=t4,a[3]=t10,a[4]=((C_word)li121),tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_3807(t12,t1,t5,t6,t7,t8);}}}
-
-/* loop in merge in k1288 */
-static void C_fcall f_3807(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3807,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3814,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t1,a[5]=t3,a[6]=t2,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
-/* data-structures.scm: 679 less? */
-t7=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t7))(4,t7,t6,t4,t2);}
-
-/* k3812 in loop in merge in k1288 */
-static void C_ccall f_3814(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3814,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[7]))){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2));}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3834,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[7]);
-t4=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* data-structures.scm: 682 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3807(t5,t2,((C_word*)t0)[6],((C_word*)t0)[5],t3,t4);}}
-else{
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[5]))){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[7]);
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t2));}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3862,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[5]);
-t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* data-structures.scm: 686 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3807(t5,t2,t3,t4,((C_word*)t0)[3],((C_word*)t0)[7]);}}}
-
-/* k3860 in k3812 in loop in merge in k1288 */
-static void C_ccall f_3862(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3862,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k3832 in k3812 in loop in merge in k1288 */
-static void C_ccall f_3834(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3834,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* sorted? in k1288 */
-static void C_ccall f_3664(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3664,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}
-else{
-if(C_truep((C_word)C_i_vectorp(t2))){
-t4=(C_word)C_i_vector_length(t2);
-if(C_truep((C_word)C_i_less_or_equalp(t4,C_fix(1)))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_TRUE);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3691,a[2]=t3,a[3]=t2,a[4]=t6,a[5]=t4,a[6]=((C_word)li118),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_3691(t8,t1,C_fix(1));}}
-else{
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_cdr(t2);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3739,a[2]=t3,a[3]=t7,a[4]=((C_word)li119),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_3739(t9,t1,t4,t5);}}}
-
-/* loop in sorted? in k1288 */
-static void C_fcall f_3739(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3739,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_nullp(t3);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3767,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t6=(C_word)C_i_car(t3);
-/* data-structures.scm: 662 less? */
-t7=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t7))(4,t7,t5,t6,t2);}}
-
-/* k3765 in loop in sorted? in k1288 */
-static void C_ccall f_3767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[3]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 663 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_3739(t4,((C_word*)t0)[4],t2,t3);}}
-
-/* doloop909 in sorted? in k1288 */
-static void C_fcall f_3691(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3691,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_nequalp(t2,((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3701,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_3701(2,t5,t3);}
-else{
-t5=(C_word)C_i_vector_ref(((C_word*)t0)[3],t2);
-t6=(C_word)C_a_i_minus(&a,2,t2,C_fix(1));
-t7=(C_word)C_i_vector_ref(((C_word*)t0)[3],t6);
-/* data-structures.scm: 656 less? */
-t8=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t8))(4,t8,t4,t5,t7);}}
-
-/* k3699 in doloop909 in sorted? in k1288 */
-static void C_ccall f_3701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3701,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_nequalp(((C_word*)t0)[4],((C_word*)t0)[3]));}
-else{
-t2=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_3691(t3,((C_word*)t0)[5],t2);}}
-
-/* string-chomp in k1288 */
-static void C_ccall f_3612(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3612r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3612r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3612r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3616,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_3616(2,t5,lf[86]);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_3616(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k3614 in string-chomp in k1288 */
-static void C_ccall f_3616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-t2=(C_word)C_i_check_string_2(((C_word*)t0)[3],lf[85]);
-t3=(C_word)C_i_check_string_2(t1,lf[85]);
-t4=(C_word)C_block_size(((C_word*)t0)[3]);
-t5=(C_word)C_block_size(t1);
-t6=(C_word)C_fixnum_difference(t4,t5);
-t7=(C_word)C_fixnum_greater_or_equal_p(t4,t5);
-t8=(C_truep(t7)?(C_word)C_substring_compare(((C_word*)t0)[3],t1,t6,C_fix(0),t5):C_SCHEME_FALSE);
-if(C_truep(t8)){
-/* data-structures.scm: 623 ##sys#substring */
-t9=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,((C_word*)t0)[2],((C_word*)t0)[3],C_fix(0),t6);}
-else{
-t9=((C_word*)t0)[3];
-t10=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
-
-/* string-chop in k1288 */
-static void C_ccall f_3548(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3548,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_string_2(t2,lf[84]);
-t5=(C_word)C_i_check_exact_2(t3,lf[84]);
-t6=(C_word)C_block_size(t2);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3563,a[2]=t8,a[3]=t2,a[4]=t3,a[5]=((C_word)li115),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_3563(t10,t1,t6,C_fix(0));}
-
-/* loop in string-chop in k1288 */
-static void C_fcall f_3563(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3563,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,C_fix(0)))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,((C_word*)t0)[4]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3583,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(C_word)C_fixnum_plus(t3,t2);
-/* data-structures.scm: 609 ##sys#substring */
-t6=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,((C_word*)t0)[3],t3,t5);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3594,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_fixnum_plus(t3,((C_word*)t0)[4]);
-/* data-structures.scm: 610 ##sys#substring */
-t6=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,((C_word*)t0)[3],t3,t5);}}}
-
-/* k3592 in loop in string-chop in k1288 */
-static void C_ccall f_3594(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3594,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3598,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[4]);
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]);
-/* data-structures.scm: 610 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3563(t5,t2,t3,t4);}
-
-/* k3596 in k3592 in loop in string-chop in k1288 */
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k3581 in loop in string-chop in k1288 */
-static void C_ccall f_3583(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3583,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,1,t1));}
-
-/* string-translate* in k1288 */
-static void C_ccall f_3426(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3426,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_string_2(t2,lf[82]);
-t5=(C_word)C_i_check_list_2(t3,lf[82]);
-t6=(C_word)C_block_size(t2);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3438,a[2]=t3,a[3]=t8,a[4]=t2,a[5]=t6,a[6]=((C_word)li113),tmp=(C_word)a,a+=7,tmp));
-/* data-structures.scm: 598 collect */
-t10=((C_word*)t8)[1];
-f_3438(t10,t1,C_fix(0),C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}
-
-/* collect in string-translate* in k1288 */
-static void C_fcall f_3438(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3438,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3452,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_fixnum_greaterp(t2,t3))){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3466,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 580 ##sys#substring */
-t9=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,((C_word*)t0)[4],t3,t2);}
-else{
-t8=((C_word*)t6)[1];
-/* data-structures.scm: 578 reverse */
-t9=*((C_word*)lf[23]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}}
-else{
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3471,a[2]=t8,a[3]=((C_word*)t0)[4],a[4]=t6,a[5]=t3,a[6]=((C_word*)t0)[3],a[7]=t4,a[8]=t2,a[9]=((C_word)li112),tmp=(C_word)a,a+=10,tmp));
-t10=((C_word*)t8)[1];
-f_3471(t10,t1,((C_word*)t0)[2]);}}
-
-/* loop in collect in string-translate* in k1288 */
-static void C_fcall f_3471(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(12);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3471,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 584 collect */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_3438(t5,t1,t3,((C_word*)t0)[5],t4,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_i_string_length(t4);
-t6=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_substring_compare(((C_word*)t0)[3],t4,((C_word*)t0)[8],C_fix(0),t5))){
-t7=(C_word)C_fixnum_plus(((C_word*)t0)[8],t5);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3510,a[2]=t7,a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=t6,tmp=(C_word)a,a+=8,tmp);
-if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[8],((C_word*)t0)[5]))){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3536,a[2]=t8,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 592 ##sys#substring */
-t10=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t9,((C_word*)t0)[3],((C_word*)t0)[5],((C_word*)t0)[8]);}
-else{
-t9=t8;
-f_3510(t9,C_SCHEME_UNDEFINED);}}
-else{
-t7=(C_word)C_i_cdr(t2);
-/* data-structures.scm: 597 loop */
-t14=t1;
-t15=t7;
-t1=t14;
-t2=t15;
-goto loop;}}}
-
-/* k3534 in loop in collect in string-translate* in k1288 */
-static void C_ccall f_3536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3536,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-f_3510(t4,t3);}
-
-/* k3508 in loop in collect in string-translate* in k1288 */
-static void C_fcall f_3510(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3510,NULL,2,t0,t1);}
-t2=(C_word)C_i_string_length(((C_word*)t0)[7]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[6],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)((C_word*)t0)[5])[1]);
-/* data-structures.scm: 593 collect */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_3438(t5,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[2],t3,t4);}
-
-/* k3464 in collect in string-translate* in k1288 */
-static void C_ccall f_3466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3466,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[3])[1]);
-/* data-structures.scm: 578 reverse */
-t3=*((C_word*)lf[23]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* k3450 in collect in string-translate* in k1288 */
-static void C_ccall f_3452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 576 ##sys#fragments->string */
-t2=*((C_word*)lf[83]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* string-translate in k1288 */
-static void C_ccall f_3224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+14)){
-C_save_and_reclaim((void*)tr4r,(void*)f_3224r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_3224r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_3224r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(14);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3227,a[2]=((C_word)li108),tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3261,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_charp(t3))){
-t7=t6;
-f_3261(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3401,a[2]=t3,a[3]=((C_word)li110),tmp=(C_word)a,a+=4,tmp));}
-else{
-if(C_truep((C_word)C_i_pairp(t3))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3418,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 534 list->string */
-t8=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t8))(3,t8,t7,t3);}
-else{
-t7=(C_word)C_i_check_string_2(t3,lf[80]);
-/* data-structures.scm: 537 instring */
-f_3227(t6,t3);}}}
-
-/* k3416 in string-translate in k1288 */
-static void C_ccall f_3418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 534 instring */
-f_3227(((C_word*)t0)[2],t1);}
-
-/* f_3401 in string-translate in k1288 */
-static void C_ccall f_3401(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3401,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,((C_word*)t0)[2]));}
-
-/* k3259 in string-translate in k1288 */
-static void C_ccall f_3261(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3261,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3264,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
-t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(0));
-if(C_truep((C_word)C_charp(t3))){
-t4=t2;
-f_3264(2,t4,t3);}
-else{
-if(C_truep((C_word)C_i_pairp(t3))){
-/* data-structures.scm: 542 list->string */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
-else{
-t4=(C_word)C_i_check_string_2(t3,lf[80]);
-t5=t2;
-f_3264(2,t5,t3);}}}
-else{
-t3=t2;
-f_3264(2,t3,C_SCHEME_FALSE);}}
-
-/* k3262 in k3259 in string-translate in k1288 */
-static void C_ccall f_3264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3264,2,t0,t1);}
-t2=(C_word)C_i_stringp(t1);
-t3=(C_truep(t2)?(C_word)C_block_size(t1):C_SCHEME_FALSE);
-t4=(C_word)C_i_check_string_2(((C_word*)t0)[5],lf[80]);
-t5=(C_word)C_block_size(((C_word*)t0)[5]);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t5,tmp=(C_word)a,a+=8,tmp);
-/* data-structures.scm: 549 make-string */
-t7=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t5);}
-
-/* k3274 in k3262 in k3259 in string-translate in k1288 */
-static void C_ccall f_3276(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3276,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3281,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word)li109),tmp=(C_word)a,a+=10,tmp));
-t5=((C_word*)t3)[1];
-f_3281(t5,((C_word*)t0)[2],C_fix(0),C_fix(0));}
-
-/* loop in k3274 in k3262 in k3259 in string-translate in k1288 */
-static void C_fcall f_3281(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3281,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[8]))){
-if(C_truep((C_word)C_fixnum_lessp(t3,t2))){
-/* data-structures.scm: 553 ##sys#substring */
-t4=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,((C_word*)t0)[7],C_fix(0),t3);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[7]);}}
-else{
-t4=(C_word)C_subchar(((C_word*)t0)[6],t2);
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3300,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=t3,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
-/* data-structures.scm: 556 from */
-t6=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t4);}}
-
-/* k3298 in loop in k3274 in k3262 in k3259 in string-translate in k1288 */
-static void C_ccall f_3300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-t2=t1;
-if(C_truep(t2)){
-t3=((C_word*)t0)[9];
-if(C_truep(t3)){
-if(C_truep((C_word)C_charp(((C_word*)t0)[9]))){
-t4=(C_word)C_setsubchar(((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[9]);
-t5=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-t6=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 563 loop */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_3281(t7,((C_word*)t0)[4],t5,t6);}
-else{
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
-/* data-structures.scm: 565 ##sys#error */
-t4=*((C_word*)lf[31]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[4],lf[80],lf[81],((C_word*)t0)[6],((C_word*)t0)[9]);}
-else{
-t4=(C_word)C_setsubchar(((C_word*)t0)[8],((C_word*)t0)[7],(C_word)C_subchar(((C_word*)t0)[9],t1));
-t5=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-t6=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 568 loop */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_3281(t7,((C_word*)t0)[4],t5,t6);}}}
-else{
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-/* data-structures.scm: 560 loop */
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_3281(t5,((C_word*)t0)[4],t4,((C_word*)t0)[7]);}}
-else{
-t3=(C_word)C_setsubchar(((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-t5=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 559 loop */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_3281(t6,((C_word*)t0)[4],t4,t5);}}
-
-/* instring in string-translate in k1288 */
-static void C_fcall f_3227(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3227,NULL,2,t1,t2);}
-t3=(C_word)C_block_size(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3232,a[2]=t2,a[3]=t3,a[4]=((C_word)li107),tmp=(C_word)a,a+=5,tmp));}
-
-/* f_3232 in instring in string-translate in k1288 */
-static void C_ccall f_3232(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3232,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3238,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_3238(t3,C_fix(0)));}
-
-/* loop */
-static C_word C_fcall f_3238(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-return(C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_eqp(((C_word*)t0)[3],(C_word)C_subchar(((C_word*)t0)[2],t1));
-if(C_truep(t2)){
-return(t1);}
-else{
-t3=(C_word)C_fixnum_plus(t1,C_fix(1));
-t5=t3;
-t1=t5;
-goto loop;}}}
-
-/* string-intersperse in k1288 */
-static void C_ccall f_3109(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3109r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3109r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3109r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3113,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_3113(2,t5,lf[78]);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_3113(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k3111 in string-intersperse in k1288 */
-static void C_ccall f_3113(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3113,2,t0,t1);}
-t2=(C_word)C_i_check_list_2(((C_word*)t0)[3],lf[75]);
-t3=(C_word)C_i_check_string_2(t1,lf[75]);
-t4=(C_word)C_block_size(t1);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3127,a[2]=t6,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word)li104),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_3127(t8,((C_word*)t0)[2],((C_word*)t0)[3],C_fix(0));}
-
-/* loop1 in k3111 in string-intersperse in k1288 */
-static void C_fcall f_3127(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(6);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3127,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_eqp(t2,C_SCHEME_END_OF_LIST))){
-if(C_truep((C_word)C_eqp(((C_word*)t0)[5],C_SCHEME_END_OF_LIST))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[76]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3137,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_fixnum_difference(t3,((C_word*)t0)[3]);
-/* data-structures.scm: 497 ##sys#allocate-vector */
-t6=*((C_word*)lf[77]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t4,t5,C_SCHEME_TRUE,C_make_character(32),C_SCHEME_FALSE);}}
-else{
-t4=(C_truep((C_word)C_blockp(t2))?(C_word)C_pairp(t2):C_SCHEME_FALSE);
-if(C_truep(t4)){
-t5=(C_word)C_slot(t2,C_fix(0));
-t6=(C_word)C_i_check_string_2(t5,lf[75]);
-t7=(C_word)C_slot(t2,C_fix(1));
-t8=(C_word)C_block_size(t5);
-t9=(C_word)C_fixnum_plus(((C_word*)t0)[3],t3);
-t10=(C_word)C_fixnum_plus(t8,t9);
-/* data-structures.scm: 512 loop1 */
-t14=t1;
-t15=t7;
-t16=t10;
-t1=t14;
-t2=t15;
-t3=t16;
-goto loop;}
-else{
-/* data-structures.scm: 514 ##sys#error-not-a-proper-list */
-t5=*((C_word*)lf[34]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,((C_word*)t0)[5]);}}}
-
-/* k3135 in loop1 in k3111 in string-intersperse in k1288 */
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3137,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word)li103),tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_3142(t2,((C_word*)t0)[2],C_fix(0)));}
-
-/* loop2 in k3135 in loop1 in k3111 in string-intersperse in k1288 */
-static C_word C_fcall f_3142(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-loop:
-C_stack_check;
-t3=(C_word)C_slot(t1,C_fix(0));
-t4=(C_word)C_slot(t1,C_fix(1));
-t5=(C_word)C_block_size(t3);
-t6=(C_word)C_substring_copy(t3,((C_word*)t0)[4],C_fix(0),t5,t2);
-t7=(C_word)C_fixnum_plus(t2,t5);
-if(C_truep((C_word)C_eqp(t4,C_SCHEME_END_OF_LIST))){
-t8=((C_word*)t0)[4];
-return(t8);}
-else{
-t8=(C_word)C_substring_copy(((C_word*)t0)[3],((C_word*)t0)[4],C_fix(0),((C_word*)t0)[2],t7);
-t9=(C_word)C_fixnum_plus(t7,((C_word*)t0)[2]);
-t12=t4;
-t13=t9;
-t1=t12;
-t2=t13;
-goto loop;}}
-
-/* string-split in k1288 */
-static void C_ccall f_2974(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+20)){
-C_save_and_reclaim((void*)tr3rv,(void*)f_2974r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest_vector(a,C_rest_count(0));
-f_2974r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2974r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word *a=C_alloc(20);
-t4=(C_word)C_i_check_string_2(t2,lf[72]);
-t5=(C_word)C_vemptyp(t3);
-t6=(C_truep(t5)?lf[73]:(C_word)C_i_vector_ref(t3,C_fix(0)));
-t7=(C_word)C_block_size(t3);
-t8=(C_word)C_eqp(t7,C_fix(2));
-t9=(C_truep(t8)?(C_word)C_i_vector_ref(t3,C_fix(1)):C_SCHEME_FALSE);
-t10=(C_word)C_block_size(t2);
-t11=(C_word)C_i_check_string_2(t6,lf[72]);
-t12=(C_word)C_block_size(t6);
-t13=C_SCHEME_FALSE;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2995,a[2]=t2,a[3]=t14,a[4]=((C_word)li99),tmp=(C_word)a,a+=5,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3015,a[2]=t6,a[3]=t17,a[4]=t12,a[5]=t2,a[6]=t15,a[7]=t9,a[8]=t14,a[9]=t10,a[10]=((C_word)li101),tmp=(C_word)a,a+=11,tmp));
-t19=((C_word*)t17)[1];
-f_3015(t19,t1,C_fix(0),C_SCHEME_FALSE,C_fix(0));}
-
-/* loop in string-split in k1288 */
-static void C_fcall f_3015(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3015,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[9]))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3025,a[2]=t1,a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_fixnum_greaterp(t2,t4);
-t7=(C_truep(t6)?t6:((C_word*)t0)[7]);
-if(C_truep(t7)){
-/* data-structures.scm: 473 add */
-t8=((C_word*)t0)[6];
-f_2995(t8,t5,t4,t2,t3);}
-else{
-t8=((C_word*)((C_word*)t0)[8])[1];
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_truep(t8)?t8:C_SCHEME_END_OF_LIST));}}
-else{
-t5=(C_word)C_subchar(((C_word*)t0)[5],t2);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3042,a[2]=t7,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[2],a[6]=t5,a[7]=t4,a[8]=t3,a[9]=((C_word*)t0)[3],a[10]=t2,a[11]=((C_word*)t0)[4],a[12]=((C_word)li100),tmp=(C_word)a,a+=13,tmp));
-t9=((C_word*)t7)[1];
-f_3042(t9,t1,C_fix(0));}}
-
-/* scan in loop in string-split in k1288 */
-static void C_fcall f_3042(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3042,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[11]))){
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[10],C_fix(1));
-/* data-structures.scm: 478 loop */
-t4=((C_word*)((C_word*)t0)[9])[1];
-f_3015(t4,t1,t3,((C_word*)t0)[8],((C_word*)t0)[7]);}
-else{
-t3=(C_word)C_eqp(((C_word*)t0)[6],(C_word)C_subchar(((C_word*)t0)[5],t2));
-if(C_truep(t3)){
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[10],C_fix(1));
-t5=(C_word)C_fixnum_greaterp(((C_word*)t0)[10],((C_word*)t0)[7]);
-t6=(C_truep(t5)?t5:((C_word*)t0)[4]);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3081,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 482 add */
-t8=((C_word*)t0)[3];
-f_2995(t8,t7,((C_word*)t0)[7],((C_word*)t0)[10],((C_word*)t0)[8]);}
-else{
-/* data-structures.scm: 483 loop */
-t7=((C_word*)((C_word*)t0)[9])[1];
-f_3015(t7,t1,t4,((C_word*)t0)[8],t4);}}
-else{
-t4=(C_word)C_fixnum_plus(t2,C_fix(1));
-/* data-structures.scm: 484 scan */
-t11=t1;
-t12=t4;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* k3079 in scan in loop in string-split in k1288 */
-static void C_ccall f_3081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 482 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_3015(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,((C_word*)t0)[2]);}
-
-/* k3023 in loop in string-split in k1288 */
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?t2:C_SCHEME_END_OF_LIST));}
-
-/* add in string-split in k1288 */
-static void C_fcall f_2995(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2995,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3010,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 466 ##sys#substring */
-t6=*((C_word*)lf[74]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[2],t2,t3);}
-
-/* k3008 in add in string-split in k1288 */
-static void C_ccall f_3010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3010,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t3=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}
-
-/* substring-ci=? in k1288 */
-static void C_ccall f_2894(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+17)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2894r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2894r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2894r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a=C_alloc(17);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2896,a[2]=t3,a[3]=t2,a[4]=((C_word)li94),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2901,a[2]=t5,a[3]=((C_word)li95),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2906,a[2]=t6,a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2911,a[2]=t7,a[3]=((C_word)li97),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-start1647663 */
-t9=t8;
-f_2911(t9,t1);}
-else{
-t9=(C_word)C_i_car(t4);
-t10=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* def-start2648661 */
-t11=t7;
-f_2906(t11,t1,t9);}
-else{
-t11=(C_word)C_i_car(t10);
-t12=(C_word)C_i_cdr(t10);
-if(C_truep((C_word)C_i_nullp(t12))){
-/* def-len649658 */
-t13=t6;
-f_2901(t13,t1,t9,t11);}
-else{
-t13=(C_word)C_i_car(t12);
-t14=(C_word)C_i_cdr(t12);
-if(C_truep((C_word)C_i_nullp(t14))){
-/* body645654 */
-t15=t5;
-f_2896(t15,t1,t9,t11,t13);}
-else{
-/* ##sys#error */
-t15=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
-
-/* def-start1647 in substring-ci=? in k1288 */
-static void C_fcall f_2911(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2911,NULL,2,t0,t1);}
-/* def-start2648661 */
-t2=((C_word*)t0)[2];
-f_2906(t2,t1,C_fix(0));}
-
-/* def-start2648 in substring-ci=? in k1288 */
-static void C_fcall f_2906(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2906,NULL,3,t0,t1,t2);}
-/* def-len649658 */
-t3=((C_word*)t0)[2];
-f_2901(t3,t1,t2,C_fix(0));}
-
-/* def-len649 in substring-ci=? in k1288 */
-static void C_fcall f_2901(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2901,NULL,4,t0,t1,t2,t3);}
-/* body645654 */
-t4=((C_word*)t0)[2];
-f_2896(t4,t1,t2,t3,C_SCHEME_FALSE);}
-
-/* body645 in substring-ci=? in k1288 */
-static void C_fcall f_2896(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2896,NULL,5,t0,t1,t2,t3,t4);}
-/* data-structures.scm: 451 ##sys#substring-ci=? */
-((C_proc7)C_retrieve_proc(*((C_word*)lf[70]+1)))(7,*((C_word*)lf[70]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
-
-/* ##sys#substring-ci=? in k1288 */
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[7],*a=ab;
-if(c!=7) C_bad_argc_2(c,7,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_2857,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(C_word)C_i_check_string_2(t2,lf[71]);
-t8=(C_word)C_i_check_string_2(t3,lf[71]);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2867,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t6)){
-t10=t9;
-f_2867(t10,t6);}
-else{
-t10=(C_word)C_block_size(t2);
-t11=(C_word)C_fixnum_difference(t10,t4);
-t12=(C_word)C_block_size(t3);
-t13=(C_word)C_fixnum_difference(t12,t5);
-t14=t9;
-f_2867(t14,(C_word)C_i_fixnum_min(t11,t13));}}
-
-/* k2865 in ##sys#substring-ci=? in k1288 */
-static void C_fcall f_2867(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[71]);
-t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[71]);
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare_case_insensitive(((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[5],t1));}
-
-/* substring=? in k1288 */
-static void C_ccall f_2777(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+17)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2777r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2777r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2777r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a=C_alloc(17);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2779,a[2]=t3,a[3]=t2,a[4]=((C_word)li88),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2784,a[2]=t5,a[3]=((C_word)li89),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2789,a[2]=t6,a[3]=((C_word)li90),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2794,a[2]=t7,a[3]=((C_word)li91),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-start1590606 */
-t9=t8;
-f_2794(t9,t1);}
-else{
-t9=(C_word)C_i_car(t4);
-t10=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* def-start2591604 */
-t11=t7;
-f_2789(t11,t1,t9);}
-else{
-t11=(C_word)C_i_car(t10);
-t12=(C_word)C_i_cdr(t10);
-if(C_truep((C_word)C_i_nullp(t12))){
-/* def-len592601 */
-t13=t6;
-f_2784(t13,t1,t9,t11);}
-else{
-t13=(C_word)C_i_car(t12);
-t14=(C_word)C_i_cdr(t12);
-if(C_truep((C_word)C_i_nullp(t14))){
-/* body588597 */
-t15=t5;
-f_2779(t15,t1,t9,t11,t13);}
-else{
-/* ##sys#error */
-t15=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
-
-/* def-start1590 in substring=? in k1288 */
-static void C_fcall f_2794(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2794,NULL,2,t0,t1);}
-/* def-start2591604 */
-t2=((C_word*)t0)[2];
-f_2789(t2,t1,C_fix(0));}
-
-/* def-start2591 in substring=? in k1288 */
-static void C_fcall f_2789(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2789,NULL,3,t0,t1,t2);}
-/* def-len592601 */
-t3=((C_word*)t0)[2];
-f_2784(t3,t1,t2,C_fix(0));}
-
-/* def-len592 in substring=? in k1288 */
-static void C_fcall f_2784(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2784,NULL,4,t0,t1,t2,t3);}
-/* body588597 */
-t4=((C_word*)t0)[2];
-f_2779(t4,t1,t2,t3,C_SCHEME_FALSE);}
-
-/* body588 in substring=? in k1288 */
-static void C_fcall f_2779(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2779,NULL,5,t0,t1,t2,t3,t4);}
-/* data-structures.scm: 437 ##sys#substring=? */
-((C_proc7)C_retrieve_proc(*((C_word*)lf[68]+1)))(7,*((C_word*)lf[68]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
-
-/* ##sys#substring=? in k1288 */
-static void C_ccall f_2740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[7],*a=ab;
-if(c!=7) C_bad_argc_2(c,7,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_2740,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(C_word)C_i_check_string_2(t2,lf[69]);
-t8=(C_word)C_i_check_string_2(t3,lf[69]);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2750,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t6)){
-t10=t9;
-f_2750(t10,t6);}
-else{
-t10=(C_word)C_block_size(t2);
-t11=(C_word)C_fixnum_difference(t10,t4);
-t12=(C_word)C_block_size(t3);
-t13=(C_word)C_fixnum_difference(t12,t5);
-t14=t9;
-f_2750(t14,(C_word)C_i_fixnum_min(t11,t13));}}
-
-/* k2748 in ##sys#substring=? in k1288 */
-static void C_fcall f_2750(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[69]);
-t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[69]);
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare(((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[5],t1));}
-
-/* string-compare3-ci in k1288 */
-static void C_ccall f_2709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2709,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_string_2(t2,lf[67]);
-t5=(C_word)C_i_check_string_2(t3,lf[67]);
-t6=(C_word)C_block_size(t2);
-t7=(C_word)C_block_size(t3);
-t8=(C_word)C_fixnum_difference(t6,t7);
-t9=(C_word)C_fixnum_lessp(t8,C_fix(0));
-t10=(C_truep(t9)?t6:t7);
-t11=(C_word)C_string_compare_case_insensitive(t2,t3,t10);
-t12=(C_word)C_eqp(t11,C_fix(0));
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_truep(t12)?t8:t11));}
-
-/* string-compare3 in k1288 */
-static void C_ccall f_2678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2678,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_string_2(t2,lf[66]);
-t5=(C_word)C_i_check_string_2(t3,lf[66]);
-t6=(C_word)C_block_size(t2);
-t7=(C_word)C_block_size(t3);
-t8=(C_word)C_fixnum_difference(t6,t7);
-t9=(C_word)C_fixnum_lessp(t8,C_fix(0));
-t10=(C_truep(t9)?t6:t7);
-t11=(C_word)C_mem_compare(t2,t3,t10);
-t12=(C_word)C_eqp(t11,C_fix(0));
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_truep(t12)?t8:t11));}
-
-/* substring-index-ci in k1288 */
-static void C_ccall f_2650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2650r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2650r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2650r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2654,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* data-structures.scm: 396 ##sys#substring-index-ci */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),t1,t2,t3,C_fix(0));}
-else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=(C_word)C_i_car(t4);
-/* data-structures.scm: 396 ##sys#substring-index-ci */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),t1,t2,t3,t7);}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k2652 in substring-index-ci in k1288 */
-static void C_ccall f_2654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 396 ##sys#substring-index-ci */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* substring-index in k1288 */
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2622r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2622r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2622r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2626,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* data-structures.scm: 393 ##sys#substring-index */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),t1,t2,t3,C_fix(0));}
-else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=(C_word)C_i_car(t4);
-/* data-structures.scm: 393 ##sys#substring-index */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),t1,t2,t3,t7);}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k2624 in substring-index in k1288 */
-static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 393 ##sys#substring-index */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* ##sys#substring-index-ci in k1288 */
-static void C_ccall f_2613(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2613,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2619,a[2]=t3,a[3]=t2,a[4]=((C_word)li81),tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 387 traverse */
-f_2557(t1,t2,t3,t4,t5,lf[65]);}
-
-/* a2618 in ##sys#substring-index-ci in k1288 */
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2619,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare_case_insensitive(((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2,t3));}
-
-/* ##sys#substring-index in k1288 */
-static void C_ccall f_2604(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2604,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2610,a[2]=t3,a[3]=t2,a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 381 traverse */
-f_2557(t1,t2,t3,t4,t5,lf[63]);}
-
-/* a2609 in ##sys#substring-index in k1288 */
-static void C_ccall f_2610(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2610,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare(((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2,t3));}
-
-/* traverse in k1288 */
-static void C_fcall f_2557(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2557,NULL,6,t1,t2,t3,t4,t5,t6);}
-t7=(C_word)C_i_check_string_2(t2,t6);
-t8=(C_word)C_i_check_string_2(t3,t6);
-t9=(C_word)C_block_size(t3);
-t10=(C_word)C_block_size(t2);
-t11=(C_word)C_i_check_exact_2(t4,t6);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2578,a[2]=t10,a[3]=t5,a[4]=t13,a[5]=t9,a[6]=((C_word)li77),tmp=(C_word)a,a+=7,tmp));
-t15=((C_word*)t13)[1];
-f_2578(t15,t1,t4,t10);}
-
-/* loop in traverse in k1288 */
-static void C_fcall f_2578(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2578,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_fixnum_greaterp(t3,((C_word*)t0)[5]))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2591,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 375 test */
-t5=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,((C_word*)t0)[2]);}}
-
-/* k2589 in loop in traverse in k1288 */
-static void C_ccall f_2591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* data-structures.scm: 377 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_2578(t4,((C_word*)t0)[5],t2,t3);}}
-
-/* conc in k1288 */
-static void C_ccall f_2512(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+16)){
-C_save_and_reclaim((void*)tr2r,(void*)f_2512r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_2512r(t0,t1,t2);}}
-
-static void C_ccall f_2512r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(16);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2520,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2522,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li75),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_2522(t11,t7,t2);}
-
-/* loop452 in conc in k1288 */
-static void C_fcall f_2522(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2522,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[57]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g468469 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2549 in loop452 in conc in k1288 */
-static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop452465 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2522(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop452465 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2522(t6,((C_word*)t0)[3],t5);}}
-
-/* k2518 in conc in k1288 */
-static void C_ccall f_2520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* ->string in k1288 */
-static void C_ccall f_2467(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2467,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_stringp(t2))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-if(C_truep((C_word)C_i_symbolp(t2))){
-/* data-structures.scm: 350 symbol->string */
-t3=*((C_word*)lf[58]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-else{
-if(C_truep((C_word)C_charp(t2))){
-/* data-structures.scm: 351 string */
-t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t1,t2);}
-else{
-if(C_truep((C_word)C_i_numberp(t2))){
-/* data-structures.scm: 352 ##sys#number->string */
-t3=*((C_word*)lf[59]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2504,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 354 open-output-string */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}}}}}
-
-/* k2502 in ->string in k1288 */
-static void C_ccall f_2504(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2504,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2507,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 355 display */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k2505 in k2502 in ->string in k1288 */
-static void C_ccall f_2507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 356 get-output-string */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* reverse-string-append in k1288 */
-static void C_ccall f_2390(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2390,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2393,a[2]=t4,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp));
-/* data-structures.scm: 339 rev-string-append */
-t6=((C_word*)t4)[1];
-f_2393(t6,t1,t2,C_fix(0));}
-
-/* rev-string-append in reverse-string-append in k1288 */
-static void C_fcall f_2393(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(10);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2393,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_string_length(t4);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2409,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t7=(C_word)C_i_cdr(t2);
-t8=(C_word)C_a_i_plus(&a,2,t3,t5);
-/* data-structures.scm: 330 rev-string-append */
-t10=t6;
-t11=t7;
-t12=t8;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}
-else{
-/* data-structures.scm: 337 make-string */
-t4=*((C_word*)lf[52]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}}
-
-/* k2407 in rev-string-append in reverse-string-append in k1288 */
-static void C_ccall f_2409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2409,2,t0,t1);}
-t2=(C_word)C_i_string_length(t1);
-t3=(C_word)C_a_i_minus(&a,2,t2,((C_word*)t0)[5]);
-t4=(C_word)C_a_i_minus(&a,2,t3,((C_word*)t0)[4]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2418,a[2]=t6,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word)li71),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_2418(t8,((C_word*)t0)[2],C_fix(0),t4);}
-
-/* loop in k2407 in rev-string-append in reverse-string-append in k1288 */
-static void C_fcall f_2418(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(8);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_2418,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_lessp(t2,((C_word*)t0)[5]))){
-t4=(C_word)C_i_string_ref(((C_word*)t0)[4],t2);
-t5=(C_word)C_i_string_set(((C_word*)t0)[3],t3,t4);
-t6=(C_word)C_a_i_plus(&a,2,t2,C_fix(1));
-t7=(C_word)C_a_i_plus(&a,2,t3,C_fix(1));
-/* data-structures.scm: 335 loop */
-t10=t1;
-t11=t6;
-t12=t7;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}
-else{
-t4=((C_word*)t0)[3];
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* rassoc in k1288 */
-static void C_ccall f_2340(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr4rv,(void*)f_2340r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest_vector(a,C_rest_count(0));
-f_2340r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2340r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(8);
-t5=(C_word)C_i_check_list_2(t3,lf[50]);
-t6=(C_word)C_notvemptyp(t4);
-t7=(C_truep(t6)?(C_word)C_i_vector_ref(t4,C_fix(0)):*((C_word*)lf[45]+1));
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2352,a[2]=t2,a[3]=t7,a[4]=t9,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_2352(t11,t1,t3);}
-
-/* loop in rassoc in k1288 */
-static void C_fcall f_2352(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2352,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_check_pair_2(t3,lf[50]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t6=(C_word)C_slot(t3,C_fix(1));
-/* data-structures.scm: 316 tst */
-t7=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t7))(4,t7,t5,((C_word*)t0)[2],t6);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k2369 in loop in rassoc in k1288 */
-static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-/* data-structures.scm: 318 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_2352(t3,((C_word*)t0)[5],t2);}}
-
-/* alist-ref in k1288 */
-static void C_ccall f_2216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2216r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2216r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2216r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(13);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2218,a[2]=t3,a[3]=t2,a[4]=((C_word)li65),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2287,a[2]=t5,a[3]=((C_word)li66),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2292,a[2]=t6,a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-cmp364394 */
-t8=t7;
-f_2292(t8,t1);}
-else{
-t8=(C_word)C_i_car(t4);
-t9=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t9))){
-/* def-default365392 */
-t10=t6;
-f_2287(t10,t1,t8);}
-else{
-t10=(C_word)C_i_car(t9);
-t11=(C_word)C_i_cdr(t9);
-if(C_truep((C_word)C_i_nullp(t11))){
-/* body362370 */
-t12=t5;
-f_2218(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-cmp364 in alist-ref in k1288 */
-static void C_fcall f_2292(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2292,NULL,2,t0,t1);}
-/* def-default365392 */
-t2=((C_word*)t0)[2];
-f_2287(t2,t1,*((C_word*)lf[45]+1));}
-
-/* def-default365 in alist-ref in k1288 */
-static void C_fcall f_2287(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2287,NULL,3,t0,t1,t2);}
-/* body362370 */
-t3=((C_word*)t0)[2];
-f_2218(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body362 in alist-ref in k1288 */
-static void C_fcall f_2218(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2218,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_eqp(*((C_word*)lf[43]+1),t2);
-if(C_truep(t5)){
-t6=t4;
-f_2222(t6,*((C_word*)lf[44]+1));}
-else{
-t6=(C_word)C_eqp(*((C_word*)lf[45]+1),t2);
-if(C_truep(t6)){
-t7=*((C_word*)lf[46]+1);
-t8=t4;
-f_2222(t8,t7);}
-else{
-t7=(C_word)C_eqp(*((C_word*)lf[47]+1),t2);
-t8=t4;
-f_2222(t8,(C_truep(t7)?*((C_word*)lf[48]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2247,a[2]=t2,a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp)));}}}
-
-/* f_2247 in body362 in alist-ref in k1288 */
-static void C_ccall f_2247(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2247,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2253,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li63),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_2253(t7,t1,t3);}
-
-/* loop */
-static void C_fcall f_2253(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2253,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_pairp(t3))){
-t5=(C_word)C_slot(t3,C_fix(0));
-/* data-structures.scm: 301 cmp */
-t6=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
-else{
-t5=t4;
-f_2269(2,t5,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k2267 in loop */
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-/* data-structures.scm: 303 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_2253(t3,((C_word*)t0)[5],t2);}}
-
-/* k2220 in body362 in alist-ref in k1288 */
-static void C_fcall f_2222(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2222,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2225,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 304 aq */
-t3=t1;
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2223 in k2220 in body362 in alist-ref in k1288 */
-static void C_ccall f_2225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_slot(t1,C_fix(1)));}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* alist-update! in k1288 */
-static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr5r,(void*)f_2117r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_2117r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_2117r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(6);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2121,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_nullp(t5))){
-t7=t6;
-f_2121(2,t7,*((C_word*)lf[45]+1));}
-else{
-t7=(C_word)C_i_cdr(t5);
-if(C_truep((C_word)C_i_nullp(t7))){
-t8=t6;
-f_2121(2,t8,(C_word)C_i_car(t5));}
-else{
-/* ##sys#error */
-t8=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
-
-/* k2119 in alist-update! in k1288 */
-static void C_ccall f_2121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2121,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(C_word)C_eqp(*((C_word*)lf[43]+1),t1);
-if(C_truep(t3)){
-t4=t2;
-f_2124(t4,*((C_word*)lf[44]+1));}
-else{
-t4=(C_word)C_eqp(*((C_word*)lf[45]+1),t1);
-if(C_truep(t4)){
-t5=*((C_word*)lf[46]+1);
-t6=t2;
-f_2124(t6,t5);}
-else{
-t5=(C_word)C_eqp(*((C_word*)lf[47]+1),t1);
-t6=t2;
-f_2124(t6,(C_truep(t5)?*((C_word*)lf[48]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2156,a[2]=t1,a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp)));}}}
-
-/* f_2156 in k2119 in alist-update! in k1288 */
-static void C_ccall f_2156(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2156,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2162,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li60),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_2162(t7,t1,t3);}
-
-/* loop */
-static void C_fcall f_2162(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2162,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2178,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_pairp(t3))){
-t5=(C_word)C_slot(t3,C_fix(0));
-/* data-structures.scm: 282 cmp */
-t6=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
-else{
-t5=t4;
-f_2178(2,t5,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k2176 in loop */
-static void C_ccall f_2178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-/* data-structures.scm: 284 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_2162(t3,((C_word*)t0)[5],t2);}}
-
-/* k2122 in k2119 in alist-update! in k1288 */
-static void C_fcall f_2124(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2124,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2127,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 285 aq */
-t3=t1;
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
-
-/* k2125 in k2122 in k2119 in alist-update! in k1288 */
-static void C_ccall f_2127(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2127,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_setslot(t1,C_fix(1),((C_word*)t0)[5]);
-t3=((C_word*)t0)[4];
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[5]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]));}}
-
-/* shuffle in k1288 */
-static void C_ccall f_2007(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[26],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2007,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_length(t2);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2018,a[2]=t1,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
-t10=C_SCHEME_END_OF_LIST;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_FALSE;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2057,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2073,a[2]=t11,a[3]=t16,a[4]=t13,a[5]=t4,a[6]=t3,a[7]=((C_word)li58),tmp=(C_word)a,a+=8,tmp));
-t18=((C_word*)t16)[1];
-f_2073(t18,t14,t2);}
-
-/* loop286 in shuffle in k1288 */
-static void C_fcall f_2073(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2073,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2100,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li57),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2111,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g302303 */
-t6=t3;
-f_2100(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2109 in loop286 in shuffle in k1288 */
-static void C_ccall f_2111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2111,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop286299 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2073(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop286299 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2073(t6,((C_word*)t0)[3],t5);}}
-
-/* g302 in loop286 in shuffle in k1288 */
-static void C_fcall f_2100(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2100,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2108,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 267 random */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k2106 in g302 in loop286 in shuffle in k1288 */
-static void C_ccall f_2108(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2108,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[2]));}
-
-/* k2055 in shuffle in k1288 */
-static void C_ccall f_2057(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2057,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2059,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp);
-/* data-structures.scm: 267 sort! */
-t3=*((C_word*)lf[41]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
-
-/* a2058 in k2055 in shuffle in k1288 */
-static void C_ccall f_2059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2059,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_car(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_lessp(t4,t5));}
-
-/* k2016 in shuffle in k1288 */
-static void C_ccall f_2018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2018,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2020,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li55),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_2020(t5,((C_word*)t0)[2],t1);}
-
-/* loop263 in k2016 in shuffle in k1288 */
-static void C_fcall f_2020(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2020,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[40]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2049,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g279280 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2047 in loop263 in k2016 in shuffle in k1288 */
-static void C_ccall f_2049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2049,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop263276 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2020(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop263276 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2020(t6,((C_word*)t0)[3],t5);}}
-
-/* compress in k1288 */
-static void C_ccall f_1927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1927,4,t0,t1,t2,t3);}
-t4=lf[36];
-t5=(C_word)C_i_check_list_2(t3,lf[35]);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1936,a[2]=t4,a[3]=t7,a[4]=((C_word)li53),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_1936(t9,t1,t2,t3);}
-
-/* loop in compress in k1288 */
-static void C_fcall f_1936(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a;
-loop:
-a=C_alloc(4);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1936,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-if(C_truep((C_word)C_i_pairp(t3))){
-if(C_truep((C_word)C_slot(t2,C_fix(0)))){
-t4=(C_word)C_slot(t3,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1978,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_slot(t2,C_fix(1));
-t7=(C_word)C_slot(t3,C_fix(1));
-/* data-structures.scm: 259 loop */
-t11=t5;
-t12=t6;
-t13=t7;
-t1=t11;
-t2=t12;
-t3=t13;
-goto loop;}
-else{
-t4=(C_word)C_slot(t2,C_fix(1));
-t5=(C_word)C_slot(t3,C_fix(1));
-/* data-structures.scm: 260 loop */
-t11=t1;
-t12=t4;
-t13=t5;
-t1=t11;
-t2=t12;
-t3=t13;
-goto loop;}}
-else{
-/* data-structures.scm: 258 ##sys#signal-hook */
-t4=*((C_word*)lf[37]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[38],lf[35],((C_word*)t0)[2],t3);}}
-else{
-/* data-structures.scm: 256 ##sys#signal-hook */
-t4=*((C_word*)lf[37]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[38],lf[35],((C_word*)t0)[2],t2);}}}
-
-/* k1976 in loop in compress in k1288 */
-static void C_ccall f_1978(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1978,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* join in k1288 */
-static void C_ccall f_1868(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr3rv,(void*)f_1868r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest_vector(a,C_rest_count(0));
-f_1868r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1868r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(7);
-t4=(C_word)C_notvemptyp(t3);
-t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):C_SCHEME_END_OF_LIST);
-t6=(C_word)C_i_check_list_2(t5,lf[33]);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1880,a[2]=t8,a[3]=t5,a[4]=((C_word)li51),tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_1880(t10,t1,t2);}
-
-/* loop in join in k1288 */
-static void C_fcall f_1880(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1880,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_slot(t2,C_fix(1));
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1915,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 247 loop */
-t7=t5;
-t8=t4;
-t1=t7;
-t2=t8;
-goto loop;}}
-else{
-/* data-structures.scm: 241 ##sys#error-not-a-proper-list */
-t3=*((C_word*)lf[34]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}}}
-
-/* k1913 in loop in join in k1288 */
-static void C_ccall f_1915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 247 ##sys#append */
-t2=*((C_word*)lf[21]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* chop in k1288 */
-static void C_ccall f_1783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1783,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_exact_2(t3,lf[30]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1790,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(0)))){
-/* data-structures.scm: 222 ##sys#error */
-t6=*((C_word*)lf[31]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[30],lf[32],t3);}
-else{
-t6=t5;
-f_1790(2,t6,C_SCHEME_UNDEFINED);}}
-
-/* k1788 in chop in k1288 */
-static void C_ccall f_1790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1790,2,t0,t1);}
-t2=(C_word)C_i_length(((C_word*)t0)[5]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1798,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_1798(t6,((C_word*)t0)[2],((C_word*)t0)[5],t2);}
-
-/* loop in k1788 in chop in k1288 */
-static void C_fcall f_1798(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1798,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-if(C_truep((C_word)C_fixnum_lessp(t3,((C_word*)t0)[4]))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_list(&a,1,t2));}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1819,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((C_word)li48),tmp=(C_word)a,a+=8,tmp));
-t7=((C_word*)t5)[1];
-f_1819(t7,t1,C_SCHEME_END_OF_LIST,t2,((C_word*)t0)[4]);}}}
-
-/* doloop205 in loop in k1788 in chop in k1288 */
-static void C_fcall f_1819(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(7);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1819,NULL,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_eqp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1833,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* data-structures.scm: 233 reverse */
-t7=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
-else{
-t6=(C_word)C_slot(t3,C_fix(0));
-t7=(C_word)C_a_i_cons(&a,2,t6,t2);
-t8=(C_word)C_slot(t3,C_fix(1));
-t9=(C_word)C_fixnum_difference(t4,C_fix(1));
-t12=t1;
-t13=t7;
-t14=t8;
-t15=t9;
-t1=t12;
-t2=t13;
-t3=t14;
-t4=t15;
-goto loop;}}
-
-/* k1831 in doloop205 in loop in k1788 in chop in k1288 */
-static void C_ccall f_1833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1833,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1837,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[4]);
-/* data-structures.scm: 233 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_1798(t4,t2,((C_word*)t0)[2],t3);}
-
-/* k1835 in k1831 in doloop205 in loop in k1788 in chop in k1288 */
-static void C_ccall f_1837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1837,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* flatten in k1288 */
-static void C_ccall f_1742(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1742r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1742r(t0,t1,t2);}}
-
-static void C_ccall f_1742r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1748,a[2]=t4,a[3]=((C_word)li46),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_1748(t6,t1,t2,C_SCHEME_END_OF_LIST);}
-
-/* loop in flatten in k1288 */
-static void C_fcall f_1748(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1748,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_slot(t2,C_fix(1));
-if(C_truep((C_word)C_i_listp(t4))){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1774,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 214 loop */
-t10=t6;
-t11=t5;
-t12=t3;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1781,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 215 loop */
-t10=t6;
-t11=t5;
-t12=t3;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}}}
-
-/* k1779 in loop in flatten in k1288 */
-static void C_ccall f_1781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1781,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k1772 in loop in flatten in k1288 */
-static void C_ccall f_1774(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 214 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_1748(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* butlast in k1288 */
-static void C_ccall f_1710(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1710,3,t0,t1,t2);}
-t3=(C_word)C_i_check_pair_2(t2,lf[28]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1719,a[2]=t5,a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_1719(t7,t1,t2);}
-
-/* loop in butlast in k1288 */
-static void C_fcall f_1719(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-loop:
-a=C_alloc(4);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1719,NULL,3,t0,t1,t2);}
-t3=(C_word)C_slot(t2,C_fix(1));
-t4=(C_truep((C_word)C_blockp(t3))?(C_word)C_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t4)){
-t5=(C_word)C_slot(t2,C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1740,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 204 loop */
-t8=t6;
-t9=t3;
-t1=t8;
-t2=t9;
-goto loop;}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}}
-
-/* k1738 in loop in butlast in k1288 */
-static void C_ccall f_1740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1740,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* intersperse in k1288 */
-static void C_ccall f_1677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1677,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1683,a[2]=t5,a[3]=t3,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_1683(t7,t1,t2);}
-
-/* loop in intersperse in k1288 */
-static void C_fcall f_1683(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1683,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_eqp(t2,C_SCHEME_END_OF_LIST))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_eqp(t3,C_SCHEME_END_OF_LIST))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-else{
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1708,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 197 loop */
-t8=t5;
-t9=t3;
-t1=t8;
-t2=t9;
-goto loop;}}}
-
-/* k1706 in loop in intersperse in k1288 */
-static void C_ccall f_1708(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1708,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* tail? in k1288 */
-static void C_ccall f_1649(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1649,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_list_2(t3,lf[26]);
-t5=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1661,a[2]=t2,a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_1661(t6,t3));}}
-
-/* loop in tail? in k1288 */
-static C_word C_fcall f_1661(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_eqp(t1,C_SCHEME_END_OF_LIST))){
-return(C_SCHEME_FALSE);}
-else{
-if(C_truep((C_word)C_eqp(((C_word*)t0)[2],t1))){
-return(C_SCHEME_TRUE);}
-else{
-t2=(C_word)C_slot(t1,C_fix(1));
-t4=t2;
-t1=t4;
-goto loop;}}}
-
-/* atom? in k1288 */
-static void C_ccall f_1646(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1646,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_not_pair_p(t2));}
-
-/* right-section in k1288 */
-static void C_ccall f_1620(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1620r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1620r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1620r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(6);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1624,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 171 ##sys#check-closure */
-t5=*((C_word*)lf[22]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[24]);}
-
-/* k1622 in right-section in k1288 */
-static void C_ccall f_1624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1624,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1627,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 172 ##sys#reverse */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1625 in k1622 in right-section in k1288 */
-static void C_ccall f_1627(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1627,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1628,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li37),tmp=(C_word)a,a+=6,tmp));}
-
-/* f_1628 in k1625 in k1622 in right-section in k1288 */
-static void C_ccall f_1628(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+12)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1628r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1628r(t0,t1,t2);}}
-
-static void C_ccall f_1628r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(12);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1636,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1640,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1644,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 174 ##sys#reverse */
-t6=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
-
-/* k1642 */
-static void C_ccall f_1644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 174 ##sys#append */
-t2=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k1638 */
-static void C_ccall f_1640(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 174 ##sys#reverse */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1634 */
-static void C_ccall f_1636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* left-section in k1288 */
-static void C_ccall f_1605(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1605r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1605r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1605r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(5);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1609,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 164 ##sys#check-closure */
-t5=*((C_word*)lf[22]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[20]);}
-
-/* k1607 in left-section in k1288 */
-static void C_ccall f_1609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1609,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word)li35),tmp=(C_word)a,a+=5,tmp));}
-
-/* f_1610 in k1607 in left-section in k1288 */
-static void C_ccall f_1610(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1610r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1610r(t0,t1,t2);}}
-
-static void C_ccall f_1610r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1618,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 166 ##sys#append */
-t4=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t2);}
-
-/* k1616 */
-static void C_ccall f_1618(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* never? in k1288 */
-static void C_ccall f_1602(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1602,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* always? in k1288 */
-static void C_ccall f_1599(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1599,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* none? in k1288 */
-static void C_ccall f_1596(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1596,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-
-/* any? in k1288 */
-static void C_ccall f_1593(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1593,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
-
-/* each in k1288 */
-static void C_ccall f_1537(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1537r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1537r(t0,t1,t2);}}
-
-static void C_ccall f_1537r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1545,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(C_word)C_slot(t2,C_fix(1));
-t4=(C_word)C_i_nullp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?(C_word)C_slot(t2,C_fix(0)):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1559,a[2]=t2,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp)));}}
-
-/* f_1559 in each in k1288 */
-static void C_ccall f_1559(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1559r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1559r(t0,t1,t2);}}
-
-static void C_ccall f_1559r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(7);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1565,a[2]=t4,a[3]=t2,a[4]=((C_word)li28),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_1565(t6,t1,((C_word*)t0)[2]);}
-
-/* loop */
-static void C_fcall f_1565(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1565,NULL,3,t0,t1,t2);}
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_slot(t2,C_fix(1));
-if(C_truep((C_word)C_i_nullp(t4))){
-C_apply(4,0,t1,t3,((C_word*)t0)[3]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1584,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-C_apply(4,0,t5,t3,((C_word*)t0)[3]);}}
-
-/* k1582 in loop */
-static void C_ccall f_1584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 153 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_1565(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* f_1545 in each in k1288 */
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1545,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[14]+1));}
-
-/* noop in k1288 */
-static void C_ccall f_1531(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1531,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[14]+1));}
-
-/* list-of? in k1288 */
-static void C_ccall f_1491(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1491,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1493,a[2]=t2,a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1493 in list-of? in k1288 */
-static void C_ccall f_1493(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1493,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1499,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li23),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_1499(t6,t1,t2);}
-
-/* loop */
-static void C_fcall f_1499(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1499,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
-else{
-if(C_truep((C_word)C_i_not_pair_p(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1518,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* data-structures.scm: 136 pred */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}}}
-
-/* k1516 in loop */
-static void C_ccall f_1518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* data-structures.scm: 136 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1499(t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* o in k1288 */
-static void C_ccall f_1452(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1452r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1452r(t0,t1,t2);}}
-
-static void C_ccall f_1452r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(6);
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=*((C_word*)lf[2]+1);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1464,a[2]=t4,a[3]=((C_word)li21),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_1464(t6,t1,t2);}}
-
-/* loop in o in k1288 */
-static void C_fcall f_1464(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1464,NULL,3,t0,t1,t2);}
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_slot(t2,C_fix(1));
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1478,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word)li20),tmp=(C_word)a,a+=6,tmp);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* f_1478 in loop in o in k1288 */
-static void C_ccall f_1478(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1478,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1486,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* data-structures.scm: 129 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_1464(t4,t3,((C_word*)t0)[2]);}
-
-/* k1484 */
-static void C_ccall f_1486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1489,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* g8586 */
-t3=t1;
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1487 in k1484 */
-static void C_ccall f_1489(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* data-structures.scm: 129 h */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* compose in k1288 */
-static void C_ccall f_1416(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1416r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1416r(t0,t1,t2);}}
-
-static void C_ccall f_1416r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1419,a[2]=t4,a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp));
-if(C_truep((C_word)C_i_nullp(t2))){
-t6=*((C_word*)lf[10]+1);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-C_apply(4,0,t1,((C_word*)t4)[1],t2);}}
-
-/* rec in compose in k1288 */
-static void C_ccall f_1419(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1419r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1419r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1419r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-if(C_truep((C_word)C_i_nullp(t3))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1427,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word)li17),tmp=(C_word)a,a+=6,tmp);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* f_1427 in rec in compose in k1288 */
-static void C_ccall f_1427(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1427r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1427r(t0,t1,t2);}}
-
-static void C_ccall f_1427r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(6);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1433,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word)li16),tmp=(C_word)a,a+=6,tmp);
-/* data-structures.scm: 114 call-with-values */
-C_call_with_values(4,0,t1,t3,((C_word*)t0)[2]);}
-
-/* a1432 */
-static void C_ccall f_1433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1433,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1441,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t2,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-
-/* k1439 in a1432 */
-static void C_ccall f_1441(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* complement in k1288 */
-static void C_ccall f_1404(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1404,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1406,a[2]=t2,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1406 in complement in k1288 */
-static void C_ccall f_1406(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1406r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1406r(t0,t1,t2);}}
-
-static void C_ccall f_1406r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1414,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_apply(4,0,t3,((C_word*)t0)[2],t2);}
-
-/* k1412 */
-static void C_ccall f_1414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_not(t1));}
-
-/* flip in k1288 */
-static void C_ccall f_1396(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1396,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1398,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1398 in flip in k1288 */
-static void C_ccall f_1398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1398,4,t0,t1,t2,t3);}
-/* data-structures.scm: 103 proc */
-t4=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t3,t2);}
-
-/* constantly in k1288 */
-static void C_ccall f_1373(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1373r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1373r(t0,t1,t2);}}
-
-static void C_ccall f_1373r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(4);
-t3=(C_word)C_i_length(t2);
-t4=(C_word)C_eqp(C_fix(1),t3);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(t2);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1384,a[2]=t5,a[3]=((C_word)li9),tmp=(C_word)a,a+=4,tmp);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1386,a[2]=t2,a[3]=((C_word)li10),tmp=(C_word)a,a+=4,tmp);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* f_1386 in constantly in k1288 */
-static void C_ccall f_1386(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1386,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* f_1384 in constantly in k1288 */
-static void C_ccall f_1384(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1384,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* disjoin in k1288 */
-static void C_ccall f_1336(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1336r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1336r(t0,t1,t2);}}
-
-static void C_ccall f_1336r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a=C_alloc(4);
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1338,a[2]=t2,a[3]=((C_word)li7),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1338 in disjoin in k1288 */
-static void C_ccall f_1338(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1338,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1344,a[2]=t2,a[3]=t4,a[4]=((C_word)li6),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_1344(t6,t1,((C_word*)t0)[2]);}
-
-/* loop */
-static void C_fcall f_1344(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1344,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1357,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* g5758 */
-t5=t3;
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[2]);}}
-
-/* k1355 in loop */
-static void C_ccall f_1357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-/* data-structures.scm: 95 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_1344(t3,((C_word*)t0)[4],t2);}}
-
-/* conjoin in k1288 */
-static void C_ccall f_1303(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1303r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1303r(t0,t1,t2);}}
-
-static void C_ccall f_1303r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a=C_alloc(4);
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1305,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1305 in conjoin in k1288 */
-static void C_ccall f_1305(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1305,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1311,a[2]=t2,a[3]=t4,a[4]=((C_word)li3),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_1311(t6,t1,((C_word*)t0)[2]);}
-
-/* loop */
-static void C_fcall f_1311(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1311,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_nullp(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1327,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* g4243 */
-t6=t4;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}}
-
-/* k1325 in loop */
-static void C_ccall f_1327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* data-structures.scm: 88 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1311(t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* project in k1288 */
-static void C_ccall f_1295(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1295,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1297,a[2]=t2,a[3]=((C_word)li1),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_1297 in project in k1288 */
-static void C_ccall f_1297(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2rv,(void*)f_1297r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest_vector(a,C_rest_count(0));
-f_1297r(t0,t1,t2);}}
-
-static void C_ccall f_1297r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_vector_ref(t2,((C_word*)t0)[2]));}
-
-/* identity in k1288 */
-static void C_ccall f_1292(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1292,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[267] = {
-{"toplevel:data_structures_scm",(void*)C_data_structures_toplevel},
-{"f_1290:data_structures_scm",(void*)f_1290},
-{"f_4737:data_structures_scm",(void*)f_4737},
-{"f_4747:data_structures_scm",(void*)f_4747},
-{"f_4766:data_structures_scm",(void*)f_4766},
-{"f_4708:data_structures_scm",(void*)f_4708},
-{"f_4654:data_structures_scm",(void*)f_4654},
-{"f_4673:data_structures_scm",(void*)f_4673},
-{"f_4683:data_structures_scm",(void*)f_4683},
-{"f_4665:data_structures_scm",(void*)f_4665},
-{"f_4645:data_structures_scm",(void*)f_4645},
-{"f_4609:data_structures_scm",(void*)f_4609},
-{"f_4619:data_structures_scm",(void*)f_4619},
-{"f_4577:data_structures_scm",(void*)f_4577},
-{"f_4556:data_structures_scm",(void*)f_4556},
-{"f_4566:data_structures_scm",(void*)f_4566},
-{"f_4535:data_structures_scm",(void*)f_4535},
-{"f_4545:data_structures_scm",(void*)f_4545},
-{"f_4522:data_structures_scm",(void*)f_4522},
-{"f_4516:data_structures_scm",(void*)f_4516},
-{"f_4510:data_structures_scm",(void*)f_4510},
-{"f_4427:data_structures_scm",(void*)f_4427},
-{"f_4505:data_structures_scm",(void*)f_4505},
-{"f_4431:data_structures_scm",(void*)f_4431},
-{"f_4445:data_structures_scm",(void*)f_4445},
-{"f_4455:data_structures_scm",(void*)f_4455},
-{"f_4164:data_structures_scm",(void*)f_4164},
-{"f_4391:data_structures_scm",(void*)f_4391},
-{"f_4414:data_structures_scm",(void*)f_4414},
-{"f_4399:data_structures_scm",(void*)f_4399},
-{"f_4314:data_structures_scm",(void*)f_4314},
-{"f_4381:data_structures_scm",(void*)f_4381},
-{"f_4385:data_structures_scm",(void*)f_4385},
-{"f_4317:data_structures_scm",(void*)f_4317},
-{"f_4326:data_structures_scm",(void*)f_4326},
-{"f_4366:data_structures_scm",(void*)f_4366},
-{"f_4334:data_structures_scm",(void*)f_4334},
-{"f_4338:data_structures_scm",(void*)f_4338},
-{"f_4320:data_structures_scm",(void*)f_4320},
-{"f_4255:data_structures_scm",(void*)f_4255},
-{"f_4259:data_structures_scm",(void*)f_4259},
-{"f_4268:data_structures_scm",(void*)f_4268},
-{"f_4300:data_structures_scm",(void*)f_4300},
-{"f_4276:data_structures_scm",(void*)f_4276},
-{"f_4280:data_structures_scm",(void*)f_4280},
-{"f_4262:data_structures_scm",(void*)f_4262},
-{"f_4220:data_structures_scm",(void*)f_4220},
-{"f_4226:data_structures_scm",(void*)f_4226},
-{"f_4253:data_structures_scm",(void*)f_4253},
-{"f_4239:data_structures_scm",(void*)f_4239},
-{"f_4173:data_structures_scm",(void*)f_4173},
-{"f_4179:data_structures_scm",(void*)f_4179},
-{"f_4218:data_structures_scm",(void*)f_4218},
-{"f_4200:data_structures_scm",(void*)f_4200},
-{"f_4137:data_structures_scm",(void*)f_4137},
-{"f_4162:data_structures_scm",(void*)f_4162},
-{"f_4155:data_structures_scm",(void*)f_4155},
-{"f_4151:data_structures_scm",(void*)f_4151},
-{"f_4004:data_structures_scm",(void*)f_4004},
-{"f_4094:data_structures_scm",(void*)f_4094},
-{"f_4101:data_structures_scm",(void*)f_4101},
-{"f_4103:data_structures_scm",(void*)f_4103},
-{"f_4007:data_structures_scm",(void*)f_4007},
-{"f_4058:data_structures_scm",(void*)f_4058},
-{"f_4017:data_structures_scm",(void*)f_4017},
-{"f_4020:data_structures_scm",(void*)f_4020},
-{"f_4026:data_structures_scm",(void*)f_4026},
-{"f_3872:data_structures_scm",(void*)f_3872},
-{"f_3954:data_structures_scm",(void*)f_3954},
-{"f_3977:data_structures_scm",(void*)f_3977},
-{"f_3957:data_structures_scm",(void*)f_3957},
-{"f_3875:data_structures_scm",(void*)f_3875},
-{"f_3882:data_structures_scm",(void*)f_3882},
-{"f_3773:data_structures_scm",(void*)f_3773},
-{"f_3807:data_structures_scm",(void*)f_3807},
-{"f_3814:data_structures_scm",(void*)f_3814},
-{"f_3862:data_structures_scm",(void*)f_3862},
-{"f_3834:data_structures_scm",(void*)f_3834},
-{"f_3664:data_structures_scm",(void*)f_3664},
-{"f_3739:data_structures_scm",(void*)f_3739},
-{"f_3767:data_structures_scm",(void*)f_3767},
-{"f_3691:data_structures_scm",(void*)f_3691},
-{"f_3701:data_structures_scm",(void*)f_3701},
-{"f_3612:data_structures_scm",(void*)f_3612},
-{"f_3616:data_structures_scm",(void*)f_3616},
-{"f_3548:data_structures_scm",(void*)f_3548},
-{"f_3563:data_structures_scm",(void*)f_3563},
-{"f_3594:data_structures_scm",(void*)f_3594},
-{"f_3598:data_structures_scm",(void*)f_3598},
-{"f_3583:data_structures_scm",(void*)f_3583},
-{"f_3426:data_structures_scm",(void*)f_3426},
-{"f_3438:data_structures_scm",(void*)f_3438},
-{"f_3471:data_structures_scm",(void*)f_3471},
-{"f_3536:data_structures_scm",(void*)f_3536},
-{"f_3510:data_structures_scm",(void*)f_3510},
-{"f_3466:data_structures_scm",(void*)f_3466},
-{"f_3452:data_structures_scm",(void*)f_3452},
-{"f_3224:data_structures_scm",(void*)f_3224},
-{"f_3418:data_structures_scm",(void*)f_3418},
-{"f_3401:data_structures_scm",(void*)f_3401},
-{"f_3261:data_structures_scm",(void*)f_3261},
-{"f_3264:data_structures_scm",(void*)f_3264},
-{"f_3276:data_structures_scm",(void*)f_3276},
-{"f_3281:data_structures_scm",(void*)f_3281},
-{"f_3300:data_structures_scm",(void*)f_3300},
-{"f_3227:data_structures_scm",(void*)f_3227},
-{"f_3232:data_structures_scm",(void*)f_3232},
-{"f_3238:data_structures_scm",(void*)f_3238},
-{"f_3109:data_structures_scm",(void*)f_3109},
-{"f_3113:data_structures_scm",(void*)f_3113},
-{"f_3127:data_structures_scm",(void*)f_3127},
-{"f_3137:data_structures_scm",(void*)f_3137},
-{"f_3142:data_structures_scm",(void*)f_3142},
-{"f_2974:data_structures_scm",(void*)f_2974},
-{"f_3015:data_structures_scm",(void*)f_3015},
-{"f_3042:data_structures_scm",(void*)f_3042},
-{"f_3081:data_structures_scm",(void*)f_3081},
-{"f_3025:data_structures_scm",(void*)f_3025},
-{"f_2995:data_structures_scm",(void*)f_2995},
-{"f_3010:data_structures_scm",(void*)f_3010},
-{"f_2894:data_structures_scm",(void*)f_2894},
-{"f_2911:data_structures_scm",(void*)f_2911},
-{"f_2906:data_structures_scm",(void*)f_2906},
-{"f_2901:data_structures_scm",(void*)f_2901},
-{"f_2896:data_structures_scm",(void*)f_2896},
-{"f_2857:data_structures_scm",(void*)f_2857},
-{"f_2867:data_structures_scm",(void*)f_2867},
-{"f_2777:data_structures_scm",(void*)f_2777},
-{"f_2794:data_structures_scm",(void*)f_2794},
-{"f_2789:data_structures_scm",(void*)f_2789},
-{"f_2784:data_structures_scm",(void*)f_2784},
-{"f_2779:data_structures_scm",(void*)f_2779},
-{"f_2740:data_structures_scm",(void*)f_2740},
-{"f_2750:data_structures_scm",(void*)f_2750},
-{"f_2709:data_structures_scm",(void*)f_2709},
-{"f_2678:data_structures_scm",(void*)f_2678},
-{"f_2650:data_structures_scm",(void*)f_2650},
-{"f_2654:data_structures_scm",(void*)f_2654},
-{"f_2622:data_structures_scm",(void*)f_2622},
-{"f_2626:data_structures_scm",(void*)f_2626},
-{"f_2613:data_structures_scm",(void*)f_2613},
-{"f_2619:data_structures_scm",(void*)f_2619},
-{"f_2604:data_structures_scm",(void*)f_2604},
-{"f_2610:data_structures_scm",(void*)f_2610},
-{"f_2557:data_structures_scm",(void*)f_2557},
-{"f_2578:data_structures_scm",(void*)f_2578},
-{"f_2591:data_structures_scm",(void*)f_2591},
-{"f_2512:data_structures_scm",(void*)f_2512},
-{"f_2522:data_structures_scm",(void*)f_2522},
-{"f_2551:data_structures_scm",(void*)f_2551},
-{"f_2520:data_structures_scm",(void*)f_2520},
-{"f_2467:data_structures_scm",(void*)f_2467},
-{"f_2504:data_structures_scm",(void*)f_2504},
-{"f_2507:data_structures_scm",(void*)f_2507},
-{"f_2390:data_structures_scm",(void*)f_2390},
-{"f_2393:data_structures_scm",(void*)f_2393},
-{"f_2409:data_structures_scm",(void*)f_2409},
-{"f_2418:data_structures_scm",(void*)f_2418},
-{"f_2340:data_structures_scm",(void*)f_2340},
-{"f_2352:data_structures_scm",(void*)f_2352},
-{"f_2371:data_structures_scm",(void*)f_2371},
-{"f_2216:data_structures_scm",(void*)f_2216},
-{"f_2292:data_structures_scm",(void*)f_2292},
-{"f_2287:data_structures_scm",(void*)f_2287},
-{"f_2218:data_structures_scm",(void*)f_2218},
-{"f_2247:data_structures_scm",(void*)f_2247},
-{"f_2253:data_structures_scm",(void*)f_2253},
-{"f_2269:data_structures_scm",(void*)f_2269},
-{"f_2222:data_structures_scm",(void*)f_2222},
-{"f_2225:data_structures_scm",(void*)f_2225},
-{"f_2117:data_structures_scm",(void*)f_2117},
-{"f_2121:data_structures_scm",(void*)f_2121},
-{"f_2156:data_structures_scm",(void*)f_2156},
-{"f_2162:data_structures_scm",(void*)f_2162},
-{"f_2178:data_structures_scm",(void*)f_2178},
-{"f_2124:data_structures_scm",(void*)f_2124},
-{"f_2127:data_structures_scm",(void*)f_2127},
-{"f_2007:data_structures_scm",(void*)f_2007},
-{"f_2073:data_structures_scm",(void*)f_2073},
-{"f_2111:data_structures_scm",(void*)f_2111},
-{"f_2100:data_structures_scm",(void*)f_2100},
-{"f_2108:data_structures_scm",(void*)f_2108},
-{"f_2057:data_structures_scm",(void*)f_2057},
-{"f_2059:data_structures_scm",(void*)f_2059},
-{"f_2018:data_structures_scm",(void*)f_2018},
-{"f_2020:data_structures_scm",(void*)f_2020},
-{"f_2049:data_structures_scm",(void*)f_2049},
-{"f_1927:data_structures_scm",(void*)f_1927},
-{"f_1936:data_structures_scm",(void*)f_1936},
-{"f_1978:data_structures_scm",(void*)f_1978},
-{"f_1868:data_structures_scm",(void*)f_1868},
-{"f_1880:data_structures_scm",(void*)f_1880},
-{"f_1915:data_structures_scm",(void*)f_1915},
-{"f_1783:data_structures_scm",(void*)f_1783},
-{"f_1790:data_structures_scm",(void*)f_1790},
-{"f_1798:data_structures_scm",(void*)f_1798},
-{"f_1819:data_structures_scm",(void*)f_1819},
-{"f_1833:data_structures_scm",(void*)f_1833},
-{"f_1837:data_structures_scm",(void*)f_1837},
-{"f_1742:data_structures_scm",(void*)f_1742},
-{"f_1748:data_structures_scm",(void*)f_1748},
-{"f_1781:data_structures_scm",(void*)f_1781},
-{"f_1774:data_structures_scm",(void*)f_1774},
-{"f_1710:data_structures_scm",(void*)f_1710},
-{"f_1719:data_structures_scm",(void*)f_1719},
-{"f_1740:data_structures_scm",(void*)f_1740},
-{"f_1677:data_structures_scm",(void*)f_1677},
-{"f_1683:data_structures_scm",(void*)f_1683},
-{"f_1708:data_structures_scm",(void*)f_1708},
-{"f_1649:data_structures_scm",(void*)f_1649},
-{"f_1661:data_structures_scm",(void*)f_1661},
-{"f_1646:data_structures_scm",(void*)f_1646},
-{"f_1620:data_structures_scm",(void*)f_1620},
-{"f_1624:data_structures_scm",(void*)f_1624},
-{"f_1627:data_structures_scm",(void*)f_1627},
-{"f_1628:data_structures_scm",(void*)f_1628},
-{"f_1644:data_structures_scm",(void*)f_1644},
-{"f_1640:data_structures_scm",(void*)f_1640},
-{"f_1636:data_structures_scm",(void*)f_1636},
-{"f_1605:data_structures_scm",(void*)f_1605},
-{"f_1609:data_structures_scm",(void*)f_1609},
-{"f_1610:data_structures_scm",(void*)f_1610},
-{"f_1618:data_structures_scm",(void*)f_1618},
-{"f_1602:data_structures_scm",(void*)f_1602},
-{"f_1599:data_structures_scm",(void*)f_1599},
-{"f_1596:data_structures_scm",(void*)f_1596},
-{"f_1593:data_structures_scm",(void*)f_1593},
-{"f_1537:data_structures_scm",(void*)f_1537},
-{"f_1559:data_structures_scm",(void*)f_1559},
-{"f_1565:data_structures_scm",(void*)f_1565},
-{"f_1584:data_structures_scm",(void*)f_1584},
-{"f_1545:data_structures_scm",(void*)f_1545},
-{"f_1531:data_structures_scm",(void*)f_1531},
-{"f_1491:data_structures_scm",(void*)f_1491},
-{"f_1493:data_structures_scm",(void*)f_1493},
-{"f_1499:data_structures_scm",(void*)f_1499},
-{"f_1518:data_structures_scm",(void*)f_1518},
-{"f_1452:data_structures_scm",(void*)f_1452},
-{"f_1464:data_structures_scm",(void*)f_1464},
-{"f_1478:data_structures_scm",(void*)f_1478},
-{"f_1486:data_structures_scm",(void*)f_1486},
-{"f_1489:data_structures_scm",(void*)f_1489},
-{"f_1416:data_structures_scm",(void*)f_1416},
-{"f_1419:data_structures_scm",(void*)f_1419},
-{"f_1427:data_structures_scm",(void*)f_1427},
-{"f_1433:data_structures_scm",(void*)f_1433},
-{"f_1441:data_structures_scm",(void*)f_1441},
-{"f_1404:data_structures_scm",(void*)f_1404},
-{"f_1406:data_structures_scm",(void*)f_1406},
-{"f_1414:data_structures_scm",(void*)f_1414},
-{"f_1396:data_structures_scm",(void*)f_1396},
-{"f_1398:data_structures_scm",(void*)f_1398},
-{"f_1373:data_structures_scm",(void*)f_1373},
-{"f_1386:data_structures_scm",(void*)f_1386},
-{"f_1384:data_structures_scm",(void*)f_1384},
-{"f_1336:data_structures_scm",(void*)f_1336},
-{"f_1338:data_structures_scm",(void*)f_1338},
-{"f_1344:data_structures_scm",(void*)f_1344},
-{"f_1357:data_structures_scm",(void*)f_1357},
-{"f_1303:data_structures_scm",(void*)f_1303},
-{"f_1305:data_structures_scm",(void*)f_1305},
-{"f_1311:data_structures_scm",(void*)f_1311},
-{"f_1327:data_structures_scm",(void*)f_1327},
-{"f_1295:data_structures_scm",(void*)f_1295},
-{"f_1297:data_structures_scm",(void*)f_1297},
-{"f_1292:data_structures_scm",(void*)f_1292},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/eval.c b/bootstrap/eval.c
deleted file mode 100644
index 431adfc6..00000000
--- a/bootstrap/eval.c
+++ /dev/null
@@ -1,19630 +0,0 @@
-/* Generated from eval.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:31
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: eval.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file eval.c
- unit: eval
-*/
-
-#include "chicken.h"
-
-
-#ifndef C_INSTALL_EGG_HOME
-# define C_INSTALL_EGG_HOME "."
-#endif
-
-#ifndef C_INSTALL_SHARE_HOME
-# define C_INSTALL_SHARE_HOME NULL
-#endif
-
-#ifndef C_BINARY_VERSION
-# define C_BINARY_VERSION 0
-#endif
-
-
-#define C_store_result(x, ptr) (*((C_word *)C_block_item(ptr, 0)) = (x), C_SCHEME_TRUE)
-
-
-#define C_copy_result_string(str, buf, n) (C_memcpy((char *)C_block_item(buf, 0), C_c_string(str), C_unfix(n)), ((char *)C_block_item(buf, 0))[ C_unfix(n) ] = '\0', C_SCHEME_TRUE)
-
-
-C_externexport void CHICKEN_get_error_message(char *t0,int t1);
-
-C_externexport int CHICKEN_load(char * t0);
-
-C_externexport int CHICKEN_read(char * t0,C_word *t1);
-
-C_externexport int CHICKEN_apply_to_string(C_word t0,C_word t1,char *t2,int t3);
-
-C_externexport int CHICKEN_apply(C_word t0,C_word t1,C_word *t2);
-
-C_externexport int CHICKEN_eval_string_to_string(char * t0,char *t1,int t2);
-
-C_externexport int CHICKEN_eval_to_string(C_word t0,char *t1,int t2);
-
-C_externexport int CHICKEN_eval_string(char * t0,C_word *t1);
-
-C_externexport int CHICKEN_eval(C_word t0,C_word *t1);
-
-C_externexport int CHICKEN_yield();
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_expand_toplevel)
-C_externimport void C_ccall C_expand_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[402];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,105,99,107,101,110,45,112,114,101,102,105,120,32,46,32,116,109,112,49,51,54,49,51,55,41,0,0,0,0,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,14),40,99,104,105,99,107,101,110,45,104,111,109,101,41,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,104,97,115,104,45,115,121,109,98,111,108,32,115,49,53,52,32,110,49,53,53,41,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,114,101,102,32,104,116,49,53,57,32,107,101,121,49,54,48,41,0,0,0,0,0};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,98,117,99,107,101,116,49,55,52,41};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,115,101,116,33,32,104,116,49,54,55,32,107,101,121,49,54,56,32,118,97,108,49,54,57,41,0,0,0,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,63),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,117,112,100,97,116,101,33,32,104,116,49,55,55,32,107,101,121,49,55,56,32,117,112,100,116,102,117,110,99,49,55,57,32,118,97,108,117,102,117,110,99,49,56,48,41,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,16),40,103,50,48,52,32,98,117,99,107,101,116,50,48,54,41};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,57,55,32,103,50,48,49,50,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,49,57,48,32,105,49,57,52,41};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,102,111,114,45,101,97,99,104,32,112,49,56,55,32,104,116,49,56,56,41,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,98,117,99,107,101,116,50,49,57,41};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,48),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,108,111,99,97,116,105,111,110,32,104,116,50,49,50,32,107,101,121,50,49,51,32,97,100,100,112,50,49,52,41};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,12),40,97,51,51,50,48,32,120,50,51,49,41,0,0,0,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,17),40,97,51,51,51,51,32,112,50,51,52,32,105,50,51,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,101,118,97,108,45,100,101,99,111,114,97,116,111,114,32,112,50,50,55,32,108,108,50,50,56,32,104,50,50,57,32,99,110,116,114,50,51,48,41,0,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,21),40,102,105,110,100,45,105,100,32,105,100,50,55,52,32,115,101,50,55,53,41,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,21),40,114,101,110,97,109,101,32,118,97,114,50,56,52,32,115,101,50,56,53,41,0,0,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,51,50,55,41,0,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,11),40,103,51,49,56,32,112,51,50,48,41,0,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,101,110,118,115,51,48,56,32,101,105,51,48,57,41,0,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,27),40,108,111,111,107,117,112,32,118,97,114,48,51,48,50,32,101,51,48,51,32,115,101,51,48,52,41,0,0,0,0,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,9),40,115,119,97,112,51,53,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,7),40,97,51,53,53,48,41,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,19),40,101,118,97,108,47,109,101,116,97,32,102,111,114,109,51,52,57,41,0,0,0,0,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,102,95,51,53,56,53,32,46,32,118,51,56,56,41,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,51,53,57,54,41,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,13),40,102,95,51,54,56,53,32,118,52,50,53,41,0,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,13),40,102,95,51,54,57,52,32,118,52,50,54,41,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,15),40,102,95,51,54,50,51,32,46,32,118,52,49,50,41,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,20),40,102,49,48,54,52,50,32,46,32,118,52,50,51,49,48,54,52,49,41,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,20),40,102,49,48,54,52,55,32,46,32,118,52,50,51,49,48,54,52,54,41,0,0,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,17),40,97,51,54,48,50,32,105,51,57,49,32,106,51,57,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,49,49,32,46,32,118,52,51,50,41,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,49,57,32,46,32,118,52,51,51,41,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,50,55,32,46,32,118,52,51,52,41,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,51,53,32,46,32,118,52,51,53,41,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,51,55,32,46,32,118,52,51,54,41,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,52,56,32,46,32,118,52,51,55,41,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,53,48,32,46,32,118,52,51,56,41,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,54,49,32,46,32,118,52,52,57,41,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,49,55,32,46,32,118,52,54,53,41,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,50,53,32,46,32,118,52,54,54,41,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,51,51,32,46,32,118,52,54,55,41,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,52,49,32,46,32,118,52,54,56,41,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,52,57,32,46,32,118,52,54,57,41,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,53,55,32,46,32,118,52,55,48,41,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,54,53,32,46,32,118,52,55,49,41,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,54,55,32,46,32,118,52,55,50,41,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,56,53,32,46,32,118,52,56,48,41,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,15),40,102,95,51,57,48,50,32,46,32,118,52,56,51,41,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,15),40,102,95,51,57,48,55,32,46,32,118,52,56,52,41,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,13),40,102,95,51,57,52,49,32,118,52,56,53,41,0,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,13),40,102,95,51,57,54,49,32,118,52,57,48,41,0,0,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,13),40,102,95,52,48,53,50,32,118,53,48,56,41,0,0,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,13),40,102,95,52,48,55,55,32,118,53,49,56,41,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,7),40,97,52,49,51,48,41,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,57,56,32,118,53,52,55,41,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,13),40,102,95,52,50,49,49,32,118,53,52,56,41,0,0,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,54,54,32,118,53,52,51,41,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,15),40,102,95,52,49,55,53,32,46,32,118,53,52,52,41,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,56,51,32,118,53,52,54,41,0,0,0};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,17),40,97,52,49,51,54,32,105,53,51,48,32,106,53,51,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,13),40,102,95,52,50,54,54,32,118,54,52,51,41,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,13),40,102,95,52,51,48,51,32,118,54,52,54,41,0,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,13),40,102,95,52,51,53,56,32,118,54,53,50,41,0,0,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,102,95,52,52,50,56,32,118,54,53,57,41,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,25),40,100,111,108,111,111,112,54,56,55,32,105,54,57,49,32,118,108,105,115,116,54,57,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,13),40,102,95,52,52,57,50,32,118,54,56,53,41,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,11),40,103,54,55,57,32,120,54,56,49,41,0,0,0,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,54,54,51,32,103,54,55,51,54,55,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,49,49,32,103,54,50,49,54,50,54,32,103,54,50,50,54,50,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,56,54,32,103,53,57,54,54,48,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,54,49,32,103,53,55,49,53,55,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,51,52,32,103,55,52,52,55,52,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,49,48,32,103,55,50,48,55,50,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,14),40,97,52,57,51,52,32,46,32,114,56,53,50,41,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,50,57,32,118,56,53,49,41,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,7),40,97,52,57,53,51,41,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,52,56,32,118,56,53,51,41,0,0,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,20),40,97,52,57,55,55,32,97,49,56,53,53,32,46,32,114,56,53,54,41,0,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,55,50,32,118,56,53,52,41,0,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,13),40,97,52,57,57,54,32,97,49,56,53,56,41,0,0,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,57,49,32,118,56,53,55,41,0,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,26),40,97,53,48,50,52,32,97,49,56,54,48,32,97,50,56,54,49,32,46,32,114,56,54,50,41,0,0,0,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,49,57,32,118,56,53,57,41,0,0,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,19),40,97,53,48,52,51,32,97,49,56,54,52,32,97,50,56,54,53,41,0,0,0,0,0};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,51,56,32,118,56,54,51,41,0,0,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,32),40,97,53,48,55,49,32,97,49,56,54,55,32,97,50,56,54,56,32,97,51,56,54,57,32,46,32,114,56,55,48,41};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,54,54,32,118,56,54,54,41,0,0,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,25),40,97,53,48,57,48,32,97,49,56,55,50,32,97,50,56,55,51,32,97,51,56,55,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,56,53,32,118,56,55,49,41,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,38),40,97,53,49,49,56,32,97,49,56,55,54,32,97,50,56,55,55,32,97,51,56,55,56,32,97,52,56,55,57,32,46,32,114,56,56,48,41,0,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,49,51,32,118,56,55,53,41,0,0,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,31),40,97,53,49,51,55,32,97,49,56,56,50,32,97,50,56,56,51,32,97,51,56,56,52,32,97,52,56,56,53,41,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,51,50,32,118,56,56,49,41,0,0,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,42),40,100,111,108,111,111,112,49,50,52,57,32,110,49,50,53,51,32,99,49,50,53,52,32,97,114,103,115,49,50,53,53,32,108,97,115,116,49,50,53,54,41,0,0,0,0,0,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,15),40,97,53,49,53,57,32,46,32,97,115,56,56,55,41,0};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,53,52,32,118,56,56,54,41,0,0,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,15),40,97,53,49,56,50,32,46,32,97,115,56,56,57,41,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,55,55,32,118,56,56,56,41,0,0,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,56,49,52,32,103,56,50,52,56,50,57,32,103,56,50,53,56,51,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,57,48,32,103,56,48,48,56,48,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,31),40,97,52,57,48,53,32,118,97,114,115,55,56,51,32,97,114,103,99,55,56,52,32,114,101,115,116,55,56,53,41,0};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,7),40,97,53,51,49,52,41,0};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,30),40,97,53,51,50,48,32,108,108,105,115,116,55,55,56,55,56,48,32,98,111,100,121,55,55,57,55,56,49,41,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,11),40,103,57,49,50,32,98,57,49,52,41,0,0,0,0,0};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,57,54,32,103,57,48,54,57,49,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,6),40,103,57,53,53,41,0,0};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,52,56,32,103,57,53,50,57,53,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,11),40,103,57,51,57,32,98,57,52,49,41,0,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,50,51,32,103,57,51,51,57,51,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,49,48,50,48,41,0,0,0,0,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,50,32,120,115,49,48,53,54,41,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,14),40,102,95,53,54,55,53,32,118,49,48,53,52,41,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,98,111,100,121,49,48,53,49,32,120,115,49,48,53,50,41,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,7),40,97,53,54,53,48,41,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,13),40,103,57,57,52,32,101,120,112,57,57,54,41,0,0,0};
-static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,55,56,32,103,57,56,56,57,57,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,49,51,32,103,49,49,50,51,49,49,50,55,41,0,0,0,0};
-static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,13),40,103,49,49,48,48,32,120,49,49,48,50,41,0,0,0};
-static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,56,52,32,103,49,48,57,52,49,48,57,56,41,0,0,0,0};
-static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,7),40,97,54,48,54,50,41,0};
-static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,37),40,97,54,48,55,50,32,101,120,112,49,49,52,53,49,49,52,54,49,49,52,57,32,95,49,49,52,55,49,49,52,56,49,49,53,48,41,0,0,0};
-static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,49,49,52,50,41,0,0};
-static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,13),40,103,49,49,55,56,32,100,49,49,56,48,41,0,0,0};
-static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,55,49,32,103,49,49,55,53,49,49,55,55,41,0,0,0,0};
-static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,44),40,99,111,109,112,105,108,101,32,120,51,55,54,32,101,51,55,55,32,104,51,55,56,32,116,102,51,55,57,32,99,110,116,114,51,56,48,32,115,101,51,56,49,41,0,0,0,0};
-static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,110,49,50,54,50,41,0,0,0,0};
-static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,14),40,102,95,54,52,56,51,32,118,49,50,56,53,41,0,0};
-static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,48,51,32,118,49,50,57,48,41,0,0};
-static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,51,52,32,118,49,50,57,55,41,0,0};
-static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,55,50,32,118,49,51,48,53,41,0,0};
-static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,49,55,32,118,49,51,49,52,41,0,0};
-static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,13),40,103,49,51,54,50,32,97,49,51,54,52,41,0,0,0};
-static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,52,54,32,103,49,51,53,54,49,51,54,48,41,0,0,0,0};
-static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,53,49,32,118,49,51,52,51,41,0,0};
-static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,13),40,103,49,51,51,55,32,97,49,51,51,57,41,0,0,0};
-static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,50,49,32,103,49,51,51,49,49,51,51,53,41,0,0,0,0};
-static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,49),40,99,111,109,112,105,108,101,45,99,97,108,108,32,120,49,50,55,48,32,101,49,50,55,49,32,116,102,49,50,55,50,32,99,110,116,114,49,50,55,51,32,115,101,49,50,55,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,58),40,35,35,115,121,115,35,99,111,109,112,105,108,101,45,116,111,45,99,108,111,115,117,114,101,32,101,120,112,50,53,50,32,101,110,118,50,53,51,32,115,101,50,53,52,32,46,32,116,109,112,50,53,49,50,53,53,41,0,0,0,0,0,0};
-static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,22),40,101,118,97,108,32,120,49,52,49,57,32,46,32,101,110,118,49,52,50,48,41,0,0};
-static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
-static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,34),40,108,111,111,112,32,108,108,105,115,116,49,52,50,55,32,118,97,114,115,49,52,50,56,32,97,114,103,99,49,52,50,57,41,0,0,0,0,0,0};
-static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,100,101,99,111,109,112,111,115,101,45,108,97,109,98,100,97,45,108,105,115,116,32,108,108,105,115,116,48,49,52,50,50,32,107,49,52,50,51,41,0,0};
-static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,8),40,102,95,54,56,55,55,41};
-static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,109,111,100,101,49,52,52,53,41,0};
-static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,33),40,115,101,116,45,100,121,110,97,109,105,99,45,108,111,97,100,45,109,111,100,101,33,32,109,111,100,101,49,52,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,18),40,104,97,115,45,115,101,112,63,32,115,116,114,49,52,54,57,41,0,0,0,0,0,0};
-static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,8),40,102,95,55,48,51,53,41};
-static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,7),40,97,55,48,52,51,41,0};
-static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,7),40,97,55,48,54,51,41,0};
-static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,7),40,97,55,49,49,53,41,0};
-static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,19),40,97,55,49,50,49,32,46,32,116,49,54,49,48,49,54,49,51,41,0,0,0,0,0};
-static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,7),40,97,55,49,48,51,41,0};
-static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,13),40,103,49,54,50,56,32,114,49,54,51,48,41,0,0,0};
-static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,50,49,32,103,49,54,50,53,49,54,50,55,41,0,0,0,0};
-static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,21),40,97,55,49,51,55,32,46,32,114,101,115,117,108,116,115,49,54,49,54,41,0,0,0};
-static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,49,54,48,51,32,120,49,54,48,55,41,0,0,0,0,0,0};
-static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,7),40,97,55,48,54,54,41,0};
-static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,7),40,97,55,49,57,52,41,0};
-static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,7),40,97,55,48,53,52,41,0};
-static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,7),40,97,55,50,48,51,41,0};
-static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,16),40,97,55,48,50,57,32,97,98,114,116,49,53,54,48,41};
-static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,32),40,98,111,100,121,49,52,57,49,32,116,105,109,101,114,49,53,48,48,32,112,114,105,110,116,101,114,49,53,48,49,41};
-static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,32),40,100,101,102,45,112,114,105,110,116,101,114,49,52,57,52,32,37,116,105,109,101,114,49,52,56,57,49,54,53,48,41};
-static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,116,105,109,101,114,49,52,57,51,41,0};
-static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,57),40,35,35,115,121,115,35,108,111,97,100,32,105,110,112,117,116,49,52,56,50,32,101,118,97,108,117,97,116,111,114,49,52,56,51,32,112,102,49,52,56,52,32,46,32,116,109,112,49,52,56,49,49,52,56,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,35),40,108,111,97,100,32,102,105,108,101,110,97,109,101,49,54,53,54,32,46,32,101,118,97,108,117,97,116,111,114,49,54,53,55,41,0,0,0,0,0};
-static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,44),40,108,111,97,100,45,114,101,108,97,116,105,118,101,32,102,105,108,101,110,97,109,101,49,54,54,50,32,46,32,101,118,97,108,117,97,116,111,114,49,54,54,51,41,0,0,0,0};
-static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,49,41,0};
-static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,52,41,0};
-static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,55,41,0};
-static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,41),40,108,111,97,100,45,110,111,105,115,105,108,121,32,102,105,108,101,110,97,109,101,49,54,55,52,32,46,32,116,109,112,49,54,55,51,49,54,55,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,24),40,99,111,109,112,108,101,116,101,32,103,49,55,48,54,49,55,48,55,49,55,48,56,41};
-static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,108,105,98,115,49,55,53,54,41,0};
-static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,108,111,97,100,45,108,105,98,114,97,114,121,45,48,32,117,110,97,109,101,49,55,52,49,32,108,105,98,49,55,52,50,41};
-static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,108,111,97,100,45,108,105,98,114,97,114,121,32,117,110,97,109,101,49,55,54,56,32,46,32,108,105,98,49,55,54,57,41};
-static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
-static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,13),40,99,104,101,99,107,32,112,49,56,50,51,41,0,0,0};
-static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,105,100,49,56,49,51,41,0,0,0};
-static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,99,97,110,111,110,105,99,97,108,105,122,101,45,101,120,116,101,110,115,105,111,110,45,112,97,116,104,32,105,100,49,55,57,53,32,108,111,99,49,55,57,54,41,0,0,0,0,0,0};
-static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,114,101,112,111,115,105,116,111,114,121,45,112,97,116,104,32,46,32,116,109,112,49,56,53,50,49,56,53,51,41,0,0,0};
-static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,16),40,99,104,101,99,107,32,112,97,116,104,49,56,54,53,41};
-static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,97,116,104,115,49,56,56,49,41};
-static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,105,110,100,45,101,120,116,101,110,115,105,111,110,32,112,49,56,54,49,32,105,110,99,63,49,56,54,50,41,0,0,0};
-static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,108,111,97,100,45,101,120,116,101,110,115,105,111,110,32,105,100,49,56,57,57,32,108,111,99,49,57,48,48,32,46,32,116,109,112,49,56,57,56,49,57,48,49,41,0,0,0,0,0};
-static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,57,52,54,32,103,49,57,53,48,49,57,53,50,41,0,0,0,0};
-static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,112,114,111,118,105,100,101,32,46,32,105,100,115,49,57,52,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,112,114,111,118,105,100,101,100,63,32,105,100,49,57,54,49,41};
-static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,21),40,97,56,49,55,52,32,103,49,57,56,49,49,57,56,50,49,57,56,51,41,0,0,0};
-static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,114,101,113,117,105,114,101,32,46,32,105,100,115,49,57,54,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,21),40,103,50,48,48,55,32,103,50,48,49,51,50,48,49,52,50,48,49,53,41,0,0,0};
-static C_char C_TLS li196[] C_aligned={C_lihdr(0,0,44),40,35,35,115,121,115,35,101,120,116,101,110,115,105,111,110,45,105,110,102,111,114,109,97,116,105,111,110,32,105,100,49,57,57,48,32,108,111,99,49,57,57,49,41,0,0,0,0};
-static C_char C_TLS li197[] C_aligned={C_lihdr(0,0,31),40,101,120,116,101,110,115,105,111,110,45,105,110,102,111,114,109,97,116,105,111,110,32,101,120,116,50,48,49,57,41,0};
-static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,49,32,105,100,115,50,48,50,52,41,0};
-static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,108,111,111,107,117,112,45,114,117,110,116,105,109,101,45,114,101,113,117,105,114,101,109,101,110,116,115,32,105,100,115,50,48,50,50,41,0,0,0,0,0};
-static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,21),40,97,56,50,56,53,32,103,50,48,53,55,50,48,53,56,50,48,53,57,41,0,0,0};
-static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,7),40,97,56,50,57,49,41,0};
-static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,28),40,97,100,100,45,114,101,113,32,105,100,50,48,52,57,32,115,121,110,116,97,120,63,50,48,53,48,41,0,0,0,0};
-static C_char C_TLS li203[] C_aligned={C_lihdr(0,0,35),40,105,109,112,102,111,114,109,32,120,50,48,54,50,32,105,100,50,48,54,51,32,98,117,105,108,116,105,110,63,50,48,54,52,41,0,0,0,0,0};
-static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,49,53,52,32,103,50,49,54,52,50,49,54,56,41,0,0,0,0};
-static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,23),40,100,111,105,116,32,105,100,50,48,56,48,32,105,109,112,105,100,50,48,56,49,41,0};
-static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,7),40,97,56,55,54,49,41,0};
-static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,38),40,97,56,55,54,55,32,101,120,112,50,50,51,50,50,50,51,51,50,50,51,54,32,102,50,50,50,51,52,50,50,51,53,50,50,51,55,41,0,0};
-static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,13),40,103,50,50,50,52,32,110,50,50,50,54,41,0,0,0};
-static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,50,48,56,32,103,50,50,49,56,50,50,50,50,41,0,0,0,0};
-static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,16),40,102,111,108,108,111,119,32,105,100,50,50,50,54,54,41};
-static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,52),40,35,35,115,121,115,35,100,111,45,116,104,101,45,114,105,103,104,116,45,116,104,105,110,103,32,105,100,50,48,51,55,32,99,111,109,112,63,50,48,51,56,32,105,109,112,63,50,48,51,57,41,0,0,0,0};
-static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,50,50,55,56,41,0,0,0,0};
-static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,99,45,105,100,101,110,116,105,102,105,101,114,32,115,116,114,50,50,55,52,41,0,0,0,0};
-static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,101,110,118,105,114,111,110,109,101,110,116,63,32,111,98,106,50,50,57,54,41,0,0,0,0};
-static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,12),40,99,111,112,121,32,98,50,51,49,53,41,0,0,0,0};
-static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,51,48,57,32,105,50,51,49,51,41,0,0,0,0,0,0};
-static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,54),40,35,35,115,121,115,35,99,111,112,121,45,101,110,118,45,116,97,98,108,101,32,101,50,50,57,57,32,109,102,102,50,51,48,48,32,109,102,50,51,48,49,32,46,32,97,114,103,115,50,51,48,50,41,0,0};
-static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,98,117,99,107,101,116,50,51,52,48,32,115,121,109,115,50,51,52,49,41,0,0,0,0,0,0};
-static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,27),40,100,111,108,111,111,112,50,51,51,51,32,105,50,51,51,55,32,115,121,109,115,50,51,51,56,41,0,0,0,0,0};
-static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,15),40,97,57,49,53,56,32,115,121,109,50,51,53,49,41,0};
-static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,101,110,118,105,114,111,110,109,101,110,116,45,115,121,109,98,111,108,115,32,101,110,118,50,51,50,54,32,46,32,97,114,103,115,50,51,50,55,41,0,0};
-static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,25),40,105,110,116,101,114,97,99,116,105,111,110,45,101,110,118,105,114,111,110,109,101,110,116,41,0,0,0,0,0,0,0};
-static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,47),40,115,99,104,101,109,101,45,114,101,112,111,114,116,45,101,110,118,105,114,111,110,109,101,110,116,32,110,50,51,54,50,32,46,32,109,117,116,97,98,108,101,50,51,54,51,41,0};
-static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,38),40,110,117,108,108,45,101,110,118,105,114,111,110,109,101,110,116,32,110,50,51,55,52,32,46,32,109,117,116,97,98,108,101,50,51,55,53,41,0,0};
-static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,14),40,102,95,57,50,55,49,32,98,50,51,57,53,41,0,0};
-static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,14),40,105,110,105,116,98,32,104,116,50,51,57,52,41,0,0};
-static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,19),40,101,120,105,115,116,115,63,32,102,110,97,109,101,50,52,49,53,41,0,0,0,0,0};
-static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,25),40,116,101,115,116,50,32,102,110,97,109,101,50,52,51,57,32,108,115,116,50,52,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,16),40,116,101,115,116,32,102,110,97,109,101,50,52,52,52,41};
-static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,97,116,104,115,50,52,53,51,41};
-static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,74),40,35,35,115,121,115,35,114,101,115,111,108,118,101,45,105,110,99,108,117,100,101,45,102,105,108,101,110,97,109,101,32,102,110,97,109,101,50,52,50,53,32,112,114,101,102,101,114,45,115,111,117,114,99,101,50,52,50,54,32,46,32,116,109,112,50,52,50,52,50,52,50,55,41,0,0,0,0,0,0};
-static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,52,55,52,32,105,50,52,55,56,41,0,0,0,0,0,0};
-static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,14),40,115,112,97,99,101,115,32,110,50,52,55,51,41,0,0};
-static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,24),40,100,105,115,112,108,97,121,45,114,106,32,120,50,52,56,50,32,119,50,52,56,51,41};
-static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,100,105,115,112,108,97,121,45,116,105,109,101,115,32,105,110,102,111,50,52,56,56,41,0,0};
-static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,7),40,97,57,53,56,51,41,0};
-static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,114,101,112,108,45,112,114,105,110,116,45,104,111,111,107,32,120,50,52,57,57,32,112,111,114,116,50,53,48,48,41,0,0};
-static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,114,101,97,100,45,112,114,111,109,112,116,45,104,111,111,107,41};
-static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,99,108,101,97,114,45,116,114,97,99,101,45,98,117,102,102,101,114,41,0,0,0,0,0,0};
-static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,21),40,97,57,54,50,49,32,103,50,53,52,48,50,53,52,49,50,53,52,50,41,0,0,0};
-static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,18),40,119,114,105,116,101,45,101,114,114,32,120,115,50,53,50,51,41,0,0,0,0,0,0};
-static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,26),40,97,57,54,56,57,32,109,115,103,50,53,56,49,32,46,32,97,114,103,115,50,53,56,50,41,0,0,0,0,0,0};
-static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,7),40,97,57,54,55,54,41,0};
-static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,7),40,97,57,55,56,49,41,0};
-static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,21),40,97,57,54,52,50,32,103,50,53,54,51,50,53,54,52,50,53,54,53,41,0,0,0};
-static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,54,52,49,32,103,50,54,52,53,50,54,52,55,41,0,0,0,0};
-static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,118,97,114,115,50,54,50,57,32,117,50,54,51,48,41,0,0,0};
-static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,20),40,97,57,55,57,48,32,46,32,114,101,115,117,108,116,50,54,50,51,41,0,0,0,0};
-static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,7),40,97,57,57,53,48,41,0};
-static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,13),40,97,57,57,52,52,32,99,50,53,57,56,41,0,0,0};
-static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,7),40,97,57,55,52,49,41,0};
-static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,7),40,97,57,57,54,49,41,0};
-static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,6),40,114,101,112,108,41,0,0};
-static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,38),40,100,101,102,105,110,101,45,114,101,97,100,101,114,45,99,116,111,114,32,115,112,101,99,50,54,56,54,32,112,114,111,99,50,54,56,55,41,0,0};
-static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
-static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,117,115,101,114,45,114,101,97,100,45,104,111,111,107,32,99,104,97,114,50,54,57,50,32,112,111,114,116,50,54,57,51,41};
-static C_char C_TLS li258[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,56,52,41};
-static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,15),40,97,49,48,48,55,56,32,101,120,50,55,49,57,41,0};
-static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,48,51,41};
-static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,49,53,41};
-static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,23),40,97,49,48,49,48,57,32,46,32,97,114,103,115,50,55,49,52,50,55,50,51,41,0};
-static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,57,55,41};
-static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,18),40,97,49,48,48,55,50,32,107,50,55,49,51,50,55,49,56,41,0,0,0,0,0,0};
-static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,20),40,114,117,110,45,115,97,102,101,32,116,104,117,110,107,50,55,49,50,41,0,0,0,0};
-static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,31),40,115,116,111,114,101,45,114,101,115,117,108,116,32,120,50,55,50,54,32,114,101,115,117,108,116,50,55,50,55,41,0};
-static C_char C_TLS li267[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,51,54,41};
-static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,15),40,67,72,73,67,75,69,78,95,121,105,101,108,100,41,0};
-static C_char C_TLS li269[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,52,56,41};
-static C_char C_TLS li270[] C_aligned={C_lihdr(0,0,33),40,67,72,73,67,75,69,78,95,101,118,97,108,32,101,120,112,50,55,51,57,32,114,101,115,117,108,116,50,55,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li271[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,54,55,41};
-static C_char C_TLS li272[] C_aligned={C_lihdr(0,0,40),40,67,72,73,67,75,69,78,95,101,118,97,108,95,115,116,114,105,110,103,32,115,116,114,50,55,52,54,32,114,101,115,117,108,116,50,55,52,55,41};
-static C_char C_TLS li273[] C_aligned={C_lihdr(0,0,34),40,115,116,111,114,101,45,115,116,114,105,110,103,32,98,117,102,115,105,122,101,50,55,53,51,32,98,117,102,50,55,53,52,41,0,0,0,0,0,0};
-static C_char C_TLS li274[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,48,51,41};
-static C_char C_TLS li275[] C_aligned={C_lihdr(0,0,52),40,67,72,73,67,75,69,78,95,101,118,97,108,95,116,111,95,115,116,114,105,110,103,32,101,120,112,50,55,54,54,32,98,117,102,50,55,54,55,32,98,117,102,115,105,122,101,50,55,54,56,41,0,0,0,0};
-static C_char C_TLS li276[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,51,50,41};
-static C_char C_TLS li277[] C_aligned={C_lihdr(0,0,59),40,67,72,73,67,75,69,78,95,101,118,97,108,95,115,116,114,105,110,103,95,116,111,95,115,116,114,105,110,103,32,115,116,114,50,55,55,55,32,98,117,102,50,55,55,56,32,98,117,102,115,105,122,101,50,55,55,57,41,0,0,0,0,0};
-static C_char C_TLS li278[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,54,54,41};
-static C_char C_TLS li279[] C_aligned={C_lihdr(0,0,44),40,67,72,73,67,75,69,78,95,97,112,112,108,121,32,102,117,110,99,50,55,56,56,32,97,114,103,115,50,55,56,57,32,114,101,115,117,108,116,50,55,57,48,41,0,0,0,0};
-static C_char C_TLS li280[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,56,50,41};
-static C_char C_TLS li281[] C_aligned={C_lihdr(0,0,63),40,67,72,73,67,75,69,78,95,97,112,112,108,121,95,116,111,95,115,116,114,105,110,103,32,102,117,110,99,50,55,57,55,32,97,114,103,115,50,55,57,56,32,98,117,102,50,55,57,57,32,98,117,102,115,105,122,101,50,56,48,48,41,0};
-static C_char C_TLS li282[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,49,49,41};
-static C_char C_TLS li283[] C_aligned={C_lihdr(0,0,33),40,67,72,73,67,75,69,78,95,114,101,97,100,32,115,116,114,50,56,49,48,32,114,101,115,117,108,116,50,56,49,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li284[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,51,51,41};
-static C_char C_TLS li285[] C_aligned={C_lihdr(0,0,22),40,67,72,73,67,75,69,78,95,108,111,97,100,32,115,116,114,50,56,49,56,41,0,0};
-static C_char C_TLS li286[] C_aligned={C_lihdr(0,0,39),40,67,72,73,67,75,69,78,95,103,101,116,95,101,114,114,111,114,95,109,101,115,115,97,103,101,32,98,117,102,115,105,122,101,50,56,50,53,41,0};
-static C_char C_TLS li287[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,109,97,107,101,45,108,97,109,98,100,97,45,105,110,102,111,32,115,116,114,50,56,51,52,41};
-static C_char C_TLS li288[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,53,56,41};
-static C_char C_TLS li289[] C_aligned={C_lihdr(0,0,14),40,97,49,48,52,48,57,32,120,49,55,51,52,41,0,0};
-static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,49,51,32,103,49,55,50,51,49,55,50,55,41,0,0,0,0};
-static C_char C_TLS li291[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,51,48,41};
-static C_char C_TLS li292[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,51,55,41};
-static C_char C_TLS li293[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,52,55,41};
-static C_char C_TLS li294[] C_aligned={C_lihdr(0,0,24),40,97,49,48,53,49,56,32,120,49,51,56,50,32,46,32,101,110,118,49,51,56,51,41};
-static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-/* from ##sys#clear-trace-buffer in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall stub2512(C_word C_buf) C_regparm;
-C_regparm static C_word C_fcall stub2512(C_word C_buf){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_clear_trace_buffer();
-return C_r;}
-
-C_noret_decl(C_eval_toplevel)
-C_externexport void C_ccall C_eval_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2954)
-static void C_ccall f_2954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2987)
-static void C_ccall f_2987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2990)
-static void C_ccall f_2990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10519)
-static void C_ccall f_10519(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_10519)
-static void C_ccall f_10519r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_10523)
-static void C_fcall f_10523(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10548)
-static void C_ccall f_10548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10538)
-static void C_ccall f_10538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10546)
-static void C_ccall f_10546(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10531)
-static void C_ccall f_10531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10526)
-static void C_ccall f_10526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6780)
-static void C_ccall f_6780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6875)
-static void C_ccall f_6875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6956)
-static void C_ccall f_6956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10513)
-static void C_ccall f_10513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10509)
-static void C_ccall f_10509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10505)
-static void C_ccall f_10505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10501)
-static void C_ccall f_10501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7523)
-static void C_fcall f_7523(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7528)
-static void C_ccall f_7528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10473)
-static void C_ccall f_10473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10452)
-static void C_fcall f_10452(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10459)
-static void C_ccall f_10459(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7535)
-static void C_ccall f_7535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10416)
-static void C_fcall f_10416(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10445)
-static void C_ccall f_10445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10408)
-static void C_ccall f_10408(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10410)
-static void C_ccall f_10410(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7544)
-static void C_ccall f_7544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10380)
-static void C_ccall f_10380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10400)
-static void C_ccall f_10400(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10396)
-static void C_ccall f_10396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10386)
-static void C_ccall f_10386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7898)
-static void C_ccall f_7898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8934)
-static void C_ccall f_8934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10371)
-static void C_ccall f_10371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9285)
-static void C_ccall f_9285(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9289)
-static void C_ccall f_9289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10367)
-static void C_ccall f_10367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9292)
-static void C_ccall f_9292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9296)
-static void C_ccall f_9296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9570)
-static void C_ccall f_9570(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10359)
-static void C_ccall f_10359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9592)
-static void C_ccall f_9592(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9977)
-static void C_ccall f_9977(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10350)
-static void C_ccall f_10350(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10357)
-static void C_ccall f_10357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10340)
-static C_word C_fcall f_10340(C_word t0,C_word t1);
-C_noret_decl(f_10325)
-static void C_ccall f_10325(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10329)
-static void C_ccall f_10329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10334)
-static void C_ccall f_10334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10338)
-static void C_ccall f_10338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10303)
-static void C_ccall f_10303(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10307)
-static void C_ccall f_10307(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10312)
-static void C_ccall f_10312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10316)
-static void C_ccall f_10316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10323)
-static void C_ccall f_10323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10277)
-static void C_ccall f_10277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_10283)
-static void C_ccall f_10283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10287)
-static void C_ccall f_10287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10301)
-static void C_ccall f_10301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10290)
-static void C_ccall f_10290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10297)
-static void C_ccall f_10297(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10261)
-static void C_ccall f_10261(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10267)
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10275)
-static void C_ccall f_10275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10224)
-static void C_ccall f_10224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10228)
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10233)
-static void C_ccall f_10233(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10237)
-static void C_ccall f_10237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10259)
-static void C_ccall f_10259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10255)
-static void C_ccall f_10255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10251)
-static void C_ccall f_10251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10240)
-static void C_ccall f_10240(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10247)
-static void C_ccall f_10247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10198)
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10204)
-static void C_ccall f_10204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10208)
-static void C_ccall f_10208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10222)
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10211)
-static void C_ccall f_10211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10218)
-static void C_ccall f_10218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10185)
-static C_word C_fcall f_10185(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_10159)
-static void C_ccall f_10159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10163)
-static void C_ccall f_10163(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10168)
-static void C_ccall f_10168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10172)
-static void C_ccall f_10172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10183)
-static void C_ccall f_10183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10179)
-static void C_ccall f_10179(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10143)
-static void C_ccall f_10143(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10149)
-static void C_ccall f_10149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10157)
-static void C_ccall f_10157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10131)
-static void C_ccall f_10131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10137)
-static void C_ccall f_10137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10141)
-static void C_ccall f_10141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10122)
-static void C_fcall f_10122(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10126)
-static void C_ccall f_10126(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10063)
-static void C_fcall f_10063(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10073)
-static void C_ccall f_10073(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10098)
-static void C_ccall f_10098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10110)
-static void C_ccall f_10110(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10110)
-static void C_ccall f_10110r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10116)
-static void C_ccall f_10116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10104)
-static void C_ccall f_10104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10079)
-static void C_ccall f_10079(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10085)
-static void C_ccall f_10085(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10089)
-static void C_ccall f_10089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10092)
-static void C_ccall f_10092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10096)
-static void C_ccall f_10096(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10068)
-static void C_ccall f_10068(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9988)
-static void C_ccall f_9988(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9998)
-static void C_ccall f_9998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10001)
-static void C_ccall f_10001(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10015)
-static void C_fcall f_10015(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10033)
-static void C_ccall f_10033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10002)
-static void C_fcall f_10002(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9979)
-static void C_ccall f_9979(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9613)
-static void C_ccall f_9613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9657)
-static void C_ccall f_9657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9660)
-static void C_ccall f_9660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9962)
-static void C_ccall f_9962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9966)
-static void C_ccall f_9966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9970)
-static void C_ccall f_9970(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9742)
-static void C_ccall f_9742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9748)
-static void C_fcall f_9748(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9945)
-static void C_ccall f_9945(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9951)
-static void C_ccall f_9951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9755)
-static void C_ccall f_9755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9758)
-static void C_ccall f_9758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9764)
-static void C_ccall f_9764(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9943)
-static void C_ccall f_9943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9773)
-static void C_ccall f_9773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9776)
-static void C_ccall f_9776(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9791)
-static void C_ccall f_9791(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_9791)
-static void C_ccall f_9791r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_9809)
-static void C_fcall f_9809(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9930)
-static void C_ccall f_9930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9926)
-static void C_ccall f_9926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9897)
-static void C_ccall f_9897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9825)
-static void C_ccall f_9825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9833)
-static void C_fcall f_9833(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9845)
-static void C_ccall f_9845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9848)
-static void C_ccall f_9848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9860)
-static void C_ccall f_9860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9863)
-static void C_ccall f_9863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9851)
-static void C_ccall f_9851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9877)
-static void C_ccall f_9877(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9828)
-static void C_ccall f_9828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9813)
-static void C_ccall f_9813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9795)
-static void C_ccall f_9795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9638)
-static void C_fcall f_9638(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9643)
-static void C_ccall f_9643(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9798)
-static void C_ccall f_9798(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9782)
-static void C_ccall f_9782(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9677)
-static void C_ccall f_9677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9682)
-static void C_ccall f_9682(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9685)
-static void C_ccall f_9685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9690)
-static void C_ccall f_9690(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9690)
-static void C_ccall f_9690r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9697)
-static void C_ccall f_9697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9737)
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9700)
-static void C_ccall f_9700(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9712)
-static void C_fcall f_9712(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9721)
-static void C_ccall f_9721(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9715)
-static void C_ccall f_9715(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9703)
-static void C_ccall f_9703(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9706)
-static void C_ccall f_9706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9668)
-static C_word C_fcall f_9668(C_word t0);
-C_noret_decl(f_9662)
-static C_word C_fcall f_9662(C_word t0);
-C_noret_decl(f_9616)
-static void C_fcall f_9616(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9622)
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9610)
-static void C_ccall f_9610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9594)
-static void C_ccall f_9594(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9605)
-static void C_ccall f_9605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9608)
-static void C_ccall f_9608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9598)
-static void C_ccall f_9598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9575)
-static void C_ccall f_9575(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9584)
-static void C_ccall f_9584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9579)
-static void C_ccall f_9579(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9515)
-static void C_ccall f_9515(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9519)
-static void C_ccall f_9519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9522)
-static void C_ccall f_9522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9525)
-static void C_ccall f_9525(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9528)
-static void C_ccall f_9528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9531)
-static void C_ccall f_9531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9534)
-static void C_ccall f_9534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9537)
-static void C_ccall f_9537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9540)
-static void C_ccall f_9540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9543)
-static void C_ccall f_9543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9494)
-static void C_fcall f_9494(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9498)
-static void C_ccall f_9498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9501)
-static void C_ccall f_9501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9470)
-static void C_fcall f_9470(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9476)
-static void C_fcall f_9476(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9486)
-static void C_ccall f_9486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9321)
-static void C_ccall f_9321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_9321)
-static void C_ccall f_9321r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_9325)
-static void C_ccall f_9325(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9392)
-static void C_ccall f_9392(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9439)
-static void C_ccall f_9439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9449)
-static void C_ccall f_9449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9402)
-static void C_ccall f_9402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9404)
-static void C_fcall f_9404(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9428)
-static void C_ccall f_9428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9414)
-static void C_ccall f_9414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9362)
-static void C_fcall f_9362(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9327)
-static void C_fcall f_9327(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9343)
-static void C_ccall f_9343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9349)
-static void C_ccall f_9349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9340)
-static void C_ccall f_9340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9302)
-static void C_fcall f_9302(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9306)
-static void C_ccall f_9306(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9269)
-static void C_fcall f_9269(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9271)
-static void C_ccall f_9271(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9275)
-static void C_ccall f_9275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9231)
-static void C_ccall f_9231(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9231)
-static void C_ccall f_9231r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9238)
-static void C_ccall f_9238(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9245)
-static void C_ccall f_9245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9187)
-static void C_ccall f_9187(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9187)
-static void C_ccall f_9187r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9220)
-static void C_ccall f_9220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9207)
-static void C_ccall f_9207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9184)
-static void C_ccall f_9184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9065)
-static void C_ccall f_9065(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9065)
-static void C_ccall f_9065r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9159)
-static void C_ccall f_9159(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9169)
-static void C_ccall f_9169(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9157)
-static void C_ccall f_9157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9086)
-static void C_fcall f_9086(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9110)
-static void C_fcall f_9110(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9129)
-static void C_ccall f_9129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9104)
-static void C_ccall f_9104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8957)
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_8957)
-static void C_ccall f_8957r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_8967)
-static void C_ccall f_8967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8972)
-static void C_fcall f_8972(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8999)
-static void C_fcall f_8999(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9028)
-static void C_fcall f_9028(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9032)
-static void C_ccall f_9032(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8993)
-static void C_ccall f_8993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8941)
-static void C_ccall f_8941(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8878)
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8882)
-static void C_ccall f_8882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8890)
-static C_word C_fcall f_8890(C_word t0,C_word t1);
-C_noret_decl(f_8270)
-static void C_ccall f_8270(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8694)
-static void C_fcall f_8694(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8803)
-static void C_fcall f_8803(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8812)
-static void C_fcall f_8812(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8819)
-static void C_fcall f_8819(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8810)
-static void C_ccall f_8810(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8723)
-static void C_fcall f_8723(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8790)
-static void C_ccall f_8790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8750)
-static void C_fcall f_8750(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8754)
-static void C_ccall f_8754(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8781)
-static void C_ccall f_8781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8777)
-static void C_ccall f_8777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8757)
-static void C_ccall f_8757(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8768)
-static void C_ccall f_8768(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8762)
-static void C_ccall f_8762(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8717)
-static void C_ccall f_8717(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8713)
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8339)
-static void C_fcall f_8339(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8349)
-static void C_ccall f_8349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8511)
-static void C_ccall f_8511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8656)
-static void C_ccall f_8656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8663)
-static void C_ccall f_8663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8526)
-static void C_ccall f_8526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8545)
-static void C_fcall f_8545(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8577)
-static void C_fcall f_8577(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8571)
-static void C_ccall f_8571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8567)
-static void C_ccall f_8567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8549)
-static void C_ccall f_8549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8541)
-static void C_ccall f_8541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8533)
-static void C_ccall f_8533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8416)
-static void C_ccall f_8416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8437)
-static void C_fcall f_8437(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8445)
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8433)
-static void C_ccall f_8433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8369)
-static void C_ccall f_8369(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8356)
-static void C_ccall f_8356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8298)
-static void C_fcall f_8298(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_8317)
-static void C_ccall f_8317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8310)
-static void C_ccall f_8310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8273)
-static void C_fcall f_8273(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8292)
-static void C_ccall f_8292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8286)
-static void C_ccall f_8286(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8221)
-static void C_ccall f_8221(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8227)
-static void C_fcall f_8227(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8241)
-static void C_ccall f_8241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8244)
-static void C_fcall f_8244(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8251)
-static void C_ccall f_8251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8215)
-static void C_ccall f_8215(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8182)
-static void C_ccall f_8182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8186)
-static void C_ccall f_8186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8192)
-static void C_ccall f_8192(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8195)
-static void C_ccall f_8195(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8213)
-static void C_ccall f_8213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8198)
-static void C_ccall f_8198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8202)
-static void C_fcall f_8202(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8169)
-static void C_ccall f_8169(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_8169)
-static void C_ccall f_8169r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_8175)
-static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8155)
-static void C_ccall f_8155(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8166)
-static void C_ccall f_8166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8113)
-static void C_ccall f_8113(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_8113)
-static void C_ccall f_8113r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_8119)
-static void C_fcall f_8119(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8134)
-static void C_ccall f_8134(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8029)
-static void C_ccall f_8029(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_8029)
-static void C_ccall f_8029r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_8033)
-static void C_ccall f_8033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8089)
-static void C_ccall f_8089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8036)
-static void C_fcall f_8036(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8039)
-static void C_ccall f_8039(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8066)
-static void C_ccall f_8066(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8072)
-static void C_ccall f_8072(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8054)
-static void C_ccall f_8054(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7930)
-static void C_ccall f_7930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7934)
-static void C_ccall f_7934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7982)
-static void C_ccall f_7982(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7984)
-static void C_fcall f_7984(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7997)
-static void C_ccall f_7997(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7936)
-static void C_fcall f_7936(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7940)
-static void C_ccall f_7940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7975)
-static void C_ccall f_7975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7946)
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7956)
-static void C_ccall f_7956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7949)
-static void C_ccall f_7949(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7899)
-static void C_ccall f_7899(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7899)
-static void C_ccall f_7899r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7903)
-static void C_ccall f_7903(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7738)
-static void C_ccall f_7738(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7843)
-static void C_fcall f_7843(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7860)
-static void C_ccall f_7860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7868)
-static void C_ccall f_7868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7760)
-static void C_ccall f_7760(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7765)
-static void C_fcall f_7765(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7804)
-static void C_ccall f_7804(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7791)
-static void C_ccall f_7791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7741)
-static void C_fcall f_7741(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7652)
-static void C_ccall f_7652(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7652)
-static void C_ccall f_7652r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7659)
-static void C_ccall f_7659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7669)
-static void C_ccall f_7669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7546)
-static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7550)
-static void C_ccall f_7550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7642)
-static void C_ccall f_7642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7646)
-static void C_ccall f_7646(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7559)
-static void C_fcall f_7559(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7628)
-static void C_ccall f_7628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7624)
-static void C_ccall f_7624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7562)
-static void C_ccall f_7562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7611)
-static void C_ccall f_7611(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7614)
-static void C_ccall f_7614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7617)
-static void C_ccall f_7617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7565)
-static void C_ccall f_7565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7570)
-static void C_fcall f_7570(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7604)
-static void C_ccall f_7604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7583)
-static void C_ccall f_7583(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7537)
-static void C_fcall f_7537(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7497)
-static void C_ccall f_7497(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7497)
-static void C_ccall f_7497r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7518)
-static void C_ccall f_7518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7501)
-static void C_ccall f_7501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7515)
-static void C_ccall f_7515(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7504)
-static void C_ccall f_7504(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7512)
-static void C_ccall f_7512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7507)
-static void C_ccall f_7507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7454)
-static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7454)
-static void C_ccall f_7454r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7462)
-static void C_ccall f_7462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7466)
-static void C_ccall f_7466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7425)
-static void C_ccall f_7425(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7425)
-static void C_ccall f_7425r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7433)
-static void C_ccall f_7433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7004)
-static void C_ccall f_7004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_7004)
-static void C_ccall f_7004r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_7377)
-static void C_fcall f_7377(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7372)
-static void C_fcall f_7372(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7006)
-static void C_fcall f_7006(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7371)
-static void C_ccall f_7371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7010)
-static void C_fcall f_7010(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7293)
-static void C_ccall f_7293(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7308)
-static void C_ccall f_7308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7311)
-static void C_fcall f_7311(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7314)
-static void C_ccall f_7314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7320)
-static void C_ccall f_7320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7323)
-static void C_ccall f_7323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7329)
-static void C_ccall f_7329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7013)
-static void C_ccall f_7013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7284)
-static void C_ccall f_7284(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7272)
-static void C_ccall f_7272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7275)
-static void C_ccall f_7275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7278)
-static void C_ccall f_7278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7019)
-static void C_ccall f_7019(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7257)
-static void C_ccall f_7257(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7229)
-static void C_ccall f_7229(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7253)
-static void C_ccall f_7253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7249)
-static void C_ccall f_7249(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7245)
-static void C_ccall f_7245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7022)
-static void C_ccall f_7022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7030)
-static void C_ccall f_7030(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7216)
-static void C_ccall f_7216(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7034)
-static void C_ccall f_7034(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7204)
-static void C_ccall f_7204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7055)
-static void C_ccall f_7055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7059)
-static void C_ccall f_7059(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7195)
-static void C_ccall f_7195(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7067)
-static void C_ccall f_7067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7071)
-static void C_ccall f_7071(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7189)
-static void C_ccall f_7189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7074)
-static void C_ccall f_7074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7077)
-static void C_ccall f_7077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7082)
-static void C_fcall f_7082(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7092)
-static void C_ccall f_7092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7138)
-static void C_ccall f_7138(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7138)
-static void C_ccall f_7138r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7147)
-static void C_fcall f_7147(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7165)
-static void C_ccall f_7165(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7155)
-static void C_fcall f_7155(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7159)
-static void C_ccall f_7159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7104)
-static void C_ccall f_7104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7111)
-static void C_ccall f_7111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7122)
-static void C_ccall f_7122(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7122)
-static void C_ccall f_7122r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7133)
-static void C_ccall f_7133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7126)
-static void C_ccall f_7126(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7116)
-static void C_ccall f_7116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7095)
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7102)
-static void C_ccall f_7102(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7064)
-static void C_ccall f_7064(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7044)
-static void C_ccall f_7044(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7035)
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7025)
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6958)
-static void C_fcall f_6958(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6968)
-static C_word C_fcall f_6968(C_word t0,C_word t1);
-C_noret_decl(f_6883)
-static void C_ccall f_6883(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6895)
-static void C_fcall f_6895(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6908)
-static void C_ccall f_6908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6890)
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6877)
-static void C_ccall f_6877(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6793)
-static void C_ccall f_6793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6806)
-static void C_fcall f_6806(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6839)
-static void C_ccall f_6839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6820)
-static void C_ccall f_6820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6796)
-static void C_fcall f_6796(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6783)
-static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6783)
-static void C_ccall f_6783r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6791)
-static void C_ccall f_6791(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3359)
-static void C_ccall f_3359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_3359)
-static void C_ccall f_3359r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_3363)
-static void C_ccall f_3363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6457)
-static void C_fcall f_6457(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_6461)
-static void C_ccall f_6461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6708)
-static void C_fcall f_6708(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6742)
-static void C_ccall f_6742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6735)
-static void C_fcall f_6735(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6650)
-static void C_ccall f_6650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6651)
-static void C_ccall f_6651(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6655)
-static void C_fcall f_6655(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6662)
-static void C_ccall f_6662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6668)
-static void C_fcall f_6668(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6702)
-static void C_ccall f_6702(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6695)
-static void C_fcall f_6695(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6666)
-static void C_ccall f_6666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6607)
-static void C_ccall f_6607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6610)
-static void C_ccall f_6610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6613)
-static void C_ccall f_6613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6616)
-static void C_ccall f_6616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6617)
-static void C_ccall f_6617(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6621)
-static void C_fcall f_6621(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6624)
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6631)
-static void C_ccall f_6631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6635)
-static void C_ccall f_6635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6639)
-static void C_ccall f_6639(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6643)
-static void C_ccall f_6643(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6565)
-static void C_ccall f_6565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6568)
-static void C_ccall f_6568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6571)
-static void C_ccall f_6571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6572)
-static void C_ccall f_6572(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6576)
-static void C_fcall f_6576(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6579)
-static void C_ccall f_6579(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6586)
-static void C_ccall f_6586(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6590)
-static void C_ccall f_6590(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6594)
-static void C_ccall f_6594(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6530)
-static void C_ccall f_6530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6533)
-static void C_ccall f_6533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6534)
-static void C_ccall f_6534(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6538)
-static void C_fcall f_6538(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6541)
-static void C_ccall f_6541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6548)
-static void C_ccall f_6548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6552)
-static void C_ccall f_6552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6502)
-static void C_ccall f_6502(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6503)
-static void C_ccall f_6503(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6507)
-static void C_fcall f_6507(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6510)
-static void C_ccall f_6510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6517)
-static void C_ccall f_6517(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6483)
-static void C_ccall f_6483(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f11767)
-static void C_ccall f11767(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11763)
-static void C_ccall f11763(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6431)
-static C_word C_fcall f_6431(C_word t0,C_word t1);
-C_noret_decl(f_3577)
-static void C_fcall f_3577(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7) C_noret;
-C_noret_decl(f_3584)
-static void C_ccall f_3584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3704)
-static void C_ccall f_3704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3760)
-static void C_fcall f_3760(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3780)
-static void C_fcall f_3780(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3783)
-static void C_ccall f_3783(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3798)
-static void C_ccall f_3798(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6231)
-static void C_fcall f_6231(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6214)
-static void C_ccall f_6214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6218)
-static void C_ccall f_6218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6165)
-static void C_fcall f_6165(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6180)
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6173)
-static void C_fcall f_6173(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6150)
-static void C_ccall f_6150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6109)
-static void C_ccall f_6109(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6049)
-static void C_ccall f_6049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6051)
-static void C_fcall f_6051(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6073)
-static void C_ccall f_6073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6089)
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6063)
-static void C_ccall f_6063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6045)
-static void C_ccall f_6045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5991)
-static void C_fcall f_5991(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6025)
-static void C_ccall f_6025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6018)
-static void C_fcall f_6018(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5914)
-static void C_ccall f_5914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5917)
-static void C_ccall f_5917(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5920)
-static void C_ccall f_5920(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5943)
-static void C_fcall f_5943(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5941)
-static void C_ccall f_5941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5937)
-static void C_ccall f_5937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5897)
-static void C_ccall f_5897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5901)
-static void C_ccall f_5901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5868)
-static void C_ccall f_5868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5872)
-static void C_ccall f_5872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5611)
-static void C_ccall f_5611(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5755)
-static void C_ccall f_5755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5757)
-static void C_fcall f_5757(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5835)
-static void C_ccall f_5835(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5784)
-static void C_fcall f_5784(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5808)
-static C_word C_fcall f_5808(C_word t0);
-C_noret_decl(f_5797)
-static void C_fcall f_5797(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5617)
-static void C_ccall f_5617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5745)
-static void C_ccall f_5745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5620)
-static void C_ccall f_5620(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5623)
-static void C_ccall f_5623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5651)
-static void C_ccall f_5651(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5661)
-static void C_fcall f_5661(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5742)
-static void C_ccall f_5742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5734)
-static void C_ccall f_5734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5671)
-static void C_ccall f_5671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5719)
-static void C_ccall f_5719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5674)
-static void C_ccall f_5674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5675)
-static void C_ccall f_5675(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5681)
-static void C_fcall f_5681(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5706)
-static void C_ccall f_5706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5624)
-static void C_ccall f_5624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5628)
-static void C_ccall f_5628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5631)
-static void C_ccall f_5631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5635)
-static void C_ccall f_5635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5638)
-static void C_ccall f_5638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5642)
-static void C_ccall f_5642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5645)
-static void C_ccall f_5645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5598)
-static void C_ccall f_5598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5551)
-static void C_ccall f_5551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5576)
-static void C_ccall f_5576(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5554)
-static void C_ccall f_5554(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5564)
-static void C_ccall f_5564(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5572)
-static void C_ccall f_5572(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5568)
-static void C_ccall f_5568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5557)
-static void C_ccall f_5557(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5424)
-static void C_ccall f_5424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5482)
-static void C_fcall f_5482(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5532)
-static void C_ccall f_5532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5509)
-static void C_fcall f_5509(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5525)
-static void C_ccall f_5525(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5521)
-static void C_ccall f_5521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5427)
-static void C_ccall f_5427(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5430)
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5446)
-static void C_fcall f_5446(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5454)
-static C_word C_fcall f_5454(C_word t0,C_word t1);
-C_noret_decl(f_5433)
-static void C_ccall f_5433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5440)
-static void C_ccall f_5440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5337)
-static void C_ccall f_5337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5361)
-static void C_fcall f_5361(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5411)
-static void C_ccall f_5411(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5388)
-static void C_fcall f_5388(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5404)
-static void C_ccall f_5404(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5400)
-static void C_ccall f_5400(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5355)
-static void C_ccall f_5355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5340)
-static void C_ccall f_5340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5347)
-static void C_ccall f_5347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4889)
-static void C_ccall f_4889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5310)
-static void C_ccall f_5310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5321)
-static void C_ccall f_5321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5315)
-static void C_ccall f_5315(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4901)
-static void C_ccall f_4901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4906)
-static void C_ccall f_4906(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5274)
-static void C_fcall f_5274(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5303)
-static void C_ccall f_5303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4910)
-static void C_ccall f_4910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5225)
-static void C_fcall f_5225(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5258)
-static void C_ccall f_5258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5238)
-static void C_fcall f_5238(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5223)
-static void C_ccall f_5223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4913)
-static void C_ccall f_4913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5215)
-static void C_ccall f_5215(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4919)
-static void C_ccall f_4919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5177)
-static void C_ccall f_5177(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5183)
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_5183)
-static void C_ccall f_5183r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_5207)
-static void C_ccall f_5207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5154)
-static void C_ccall f_5154(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5160)
-static void C_ccall f_5160(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_5160)
-static void C_ccall f_5160r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6385)
-static void C_fcall f_6385(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_6414)
-static void C_ccall f_6414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5176)
-static void C_ccall f_5176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5172)
-static void C_ccall f_5172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5132)
-static void C_ccall f_5132(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5138)
-static void C_ccall f_5138(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5150)
-static void C_ccall f_5150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5113)
-static void C_ccall f_5113(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5119)
-static void C_ccall f_5119(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,...) C_noret;
-C_noret_decl(f_5119)
-static void C_ccall f_5119r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t7) C_noret;
-C_noret_decl(f_5085)
-static void C_ccall f_5085(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5091)
-static void C_ccall f_5091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5066)
-static void C_ccall f_5066(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5072)
-static void C_ccall f_5072(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_5072)
-static void C_ccall f_5072r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_5038)
-static void C_ccall f_5038(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5044)
-static void C_ccall f_5044(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5019)
-static void C_ccall f_5019(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5025)
-static void C_ccall f_5025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_5025)
-static void C_ccall f_5025r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_4991)
-static void C_ccall f_4991(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4997)
-static void C_ccall f_4997(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4972)
-static void C_ccall f_4972(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4978)
-static void C_ccall f_4978(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_4978)
-static void C_ccall f_4978r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_4948)
-static void C_ccall f_4948(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4954)
-static void C_ccall f_4954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4929)
-static void C_ccall f_4929(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4935)
-static void C_ccall f_4935(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_4935)
-static void C_ccall f_4935r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_4732)
-static void C_ccall f_4732(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4835)
-static void C_fcall f_4835(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4753)
-static void C_ccall f_4753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4779)
-static void C_fcall f_4779(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4761)
-static void C_ccall f_4761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4777)
-static void C_ccall f_4777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4757)
-static void C_ccall f_4757(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4235)
-static void C_ccall f_4235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4682)
-static void C_fcall f_4682(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4244)
-static void C_ccall f_4244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4647)
-static void C_fcall f_4647(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4676)
-static void C_ccall f_4676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4247)
-static void C_ccall f_4247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4598)
-static void C_fcall f_4598(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4631)
-static void C_ccall f_4631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4611)
-static void C_fcall f_4611(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4596)
-static void C_ccall f_4596(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4253)
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4588)
-static void C_ccall f_4588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4256)
-static void C_ccall f_4256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4538)
-static void C_fcall f_4538(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4580)
-static void C_ccall f_4580(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4565)
-static void C_fcall f_4565(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4491)
-static void C_ccall f_4491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4492)
-static void C_ccall f_4492(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4496)
-static void C_ccall f_4496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4508)
-static void C_fcall f_4508(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4533)
-static void C_ccall f_4533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4499)
-static void C_ccall f_4499(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4484)
-static void C_ccall f_4484(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4415)
-static void C_ccall f_4415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4476)
-static void C_ccall f_4476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4418)
-static void C_ccall f_4418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4468)
-static void C_ccall f_4468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4424)
-static void C_ccall f_4424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4460)
-static void C_ccall f_4460(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4427)
-static void C_ccall f_4427(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4428)
-static void C_ccall f_4428(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4444)
-static void C_ccall f_4444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4448)
-static void C_ccall f_4448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4452)
-static void C_ccall f_4452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4456)
-static void C_ccall f_4456(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4402)
-static void C_ccall f_4402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4348)
-static void C_ccall f_4348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4394)
-static void C_ccall f_4394(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4351)
-static void C_ccall f_4351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4386)
-static void C_ccall f_4386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4357)
-static void C_ccall f_4357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4358)
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4374)
-static void C_ccall f_4374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4378)
-static void C_ccall f_4378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4382)
-static void C_ccall f_4382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4335)
-static void C_ccall f_4335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4299)
-static void C_ccall f_4299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4327)
-static void C_ccall f_4327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4302)
-static void C_ccall f_4302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4303)
-static void C_ccall f_4303(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4319)
-static void C_ccall f_4319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4323)
-static void C_ccall f_4323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4286)
-static void C_ccall f_4286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4265)
-static void C_ccall f_4265(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4266)
-static void C_ccall f_4266(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4282)
-static void C_ccall f_4282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4123)
-static void C_ccall f_4123(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4137)
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4141)
-static void C_ccall f_4141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4150)
-static void C_ccall f_4150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4183)
-static void C_ccall f_4183(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4191)
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4156)
-static void C_ccall f_4156(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4159)
-static void C_ccall f_4159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4175)
-static void C_ccall f_4175(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_4166)
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4174)
-static void C_ccall f_4174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4211)
-static void C_ccall f_4211(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4219)
-static void C_ccall f_4219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4198)
-static void C_ccall f_4198(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4210)
-static void C_ccall f_4210(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4131)
-static void C_ccall f_4131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4011)
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4070)
-static void C_ccall f_4070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4073)
-static void C_ccall f_4073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4095)
-static void C_ccall f_4095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4076)
-static void C_ccall f_4076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4077)
-static void C_ccall f_4077(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4081)
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4084)
-static void C_ccall f_4084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4048)
-static void C_ccall f_4048(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4051)
-static void C_ccall f_4051(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4052)
-static void C_ccall f_4052(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4056)
-static void C_ccall f_4056(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3951)
-static void C_ccall f_3951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3954)
-static void C_ccall f_3954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3957)
-static void C_ccall f_3957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3960)
-static void C_ccall f_3960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3961)
-static void C_ccall f_3961(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3968)
-static void C_ccall f_3968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3941)
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3907)
-static void C_ccall f_3907(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3901)
-static void C_ccall f_3901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3902)
-static void C_ccall f_3902(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3885)
-static void C_ccall f_3885(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3807)
-static void C_ccall f_3807(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3810)
-static void C_ccall f_3810(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3867)
-static void C_ccall f_3867(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3865)
-static void C_ccall f_3865(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3857)
-static void C_ccall f_3857(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3849)
-static void C_ccall f_3849(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3841)
-static void C_ccall f_3841(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3833)
-static void C_ccall f_3833(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3825)
-static void C_ccall f_3825(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3817)
-static void C_ccall f_3817(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3761)
-static void C_ccall f_3761(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3750)
-static void C_ccall f_3750(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3748)
-static void C_ccall f_3748(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3737)
-static void C_ccall f_3737(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3735)
-static void C_ccall f_3735(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3727)
-static void C_ccall f_3727(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3719)
-static void C_ccall f_3719(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3711)
-static void C_ccall f_3711(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3603)
-static void C_ccall f_3603(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3671)
-static void C_ccall f_3671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3613)
-static void C_ccall f_3613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3662)
-static void C_ccall f_3662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3647)
-static void C_fcall f_3647(C_word t0,C_word t1) C_noret;
-C_noret_decl(f10647)
-static void C_ccall f10647(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f10642)
-static void C_ccall f10642(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3619)
-static void C_ccall f_3619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3622)
-static void C_ccall f_3622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3623)
-static void C_ccall f_3623(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3694)
-static void C_ccall f_3694(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3685)
-static void C_ccall f_3685(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3597)
-static void C_ccall f_3597(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3585)
-static void C_ccall f_3585(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_3526)
-static void C_fcall f_3526(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3530)
-static void C_ccall f_3530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3551)
-static void C_ccall f_3551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3562)
-static void C_ccall f_3562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3555)
-static void C_ccall f_3555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3531)
-static void C_ccall f_3531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3535)
-static void C_ccall f_3535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3538)
-static void C_ccall f_3538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3542)
-static void C_ccall f_3542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3545)
-static void C_ccall f_3545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3419)
-static void C_fcall f_3419(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3423)
-static void C_ccall f_3423(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3431)
-static void C_fcall f_3431(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3448)
-static void C_fcall f_3448(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3478)
-static C_word C_fcall f_3478(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_3404)
-static void C_fcall f_3404(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3408)
-static void C_ccall f_3408(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3414)
-static void C_ccall f_3414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3365)
-static void C_fcall f_3365(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3402)
-static void C_ccall f_3402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3398)
-static void C_ccall f_3398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3378)
-static void C_fcall f_3378(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3315)
-static void C_ccall f_3315(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3334)
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3346)
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3349)
-static void C_ccall f_3349(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3352)
-static void C_ccall f_3352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3342)
-static void C_ccall f_3342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3321)
-static void C_ccall f_3321(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3255)
-static void C_ccall f_3255(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3259)
-static void C_ccall f_3259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3267)
-static void C_fcall f_3267(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3187)
-static void C_ccall f_3187(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3193)
-static void C_fcall f_3193(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3216)
-static void C_fcall f_3216(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3239)
-static void C_ccall f_3239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3224)
-static void C_fcall f_3224(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3203)
-static void C_ccall f_3203(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3167)
-static void C_ccall f_3167(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3179)
-static void C_ccall f_3179(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3182)
-static void C_ccall f_3182(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3175)
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3107)
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3111)
-static void C_ccall f_3111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3119)
-static void C_fcall f_3119(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3052)
-static void C_ccall f_3052(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3105)
-static void C_ccall f_3105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3062)
-static C_word C_fcall f_3062(C_word t0,C_word t1);
-C_noret_decl(f_3037)
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3025)
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3029)
-static void C_ccall f_3029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2991)
-static void C_ccall f_2991(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_2991)
-static void C_ccall f_2991r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_2995)
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1) C_noret;
-
-/* from CHICKEN_get_error_message */
- void CHICKEN_get_error_message(char *t0,int t1){
-C_word x,s=0+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=C_mpointer_or_false(&a,(void*)t0);
-C_save(x);
-x=C_fix((C_word)t1);
-C_save(x);C_callback_wrapper((void *)f_10340,2);}
-
-/* from CHICKEN_load */
- int CHICKEN_load(char * t0){
-C_word x,s=0+2+(t0==NULL?1:C_bytestowords(C_strlen(t0))),*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=C_mpointer(&a,(void*)t0);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10325,1));}
-
-/* from CHICKEN_read */
- int CHICKEN_read(char * t0,C_word *t1){
-C_word x,s=0+2+(t0==NULL?1:C_bytestowords(C_strlen(t0)))+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=C_mpointer(&a,(void*)t0);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t1);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10303,2));}
-
-/* from CHICKEN_apply_to_string */
- int CHICKEN_apply_to_string(C_word t0,C_word t1,char *t2,int t3){
-C_word x,s=0+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=((C_word)t0);
-C_save(x);
-x=((C_word)t1);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t2);
-C_save(x);
-x=C_fix((C_word)t3);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10277,4));}
-
-/* from CHICKEN_apply */
- int CHICKEN_apply(C_word t0,C_word t1,C_word *t2){
-C_word x,s=0+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=((C_word)t0);
-C_save(x);
-x=((C_word)t1);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t2);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10261,3));}
-
-/* from CHICKEN_eval_string_to_string */
- int CHICKEN_eval_string_to_string(char * t0,char *t1,int t2){
-C_word x,s=0+2+(t0==NULL?1:C_bytestowords(C_strlen(t0)))+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=C_mpointer(&a,(void*)t0);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t1);
-C_save(x);
-x=C_fix((C_word)t2);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10224,3));}
-
-/* from CHICKEN_eval_to_string */
- int CHICKEN_eval_to_string(C_word t0,char *t1,int t2){
-C_word x,s=0+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=((C_word)t0);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t1);
-C_save(x);
-x=C_fix((C_word)t2);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10198,3));}
-
-/* from CHICKEN_eval_string */
- int CHICKEN_eval_string(char * t0,C_word *t1){
-C_word x,s=0+2+(t0==NULL?1:C_bytestowords(C_strlen(t0)))+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=C_mpointer(&a,(void*)t0);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t1);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10159,2));}
-
-/* from CHICKEN_eval */
- int CHICKEN_eval(C_word t0,C_word *t1){
-C_word x,s=0+3,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-x=((C_word)t0);
-C_save(x);
-x=C_mpointer_or_false(&a,(void*)t1);
-C_save(x);
-return C_truep(C_callback_wrapper((void *)f_10143,2));}
-
-/* from CHICKEN_yield */
- int CHICKEN_yield(){
-C_word x,s=0,*a=C_alloc(s);
-C_callback_adjust_stack(a,s);
-return C_truep(C_callback_wrapper((void *)f_10131,0));}
-
-C_noret_decl(trf_10523)
-static void C_fcall trf_10523(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10523(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10523(t0,t1);}
-
-C_noret_decl(trf_7523)
-static void C_fcall trf_7523(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7523(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7523(t0,t1);}
-
-C_noret_decl(trf_10452)
-static void C_fcall trf_10452(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10452(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10452(t0,t1);}
-
-C_noret_decl(trf_10416)
-static void C_fcall trf_10416(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10416(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10416(t0,t1,t2);}
-
-C_noret_decl(trf_10122)
-static void C_fcall trf_10122(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10122(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10122(t0,t1,t2);}
-
-C_noret_decl(trf_10063)
-static void C_fcall trf_10063(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10063(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10063(t0,t1);}
-
-C_noret_decl(trf_10015)
-static void C_fcall trf_10015(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10015(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10015(t0,t1);}
-
-C_noret_decl(trf_10002)
-static void C_fcall trf_10002(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10002(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10002(t0,t1);}
-
-C_noret_decl(trf_9748)
-static void C_fcall trf_9748(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9748(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9748(t0,t1);}
-
-C_noret_decl(trf_9809)
-static void C_fcall trf_9809(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9809(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9809(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9833)
-static void C_fcall trf_9833(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9833(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9833(t0,t1,t2);}
-
-C_noret_decl(trf_9638)
-static void C_fcall trf_9638(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9638(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9638(t0,t1);}
-
-C_noret_decl(trf_9712)
-static void C_fcall trf_9712(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9712(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9712(t0,t1);}
-
-C_noret_decl(trf_9616)
-static void C_fcall trf_9616(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9616(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9616(t0,t1);}
-
-C_noret_decl(trf_9494)
-static void C_fcall trf_9494(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9494(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9494(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9470)
-static void C_fcall trf_9470(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9470(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9470(t0,t1,t2);}
-
-C_noret_decl(trf_9476)
-static void C_fcall trf_9476(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9476(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9476(t0,t1,t2);}
-
-C_noret_decl(trf_9404)
-static void C_fcall trf_9404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9404(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9404(t0,t1,t2);}
-
-C_noret_decl(trf_9362)
-static void C_fcall trf_9362(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9362(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9362(t0,t1,t2);}
-
-C_noret_decl(trf_9327)
-static void C_fcall trf_9327(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9327(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9327(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9302)
-static void C_fcall trf_9302(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9302(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9302(t0,t1);}
-
-C_noret_decl(trf_9269)
-static void C_fcall trf_9269(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9269(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9269(t0,t1);}
-
-C_noret_decl(trf_9086)
-static void C_fcall trf_9086(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9086(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9086(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9110)
-static void C_fcall trf_9110(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9110(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9110(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8972)
-static void C_fcall trf_8972(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8972(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8972(t0,t1,t2);}
-
-C_noret_decl(trf_8999)
-static void C_fcall trf_8999(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8999(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8999(t0,t1,t2);}
-
-C_noret_decl(trf_9028)
-static void C_fcall trf_9028(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9028(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9028(t0,t1);}
-
-C_noret_decl(trf_8694)
-static void C_fcall trf_8694(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8694(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8694(t0,t1);}
-
-C_noret_decl(trf_8803)
-static void C_fcall trf_8803(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8803(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8803(t0,t1);}
-
-C_noret_decl(trf_8812)
-static void C_fcall trf_8812(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8812(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8812(t0,t1,t2);}
-
-C_noret_decl(trf_8819)
-static void C_fcall trf_8819(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8819(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8819(t0,t1);}
-
-C_noret_decl(trf_8723)
-static void C_fcall trf_8723(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8723(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8723(t0,t1,t2);}
-
-C_noret_decl(trf_8750)
-static void C_fcall trf_8750(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8750(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8750(t0,t1,t2);}
-
-C_noret_decl(trf_8339)
-static void C_fcall trf_8339(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8339(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8339(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8545)
-static void C_fcall trf_8545(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8545(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8545(t0,t1);}
-
-C_noret_decl(trf_8577)
-static void C_fcall trf_8577(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8577(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8577(t0,t1,t2);}
-
-C_noret_decl(trf_8437)
-static void C_fcall trf_8437(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8437(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8437(t0,t1);}
-
-C_noret_decl(trf_8298)
-static void C_fcall trf_8298(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8298(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_8298(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_8273)
-static void C_fcall trf_8273(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8273(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8273(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8227)
-static void C_fcall trf_8227(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8227(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8227(t0,t1,t2);}
-
-C_noret_decl(trf_8244)
-static void C_fcall trf_8244(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8244(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8244(t0,t1);}
-
-C_noret_decl(trf_8202)
-static void C_fcall trf_8202(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8202(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8202(t0,t1,t2);}
-
-C_noret_decl(trf_8119)
-static void C_fcall trf_8119(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8119(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8119(t0,t1,t2);}
-
-C_noret_decl(trf_8036)
-static void C_fcall trf_8036(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8036(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8036(t0,t1);}
-
-C_noret_decl(trf_7984)
-static void C_fcall trf_7984(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7984(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7984(t0,t1,t2);}
-
-C_noret_decl(trf_7936)
-static void C_fcall trf_7936(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7936(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7936(t0,t1,t2);}
-
-C_noret_decl(trf_7843)
-static void C_fcall trf_7843(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7843(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7843(t0,t1,t2);}
-
-C_noret_decl(trf_7765)
-static void C_fcall trf_7765(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7765(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7765(t0,t1,t2);}
-
-C_noret_decl(trf_7741)
-static void C_fcall trf_7741(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7741(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7741(t0,t1);}
-
-C_noret_decl(trf_7559)
-static void C_fcall trf_7559(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7559(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7559(t0,t1);}
-
-C_noret_decl(trf_7570)
-static void C_fcall trf_7570(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7570(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7570(t0,t1,t2);}
-
-C_noret_decl(trf_7537)
-static void C_fcall trf_7537(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7537(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7537(t0,t1,t2);}
-
-C_noret_decl(trf_7377)
-static void C_fcall trf_7377(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7377(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7377(t0,t1);}
-
-C_noret_decl(trf_7372)
-static void C_fcall trf_7372(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7372(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7372(t0,t1,t2);}
-
-C_noret_decl(trf_7006)
-static void C_fcall trf_7006(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7006(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7006(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7010)
-static void C_fcall trf_7010(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7010(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7010(t0,t1);}
-
-C_noret_decl(trf_7311)
-static void C_fcall trf_7311(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7311(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7311(t0,t1);}
-
-C_noret_decl(trf_7082)
-static void C_fcall trf_7082(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7082(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7082(t0,t1,t2);}
-
-C_noret_decl(trf_7147)
-static void C_fcall trf_7147(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7147(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7147(t0,t1,t2);}
-
-C_noret_decl(trf_7155)
-static void C_fcall trf_7155(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7155(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7155(t0,t1,t2);}
-
-C_noret_decl(trf_6958)
-static void C_fcall trf_6958(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6958(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6958(t0,t1);}
-
-C_noret_decl(trf_6895)
-static void C_fcall trf_6895(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6895(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6895(t0,t1,t2);}
-
-C_noret_decl(trf_6806)
-static void C_fcall trf_6806(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6806(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_6806(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_6796)
-static void C_fcall trf_6796(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6796(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6796(t0,t1);}
-
-C_noret_decl(trf_6457)
-static void C_fcall trf_6457(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6457(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_6457(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_6708)
-static void C_fcall trf_6708(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6708(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6708(t0,t1,t2);}
-
-C_noret_decl(trf_6735)
-static void C_fcall trf_6735(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6735(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6735(t0,t1,t2);}
-
-C_noret_decl(trf_6655)
-static void C_fcall trf_6655(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6655(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6655(t0,t1);}
-
-C_noret_decl(trf_6668)
-static void C_fcall trf_6668(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6668(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6668(t0,t1,t2);}
-
-C_noret_decl(trf_6695)
-static void C_fcall trf_6695(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6695(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6695(t0,t1,t2);}
-
-C_noret_decl(trf_6621)
-static void C_fcall trf_6621(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6621(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6621(t0,t1);}
-
-C_noret_decl(trf_6576)
-static void C_fcall trf_6576(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6576(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6576(t0,t1);}
-
-C_noret_decl(trf_6538)
-static void C_fcall trf_6538(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6538(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6538(t0,t1);}
-
-C_noret_decl(trf_6507)
-static void C_fcall trf_6507(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6507(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6507(t0,t1);}
-
-C_noret_decl(trf_3577)
-static void C_fcall trf_3577(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3577(void *dummy){
-C_word t7=C_pick(0);
-C_word t6=C_pick(1);
-C_word t5=C_pick(2);
-C_word t4=C_pick(3);
-C_word t3=C_pick(4);
-C_word t2=C_pick(5);
-C_word t1=C_pick(6);
-C_word t0=C_pick(7);
-C_adjust_stack(-8);
-f_3577(t0,t1,t2,t3,t4,t5,t6,t7);}
-
-C_noret_decl(trf_3760)
-static void C_fcall trf_3760(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3760(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3760(t0,t1);}
-
-C_noret_decl(trf_3780)
-static void C_fcall trf_3780(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3780(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3780(t0,t1);}
-
-C_noret_decl(trf_6231)
-static void C_fcall trf_6231(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6231(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6231(t0,t1);}
-
-C_noret_decl(trf_6165)
-static void C_fcall trf_6165(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6165(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6165(t0,t1,t2);}
-
-C_noret_decl(trf_6173)
-static void C_fcall trf_6173(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6173(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6173(t0,t1,t2);}
-
-C_noret_decl(trf_6051)
-static void C_fcall trf_6051(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6051(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6051(t0,t1,t2);}
-
-C_noret_decl(trf_5991)
-static void C_fcall trf_5991(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5991(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5991(t0,t1,t2);}
-
-C_noret_decl(trf_6018)
-static void C_fcall trf_6018(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6018(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6018(t0,t1,t2);}
-
-C_noret_decl(trf_5943)
-static void C_fcall trf_5943(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5943(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5943(t0,t1,t2);}
-
-C_noret_decl(trf_5757)
-static void C_fcall trf_5757(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5757(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5757(t0,t1,t2);}
-
-C_noret_decl(trf_5784)
-static void C_fcall trf_5784(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5784(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5784(t0,t1,t2);}
-
-C_noret_decl(trf_5797)
-static void C_fcall trf_5797(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5797(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5797(t0,t1);}
-
-C_noret_decl(trf_5661)
-static void C_fcall trf_5661(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5661(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5661(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5681)
-static void C_fcall trf_5681(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5681(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5681(t0,t1,t2);}
-
-C_noret_decl(trf_5482)
-static void C_fcall trf_5482(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5482(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5482(t0,t1,t2);}
-
-C_noret_decl(trf_5509)
-static void C_fcall trf_5509(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5509(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5509(t0,t1,t2);}
-
-C_noret_decl(trf_5446)
-static void C_fcall trf_5446(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5446(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5446(t0,t1,t2);}
-
-C_noret_decl(trf_5361)
-static void C_fcall trf_5361(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5361(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5361(t0,t1,t2);}
-
-C_noret_decl(trf_5388)
-static void C_fcall trf_5388(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5388(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5388(t0,t1,t2);}
-
-C_noret_decl(trf_5274)
-static void C_fcall trf_5274(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5274(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5274(t0,t1,t2);}
-
-C_noret_decl(trf_5225)
-static void C_fcall trf_5225(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5225(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5225(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5238)
-static void C_fcall trf_5238(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5238(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5238(t0,t1);}
-
-C_noret_decl(trf_6385)
-static void C_fcall trf_6385(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6385(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_6385(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_4835)
-static void C_fcall trf_4835(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4835(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4835(t0,t1,t2);}
-
-C_noret_decl(trf_4779)
-static void C_fcall trf_4779(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4779(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4779(t0,t1,t2);}
-
-C_noret_decl(trf_4682)
-static void C_fcall trf_4682(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4682(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4682(t0,t1,t2);}
-
-C_noret_decl(trf_4647)
-static void C_fcall trf_4647(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4647(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4647(t0,t1,t2);}
-
-C_noret_decl(trf_4598)
-static void C_fcall trf_4598(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4598(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4598(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4611)
-static void C_fcall trf_4611(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4611(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4611(t0,t1);}
-
-C_noret_decl(trf_4538)
-static void C_fcall trf_4538(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4538(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4538(t0,t1,t2);}
-
-C_noret_decl(trf_4565)
-static void C_fcall trf_4565(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4565(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4565(t0,t1,t2);}
-
-C_noret_decl(trf_4508)
-static void C_fcall trf_4508(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4508(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4508(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3647)
-static void C_fcall trf_3647(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3647(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3647(t0,t1);}
-
-C_noret_decl(trf_3526)
-static void C_fcall trf_3526(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3526(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3526(t0,t1);}
-
-C_noret_decl(trf_3419)
-static void C_fcall trf_3419(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3419(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_3419(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_3431)
-static void C_fcall trf_3431(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3431(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3431(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3448)
-static void C_fcall trf_3448(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3448(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3448(t0,t1,t2);}
-
-C_noret_decl(trf_3404)
-static void C_fcall trf_3404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3404(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3404(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3365)
-static void C_fcall trf_3365(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3365(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3365(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3378)
-static void C_fcall trf_3378(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3378(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3378(t0,t1);}
-
-C_noret_decl(trf_3267)
-static void C_fcall trf_3267(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3267(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3267(t0,t1,t2);}
-
-C_noret_decl(trf_3193)
-static void C_fcall trf_3193(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3193(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3193(t0,t1,t2);}
-
-C_noret_decl(trf_3216)
-static void C_fcall trf_3216(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3216(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3216(t0,t1,t2);}
-
-C_noret_decl(trf_3224)
-static void C_fcall trf_3224(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3224(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3224(t0,t1,t2);}
-
-C_noret_decl(trf_3119)
-static void C_fcall trf_3119(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3119(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3119(t0,t1,t2);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr6r)
-static void C_fcall tr6r(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6r(C_proc6 k){
-int n;
-C_word *a,t6;
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t6=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr5r)
-static void C_fcall tr5r(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5r(C_proc5 k){
-int n;
-C_word *a,t5;
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t5=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_eval_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("eval_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(6464)){
-C_save(t1);
-C_rereclaim2(6464*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,402);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],24,"\003syscore-library-modules");
-lf[3]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006extras\376\003\000\000\002\376\001\000\000\007lolevel\376\003\000\000\002\376\001\000\000\005utils\376\003\000\000\002\376\001\000\000\005files\376\003\000\000\002\376\001\000\000\003tcp\376\003\000\000"
-"\002\376\001\000\000\005regex\376\003\000\000\002\376\001\000\000\005posix\376\003\000\000\002\376\001\000\000\006srfi-1\376\003\000\000\002\376\001\000\000\006srfi-4\376\003\000\000\002\376\001\000\000\007srfi-13\376\003\000\000\002"
-"\376\001\000\000\007srfi-14\376\003\000\000\002\376\001\000\000\007srfi-18\376\003\000\000\002\376\001\000\000\007srfi-69\376\003\000\000\002\376\001\000\000\017data-structures\376\003\000\000\002\376\001\000\000"
-"\005ports\376\003\000\000\002\376\001\000\000\016chicken-syntax\376\377\016");
-lf[4]=C_h_intern(&lf[4],28,"\003sysexplicit-library-modules");
-lf[6]=C_decode_literal(C_heaptop,"\376B\000\000\003.so");
-lf[8]=C_decode_literal(C_heaptop,"\376B\000\000\004.scm");
-lf[9]=C_h_intern(&lf[9],18,"\003syschicken-prefix");
-lf[10]=C_h_intern(&lf[10],17,"\003sysstring-append");
-lf[11]=C_h_intern(&lf[11],9,"\003syserror");
-lf[12]=C_h_intern(&lf[12],12,"chicken-home");
-lf[13]=C_h_intern(&lf[13],17,"\003syspeek-c-string");
-lf[14]=C_decode_literal(C_heaptop,"\376B\000\000\015share/chicken");
-lf[15]=C_h_intern(&lf[15],15,"\003syshash-symbol");
-lf[16]=C_h_intern(&lf[16],18,"\003syshash-table-ref");
-lf[17]=C_h_intern(&lf[17],19,"\003syshash-table-set!");
-lf[18]=C_h_intern(&lf[18],22,"\003syshash-table-update!");
-lf[19]=C_h_intern(&lf[19],23,"\003syshash-table-for-each");
-lf[20]=C_h_intern(&lf[20],28,"\003sysarbitrary-unbound-symbol");
-lf[21]=C_h_intern(&lf[21],23,"\003syshash-table-location");
-lf[22]=C_h_intern(&lf[22],20,"\003syseval-environment");
-lf[23]=C_h_intern(&lf[23],26,"\003sysenvironment-is-mutable");
-lf[24]=C_h_intern(&lf[24],18,"\003syseval-decorator");
-lf[25]=C_h_intern(&lf[25],20,"\003sysmake-lambda-info");
-lf[26]=C_h_intern(&lf[26],17,"get-output-string");
-lf[27]=C_h_intern(&lf[27],5,"write");
-lf[28]=C_h_intern(&lf[28],18,"open-output-string");
-lf[29]=C_h_intern(&lf[29],19,"\003sysdecorate-lambda");
-lf[30]=C_h_intern(&lf[30],19,"\003sysunbound-in-eval");
-lf[31]=C_h_intern(&lf[31],20,"\003syseval-debug-level");
-lf[32]=C_h_intern(&lf[32],7,"reverse");
-lf[33]=C_h_intern(&lf[33],20,"with-input-from-file");
-lf[34]=C_h_intern(&lf[34],7,"display");
-lf[35]=C_h_intern(&lf[35],22,"\003syscompile-to-closure");
-lf[36]=C_h_intern(&lf[36],4,"cdar");
-lf[37]=C_h_intern(&lf[37],4,"caar");
-lf[38]=C_h_intern(&lf[38],7,"\003sysget");
-lf[39]=C_h_intern(&lf[39],16,"\004coremacro-alias");
-lf[40]=C_h_intern(&lf[40],19,"\003sysundefined-value");
-lf[41]=C_h_intern(&lf[41],18,"\003syscurrent-module");
-lf[42]=C_h_intern(&lf[42],21,"\003sysmacro-environment");
-lf[43]=C_h_intern(&lf[43],28,"\003syscurrent-meta-environment");
-lf[44]=C_h_intern(&lf[44],16,"\003sysdynamic-wind");
-lf[45]=C_h_intern(&lf[45],26,"\003sysmeta-macro-environment");
-lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\020unbound variable");
-lf[47]=C_h_intern(&lf[47],21,"\003syssyntax-error-hook");
-lf[48]=C_decode_literal(C_heaptop,"\376B\000\000!reference to undefined identifier");
-lf[49]=C_h_intern(&lf[49],32,"\003syssymbol-has-toplevel-binding\077");
-lf[50]=C_h_intern(&lf[50],14,"\004coreprimitive");
-lf[51]=C_h_intern(&lf[51],21,"\003sysalias-global-hook");
-lf[52]=C_h_intern(&lf[52],5,"quote");
-lf[53]=C_h_intern(&lf[53],16,"\003sysstrip-syntax");
-lf[54]=C_h_intern(&lf[54],16,"\003syscheck-syntax");
-lf[55]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[56]=C_h_intern(&lf[56],6,"syntax");
-lf[57]=C_h_intern(&lf[57],11,"\004coresyntax");
-lf[58]=C_h_intern(&lf[58],15,"\004coreglobal-ref");
-lf[59]=C_h_intern(&lf[59],10,"\004corecheck");
-lf[60]=C_h_intern(&lf[60],14,"\004coreimmutable");
-lf[61]=C_h_intern(&lf[61],14,"\004coreundefined");
-lf[62]=C_h_intern(&lf[62],2,"if");
-lf[63]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[64]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\002if\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\001\376\001\000\000\001_");
-lf[65]=C_h_intern(&lf[65],5,"begin");
-lf[66]=C_h_intern(&lf[66],10,"\004corebegin");
-lf[67]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[68]=C_h_intern(&lf[68],10,"\003sysappend");
-lf[69]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[70]=C_h_intern(&lf[70],4,"set!");
-lf[71]=C_h_intern(&lf[71],9,"\004coreset!");
-lf[72]=C_decode_literal(C_heaptop,"\376B\000\000 assignment to immutable variable");
-lf[73]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment of undefined identifier");
-lf[74]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[75]=C_h_intern(&lf[75],3,"let");
-lf[76]=C_h_intern(&lf[76],8,"\004corelet");
-lf[77]=C_h_intern(&lf[77],5,"cadar");
-lf[78]=C_h_intern(&lf[78],6,"cadadr");
-lf[79]=C_h_intern(&lf[79],15,"\003sysmake-vector");
-lf[80]=C_h_intern(&lf[80],21,"\003syscanonicalize-body");
-lf[81]=C_h_intern(&lf[81],6,"append");
-lf[82]=C_h_intern(&lf[82],4,"cons");
-lf[83]=C_h_intern(&lf[83],6,"gensym");
-lf[84]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[85]=C_h_intern(&lf[85],6,"letrec");
-lf[86]=C_h_intern(&lf[86],11,"\004coreletrec");
-lf[87]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[88]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[89]=C_h_intern(&lf[89],6,"lambda");
-lf[90]=C_h_intern(&lf[90],11,"\004corelambda");
-lf[91]=C_h_intern(&lf[91],1,"\077");
-lf[92]=C_h_intern(&lf[92],10,"\003sysvector");
-lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
-lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
-lf[95]=C_h_intern(&lf[95],25,"\003sysdecompose-lambda-list");
-lf[96]=C_h_intern(&lf[96],31,"\003sysexpand-extended-lambda-list");
-lf[97]=C_h_intern(&lf[97],25,"\003sysextended-lambda-list\077");
-lf[98]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[99]=C_h_intern(&lf[99],10,"let-syntax");
-lf[100]=C_h_intern(&lf[100],18,"\003syser-transformer");
-lf[101]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012let-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_"
-"\376\377\001\000\000\000\001");
-lf[102]=C_h_intern(&lf[102],13,"letrec-syntax");
-lf[103]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015letrec-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000"
-"\000\001_\376\377\001\000\000\000\001");
-lf[104]=C_h_intern(&lf[104],18,"\004coredefine-syntax");
-lf[105]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[106]=C_h_intern(&lf[106],28,"\003sysextend-macro-environment");
-lf[107]=C_h_intern(&lf[107],23,"\003syscurrent-environment");
-lf[108]=C_h_intern(&lf[108],26,"\003sysregister-syntax-export");
-lf[109]=C_h_intern(&lf[109],27,"\004coredefine-compiler-syntax");
-lf[110]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[111]=C_h_intern(&lf[111],24,"\004corelet-compiler-syntax");
-lf[112]=C_h_intern(&lf[112],11,"\004coremodule");
-lf[113]=C_h_intern(&lf[113],29,"\003sysinitial-macro-environment");
-lf[114]=C_h_intern(&lf[114],19,"\003sysfinalize-module");
-lf[115]=C_h_intern(&lf[115],19,"\003sysregister-module");
-lf[116]=C_h_intern(&lf[116],6,"module");
-lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
-lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
-lf[119]=C_h_intern(&lf[119],16,"\004coreloop-lambda");
-lf[120]=C_h_intern(&lf[120],17,"\004corenamed-lambda");
-lf[121]=C_h_intern(&lf[121],23,"\004corerequire-for-syntax");
-lf[122]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[123]=C_h_intern(&lf[123],11,"\003sysrequire");
-lf[124]=C_h_intern(&lf[124],31,"\003syslookup-runtime-requirements");
-lf[125]=C_h_intern(&lf[125],22,"\004corerequire-extension");
-lf[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[127]=C_h_intern(&lf[127],22,"\003sysdo-the-right-thing");
-lf[128]=C_h_intern(&lf[128],24,"\004coreelaborationtimeonly");
-lf[129]=C_h_intern(&lf[129],23,"\004coreelaborationtimetoo");
-lf[130]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[131]=C_h_intern(&lf[131],19,"\004corecompiletimetoo");
-lf[132]=C_h_intern(&lf[132],20,"\004corecompiletimeonly");
-lf[133]=C_h_intern(&lf[133],13,"\004corecallunit");
-lf[134]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[135]=C_h_intern(&lf[135],12,"\004coredeclare");
-lf[136]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[137]=C_h_intern(&lf[137],10,"\000compiling");
-lf[138]=C_h_intern(&lf[138],12,"\003sysfeatures");
-lf[139]=C_h_intern(&lf[139],28,"\010compilerprocess-declaration");
-lf[140]=C_h_intern(&lf[140],8,"\003syswarn");
-lf[141]=C_decode_literal(C_heaptop,"\376B\000\000,declarations are ignored in interpreted code");
-lf[142]=C_h_intern(&lf[142],18,"\004coredefine-inline");
-lf[143]=C_h_intern(&lf[143],20,"\004coredefine-constant");
-lf[144]=C_h_intern(&lf[144],6,"define");
-lf[145]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
-lf[146]=C_h_intern(&lf[146],8,"\004coreapp");
-lf[147]=C_h_intern(&lf[147],8,"location");
-lf[148]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
-lf[149]=C_h_intern(&lf[149],11,"\004coreinline");
-lf[150]=C_h_intern(&lf[150],20,"\004coreinline_allocate");
-lf[151]=C_h_intern(&lf[151],19,"\004coreforeign-lambda");
-lf[152]=C_h_intern(&lf[152],28,"\004coredefine-foreign-variable");
-lf[153]=C_h_intern(&lf[153],29,"\004coredefine-external-variable");
-lf[154]=C_h_intern(&lf[154],17,"\004corelet-location");
-lf[155]=C_h_intern(&lf[155],22,"\004coreforeign-primitive");
-lf[156]=C_h_intern(&lf[156],20,"\004coreforeign-lambda*");
-lf[157]=C_h_intern(&lf[157],24,"\004coredefine-foreign-type");
-lf[158]=C_h_intern(&lf[158],10,"\003sysexpand");
-lf[159]=C_h_intern(&lf[159],18,"\003syscurrent-thread");
-lf[160]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal non-atomic object");
-lf[161]=C_h_intern(&lf[161],11,"\003sysnumber\077");
-lf[162]=C_h_intern(&lf[162],8,"keyword\077");
-lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
-lf[164]=C_h_intern(&lf[164],16,"\003syseval-handler");
-lf[165]=C_h_intern(&lf[165],12,"eval-handler");
-lf[166]=C_h_intern(&lf[166],4,"eval");
-lf[167]=C_h_intern(&lf[167],24,"\003syssyntax-error-culprit");
-lf[168]=C_decode_literal(C_heaptop,"\376B\000\000\032illegal lambda-list syntax");
-lf[169]=C_h_intern(&lf[169],12,"load-verbose");
-lf[170]=C_h_intern(&lf[170],14,"\003sysabort-load");
-lf[171]=C_h_intern(&lf[171],27,"\003syscurrent-source-filename");
-lf[172]=C_h_intern(&lf[172],21,"\003syscurrent-load-path");
-lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[174]=C_h_intern(&lf[174],18,"\003sysdload-disabled");
-lf[175]=C_h_intern(&lf[175],22,"set-dynamic-load-mode!");
-lf[176]=C_h_intern(&lf[176],21,"\003sysset-dlopen-flags!");
-lf[177]=C_h_intern(&lf[177],6,"global");
-lf[178]=C_h_intern(&lf[178],5,"local");
-lf[179]=C_h_intern(&lf[179],4,"lazy");
-lf[180]=C_h_intern(&lf[180],3,"now");
-lf[181]=C_h_intern(&lf[181],15,"\003syssignal-hook");
-lf[182]=C_decode_literal(C_heaptop,"\376B\000\000\031invalid dynamic-load mode");
-lf[183]=C_h_intern(&lf[183],4,"read");
-lf[184]=C_h_intern(&lf[184],7,"newline");
-lf[185]=C_h_intern(&lf[185],12,"flush-output");
-lf[186]=C_h_intern(&lf[186],15,"open-input-file");
-lf[187]=C_h_intern(&lf[187],16,"close-input-port");
-lf[188]=C_h_intern(&lf[188],13,"string-append");
-lf[189]=C_h_intern(&lf[189],8,"\003sysload");
-lf[190]=C_h_intern(&lf[190],31,"\003sysread-error-with-line-number");
-lf[191]=C_h_intern(&lf[191],17,"\003sysdisplay-times");
-lf[192]=C_h_intern(&lf[192],14,"\003sysstop-timer");
-lf[193]=C_h_intern(&lf[193],15,"\003sysstart-timer");
-lf[194]=C_h_intern(&lf[194],4,"load");
-lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\036unable to load compiled module");
-lf[196]=C_h_intern(&lf[196],9,"peek-char");
-lf[197]=C_h_intern(&lf[197],13,"\003syssubstring");
-lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[199]=C_h_intern(&lf[199],30,"call-with-current-continuation");
-lf[200]=C_h_intern(&lf[200],9,"\003sysdload");
-lf[201]=C_h_intern(&lf[201],17,"\003sysmake-c-string");
-lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\002./");
-lf[203]=C_h_intern(&lf[203],11,"\000file-error");
-lf[204]=C_decode_literal(C_heaptop,"\376B\000\000\020cannot open file");
-lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
-lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\012; loading ");
-lf[207]=C_h_intern(&lf[207],13,"\003sysfile-info");
-lf[208]=C_h_intern(&lf[208],26,"\003sysload-dynamic-extension");
-lf[209]=C_h_intern(&lf[209],11,"\000type-error");
-lf[210]=C_decode_literal(C_heaptop,"\376B\000\000(bad argument type - not a port or string");
-lf[211]=C_h_intern(&lf[211],5,"port\077");
-lf[212]=C_h_intern(&lf[212],20,"\003sysexpand-home-path");
-lf[213]=C_h_intern(&lf[213],13,"load-relative");
-lf[214]=C_h_intern(&lf[214],12,"load-noisily");
-lf[215]=C_h_intern(&lf[215],15,"\003sysget-keyword");
-lf[216]=C_h_intern(&lf[216],8,"\000printer");
-lf[217]=C_h_intern(&lf[217],5,"\000time");
-lf[218]=C_h_intern(&lf[218],10,"\000evaluator");
-lf[219]=C_h_intern(&lf[219],26,"\003sysload-library-extension");
-lf[220]=C_h_intern(&lf[220],6,"cygwin");
-lf[221]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014cygchicken-0\376\377\016");
-lf[222]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012libchicken\376\377\016");
-lf[223]=C_h_intern(&lf[223],34,"\003sysdefault-dynamic-load-libraries");
-lf[224]=C_h_intern(&lf[224],22,"dynamic-load-libraries");
-lf[225]=C_h_intern(&lf[225],18,"\003sysload-library-0");
-lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
-lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\022; loading library ");
-lf[228]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
-lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
-lf[230]=C_h_intern(&lf[230],24,"\003sysstring->c-identifier");
-lf[231]=C_h_intern(&lf[231],16,"\003sys->feature-id");
-lf[232]=C_h_intern(&lf[232],16,"\003sysload-library");
-lf[233]=C_h_intern(&lf[233],12,"load-library");
-lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\026unable to load library");
-lf[235]=C_h_intern(&lf[235],31,"\003syscanonicalize-extension-path");
-lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid extension path");
-lf[237]=C_h_intern(&lf[237],18,"\003syssymbol->string");
-lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[241]=C_h_intern(&lf[241],19,"\003sysrepository-path");
-lf[242]=C_h_intern(&lf[242],15,"repository-path");
-lf[243]=C_h_intern(&lf[243],14,"\003syssetup-mode");
-lf[244]=C_h_intern(&lf[244],12,"file-exists\077");
-lf[245]=C_h_intern(&lf[245],18,"\003sysfind-extension");
-lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[247]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
-lf[248]=C_h_intern(&lf[248],21,"\003sysinclude-pathnames");
-lf[249]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
-lf[250]=C_h_intern(&lf[250],21,"\003sysloaded-extensions");
-lf[251]=C_h_intern(&lf[251],14,"string->symbol");
-lf[252]=C_h_intern(&lf[252],18,"\003sysload-extension");
-lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\030cannot load core library");
-lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot load extension");
-lf[255]=C_h_intern(&lf[255],11,"\003sysprovide");
-lf[256]=C_h_intern(&lf[256],7,"provide");
-lf[257]=C_h_intern(&lf[257],13,"\003sysprovided\077");
-lf[258]=C_h_intern(&lf[258],9,"provided\077");
-lf[259]=C_h_intern(&lf[259],7,"require");
-lf[260]=C_h_intern(&lf[260],12,"\003sysfor-each");
-lf[261]=C_h_intern(&lf[261],25,"\003sysextension-information");
-lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\012setup-info");
-lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[265]=C_h_intern(&lf[265],21,"extension-information");
-lf[266]=C_h_intern(&lf[266],18,"require-at-runtime");
-lf[267]=C_h_intern(&lf[267],12,"vector->list");
-lf[268]=C_h_intern(&lf[268],14,"dynamic/syntax");
-lf[269]=C_h_intern(&lf[269],7,"dynamic");
-lf[270]=C_h_intern(&lf[270],11,"lset-adjoin");
-lf[271]=C_h_intern(&lf[271],3,"eq\077");
-lf[272]=C_h_intern(&lf[272],26,"\010compilerfile-requirements");
-lf[273]=C_h_intern(&lf[273],6,"import");
-lf[274]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007chicken\376\003\000\000\002\376\001\000\000\006srfi-2\376\003\000\000\002\376\001\000\000\006srfi-6\376\003\000\000\002\376\001\000\000\007srfi-10\376\003\000\000\002\376\001\000\000\007srfi"
-"-12\376\003\000\000\002\376\001\000\000\007srfi-23\376\003\000\000\002\376\001\000\000\007srfi-28\376\003\000\000\002\376\001\000\000\007srfi-30\376\003\000\000\002\376\001\000\000\007srfi-31\376\003\000\000\002\376\001\000\000"
-"\007srfi-39\376\003\000\000\002\376\001\000\000\007srfi-55\376\003\000\000\002\376\001\000\000\007srfi-88\376\003\000\000\002\376\001\000\000\007srfi-98\376\377\016");
-lf[275]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[276]=C_h_intern(&lf[276],4,"uses");
-lf[277]=C_h_intern(&lf[277],11,"import-only");
-lf[278]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[279]=C_h_intern(&lf[279],17,"require-extension");
-lf[280]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006srfi-6\376\003\000\000\002\376\001\000\000\006srfi-8\376\003\000\000\002\376\001\000\000\006srfi-9\376\003\000\000\002\376\001\000\000\007srfi-11\376\003\000\000\002\376\001\000\000\007srfi-"
-"15\376\003\000\000\002\376\001\000\000\007srfi-16\376\003\000\000\002\376\001\000\000\007srfi-17\376\003\000\000\002\376\001\000\000\007srfi-26\376\377\016");
-lf[281]=C_h_intern(&lf[281],12,"\003sysfeature\077");
-lf[282]=C_h_intern(&lf[282],4,"srfi");
-lf[283]=C_decode_literal(C_heaptop,"\376B\000\000\005srfi-");
-lf[284]=C_h_intern(&lf[284],16,"\003syssyntax-error");
-lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid SRFI number");
-lf[286]=C_h_intern(&lf[286],6,"rename");
-lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid extension specifier");
-lf[288]=C_h_intern(&lf[288],6,"except");
-lf[289]=C_h_intern(&lf[289],4,"only");
-lf[290]=C_h_intern(&lf[290],6,"prefix");
-lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid extension specifier");
-lf[292]=C_h_intern(&lf[292],11,"string-copy");
-lf[295]=C_h_intern(&lf[295],11,"environment");
-lf[297]=C_h_intern(&lf[297],16,"\003sysenvironment\077");
-lf[298]=C_h_intern(&lf[298],18,"\003syscopy-env-table");
-lf[299]=C_h_intern(&lf[299],23,"\003sysenvironment-symbols");
-lf[300]=C_h_intern(&lf[300],18,"\003syswalk-namespace");
-lf[301]=C_h_intern(&lf[301],23,"interaction-environment");
-lf[302]=C_h_intern(&lf[302],25,"scheme-report-environment");
-lf[303]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
-lf[304]=C_h_intern(&lf[304],11,"make-vector");
-lf[305]=C_h_intern(&lf[305],16,"null-environment");
-lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
-lf[307]=C_h_intern(&lf[307],28,"\003sysresolve-include-filename");
-lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[309]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
-lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\013 major GCs\012");
-lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\013 minor GCs\012");
-lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\013 mutations\012");
-lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\027 seconds in (major) GC\012");
-lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\021 seconds elapsed\012");
-lf[315]=C_h_intern(&lf[315],18,"\003sysrepl-eval-hook");
-lf[316]=C_h_intern(&lf[316],27,"\003sysrepl-print-length-limit");
-lf[317]=C_h_intern(&lf[317],18,"\003sysrepl-read-hook");
-lf[318]=C_h_intern(&lf[318],19,"\003sysrepl-print-hook");
-lf[319]=C_h_intern(&lf[319],16,"\003syswrite-char-0");
-lf[320]=C_h_intern(&lf[320],9,"\003sysprint");
-lf[321]=C_h_intern(&lf[321],27,"\003syswith-print-length-limit");
-lf[322]=C_h_intern(&lf[322],11,"repl-prompt");
-lf[323]=C_h_intern(&lf[323],20,"\003sysread-prompt-hook");
-lf[324]=C_h_intern(&lf[324],16,"\003sysflush-output");
-lf[325]=C_h_intern(&lf[325],19,"\003sysstandard-output");
-lf[326]=C_h_intern(&lf[326],22,"\003sysclear-trace-buffer");
-lf[327]=C_h_intern(&lf[327],16,"print-call-chain");
-lf[328]=C_h_intern(&lf[328],5,"reset");
-lf[329]=C_h_intern(&lf[329],4,"repl");
-lf[330]=C_h_intern(&lf[330],18,"\003sysstandard-error");
-lf[331]=C_h_intern(&lf[331],18,"\003sysstandard-input");
-lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[333]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\006\012Error");
-lf[335]=C_h_intern(&lf[335],17,"\003syserror-handler");
-lf[336]=C_h_intern(&lf[336],20,"\003syswarnings-enabled");
-lf[337]=C_decode_literal(C_heaptop,"\376B\000\000\005 (in ");
-lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
-lf[339]=C_decode_literal(C_heaptop,"\376B\000\000FWarning: the following toplevel variables are referenced but unbound:\012");
-lf[340]=C_h_intern(&lf[340],15,"\003sysread-char-0");
-lf[341]=C_h_intern(&lf[341],15,"\003syspeek-char-0");
-lf[342]=C_h_intern(&lf[342],21,"\003sysenable-qualifiers");
-lf[343]=C_h_intern(&lf[343],17,"\003sysreset-handler");
-lf[344]=C_h_intern(&lf[344],28,"\003syssharp-comma-reader-ctors");
-lf[345]=C_h_intern(&lf[345],18,"define-reader-ctor");
-lf[346]=C_h_intern(&lf[346],18,"\003sysuser-read-hook");
-lf[347]=C_h_intern(&lf[347],9,"read-char");
-lf[348]=C_h_intern(&lf[348],14,"\003sysread-error");
-lf[349]=C_decode_literal(C_heaptop,"\376B\000\000!invalid sharp-comma external form");
-lf[350]=C_decode_literal(C_heaptop,"\376B\000\000!undefined sharp-comma constructor");
-lf[353]=C_h_intern(&lf[353],19,"print-error-message");
-lf[354]=C_h_intern(&lf[354],22,"with-exception-handler");
-lf[356]=C_h_intern(&lf[356],6,"\003sysgc");
-lf[358]=C_h_intern(&lf[358],17,"\003systhread-yield!");
-lf[361]=C_h_intern(&lf[361],17,"open-input-string");
-lf[363]=C_decode_literal(C_heaptop,"\376B\000\000(Error: not enough room for result string");
-lf[371]=C_decode_literal(C_heaptop,"\376B\000\000\010No error");
-lf[372]=C_h_intern(&lf[372],15,"\003sysmake-string");
-lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\004#;> ");
-lf[374]=C_h_intern(&lf[374],14,"make-parameter");
-lf[375]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007\000srfi-8\376\003\000\000\002\376\001\000\000\007\000srfi-6\376\003\000\000\002\376\001\000\000\007\000srfi-2\376\003\000\000\002\376\001\000\000\007\000srfi-0\376\003\000\000\002\376\001\000\000\010\000s"
-"rfi-10\376\003\000\000\002\376\001\000\000\007\000srfi-9\376\003\000\000\002\376\001\000\000\010\000srfi-55\376\003\000\000\002\376\001\000\000\010\000srfi-61\376\377\016");
-lf[376]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\014dynamic-wind\376\003\000\000\002\376\001\000\000\006values\376\003\000\000\002\376\001\000\000\020call-with-values\376\003\000\000\002\376\001\000\000\004eval\376\003"
-"\000\000\002\376\001\000\000\031scheme-report-environment\376\003\000\000\002\376\001\000\000\020null-environment\376\003\000\000\002\376\001\000\000\027interaction"
-"-environment\376\377\016");
-lf[377]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\376\003\000\000\002\376\001\000\000\010boolean\077\376\003\000\000\002\376\001\000\000\003eq\077\376\003\000\000\002\376\001\000\000\004eqv\077\376\003\000\000\002\376\001\000\000\006equal\077\376\003\000\000\002\376"
-"\001\000\000\005pair\077\376\003\000\000\002\376\001\000\000\004cons\376\003\000\000\002\376\001\000\000\003car\376\003\000\000\002\376\001\000\000\003cdr\376\003\000\000\002\376\001\000\000\004caar\376\003\000\000\002\376\001\000\000\004cadr\376\003\000"
-"\000\002\376\001\000\000\004cdar\376\003\000\000\002\376\001\000\000\004cddr\376\003\000\000\002\376\001\000\000\005caaar\376\003\000\000\002\376\001\000\000\005caadr\376\003\000\000\002\376\001\000\000\005cadar\376\003\000\000\002\376\001\000\000\005"
-"caddr\376\003\000\000\002\376\001\000\000\005cdaar\376\003\000\000\002\376\001\000\000\005cdadr\376\003\000\000\002\376\001\000\000\005cddar\376\003\000\000\002\376\001\000\000\005cdddr\376\003\000\000\002\376\001\000\000\006caaaa"
-"r\376\003\000\000\002\376\001\000\000\006caaadr\376\003\000\000\002\376\001\000\000\006caadar\376\003\000\000\002\376\001\000\000\006caaddr\376\003\000\000\002\376\001\000\000\006cadaar\376\003\000\000\002\376\001\000\000\006cadad"
-"r\376\003\000\000\002\376\001\000\000\006cadddr\376\003\000\000\002\376\001\000\000\006cdaaar\376\003\000\000\002\376\001\000\000\006cdaadr\376\003\000\000\002\376\001\000\000\006cdadar\376\003\000\000\002\376\001\000\000\006cdadd"
-"r\376\003\000\000\002\376\001\000\000\006cddaar\376\003\000\000\002\376\001\000\000\006cddadr\376\003\000\000\002\376\001\000\000\006cdddar\376\003\000\000\002\376\001\000\000\006cddddr\376\003\000\000\002\376\001\000\000\010set-c"
-"ar!\376\003\000\000\002\376\001\000\000\010set-cdr!\376\003\000\000\002\376\001\000\000\005null\077\376\003\000\000\002\376\001\000\000\005list\077\376\003\000\000\002\376\001\000\000\004list\376\003\000\000\002\376\001\000\000\006lengt"
-"h\376\003\000\000\002\376\001\000\000\011list-tail\376\003\000\000\002\376\001\000\000\010list-ref\376\003\000\000\002\376\001\000\000\006append\376\003\000\000\002\376\001\000\000\007reverse\376\003\000\000\002\376\001\000\000"
-"\004memq\376\003\000\000\002\376\001\000\000\004memv\376\003\000\000\002\376\001\000\000\006member\376\003\000\000\002\376\001\000\000\004assq\376\003\000\000\002\376\001\000\000\004assv\376\003\000\000\002\376\001\000\000\005assoc\376\003"
-"\000\000\002\376\001\000\000\007symbol\077\376\003\000\000\002\376\001\000\000\016symbol->string\376\003\000\000\002\376\001\000\000\016string->symbol\376\003\000\000\002\376\001\000\000\007number\077"
-"\376\003\000\000\002\376\001\000\000\010integer\077\376\003\000\000\002\376\001\000\000\006exact\077\376\003\000\000\002\376\001\000\000\005real\077\376\003\000\000\002\376\001\000\000\010complex\077\376\003\000\000\002\376\001\000\000\010ine"
-"xact\077\376\003\000\000\002\376\001\000\000\011rational\077\376\003\000\000\002\376\001\000\000\005zero\077\376\003\000\000\002\376\001\000\000\004odd\077\376\003\000\000\002\376\001\000\000\005even\077\376\003\000\000\002\376\001\000\000\011po"
-"sitive\077\376\003\000\000\002\376\001\000\000\011negative\077\376\003\000\000\002\376\001\000\000\003max\376\003\000\000\002\376\001\000\000\003min\376\003\000\000\002\376\001\000\000\001+\376\003\000\000\002\376\001\000\000\001-\376\003\000\000\002\376"
-"\001\000\000\001*\376\003\000\000\002\376\001\000\000\001/\376\003\000\000\002\376\001\000\000\001=\376\003\000\000\002\376\001\000\000\001>\376\003\000\000\002\376\001\000\000\001<\376\003\000\000\002\376\001\000\000\002>=\376\003\000\000\002\376\001\000\000\002<=\376\003\000\000\002\376\001"
-"\000\000\010quotient\376\003\000\000\002\376\001\000\000\011remainder\376\003\000\000\002\376\001\000\000\006modulo\376\003\000\000\002\376\001\000\000\003gcd\376\003\000\000\002\376\001\000\000\003lcm\376\003\000\000\002\376\001\000"
-"\000\003abs\376\003\000\000\002\376\001\000\000\005floor\376\003\000\000\002\376\001\000\000\007ceiling\376\003\000\000\002\376\001\000\000\010truncate\376\003\000\000\002\376\001\000\000\005round\376\003\000\000\002\376\001\000\000\016"
-"exact->inexact\376\003\000\000\002\376\001\000\000\016inexact->exact\376\003\000\000\002\376\001\000\000\003exp\376\003\000\000\002\376\001\000\000\003log\376\003\000\000\002\376\001\000\000\004expt\376\003"
-"\000\000\002\376\001\000\000\004sqrt\376\003\000\000\002\376\001\000\000\003sin\376\003\000\000\002\376\001\000\000\003cos\376\003\000\000\002\376\001\000\000\003tan\376\003\000\000\002\376\001\000\000\004asin\376\003\000\000\002\376\001\000\000\004acos\376"
-"\003\000\000\002\376\001\000\000\004atan\376\003\000\000\002\376\001\000\000\016number->string\376\003\000\000\002\376\001\000\000\016string->number\376\003\000\000\002\376\001\000\000\005char\077\376\003\000\000"
-"\002\376\001\000\000\006char=\077\376\003\000\000\002\376\001\000\000\006char>\077\376\003\000\000\002\376\001\000\000\006char<\077\376\003\000\000\002\376\001\000\000\007char>=\077\376\003\000\000\002\376\001\000\000\007char<=\077\376\003"
-"\000\000\002\376\001\000\000\011char-ci=\077\376\003\000\000\002\376\001\000\000\011char-ci<\077\376\003\000\000\002\376\001\000\000\011char-ci>\077\376\003\000\000\002\376\001\000\000\012char-ci>=\077\376\003\000\000\002"
-"\376\001\000\000\012char-ci<=\077\376\003\000\000\002\376\001\000\000\020char-alphabetic\077\376\003\000\000\002\376\001\000\000\020char-whitespace\077\376\003\000\000\002\376\001\000\000\015cha"
-"r-numeric\077\376\003\000\000\002\376\001\000\000\020char-upper-case\077\376\003\000\000\002\376\001\000\000\020char-lower-case\077\376\003\000\000\002\376\001\000\000\013char-upc"
-"ase\376\003\000\000\002\376\001\000\000\015char-downcase\376\003\000\000\002\376\001\000\000\015char->integer\376\003\000\000\002\376\001\000\000\015integer->char\376\003\000\000\002\376\001\000"
-"\000\007string\077\376\003\000\000\002\376\001\000\000\010string=\077\376\003\000\000\002\376\001\000\000\010string>\077\376\003\000\000\002\376\001\000\000\010string<\077\376\003\000\000\002\376\001\000\000\011string>"
-"=\077\376\003\000\000\002\376\001\000\000\011string<=\077\376\003\000\000\002\376\001\000\000\013string-ci=\077\376\003\000\000\002\376\001\000\000\013string-ci<\077\376\003\000\000\002\376\001\000\000\013string-"
-"ci>\077\376\003\000\000\002\376\001\000\000\014string-ci>=\077\376\003\000\000\002\376\001\000\000\014string-ci<=\077\376\003\000\000\002\376\001\000\000\013make-string\376\003\000\000\002\376\001\000\000\015s"
-"tring-length\376\003\000\000\002\376\001\000\000\012string-ref\376\003\000\000\002\376\001\000\000\013string-set!\376\003\000\000\002\376\001\000\000\015string-append\376\003\000\000"
-"\002\376\001\000\000\013string-copy\376\003\000\000\002\376\001\000\000\014string->list\376\003\000\000\002\376\001\000\000\014list->string\376\003\000\000\002\376\001\000\000\011substring"
-"\376\003\000\000\002\376\001\000\000\014string-fill!\376\003\000\000\002\376\001\000\000\007vector\077\376\003\000\000\002\376\001\000\000\013make-vector\376\003\000\000\002\376\001\000\000\012vector-ref"
-"\376\003\000\000\002\376\001\000\000\013vector-set!\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\001\000\000\006vector\376\003\000\000\002\376\001\000\000\015vector-length\376\003\000\000"
-"\002\376\001\000\000\014vector->list\376\003\000\000\002\376\001\000\000\014list->vector\376\003\000\000\002\376\001\000\000\014vector-fill!\376\003\000\000\002\376\001\000\000\012procedur"
-"e\077\376\003\000\000\002\376\001\000\000\003map\376\003\000\000\002\376\001\000\000\010for-each\376\003\000\000\002\376\001\000\000\005apply\376\003\000\000\002\376\001\000\000\005force\376\003\000\000\002\376\001\000\000\036call-wi"
-"th-current-continuation\376\003\000\000\002\376\001\000\000\013input-port\077\376\003\000\000\002\376\001\000\000\014output-port\077\376\003\000\000\002\376\001\000\000\022curr"
-"ent-input-port\376\003\000\000\002\376\001\000\000\023current-output-port\376\003\000\000\002\376\001\000\000\024call-with-input-file\376\003\000\000\002\376\001"
-"\000\000\025call-with-output-file\376\003\000\000\002\376\001\000\000\017open-input-file\376\003\000\000\002\376\001\000\000\020open-output-file\376\003\000\000\002"
-"\376\001\000\000\020close-input-port\376\003\000\000\002\376\001\000\000\021close-output-port\376\003\000\000\002\376\001\000\000\004load\376\003\000\000\002\376\001\000\000\004read\376\003\000\000"
-"\002\376\001\000\000\013eof-object\077\376\003\000\000\002\376\001\000\000\011read-char\376\003\000\000\002\376\001\000\000\011peek-char\376\003\000\000\002\376\001\000\000\005write\376\003\000\000\002\376\001\000\000\007"
-"display\376\003\000\000\002\376\001\000\000\012write-char\376\003\000\000\002\376\001\000\000\007newline\376\003\000\000\002\376\001\000\000\024with-input-from-file\376\003\000\000\002\376"
-"\001\000\000\023with-output-to-file\376\003\000\000\002\376\001\000\000\024\003syscall-with-values\376\003\000\000\002\376\001\000\000\012\003sysvalues\376\003\000\000\002\376\001"
-"\000\000\020\003sysdynamic-wind\376\003\000\000\002\376\001\000\000\010\003sysvoid\376\003\000\000\002\376\001\000\000\020\003syslist->vector\376\003\000\000\002\376\001\000\000\010\003syslis"
-"t\376\003\000\000\002\376\001\000\000\012\003sysappend\376\003\000\000\002\376\001\000\000\010\003syscons\376\003\000\000\002\376\001\000\000\020\003sysmake-promise\376\377\016");
-lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\014lib/chicken/");
-lf[379]=C_h_intern(&lf[379],18,"\003sysnumber->string");
-lf[380]=C_h_intern(&lf[380],24,"get-environment-variable");
-lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\022CHICKEN_REPOSITORY");
-lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[383]=C_h_intern(&lf[383],5,"linux");
-lf[384]=C_h_intern(&lf[384],6,"netbsd");
-lf[385]=C_h_intern(&lf[385],7,"openbsd");
-lf[386]=C_h_intern(&lf[386],7,"freebsd");
-lf[387]=C_h_intern(&lf[387],16,"software-version");
-lf[388]=C_h_intern(&lf[388],14,"build-platform");
-lf[389]=C_h_intern(&lf[389],7,"windows");
-lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\004.dll");
-lf[391]=C_h_intern(&lf[391],6,"macosx");
-lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\006.dylib");
-lf[393]=C_h_intern(&lf[393],4,"hpux");
-lf[394]=C_h_intern(&lf[394],4,"hppa");
-lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\003.sl");
-lf[396]=C_h_intern(&lf[396],12,"machine-type");
-lf[397]=C_h_intern(&lf[397],13,"software-type");
-lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\012C_toplevel");
-lf[399]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[401]=C_decode_literal(C_heaptop,"\376B\000\000\016CHICKEN_PREFIX");
-C_register_lf2(lf,402,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c143 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2954,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_expand_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k2952 */
-static void C_ccall f_2954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2954,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! core-library-modules ...) */,lf[3]);
-t3=C_set_block_item(lf[4] /* explicit-library-modules */,0,C_SCHEME_END_OF_LIST);
-t4=C_mutate(&lf[5] /* (set! constant62 ...) */,lf[6]);
-t5=C_mutate(&lf[7] /* (set! constant70 ...) */,lf[8]);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2987,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 137 get-environment-variable */
-t7=*((C_word*)lf[380]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[401]);}
-
-/* k2985 in k2952 */
-static void C_ccall f_2987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2987,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2990,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t1)){
-t3=C_block_size(t1);
-t4=C_fixnum_difference(t3,C_fix(1));
-t5=C_i_string_ref(t1,t4);
-if(C_truep((C_truep(C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-/* eval.scm: 138 ##sys#string-append */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[399]);}
-else{
-/* eval.scm: 138 ##sys#string-append */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[400]);}}
-else{
-t3=t2;
-f_2990(2,t3,C_SCHEME_FALSE);}}
-
-/* k2988 in k2985 in k2952 */
-static void C_ccall f_2990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word ab[46],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2990,2,t0,t1);}
-t2=C_mutate((C_word*)lf[9]+1 /* (set! chicken-prefix ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2991,a[2]=t1,a[3]=((C_word)li0),tmp=(C_word)a,a+=4,tmp));
-t3=C_mutate((C_word*)lf[12]+1 /* (set! chicken-home ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3025,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_mutate((C_word*)lf[15]+1 /* (set! hash-symbol ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3037,a[2]=t7,a[3]=t5,a[4]=((C_word)li2),tmp=(C_word)a,a+=5,tmp));
-t9=C_mutate((C_word*)lf[16]+1 /* (set! hash-table-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[17]+1 /* (set! hash-table-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3107,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[18]+1 /* (set! hash-table-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3167,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[19]+1 /* (set! hash-table-for-each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3187,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
-t13=C_slot(lf[20],C_fix(0));
-t14=C_mutate((C_word*)lf[21]+1 /* (set! hash-table-location ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3255,a[2]=t13,a[3]=((C_word)li13),tmp=(C_word)a,a+=4,tmp));
-t15=C_set_block_item(lf[22] /* eval-environment */,0,C_SCHEME_FALSE);
-t16=C_set_block_item(lf[23] /* environment-is-mutable */,0,C_SCHEME_FALSE);
-t17=C_mutate((C_word*)lf[24]+1 /* (set! eval-decorator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3315,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
-t18=C_set_block_item(lf[30] /* unbound-in-eval */,0,C_SCHEME_FALSE);
-t19=C_set_block_item(lf[31] /* eval-debug-level */,0,C_fix(1));
-t20=*((C_word*)lf[27]+1);
-t21=*((C_word*)lf[32]+1);
-t22=*((C_word*)lf[28]+1);
-t23=*((C_word*)lf[26]+1);
-t24=C_retrieve(lf[33]);
-t25=C_slot(lf[20],C_fix(0));
-t26=*((C_word*)lf[34]+1);
-t27=C_mutate((C_word*)lf[35]+1 /* (set! compile-to-closure ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3359,a[2]=t21,a[3]=t25,a[4]=((C_word)li142),tmp=(C_word)a,a+=5,tmp));
-t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6780,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10519,a[2]=((C_word)li294),tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 817 make-parameter */
-t30=*((C_word*)lf[374]+1);
-((C_proc3)(void*)(*((C_word*)t30+1)))(3,t30,t28,t29);}
-
-/* a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10519(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+10)){
-C_save_and_reclaim((void*)tr3r,(void*)f_10519r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_10519r(t0,t1,t2,t3);}}
-
-static void C_ccall f_10519r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(10);
-t4=C_retrieve(lf[23]);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10523,a[2]=t2,a[3]=t1,a[4]=t7,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(t3))){
-t9=C_i_car(t3);
-if(C_truep(t9)){
-t10=C_i_check_structure(t9,lf[295]);
-t11=C_slot(t9,C_fix(1));
-t12=C_set_block_item(t7,0,t11);
-t13=C_slot(t9,C_fix(2));
-t14=C_set_block_item(t5,0,t13);
-t15=t8;
-f_10523(t15,t14);}
-else{
-t10=C_SCHEME_UNDEFINED;
-t11=t8;
-f_10523(t11,t10);}}
-else{
-t9=t8;
-f_10523(t9,C_SCHEME_UNDEFINED);}}
-
-/* k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_fcall f_10523(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[29],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10523,NULL,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[5])[1];
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=((C_word*)((C_word*)t0)[4])[1];
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10526,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10531,a[2]=t5,a[3]=t3,a[4]=t9,a[5]=t7,a[6]=((C_word)li291),tmp=(C_word)a,a+=7,tmp);
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10538,a[2]=((C_word*)t0)[2],a[3]=((C_word)li292),tmp=(C_word)a,a+=4,tmp);
-t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10548,a[2]=t9,a[3]=t7,a[4]=t5,a[5]=t3,a[6]=((C_word)li293),tmp=(C_word)a,a+=7,tmp);
-/* ##sys#dynamic-wind */
-t14=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t10,t11,t12,t13);}
-
-/* a10547 in k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10548,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[23]));
-t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[22]));
-t4=C_mutate((C_word*)lf[23]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
-t5=C_mutate((C_word*)lf[22]+1 /* (set! eval-environment ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}
-
-/* a10537 in k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10538,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10546,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 829 ##sys#current-environment */
-((C_proc2)C_retrieve_symbol_proc(lf[107]))(2,*((C_word*)lf[107]+1),t2);}
-
-/* k10544 in a10537 in k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10546(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 829 ##sys#compile-to-closure */
-t2=*((C_word*)lf[35]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-
-/* a10530 in k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10531,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[23]));
-t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[22]));
-t4=C_mutate((C_word*)lf[23]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
-t5=C_mutate((C_word*)lf[22]+1 /* (set! eval-environment ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}
-
-/* k10524 in k10521 in a10518 in k2988 in k2985 in k2952 */
-static void C_ccall f_10526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g13931394 */
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6780(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6780,2,t0,t1);}
-t2=C_mutate((C_word*)lf[164]+1 /* (set! eval-handler ...) */,t1);
-t3=C_mutate((C_word*)lf[165]+1 /* (set! eval-handler ...) */,*((C_word*)lf[164]+1));
-t4=C_mutate((C_word*)lf[166]+1 /* (set! eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6783,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp));
-t5=*((C_word*)lf[32]+1);
-t6=C_mutate((C_word*)lf[95]+1 /* (set! decompose-lambda-list ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6793,a[2]=t5,a[3]=((C_word)li146),tmp=(C_word)a,a+=4,tmp));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6875,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t8=C_fudge(C_fix(13));
-/* eval.scm: 861 make-parameter */
-t9=*((C_word*)lf[374]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-
-/* k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6875(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6875,2,t0,t1);}
-t2=C_mutate((C_word*)lf[169]+1 /* (set! load-verbose ...) */,t1);
-t3=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6877,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp));
-t4=C_set_block_item(lf[171] /* current-source-filename */,0,C_SCHEME_FALSE);
-t5=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,lf[173]);
-t6=C_set_block_item(lf[174] /* dload-disabled */,0,C_SCHEME_FALSE);
-t7=C_mutate((C_word*)lf[175]+1 /* (set! set-dynamic-load-mode! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6883,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp));
-t8=*((C_word*)lf[183]+1);
-t9=*((C_word*)lf[27]+1);
-t10=*((C_word*)lf[34]+1);
-t11=*((C_word*)lf[184]+1);
-t12=*((C_word*)lf[185]+1);
-t13=*((C_word*)lf[166]+1);
-t14=*((C_word*)lf[186]+1);
-t15=*((C_word*)lf[187]+1);
-t16=*((C_word*)lf[188]+1);
-t17=*((C_word*)lf[169]+1);
-t18=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6956,a[2]=((C_word*)t0)[2],a[3]=t17,a[4]=t10,a[5]=t12,a[6]=t14,a[7]=t15,a[8]=t9,a[9]=t11,a[10]=t8,a[11]=t13,tmp=(C_word)a,a+=12,tmp);
-/* eval.scm: 895 ##sys#make-c-string */
-t19=*((C_word*)lf[201]+1);
-((C_proc3)(void*)(*((C_word*)t19+1)))(3,t19,t18,lf[398]);}
-
-/* k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[32],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6956,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6958,a[2]=((C_word)li151),tmp=(C_word)a,a+=3,tmp);
-t3=C_mutate((C_word*)lf[189]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7004,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word)li170),tmp=(C_word)a,a+=14,tmp));
-t4=C_mutate((C_word*)lf[194]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7425,a[2]=((C_word)li171),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[213]+1 /* (set! load-relative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7454,a[2]=((C_word)li172),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[214]+1 /* (set! load-noisily ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7497,a[2]=((C_word)li176),tmp=(C_word)a,a+=3,tmp));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7523,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10513,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 988 software-type */
-t9=*((C_word*)lf[397]+1);
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}
-
-/* k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10513,2,t0,t1);}
-t2=C_eqp(t1,lf[389]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-f_7523(t3,lf[390]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10509,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 989 software-version */
-t4=*((C_word*)lf[387]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10509,2,t0,t1);}
-t2=C_eqp(t1,lf[391]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-f_7523(t3,lf[392]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10505,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 990 software-version */
-t4=*((C_word*)lf[387]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10503 in k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10505,2,t0,t1);}
-t2=C_eqp(t1,lf[393]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 991 machine-type */
-t4=*((C_word*)lf[396]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=((C_word*)t0)[2];
-f_7523(t3,lf[5]);}}
-
-/* k10499 in k10503 in k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_eqp(t1,lf[394]);
-t3=((C_word*)t0)[2];
-f_7523(t3,(C_truep(t2)?lf[395]:lf[5]));}
-
-/* k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7523(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7523,NULL,2,t0,t1);}
-t2=C_mutate((C_word*)lf[219]+1 /* (set! load-library-extension ...) */,t1);
-t3=C_mutate((C_word*)lf[208]+1 /* (set! load-dynamic-extension ...) */,lf[5]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7528,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 997 build-platform */
-t5=*((C_word*)lf[388]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7528,2,t0,t1);}
-t2=C_eqp(t1,lf[220]);
-t3=(C_truep(t2)?lf[221]:lf[222]);
-t4=C_mutate((C_word*)lf[223]+1 /* (set! default-dynamic-load-libraries ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7535,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10452,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10473,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1003 software-version */
-t8=*((C_word*)lf[387]+1);
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-
-/* k10471 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10473(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep((C_truep(C_eqp(t1,lf[383]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[384]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[385]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[386]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
-t2=C_i_zerop(C_fix((C_word)C_BINARY_VERSION));
-t3=((C_word*)t0)[2];
-f_10452(t3,C_i_not(t2));}
-else{
-t2=((C_word*)t0)[2];
-f_10452(t2,C_SCHEME_FALSE);}}
-
-/* k10450 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10452(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10452,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10459,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1008 number->string */
-C_number_to_string(3,0,t2,C_fix((C_word)C_BINARY_VERSION));}
-else{
-t2=((C_word*)t0)[2];
-f_7535(2,t2,C_retrieve(lf[219]));}}
-
-/* k10457 in k10450 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10459(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1005 string-append */
-t2=*((C_word*)lf[188]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],C_retrieve(lf[219]),lf[382],t1);}
-
-/* k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7535,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7537,a[2]=t1,a[3]=((C_word)li177),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7544,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10408,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10416,a[2]=t2,a[3]=t5,a[4]=t10,a[5]=t7,a[6]=((C_word)li290),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_10416(t12,t8,C_retrieve(lf[223]));}
-
-/* loop1713 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10416(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10416,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10445,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=C_slot(t2,C_fix(0));
-/* g17291730 */
-t5=((C_word*)t0)[2];
-f_7537(t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10443 in loop1713 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10445,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17131726 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10416(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17131726 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10416(t6,((C_word*)t0)[3],t5);}}
-
-/* k10406 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10408(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10408,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10410,a[2]=((C_word)li289),tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1012 make-parameter */
-t3=*((C_word*)lf[374]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
-
-/* a10409 in k10406 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10410(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10410,3,t0,t1,t2);}
-t3=C_i_check_list(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-
-/* k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7544,2,t0,t1);}
-t2=C_mutate((C_word*)lf[224]+1 /* (set! dynamic-load-libraries ...) */,t1);
-t3=*((C_word*)lf[169]+1);
-t4=*((C_word*)lf[188]+1);
-t5=*((C_word*)lf[224]+1);
-t6=*((C_word*)lf[34]+1);
-t7=C_mutate((C_word*)lf[225]+1 /* (set! load-library-0 ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7546,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t6,a[6]=((C_word)li179),tmp=(C_word)a,a+=7,tmp));
-t8=C_mutate((C_word*)lf[232]+1 /* (set! load-library ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7652,a[2]=((C_word)li180),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[233]+1 /* (set! load-library ...) */,*((C_word*)lf[232]+1));
-t10=*((C_word*)lf[32]+1);
-t11=*((C_word*)lf[188]+1);
-t12=C_mutate((C_word*)lf[235]+1 /* (set! canonicalize-extension-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7738,a[2]=t11,a[3]=((C_word)li184),tmp=(C_word)a,a+=4,tmp));
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7898,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(22)))){
-/* ##sys#peek-c-string */
-t14=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t13,C_mpointer(&a,(void*)C_private_repository_path()),C_fix(0));}
-else{
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10380,a[2]=t13,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1104 get-environment-variable */
-t15=*((C_word*)lf[380]+1);
-((C_proc3)(void*)(*((C_word*)t15+1)))(3,t15,t14,lf[381]);}}
-
-/* k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10380(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10380,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[2];
-f_7898(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10386,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10396,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10400,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=C_fudge(C_fix(42));
-/* eval.scm: 1108 ##sys#number->string */
-((C_proc3)C_retrieve_symbol_proc(lf[379]))(3,*((C_word*)lf[379]+1),t4,t5);}}
-
-/* k10398 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10400(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1106 ##sys#string-append */
-t2=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[378],t1);}
-
-/* k10394 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1105 ##sys#chicken-prefix */
-((C_proc3)C_retrieve_symbol_proc(lf[9]))(3,*((C_word*)lf[9]+1),((C_word*)t0)[2],t1);}
-
-/* k10384 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10386,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[2];
-f_7898(2,t2,t1);}
-else{
-/* ##sys#peek-c-string */
-t2=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_mpointer(&a,(void*)C_INSTALL_EGG_HOME),C_fix(0));}}
-
-/* k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word ab[47],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7898,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_mutate((C_word*)lf[241]+1 /* (set! repository-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7899,a[2]=t3,a[3]=((C_word)li185),tmp=(C_word)a,a+=4,tmp));
-t5=C_mutate((C_word*)lf[242]+1 /* (set! repository-path ...) */,*((C_word*)lf[241]+1));
-t6=C_set_block_item(lf[243] /* setup-mode */,0,C_SCHEME_FALSE);
-t7=*((C_word*)lf[244]+1);
-t8=*((C_word*)lf[188]+1);
-t9=C_mutate((C_word*)lf[245]+1 /* (set! find-extension ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7930,a[2]=t8,a[3]=t7,a[4]=((C_word)li188),tmp=(C_word)a,a+=5,tmp));
-t10=C_set_block_item(lf[250] /* loaded-extensions */,0,C_SCHEME_END_OF_LIST);
-t11=*((C_word*)lf[251]+1);
-t12=C_mutate((C_word*)lf[252]+1 /* (set! load-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8029,a[2]=t11,a[3]=((C_word)li189),tmp=(C_word)a,a+=4,tmp));
-t13=C_mutate((C_word*)lf[255]+1 /* (set! provide ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8113,a[2]=((C_word)li191),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[256]+1 /* (set! provide ...) */,C_retrieve(lf[255]));
-t15=C_mutate((C_word*)lf[257]+1 /* (set! provided? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8155,a[2]=((C_word)li192),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[258]+1 /* (set! provided? ...) */,C_retrieve(lf[257]));
-t17=C_mutate((C_word*)lf[123]+1 /* (set! require ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8169,a[2]=((C_word)li194),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[259]+1 /* (set! require ...) */,C_retrieve(lf[123]));
-t19=C_retrieve(lf[33]);
-t20=*((C_word*)lf[244]+1);
-t21=*((C_word*)lf[188]+1);
-t22=*((C_word*)lf[183]+1);
-t23=C_mutate((C_word*)lf[261]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8182,a[2]=t21,a[3]=t20,a[4]=t22,a[5]=t19,a[6]=((C_word)li196),tmp=(C_word)a,a+=7,tmp));
-t24=C_mutate((C_word*)lf[265]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8215,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
-t25=C_retrieve(lf[33]);
-t26=*((C_word*)lf[183]+1);
-t27=C_mutate((C_word*)lf[124]+1 /* (set! lookup-runtime-requirements ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8221,a[2]=((C_word)li199),tmp=(C_word)a,a+=3,tmp));
-t28=*((C_word*)lf[267]+1);
-t29=C_mutate((C_word*)lf[127]+1 /* (set! do-the-right-thing ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8270,a[2]=((C_word)li211),tmp=(C_word)a,a+=3,tmp));
-t30=*((C_word*)lf[292]+1);
-t31=C_mutate((C_word*)lf[230]+1 /* (set! string->c-identifier ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8878,a[2]=t30,a[3]=((C_word)li213),tmp=(C_word)a,a+=4,tmp));
-t32=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8934,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1333 make-vector */
-t33=*((C_word*)lf[304]+1);
-((C_proc4)(void*)(*((C_word*)t33+1)))(4,t33,t32,C_fix(301),C_SCHEME_END_OF_LIST);}
-
-/* k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[33],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8934,2,t0,t1);}
-t2=C_mutate(&lf[293] /* (set! r4rs-environment ...) */,t1);
-t3=lf[294] /* r5rs-environment */ =C_SCHEME_FALSE;;
-t4=C_a_i_record(&a,3,lf[295],C_SCHEME_FALSE,C_SCHEME_TRUE);
-t5=C_mutate(&lf[296] /* (set! interaction-environment ...) */,t4);
-t6=C_mutate((C_word*)lf[297]+1 /* (set! environment? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8941,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[298]+1 /* (set! copy-env-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8957,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[299]+1 /* (set! environment-symbols ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9065,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[301]+1 /* (set! interaction-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9184,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[302]+1 /* (set! scheme-report-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9187,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
-t11=*((C_word*)lf[304]+1);
-t12=C_mutate((C_word*)lf[305]+1 /* (set! null-environment ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9231,a[2]=t11,a[3]=((C_word)li224),tmp=(C_word)a,a+=4,tmp));
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9269,a[2]=((C_word)li226),tmp=(C_word)a,a+=3,tmp);
-t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9285,a[2]=t13,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10371,a[2]=t14,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1417 initb */
-f_9269(t15,C_retrieve2(lf[293],"r4rs-environment"));}
-
-/* k10369 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* for-each */
-t2=*((C_word*)lf[260]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[377]);}
-
-/* k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9285(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9285,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9289,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1438 ##sys#copy-env-table */
-t3=*((C_word*)lf[298]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve2(lf[293],"r4rs-environment"),C_SCHEME_TRUE,C_SCHEME_TRUE);}
-
-/* k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9289,2,t0,t1);}
-t2=C_mutate(&lf[294] /* (set! r5rs-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9292,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10367,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1440 initb */
-f_9269(t4,C_retrieve2(lf[294],"r5rs-environment"));}
-
-/* k10365 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* for-each */
-t2=*((C_word*)lf[260]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[376]);}
-
-/* k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9292,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9296,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1447 chicken-home */
-t3=*((C_word*)lf[12]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[28],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9296,2,t0,t1);}
-t2=(C_truep(t1)?C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
-t3=C_mutate((C_word*)lf[248]+1 /* (set! include-pathnames ...) */,t2);
-t4=*((C_word*)lf[188]+1);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9302,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp);
-t6=C_mutate((C_word*)lf[307]+1 /* (set! resolve-include-filename ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9321,a[2]=t4,a[3]=t5,a[4]=((C_word)li231),tmp=(C_word)a,a+=5,tmp));
-t7=*((C_word*)lf[34]+1);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9470,a[2]=t7,a[3]=((C_word)li233),tmp=(C_word)a,a+=4,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9494,a[2]=t8,a[3]=t7,a[4]=((C_word)li234),tmp=(C_word)a,a+=5,tmp);
-t10=C_mutate((C_word*)lf[191]+1 /* (set! display-times ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9515,a[2]=t9,a[3]=t7,a[4]=((C_word)li235),tmp=(C_word)a,a+=5,tmp));
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9570,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1516 append */
-t12=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,lf[375],C_retrieve(lf[138]));}
-
-/* k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9570(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9570,2,t0,t1);}
-t2=C_mutate((C_word*)lf[138]+1 /* (set! features ...) */,t1);
-t3=C_set_block_item(lf[315] /* repl-eval-hook */,0,C_SCHEME_FALSE);
-t4=C_set_block_item(lf[316] /* repl-print-length-limit */,0,C_SCHEME_FALSE);
-t5=C_set_block_item(lf[317] /* repl-read-hook */,0,C_SCHEME_FALSE);
-t6=C_mutate((C_word*)lf[318]+1 /* (set! repl-print-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9575,a[2]=((C_word)li237),tmp=(C_word)a,a+=3,tmp));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9592,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10359,a[2]=((C_word)li288),tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1530 make-parameter */
-t9=*((C_word*)lf[374]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-
-/* a10358 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10359,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[373]);}
-
-/* k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9592(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[19],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9592,2,t0,t1);}
-t2=C_mutate((C_word*)lf[322]+1 /* (set! repl-prompt ...) */,t1);
-t3=*((C_word*)lf[322]+1);
-t4=C_mutate((C_word*)lf[323]+1 /* (set! read-prompt-hook ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9594,a[2]=t3,a[3]=((C_word)li238),tmp=(C_word)a,a+=4,tmp));
-t5=C_mutate((C_word*)lf[326]+1 /* (set! clear-trace-buffer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9610,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp));
-t6=*((C_word*)lf[166]+1);
-t7=*((C_word*)lf[183]+1);
-t8=*((C_word*)lf[199]+1);
-t9=*((C_word*)lf[327]+1);
-t10=*((C_word*)lf[185]+1);
-t11=*((C_word*)lf[169]+1);
-t12=C_retrieve(lf[328]);
-t13=C_mutate((C_word*)lf[329]+1 /* (set! repl ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9613,a[2]=t8,a[3]=t6,a[4]=t7,a[5]=t11,a[6]=t9,a[7]=t10,a[8]=((C_word)li254),tmp=(C_word)a,a+=9,tmp));
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9977,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1647 make-vector */
-t15=*((C_word*)lf[304]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t14,C_fix(301),C_SCHEME_END_OF_LIST);}
-
-/* k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9977(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word ab[51],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9977,2,t0,t1);}
-t2=C_mutate((C_word*)lf[344]+1 /* (set! sharp-comma-reader-ctors ...) */,t1);
-t3=C_mutate((C_word*)lf[345]+1 /* (set! define-reader-ctor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9979,a[2]=((C_word)li255),tmp=(C_word)a,a+=3,tmp));
-t4=C_retrieve(lf[346]);
-t5=*((C_word*)lf[347]+1);
-t6=*((C_word*)lf[183]+1);
-t7=C_mutate((C_word*)lf[346]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9988,a[2]=t4,a[3]=t5,a[4]=t6,a[5]=((C_word)li257),tmp=(C_word)a,a+=6,tmp));
-t8=lf[351] /* last-error */ =C_SCHEME_FALSE;;
-t9=C_mutate(&lf[352] /* (set! run-safe ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10063,a[2]=((C_word)li265),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate(&lf[355] /* (set! store-result ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10122,a[2]=((C_word)li266),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate(&lf[357] /* (set! CHICKEN_yield ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10131,a[2]=((C_word)li268),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate(&lf[359] /* (set! CHICKEN_eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10143,a[2]=((C_word)li270),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate(&lf[360] /* (set! CHICKEN_eval_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10159,a[2]=((C_word)li272),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate(&lf[362] /* (set! store-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10185,a[2]=((C_word)li273),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate(&lf[364] /* (set! CHICKEN_eval_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=((C_word)li275),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate(&lf[365] /* (set! CHICKEN_eval_string_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10224,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate(&lf[366] /* (set! CHICKEN_apply ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10261,a[2]=((C_word)li279),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate(&lf[367] /* (set! CHICKEN_apply_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10277,a[2]=((C_word)li281),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate(&lf[368] /* (set! CHICKEN_read ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10303,a[2]=((C_word)li283),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate(&lf[369] /* (set! CHICKEN_load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10325,a[2]=((C_word)li285),tmp=(C_word)a,a+=3,tmp));
-t21=C_mutate(&lf[370] /* (set! CHICKEN_get_error_message ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10340,a[2]=((C_word)li286),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[25]+1 /* (set! make-lambda-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10350,a[2]=((C_word)li287),tmp=(C_word)a,a+=3,tmp));
-t23=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,C_SCHEME_UNDEFINED);}
-
-/* ##sys#make-lambda-info in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10350(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10350,3,t0,t1,t2);}
-t3=C_block_size(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10357,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1778 ##sys#make-string */
-t5=*((C_word*)lf[372]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k10355 in ##sys#make-lambda-info in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=C_string_to_lambdainfo(t1);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-
-/* CHICKEN_get_error_message in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_10340(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_stack_check;
-t3=C_retrieve2(lf[351],"last-error");
-if(C_truep(t3)){
-return(f_10185(t3,t2,t1));}
-else{
-return(f_10185(lf[371],t2,t1));}}
-
-/* CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10325(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10325,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10329,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#peek-c-string */
-t4=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,C_fix(0));}
-
-/* k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10329,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10334,a[2]=t1,a[3]=((C_word)li284),tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1768 run-safe */
-f_10063(((C_word*)t0)[2],t2);}
-
-/* a10333 in k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10334,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10338,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1768 load */
-((C_proc3)C_retrieve_symbol_proc(lf[194]))(3,*((C_word*)lf[194]+1),t2,((C_word*)t0)[2]);}
-
-/* k10336 in a10333 in k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10303(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10303,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10307,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#peek-c-string */
-t5=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_fix(0));}
-
-/* k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10307(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10307,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10312,a[2]=t1,a[3]=t2,a[4]=((C_word)li282),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1762 run-safe */
-f_10063(((C_word*)t0)[2],t3);}
-
-/* a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10312(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10312,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10316,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1764 open-input-string */
-t3=*((C_word*)lf[361]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10314 in a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10316,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1765 read */
-t3=*((C_word*)lf[183]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-
-/* k10321 in k10314 in a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1765 store-result */
-f_10122(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_10277,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10283,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=((C_word)li280),tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1755 run-safe */
-f_10063(t1,t6);}
-
-/* a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1757 open-output-string */
-t3=*((C_word*)lf[28]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10287,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10290,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10301,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10299 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10301(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1758 write */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10288 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10290,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10297,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1759 get-output-string */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10295 in k10288 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10297(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1759 store-string */
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10261(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10261,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10267,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=((C_word)li278),tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1750 run-safe */
-f_10063(t1,t5);}
-
-/* a10266 in CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10267,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10275,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-C_apply(4,0,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10273 in a10266 in CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1750 store-result */
-f_10122(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10224,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10228,a[2]=t1,a[3]=t4,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#peek-c-string */
-t6=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,C_fix(0));}
-
-/* k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10233,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=((C_word)li276),tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1741 run-safe */
-f_10063(((C_word*)t0)[2],t4);}
-
-/* a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10233(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10233,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10237,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1743 open-output-string */
-t3=*((C_word*)lf[28]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10237,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10240,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10251,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10255,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10259,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1744 open-input-string */
-t6=*((C_word*)lf[361]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k10257 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1744 read */
-t2=*((C_word*)lf[183]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10253 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1744 eval */
-t2=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10249 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1744 write */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10238 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10240(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10240,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10247,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1745 get-output-string */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10245 in k10238 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1745 store-string */
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10198(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10198,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10204,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word)li274),tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1732 run-safe */
-f_10063(t1,t5);}
-
-/* a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10204,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1734 open-output-string */
-t3=*((C_word*)lf[28]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10208,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10211,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10222,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1735 eval */
-t4=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k10220 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1735 write */
-t2=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10209 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10211,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10218,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1736 get-output-string */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10216 in k10209 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1736 store-string */
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* store-string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_10185(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_stack_check;
-t4=C_block_size(t1);
-if(C_truep(C_fixnum_greater_or_equal_p(t4,t2))){
-t5=C_mutate(&lf[351] /* (set! last-error ...) */,lf[363]);
-return(C_SCHEME_FALSE);}
-else{
-t5=C_copy_result_string(t1,t3,t4);
-return(t5);}}
-
-/* CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10159,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10163,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#peek-c-string */
-t5=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_fix(0));}
-
-/* k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10163(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10163,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10168,a[2]=t1,a[3]=t2,a[4]=((C_word)li271),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1713 run-safe */
-f_10063(((C_word*)t0)[2],t3);}
-
-/* a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10168,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10172,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1715 open-input-string */
-t3=*((C_word*)lf[361]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10172,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10179,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10183,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1716 read */
-t4=*((C_word*)lf[183]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
-
-/* k10181 in k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1716 eval */
-t2=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10177 in k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10179(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1716 store-result */
-f_10122(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10143(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10143,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10149,a[2]=t2,a[3]=t3,a[4]=((C_word)li269),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1708 run-safe */
-f_10063(t1,t4);}
-
-/* a10148 in CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10149,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10157,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1710 eval */
-t3=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10155 in a10148 in CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1710 store-result */
-f_10122(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10131(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10131,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10137,a[2]=((C_word)li267),tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1705 run-safe */
-f_10063(t1,t2);}
-
-/* a10136 in CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10137,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10141,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1705 ##sys#thread-yield! */
-((C_proc2)C_retrieve_symbol_proc(lf[358]))(2,*((C_word*)lf[358]+1),t2);}
-
-/* k10139 in a10136 in CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10141(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* store-result in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10122(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10122,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10126,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1699 ##sys#gc */
-t5=*((C_word*)lf[356]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,C_SCHEME_FALSE);}
-
-/* k10124 in store-result in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10126(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-t2=C_store_result(((C_word*)t0)[3],((C_word*)t0)[4]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}}
-
-/* run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10063(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10063,NULL,2,t1,t2);}
-t3=lf[351] /* last-error */ =C_SCHEME_FALSE;;
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10068,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10073,a[2]=t2,a[3]=((C_word)li264),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t6=*((C_word*)lf[199]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10073(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10073,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10079,a[2]=t2,a[3]=((C_word)li259),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10098,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li263),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-t5=*((C_word*)lf[354]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,t3,t4);}
-
-/* a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10098,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10104,a[2]=((C_word*)t0)[3],a[3]=((C_word)li260),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10110,a[2]=((C_word*)t0)[2],a[3]=((C_word)li262),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a10109 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10110(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10110r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10110r(t0,t1,t2);}}
-
-static void C_ccall f_10110r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10116,a[2]=t2,a[3]=((C_word)li261),tmp=(C_word)a,a+=4,tmp);
-/* k27132718 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a10115 in a10109 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10116,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a10103 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10104,2,t0,t1);}
-/* eval.scm: 1692 thunk */
-t2=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t2))(2,t2,t1);}
-
-/* a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10079(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10079,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10085,a[2]=t2,a[3]=((C_word)li258),tmp=(C_word)a,a+=4,tmp);
-/* k27132718 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10085(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10085,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10089,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1688 open-output-string */
-t3=*((C_word*)lf[28]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10089,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10092,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1689 print-error-message */
-t3=*((C_word*)lf[353]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k10090 in k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10092(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10092,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10096,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1690 get-output-string */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10094 in k10090 in k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10096(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(&lf[351] /* (set! last-error ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-
-/* k10066 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10068(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g27162717 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9988(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9988,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_make_character(44));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9998,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1659 read-char */
-t6=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t3);}
-else{
-/* eval.scm: 1671 old */
-t5=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t1,t2,t3);}}
-
-/* k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9998,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10001,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1660 read */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10001(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10001,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10002,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li256),tmp=(C_word)a,a+=5,tmp);
-t3=C_i_nullp(t1);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10015,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_10015(t5,t3);}
-else{
-t5=C_i_listp(t1);
-t6=t4;
-f_10015(t6,C_i_not(t5));}}
-
-/* k10013 in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10015(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10015,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* eval.scm: 1663 err */
-t2=((C_word*)t0)[5];
-f_10002(t2,((C_word*)t0)[4]);}
-else{
-t2=C_slot(((C_word*)t0)[3],C_fix(0));
-if(C_truep(C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10033,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1667 ##sys#hash-table-ref */
-t4=*((C_word*)lf[16]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_retrieve(lf[344]),t2);}
-else{
-/* eval.scm: 1666 err */
-t3=((C_word*)t0)[5];
-f_10002(t3,((C_word*)t0)[4]);}}}
-
-/* k10031 in k10013 in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_10033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-C_apply(4,0,((C_word*)t0)[4],t1,t2);}
-else{
-/* eval.scm: 1670 ##sys#read-error */
-t2=*((C_word*)lf[348]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[350],((C_word*)t0)[2]);}}
-
-/* err in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_10002(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10002,NULL,2,t0,t1);}
-/* eval.scm: 1661 ##sys#read-error */
-t2=*((C_word*)lf[348]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[349],((C_word*)t0)[2]);}
-
-/* define-reader-ctor in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9979(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9979,4,t0,t1,t2,t3);}
-t4=C_i_check_symbol_2(t2,lf[345]);
-/* eval.scm: 1651 ##sys#hash-table-set! */
-t5=*((C_word*)lf[17]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,C_retrieve(lf[344]),t2,t3);}
-
-/* repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9613,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9616,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp);
-t3=*((C_word*)lf[331]+1);
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=*((C_word*)lf[325]+1);
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=*((C_word*)lf[330]+1);
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9657,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t8,a[11]=t6,a[12]=t4,tmp=(C_word)a,a+=13,tmp);
-/* eval.scm: 1560 ##sys#error-handler */
-t10=*((C_word*)lf[335]+1);
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}
-
-/* k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9657,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9660,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* eval.scm: 1561 ##sys#reset-handler */
-t3=*((C_word*)lf[343]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[41],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9660,2,t0,t1);}
-t2=C_SCHEME_FALSE;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_retrieve(lf[30]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9662,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp));
-t10=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9668,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp));
-t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9677,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=t8,a[7]=t3,a[8]=((C_word)li243),tmp=(C_word)a,a+=9,tmp);
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9742,a[2]=((C_word*)t0)[4],a[3]=t8,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t6,a[7]=((C_word)li252),tmp=(C_word)a,a+=8,tmp);
-t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9962,a[2]=t3,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t4,a[7]=((C_word)li253),tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 1575 ##sys#dynamic-wind */
-t14=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,((C_word*)t0)[2],t11,t12,t13);}
-
-/* a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9966,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1639 load-verbose */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k9964 in a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9966,2,t0,t1);}
-t2=C_mutate((C_word*)lf[30]+1 /* (set! unbound-in-eval ...) */,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9970,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1641 ##sys#error-handler */
-t4=*((C_word*)lf[335]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k9968 in k9964 in a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9970(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1642 ##sys#reset-handler */
-t2=*((C_word*)lf[343]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9742,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9748,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word)li251),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_9748(t5,t1);}
-
-/* loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9748(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9748,NULL,2,t0,t1);}
-t2=f_9662(((C_word*)((C_word*)t0)[7])[1]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9755,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9945,a[2]=((C_word*)t0)[3],a[3]=((C_word)li250),tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1598 call-with-current-continuation */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
-
-/* a9944 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9945(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9945,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9951,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li249),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1600 ##sys#reset-handler */
-t4=*((C_word*)lf[343]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-
-/* a9950 in a9944 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9951,2,t0,t1);}
-t2=C_set_block_item(lf[190] /* read-error-with-line-number */,0,C_SCHEME_FALSE);
-t3=C_set_block_item(lf[342] /* enable-qualifiers */,0,C_SCHEME_TRUE);
-t4=f_9668(((C_word*)((C_word*)t0)[3])[1]);
-/* eval.scm: 1605 c */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t1,C_SCHEME_FALSE);}
-
-/* k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9755,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9758,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1606 ##sys#read-prompt-hook */
-t3=*((C_word*)lf[323]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9758,2,t0,t1);}
-t2=C_retrieve(lf[317]);
-t3=(C_truep(t2)?t2:((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9764,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g26032604 */
-t5=t3;
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-
-/* k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9764(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9764,2,t0,t1);}
-if(C_truep(C_eofp(t1))){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9773,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9943,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1609 ##sys#peek-char-0 */
-t4=*((C_word*)lf[341]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,*((C_word*)lf[331]+1));}}
-
-/* k9941 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_eqp(C_make_character(10),t1);
-if(C_truep(t2)){
-/* eval.scm: 1610 ##sys#read-char-0 */
-t3=*((C_word*)lf[340]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],*((C_word*)lf[331]+1));}
-else{
-t3=((C_word*)t0)[2];
-f_9773(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9773(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9773,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9776,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1611 ##sys#clear-trace-buffer */
-t3=*((C_word*)lf[326]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9776(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9776,2,t0,t1);}
-t2=C_set_block_item(lf[30] /* unbound-in-eval */,0,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9782,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li244),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9791,a[2]=((C_word*)t0)[3],a[3]=((C_word)li248),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-
-/* a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9791(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr2r,(void*)f_9791r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_9791r(t0,t1,t2);}}
-
-static void C_ccall f_9791r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(11);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9795,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t4=(C_truep(C_retrieve(lf[336]))?C_i_pairp(C_retrieve(lf[30])):C_SCHEME_FALSE);
-if(C_truep(t4)){
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9809,a[2]=t6,a[3]=((C_word)li247),tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_9809(t8,t3,C_retrieve(lf[30]),C_SCHEME_END_OF_LIST);}
-else{
-t5=t3;
-f_9795(2,t5,C_SCHEME_UNDEFINED);}}
-
-/* loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9809(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9809,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9813,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-if(C_truep(C_i_pairp(t3))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9825,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1618 ##sys#print */
-t6=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[339],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_fix(9));}}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9930,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1632 caar */
-t6=*((C_word*)lf[37]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
-
-/* k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9930,2,t0,t1);}
-t2=C_i_memq(t1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9897,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_9897(2,t4,t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9926,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1633 caar */
-t5=*((C_word*)lf[37]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[4]);}}
-
-/* k9924 in k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1633 ##sys#symbol-has-toplevel-binding? */
-((C_proc3)C_retrieve_symbol_proc(lf[49]))(3,*((C_word*)lf[49]+1),((C_word*)t0)[2],t1);}
-
-/* k9895 in k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9897(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9897,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[5]);
-/* eval.scm: 1634 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_9809(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[5]);
-t3=C_i_car(((C_word*)t0)[5]);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[2]);
-/* eval.scm: 1635 loop */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_9809(t5,((C_word*)t0)[3],t2,t4);}}
-
-/* k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9825,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9828,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9833,a[2]=t4,a[3]=((C_word)li246),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_9833(t6,t2,((C_word*)t0)[2]);}
-
-/* loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9833(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9833,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9877,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9845,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1623 ##sys#print */
-t6=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[338],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9845(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9845,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9848,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_car(((C_word*)t0)[2]);
-/* eval.scm: 1624 ##sys#print */
-t4=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[330]+1));}
-
-/* k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9848(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9848,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9851,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_cdr(((C_word*)t0)[2]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9860,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1626 ##sys#print */
-t4=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[337],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-else{
-/* eval.scm: 1629 ##sys#write-char-0 */
-t3=*((C_word*)lf[319]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],C_make_character(10),*((C_word*)lf[330]+1));}}
-
-/* k9858 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9860,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9863,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* eval.scm: 1627 ##sys#print */
-t4=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[330]+1));}
-
-/* k9861 in k9858 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1628 ##sys#write-char-0 */
-t2=*((C_word*)lf[319]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(41),*((C_word*)lf[330]+1));}
-
-/* k9849 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1629 ##sys#write-char-0 */
-t2=*((C_word*)lf[319]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[330]+1));}
-
-/* k9875 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9877(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9833(t3,((C_word*)t0)[2],t2);}
-
-/* k9826 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1631 ##sys#flush-output */
-t2=*((C_word*)lf[324]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[330]+1));}
-
-/* k9811 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(9));}
-
-/* k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9795,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9798,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[2];
-t4=C_i_nullp(t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9638,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_9638(t6,t4);}
-else{
-t6=C_i_car(t3);
-t7=t5;
-f_9638(t7,C_eqp(C_SCHEME_UNDEFINED,t6));}}
-
-/* k9636 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9638(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9638,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* eval.scm: 1637 loop */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_9748(t2,((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9643,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp);
-/* for-each */
-t3=*((C_word*)lf[260]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}}
-
-/* a9642 in k9636 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9643(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9643,3,t0,t1,t2);}
-t3=C_retrieve(lf[318]);
-/* g25662567 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[325]+1));}
-
-/* k9796 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9798(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1637 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_9748(t2,((C_word*)t0)[2]);}
-
-/* a9781 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9782(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9782,2,t0,t1);}
-t2=*((C_word*)lf[315]+1);
-if(C_truep(t2)){
-/* g26162617 */
-t3=t2;
-((C_proc3)C_retrieve_proc(t3))(3,t3,t1,((C_word*)t0)[3]);}
-else{
-/* g26162617 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t1,((C_word*)t0)[3]);}}
-
-/* a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9677,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9682,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 1577 load-verbose */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9682(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9682,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9685,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1578 load-verbose */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_SCHEME_TRUE);}
-
-/* k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9685,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9690,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li242),tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1579 ##sys#error-handler */
-t3=*((C_word*)lf[335]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9690(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9690r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9690r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9690r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(8);
-t4=f_9668(((C_word*)((C_word*)t0)[5])[1]);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9697,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t1,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 1582 ##sys#print */
-t6=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[334],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-
-/* k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9697,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9700,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9737,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1584 ##sys#print */
-t4=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[333],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-else{
-t3=t2;
-f_9700(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k9735 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1585 ##sys#print */
-t2=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-
-/* k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9700(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9700,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9703,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9712,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-t4=C_i_cdr(((C_word*)t0)[2]);
-t5=t3;
-f_9712(t5,C_i_nullp(t4));}
-else{
-t4=t3;
-f_9712(t4,C_SCHEME_FALSE);}}
-
-/* k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9712(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9712,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9715,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1588 ##sys#print */
-t3=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[332],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9721,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1591 ##sys#write-char-0 */
-t3=*((C_word*)lf[319]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),*((C_word*)lf[330]+1));}}
-
-/* k9719 in k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9721(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1592 write-err */
-f_9616(((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9713 in k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9715(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1589 write-err */
-f_9616(((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9701 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9703(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9703,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9706,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1593 print-call-chain */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[330]+1));}
-
-/* k9704 in k9701 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1594 flush-output */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],*((C_word*)lf[330]+1));}
-
-/* resetports in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_9668(C_word t0){
-C_word tmp;
-C_word t1;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t1=C_mutate((C_word*)lf[331]+1 /* (set! standard-input ...) */,((C_word*)((C_word*)t0)[4])[1]);
-t2=C_mutate((C_word*)lf[325]+1 /* (set! standard-output ...) */,((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate((C_word*)lf[330]+1 /* (set! standard-error ...) */,((C_word*)((C_word*)t0)[2])[1]);
-return(t3);}
-
-/* saveports in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_9662(C_word t0){
-C_word tmp;
-C_word t1;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t1=C_mutate(((C_word *)((C_word*)t0)[4])+1,*((C_word*)lf[331]+1));
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[325]+1));
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,*((C_word*)lf[330]+1));
-return(t3);}
-
-/* write-err in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9616(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9616,NULL,2,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9622,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp);
-/* for-each */
-t4=*((C_word*)lf[260]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t3,t2);}
-
-/* a9621 in write-err in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9622(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9622,3,t0,t1,t2);}
-t3=C_retrieve(lf[318]);
-/* g25432544 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[330]+1));}
-
-/* ##sys#clear-trace-buffer in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9610,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,stub2512(C_SCHEME_UNDEFINED));}
-
-/* ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9594(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9594,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9598,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9605,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1535 repl-prompt */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k9603 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9605,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9608,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* g25092510 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k9606 in k9603 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1535 ##sys#print */
-t2=*((C_word*)lf[320]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],t1,C_SCHEME_FALSE,*((C_word*)lf[325]+1));}
-
-/* k9596 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1536 ##sys#flush-output */
-t2=*((C_word*)lf[324]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[325]+1));}
-
-/* ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9575(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9575,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9579,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9584,a[2]=t3,a[3]=t2,a[4]=((C_word)li236),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1527 ##sys#with-print-length-limit */
-t6=*((C_word*)lf[321]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[316]),t5);}
-
-/* a9583 in ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9584,2,t0,t1);}
-t2=*((C_word*)lf[320]+1);
-/* g25052506 */
-t3=t2;
-((C_proc5)C_retrieve_proc(t3))(5,t3,t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-
-/* k9577 in ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9579(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1528 ##sys#write-char-0 */
-t2=*((C_word*)lf[319]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-
-/* ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9515(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9515,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9519,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(t2,C_fix(0));
-/* eval.scm: 1501 display-rj */
-t5=((C_word*)t0)[2];
-f_9494(t5,t3,t4,C_fix(8));}
-
-/* k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9519,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9522,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1502 display */
-t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[314]);}
-
-/* k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9522,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9525,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1503 display-rj */
-t4=((C_word*)t0)[2];
-f_9494(t4,t2,t3,C_fix(8));}
-
-/* k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9525(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9525,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9528,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1504 display */
-t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[313]);}
-
-/* k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9528,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9531,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(2));
-/* eval.scm: 1505 display-rj */
-t4=((C_word*)t0)[2];
-f_9494(t4,t2,t3,C_fix(8));}
-
-/* k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9531,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9534,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1506 display */
-t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[312]);}
-
-/* k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9534,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9537,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(3));
-/* eval.scm: 1507 display-rj */
-t4=((C_word*)t0)[2];
-f_9494(t4,t2,t3,C_fix(8));}
-
-/* k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9537(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9537,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1508 display */
-t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[311]);}
-
-/* k9538 in k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9540,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9543,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(4));
-/* eval.scm: 1509 display-rj */
-t4=((C_word*)t0)[2];
-f_9494(t4,t2,t3,C_fix(8));}
-
-/* k9541 in k9538 in k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9543(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1510 display */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[310]);}
-
-/* display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9494(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9494,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9498,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_zerop(t2))){
-t5=t4;
-f_9498(2,t5,lf[309]);}
-else{
-/* eval.scm: 1496 number->string */
-C_number_to_string(3,0,t4,t2);}}
-
-/* k9496 in display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9498,2,t0,t1);}
-t2=C_block_size(t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9501,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=C_fixnum_difference(((C_word*)t0)[3],t2);
-/* eval.scm: 1498 spaces */
-t5=((C_word*)t0)[2];
-f_9470(t5,t3,t4);}
-
-/* k9499 in k9496 in display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1499 display */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9470(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9470,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9476,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li232),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_9476(t6,t1,t2);}
-
-/* doloop2474 in spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9476(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9476,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_less_or_equal_p(t2,C_fix(0)))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9486,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1493 display */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_make_character(32));}}
-
-/* k9484 in doloop2474 in spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9476(t3,((C_word*)t0)[2],t2);}
-
-/* ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr4r,(void*)f_9321r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_9321r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_9321r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(7);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t3,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_nullp(t4))){
-t6=t5;
-f_9325(2,t6,C_SCHEME_FALSE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=t5;
-f_9325(2,t7,C_i_car(t4));}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9325(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[21],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9325,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9327,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li228),tmp=(C_word)a,a+=5,tmp));
-t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9362,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=((C_word)li229),tmp=(C_word)a,a+=5,tmp));
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9392,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1469 test */
-t9=((C_word*)t5)[1];
-f_9362(t9,t8,((C_word*)t0)[3]);}
-
-/* k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9392(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9392,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9402,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9439,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1473 ##sys#repository-path */
-t4=*((C_word*)lf[241]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=t2;
-f_9402(2,t3,C_retrieve(lf[248]));}}}
-
-/* k9437 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9439,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9449,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1475 ##sys#repository-path */
-t3=*((C_word*)lf[241]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* eval.scm: 1471 ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_retrieve(lf[248]),C_SCHEME_END_OF_LIST);}}
-
-/* k9447 in k9437 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9449,2,t0,t1);}
-t2=C_a_i_list(&a,1,t1);
-/* eval.scm: 1471 ##sys#append */
-t3=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],C_retrieve(lf[248]),t2);}
-
-/* k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9402,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9404,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word)li230),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_9404(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9404(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9404,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=((C_word*)t0)[5];
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9414,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9428,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t6=C_slot(t2,C_fix(0));
-/* eval.scm: 1479 string-append */
-t7=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t7))(5,t7,t5,t6,lf[308],((C_word*)t0)[5]);}}
-
-/* k9426 in loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1479 test */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_9362(t2,((C_word*)t0)[2],t1);}
-
-/* k9412 in loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1482 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_9404(t3,((C_word*)t0)[4],t2);}}
-
-/* test in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9362(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9362,NULL,3,t0,t1,t2);}
-t3=C_fudge(C_fix(24));
-t4=(C_truep(t3)?(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[7],C_retrieve(lf[208])):C_a_i_list(&a,2,C_retrieve(lf[208]),lf[7])):C_a_i_list(&a,1,lf[7]));
-/* eval.scm: 1464 test2 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_9327(t5,t1,t2,t4);}
-
-/* test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9327(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9327,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9340,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1458 exists? */
-f_9302(t4,t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9343,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t5=C_i_car(t3);
-/* eval.scm: 1459 ##sys#string-append */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t2,t5);}}
-
-/* k9341 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9343,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9349,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1460 exists? */
-f_9302(t2,t1);}
-
-/* k9347 in k9341 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[5]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[4]);
-/* eval.scm: 1462 test2 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9327(t3,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
-
-/* k9338 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?((C_word*)t0)[2]:C_SCHEME_FALSE));}
-
-/* exists? in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9302(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9302,NULL,2,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9306,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1453 ##sys#file-info */
-t4=*((C_word*)lf[207]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k9304 in exists? in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9306(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_slot(t1,C_fix(4));
-t3=C_eqp(C_fix(1),t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_not(t3));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* initb in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9269(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9269,NULL,2,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9271,a[2]=t2,a[3]=((C_word)li225),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_9271 in initb in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9271(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9271,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9275,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1414 ##sys#hash-table-location */
-t4=*((C_word*)lf[21]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
-
-/* k9273 */
-static void C_ccall f_9275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[3],C_fix(0));
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_setslot(t1,C_fix(1),t2));}
-
-/* null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9231(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9231r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9231r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9231r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t4=C_i_check_exact_2(t2,lf[305]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9238,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t6=C_fixnum_lessp(t2,C_fix(4));
-if(C_truep(t6)){
-if(C_truep(t6)){
-/* eval.scm: 1405 ##sys#error */
-t7=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[305],lf[306],t2);}
-else{
-t7=t5;
-f_9238(2,t7,C_SCHEME_UNDEFINED);}}
-else{
-if(C_truep(C_fixnum_greaterp(t2,C_fix(5)))){
-/* eval.scm: 1405 ##sys#error */
-t7=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[305],lf[306],t2);}
-else{
-t7=t5;
-f_9238(2,t7,C_SCHEME_UNDEFINED);}}}
-
-/* k9236 in null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9238(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9238,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9245,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1408 make-vector */
-t3=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,C_fix(301),C_SCHEME_END_OF_LIST);}
-
-/* k9243 in k9236 in null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9245,2,t0,t1);}
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t2=C_i_car(((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,3,lf[295],t1,t2));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],t1,C_SCHEME_FALSE));}}
-
-/* scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9187(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9187r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9187r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9187r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(4);
-t4=C_i_check_exact_2(t2,lf[302]);
-t5=C_i_pairp(t3);
-t6=(C_truep(t5)?C_i_car(t3):C_SCHEME_FALSE);
-t7=t2;
-switch(t7){
-case C_fix(4):
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9207,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1396 ##sys#copy-env-table */
-t9=*((C_word*)lf[298]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[293],"r4rs-environment"),C_SCHEME_TRUE,t6);
-case C_fix(5):
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9220,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1397 ##sys#copy-env-table */
-t9=*((C_word*)lf[298]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[294],"r5rs-environment"),C_SCHEME_TRUE,t6);
-default:
-/* eval.scm: 1398 ##sys#error */
-t8=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,lf[302],lf[303],t2);}}
-
-/* k9218 in scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9220,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],t1,((C_word*)t0)[2]));}
-
-/* k9205 in scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9207,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],t1,((C_word*)t0)[2]));}
-
-/* interaction-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9184,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve2(lf[296],"interaction-environment"));}
-
-/* ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9065(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9065r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9065r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9065r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(11);
-t4=C_i_check_structure(t2,lf[295]);
-t5=C_i_pairp(t3);
-t6=(C_truep(t5)?C_i_car(t3):C_SCHEME_FALSE);
-t7=C_slot(t2,C_fix(1));
-if(C_truep(t7)){
-t8=C_i_vector_length(t7);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9086,a[2]=t6,a[3]=t7,a[4]=t10,a[5]=t8,a[6]=((C_word)li219),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_9086(t12,t1,C_fix(0),C_SCHEME_END_OF_LIST);}
-else{
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9157,a[2]=t1,a[3]=t9,tmp=(C_word)a,a+=4,tmp);
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9159,a[2]=t9,a[3]=t6,a[4]=((C_word)li220),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1383 ##sys#walk-namespace */
-((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t10,t11);}}
-
-/* a9158 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9159(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9159,3,t0,t1,t2);}
-t3=C_i_not(((C_word*)t0)[3]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9169,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_9169(2,t5,t3);}
-else{
-/* eval.scm: 1385 pred */
-t5=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}}
-
-/* k9167 in a9158 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9169(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9169,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k9155 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9086(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9086,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_fixnum_plus(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9104,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t6=C_i_vector_ref(((C_word*)t0)[3],t2);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9110,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=((C_word)li218),tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_9110(t10,t5,t6,t3);}}
-
-/* loop in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9110(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9110,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_i_car(t2);
-t5=C_i_vector_ref(t4,C_fix(0));
-t6=C_i_not(((C_word*)t0)[3]);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9129,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t5,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t6)){
-t8=t7;
-f_9129(2,t8,t6);}
-else{
-/* eval.scm: 1377 pred */
-t8=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t8))(3,t8,t7,t5);}}}
-
-/* k9127 in loop in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9129,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-/* eval.scm: 1378 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_9110(t4,((C_word*)t0)[2],t2,t3);}
-else{
-t2=C_i_cdr(((C_word*)t0)[6]);
-/* eval.scm: 1379 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9110(t3,((C_word*)t0)[2],t2,((C_word*)t0)[4]);}}
-
-/* k9102 in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_9086(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr5r,(void*)f_8957r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_8957r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_8957r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(8);
-t6=C_i_pairp(t5);
-t7=(C_truep(t6)?C_i_car(t5):C_SCHEME_FALSE);
-t8=C_block_size(t2);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8967,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=t2,a[7]=t8,tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 1344 ##sys#make-vector */
-t10=*((C_word*)lf[79]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,t8,C_SCHEME_END_OF_LIST);}
-
-/* k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8967,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8972,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word)li216),tmp=(C_word)a,a+=10,tmp));
-t5=((C_word*)t3)[1];
-f_8972(t5,((C_word*)t0)[2],C_fix(0));}
-
-/* doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8972(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8972,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[8]))){
-t3=((C_word*)t0)[7];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8993,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[5],t2);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t6,a[5]=((C_word*)t0)[4],a[6]=((C_word)li215),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_8999(t8,t3,t4);}}
-
-/* copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8999(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-loop:
-a=C_alloc(9);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_8999,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t3,C_fix(0));
-t5=C_i_not(((C_word*)t0)[5]);
-t6=(C_truep(t5)?t5:C_i_memq(t4,((C_word*)t0)[5]));
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9028,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t8=C_slot(t3,C_fix(1));
-if(C_truep(((C_word*)t0)[3])){
-t9=((C_word*)t0)[2];
-t10=t7;
-f_9028(t10,C_a_i_vector(&a,3,t4,t8,t9));}
-else{
-t9=C_slot(t3,C_fix(2));
-t10=t7;
-f_9028(t10,C_a_i_vector(&a,3,t4,t8,t9));}}
-else{
-t7=C_slot(t2,C_fix(1));
-/* eval.scm: 1360 copy */
-t13=t1;
-t14=t7;
-t1=t13;
-t2=t14;
-goto loop;}}}
-
-/* k9026 in copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_9028(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9028,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9032,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1359 copy */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_8999(t4,t2,t3);}
-
-/* k9030 in k9026 in copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_9032(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9032,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k8991 in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8993(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_8972(t4,((C_word*)t0)[2],t3);}
-
-/* ##sys#environment? in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8941(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8941,3,t0,t1,t2);}
-if(C_truep(C_i_structurep(t2,lf[295]))){
-t3=C_block_size(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(C_fix(3),t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8878(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8878,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8882,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1322 string-copy */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k8880 in ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8882,2,t0,t1);}
-t2=C_block_size(t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8890,a[2]=t1,a[3]=t2,a[4]=((C_word)li212),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_8890(t3,C_fix(0)));}
-
-/* doloop2278 in k8880 in ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_8890(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
-t2=((C_word*)t0)[2];
-return(t2);}
-else{
-t2=C_subchar(((C_word*)t0)[2],t1);
-if(C_truep(C_u_i_char_alphabeticp(t2))){
-t3=C_fixnum_plus(t1,C_fix(1));
-t15=t3;
-t1=t15;
-goto loop;}
-else{
-t3=C_u_i_char_numericp(t2);
-t4=C_i_not(t3);
-if(C_truep(t4)){
-if(C_truep(t4)){
-t5=C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
-t6=C_fixnum_plus(t1,C_fix(1));
-t15=t6;
-t1=t15;
-goto loop;}
-else{
-t5=C_fixnum_plus(t1,C_fix(1));
-t15=t5;
-t1=t15;
-goto loop;}}
-else{
-t5=C_eqp(t1,C_fix(0));
-if(C_truep(t5)){
-t6=C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
-t7=C_fixnum_plus(t1,C_fix(1));
-t15=t7;
-t1=t15;
-goto loop;}
-else{
-t6=C_fixnum_plus(t1,C_fix(1));
-t15=t6;
-t1=t15;
-goto loop;}}}}}
-
-/* ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8270(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[25],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_8270,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8273,a[2]=t3,a[3]=((C_word)li202),tmp=(C_word)a,a+=4,tmp));
-t12=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8298,a[2]=t4,a[3]=((C_word)li203),tmp=(C_word)a,a+=4,tmp));
-t13=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8339,a[2]=t6,a[3]=t3,a[4]=t8,a[5]=((C_word)li205),tmp=(C_word)a,a+=6,tmp));
-t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8694,a[2]=t10,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(t2))){
-t15=C_i_car(t2);
-t16=t14;
-f_8694(t16,C_i_symbolp(t15));}
-else{
-t15=t14;
-f_8694(t15,C_SCHEME_FALSE);}}
-
-/* k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8694(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8694,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_car(((C_word*)t0)[4]);
-t3=C_eqp(t2,lf[282]);
-if(C_truep(t3)){
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8713,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8717,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-t12=C_i_cdr(((C_word*)t0)[4]);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8723,a[2]=t8,a[3]=t14,a[4]=t10,a[5]=t5,a[6]=((C_word*)t0)[2],a[7]=((C_word)li209),tmp=(C_word)a,a+=8,tmp));
-t16=((C_word*)t14)[1];
-f_8723(t16,t11,t12);}
-else{
-t4=C_eqp(t2,lf[286]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8803,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_8803(t6,t4);}
-else{
-t6=C_eqp(t2,lf[288]);
-if(C_truep(t6)){
-t7=t5;
-f_8803(t7,t6);}
-else{
-t7=C_eqp(t2,lf[289]);
-t8=t5;
-f_8803(t8,(C_truep(t7)?t7:C_eqp(t2,lf[290])));}}}}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[4]))){
-/* eval.scm: 1313 doit */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_8339(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[4]);}
-else{
-/* eval.scm: 1314 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[291],((C_word*)t0)[4]);}}}
-
-/* k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8803(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8803,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8810,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8812,a[2]=t4,a[3]=((C_word)li210),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8812(t6,t2,((C_word*)t0)[2]);}
-else{
-/* eval.scm: 1311 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[287],((C_word*)t0)[2]);}}
-
-/* follow in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8812(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8812,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8819,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(t2))){
-t4=C_i_cdr(t2);
-t5=t3;
-f_8819(t5,C_i_pairp(t4));}
-else{
-t4=t3;
-f_8819(t4,C_SCHEME_FALSE);}}
-
-/* k8817 in follow in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8819(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_cadr(((C_word*)t0)[4]);
-/* eval.scm: 1308 follow */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8812(t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k8808 in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8810(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1305 doit */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_8339(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8723(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8723,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8750,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li208),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8790,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g22242225 */
-t6=t3;
-f_8750(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8788 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8790,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop22082221 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8723(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop22082221 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8723(t6,((C_word*)t0)[3],t5);}}
-
-/* g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8750(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8750,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8754,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnump(t2))){
-t4=t3;
-f_8754(2,t4,C_SCHEME_UNDEFINED);}
-else{
-/* eval.scm: 1297 ##sys#syntax-error */
-((C_proc5)C_retrieve_symbol_proc(lf[284]))(5,*((C_word*)lf[284]+1),t3,lf[279],lf[285],t2);}}
-
-/* k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8754(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8754,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8777,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8781,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1298 number->string */
-C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
-
-/* k8779 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1298 string-append */
-t2=*((C_word*)lf[188]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[283],t1);}
-
-/* k8775 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1298 string->symbol */
-t2=*((C_word*)lf[251]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8757(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8757,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8762,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li206),tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8768,a[2]=((C_word*)t0)[3],a[3]=((C_word)li207),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-
-/* a8767 in k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8768(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8768,4,t0,t1,t2,t3);}
-t4=((C_word*)((C_word*)t0)[2])[1];
-if(C_truep(t4)){
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-else{
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}}
-
-/* a8761 in k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8762(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8762,2,t0,t1);}
-/* eval.scm: 1299 doit */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_8339(t2,t1,((C_word*)t0)[2],((C_word*)t0)[2]);}
-
-/* k8715 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8717(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8711 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8713,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[66],t1);
-/* eval.scm: 1303 values */
-C_values(4,0,((C_word*)t0)[3],t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8339(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8339,NULL,4,t0,t1,t2,t3);}
-t4=C_i_memq(t2,lf[274]);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8349,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_8349(2,t6,t4);}
-else{
-if(C_truep(((C_word*)t0)[3])){
-t6=t5;
-f_8349(2,t6,C_i_memq(t2,lf[280]));}
-else{
-/* eval.scm: 1238 ##sys#feature? */
-t6=*((C_word*)lf[281]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}}
-
-/* k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8349,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8356,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1239 impform */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_8298(t3,t2,lf[275],((C_word*)t0)[5],C_SCHEME_TRUE);}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[4],*((C_word*)lf[2]+1)))){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8369,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[276],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[135],t5);
-/* eval.scm: 1242 impform */
-t7=((C_word*)((C_word*)t0)[6])[1];
-f_8298(t7,t2,t6,((C_word*)t0)[5],C_SCHEME_TRUE);}
-else{
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[52],t3);
-t5=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t4,t5);
-t7=C_a_i_cons(&a,2,lf[232],t6);
-/* eval.scm: 1242 impform */
-t8=((C_word*)((C_word*)t0)[6])[1];
-f_8298(t8,t2,t7,((C_word*)t0)[5],C_SCHEME_TRUE);}}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[4],*((C_word*)lf[4]+1)))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8416,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1249 ##sys#extension-information */
-t3=*((C_word*)lf[261]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[279]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1264 ##sys#extension-information */
-t3=*((C_word*)lf[261]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[279]);}}}}
-
-/* k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8511,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_assq(lf[56],t1);
-t3=C_i_assq(lf[277],t1);
-t4=C_i_assq(lf[266],t1);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8526,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t2)){
-/* eval.scm: 1269 add-req */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_8273(t6,t5,((C_word*)t0)[3],C_SCHEME_TRUE);}
-else{
-t6=t5;
-f_8526(2,t6,C_SCHEME_UNDEFINED);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8656,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1283 add-req */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_8273(t3,t2,((C_word*)t0)[3],C_SCHEME_FALSE);}}
-
-/* k8654 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8656,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8663,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[52],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[123],t5);
-/* eval.scm: 1285 impform */
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_8298(t7,t2,t6,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k8661 in k8654 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1284 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[30],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8526,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8533,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8541,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[52],t5);
-t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,lf[121],t7);
-t9=t4;
-f_8545(t9,C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
-else{
-t5=t4;
-f_8545(t5,C_SCHEME_END_OF_LIST);}}
-
-/* k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8545(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[25],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8545,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8549,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_truep(((C_word*)t0)[5])?((C_word*)t0)[5]:(C_truep(((C_word*)t0)[4])?C_SCHEME_FALSE:((C_word*)t0)[3]));
-if(C_truep(t3)){
-/* ##sys#append */
-t4=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8567,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8571,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t10=(C_truep(((C_word*)t0)[4])?C_i_cdr(((C_word*)t0)[4]):C_a_i_list(&a,1,((C_word*)t0)[2]));
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8577,a[2]=t6,a[3]=t12,a[4]=t8,a[5]=((C_word)li204),tmp=(C_word)a,a+=6,tmp));
-t14=((C_word*)t12)[1];
-f_8577(t14,t9,t10);}}
-
-/* loop2154 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8577(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(9);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_8577,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[52],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop21542167 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop21542167 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8569 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8571(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k8565 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8567,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[123],t1);
-t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t4=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t3,C_SCHEME_END_OF_LIST);}
-
-/* k8547 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8539 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8541,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[66],t1);
-/* eval.scm: 1271 impform */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8298(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k8531 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1270 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[26],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8416,2,t0,t1);}
-t2=C_i_assq(lf[277],t1);
-t3=C_i_assq(lf[56],t1);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8433,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t3)){
-t6=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,lf[52],t6);
-t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,lf[121],t8);
-t10=t5;
-f_8437(t10,C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST));}
-else{
-t6=t5;
-f_8437(t6,C_SCHEME_END_OF_LIST);}}
-
-/* k8435 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8437(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[19],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8437,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8445,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[6])){
-/* eval.scm: 1255 impform */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_8298(t3,t2,lf[278],((C_word*)t0)[4],C_SCHEME_FALSE);}
-else{
-if(C_truep(((C_word*)t0)[3])){
-t3=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[276],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,lf[135],t5);
-/* eval.scm: 1255 impform */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_8298(t7,t2,t6,((C_word*)t0)[4],C_SCHEME_FALSE);}
-else{
-t3=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-t4=C_a_i_cons(&a,2,lf[52],t3);
-t5=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,t4,t5);
-t7=C_a_i_cons(&a,2,lf[232],t6);
-/* eval.scm: 1255 impform */
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_8298(t8,t2,t7,((C_word*)t0)[4],C_SCHEME_FALSE);}}}
-
-/* k8443 in k8435 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8445,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t3=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k8431 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8433,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[66],t1);
-/* eval.scm: 1252 values */
-C_values(4,0,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
-
-/* k8367 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8369(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1241 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k8354 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1239 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8298(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8298,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8310,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8317,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t7=C_i_not(t4);
-if(C_truep(t7)){
-t8=t6;
-f_8317(2,t8,t7);}
-else{
-/* eval.scm: 1231 ##sys#current-module */
-((C_proc2)C_retrieve_symbol_proc(lf[41]))(2,*((C_word*)lf[41]+1),t6);}}
-else{
-t7=t6;
-f_8317(2,t7,C_SCHEME_FALSE);}}
-
-/* k8315 in impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8317,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,lf[273],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t5=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
-else{
-/* ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-
-/* k8308 in impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8310,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[66],t2));}
-
-/* add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8273(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8273,NULL,4,t0,t1,t2,t3);}
-if(C_truep(((C_word*)t0)[2])){
-t4=(C_truep(t3)?lf[268]:lf[269]);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8286,a[2]=t2,a[3]=((C_word)li200),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8292,a[2]=t2,a[3]=((C_word)li201),tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1223 ##sys#hash-table-update! */
-((C_proc6)C_retrieve_symbol_proc(lf[18]))(6,*((C_word*)lf[18]+1),t1,C_retrieve(lf[272]),t4,t5,t6);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* a8291 in add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8292,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,1,((C_word*)t0)[2]));}
-
-/* a8285 in add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8286(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8286,3,t0,t1,t2);}
-t3=C_retrieve(lf[270]);
-/* g20602061 */
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[271]+1),t2,((C_word*)t0)[2]);}
-
-/* ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8221(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8221,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8227,a[2]=t4,a[3]=((C_word)li198),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8227(t6,t1,t2);}
-
-/* loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8227(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8227,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8241,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=C_i_car(t2);
-/* eval.scm: 1212 ##sys#extension-information */
-t5=*((C_word*)lf[261]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_FALSE);}}
-
-/* k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8241,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8244,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=C_i_assq(lf[266],t1);
-t4=t2;
-f_8244(t4,(C_truep(t3)?C_i_cdr(t3):C_SCHEME_FALSE));}
-else{
-t3=t2;
-f_8244(t3,C_SCHEME_FALSE);}}
-
-/* k8242 in k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8244(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8244,NULL,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8251,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=C_i_cdr(((C_word*)t0)[3]);
-/* eval.scm: 1216 loop1 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_8227(t5,t3,t4);}
-
-/* k8249 in k8242 in k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1211 append */
-t2=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8215(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8215,3,t0,t1,t2);}
-/* eval.scm: 1202 ##sys#extension-information */
-t3=*((C_word*)lf[261]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[265]);}
-
-/* ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8182,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8186,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t1,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 1194 ##sys#repository-path */
-t5=*((C_word*)lf[241]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8186,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8192,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 1195 ##sys#canonicalize-extension-path */
-t3=*((C_word*)lf[235]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8192(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8192,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8195,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1196 string-append */
-t3=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t3))(6,t3,t2,((C_word*)t0)[2],lf[263],t1,lf[264]);}
-
-/* k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8195(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8195,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8198,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8213,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1197 string-append */
-t4=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t3,t1,lf[262]);}
-
-/* k8211 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1197 file-exists? */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8196 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8198,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8202,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li195),tmp=(C_word)a,a+=5,tmp);
-/* g20072008 */
-t3=t2;
-f_8202(t3,((C_word*)t0)[2],t1);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* g2007 in k8196 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8202(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8202,NULL,3,t0,t1,t2);}
-/* g20162017 */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)t0)[2]);}
-
-/* ##sys#require in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8169(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_8169r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_8169r(t0,t1,t2);}}
-
-static void C_ccall f_8169r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8175,a[2]=((C_word)li193),tmp=(C_word)a,a+=3,tmp);
-/* for-each */
-t4=*((C_word*)lf[260]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t3,t2);}
-
-/* a8174 in ##sys#require in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8175,3,t0,t1,t2);}
-t3=*((C_word*)lf[252]+1);
-/* g19841985 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[259]);}
-
-/* ##sys#provided? in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8155(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8155,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8166,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1175 ##sys#canonicalize-extension-path */
-t4=*((C_word*)lf[235]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[258]);}
-
-/* k8164 in ##sys#provided? in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_member(t1,C_retrieve(lf[250]));
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_SCHEME_TRUE:C_SCHEME_FALSE));}
-
-/* ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8113(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_8113r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_8113r(t0,t1,t2);}}
-
-static void C_ccall f_8113r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8119,a[2]=t4,a[3]=((C_word)li190),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8119(t6,t1,t2);}
-
-/* loop1946 in ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8119(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8119,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_check_symbol_2(t3,lf[256]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8134,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1168 ##sys#canonicalize-extension-path */
-t6=*((C_word*)lf[235]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,lf[256]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8132 in loop1946 in ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8134(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8134,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_retrieve(lf[250]));
-t3=C_mutate((C_word*)lf[250]+1 /* (set! loaded-extensions ...) */,t2);
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_8119(t5,((C_word*)t0)[2],t4);}
-
-/* ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8029(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr4r,(void*)f_8029r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_8029r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_8029r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(8);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8033,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_nullp(t4))){
-t7=t6;
-f_8033(2,t7,C_SCHEME_TRUE);}
-else{
-t7=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t7))){
-t8=t6;
-f_8033(2,t8,C_i_car(t4));}
-else{
-/* ##sys#error */
-t8=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t4);}}}
-
-/* k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8033,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8036,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[4])[1]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8089,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1147 string->symbol */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-t3=t2;
-f_8036(t3,C_i_check_symbol_2(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]));}}
-
-/* k8087 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_8036(t3,t2);}
-
-/* k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_8036(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8036,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1149 ##sys#canonicalize-extension-path */
-t3=*((C_word*)lf[235]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[2]);}
-
-/* k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8039(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8039,2,t0,t1);}
-t2=C_i_member(t1,C_retrieve(lf[250]));
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[4])[1],*((C_word*)lf[2]+1)))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8054,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 1152 ##sys#load-library-0 */
-t4=*((C_word*)lf[225]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)((C_word*)t0)[4])[1],C_SCHEME_FALSE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8066,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1156 ##sys#find-extension */
-t4=*((C_word*)lf[245]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,C_SCHEME_TRUE);}}}
-
-/* k8064 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8066(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8066,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8072,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1158 ##sys#load */
-t3=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-else{
-if(C_truep(((C_word*)t0)[4])){
-/* eval.scm: 1161 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[254],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
-
-/* k8070 in k8064 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8072(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8072,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_retrieve(lf[250]));
-t3=C_mutate((C_word*)lf[250]+1 /* (set! loaded-extensions ...) */,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}
-
-/* k8052 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_8054(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(((C_word*)t0)[4])){
-/* eval.scm: 1154 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[253],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
-
-/* ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7930,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7934,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 1123 ##sys#repository-path */
-t5=*((C_word*)lf[241]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7934,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7936,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word)li186),tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7982,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(C_truep(C_retrieve(lf[243]))?lf[247]:C_SCHEME_END_OF_LIST);
-t5=(C_truep(t1)?C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
-t6=(C_truep(((C_word*)t0)[2])?C_retrieve(lf[248]):C_SCHEME_END_OF_LIST);
-if(C_truep(C_retrieve(lf[243]))){
-/* eval.scm: 1132 ##sys#append */
-t7=*((C_word*)lf[68]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,C_SCHEME_END_OF_LIST);}
-else{
-/* eval.scm: 1132 ##sys#append */
-t7=*((C_word*)lf[68]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,lf[249]);}}
-
-/* k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7982(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7982,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li187),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_7984(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7984(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7984,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7997,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1139 check */
-t5=((C_word*)t0)[2];
-f_7936(t5,t4,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k7995 in loop in k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7997(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1140 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_7984(t3,((C_word*)t0)[4],t2);}}
-
-/* check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7936(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7936,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7940,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1125 string-append */
-t4=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t4))(5,t4,t3,t2,lf[246],((C_word*)t0)[2]);}
-
-/* k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7940(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7940,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=C_retrieve(lf[174]);
-if(C_truep(t3)){
-t4=t2;
-f_7946(2,t4,C_SCHEME_FALSE);}
-else{
-if(C_truep(C_fudge(C_fix(24)))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7975,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1129 ##sys#string-append */
-t5=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t1,C_retrieve(lf[208]));}
-else{
-t4=t2;
-f_7946(2,t4,C_SCHEME_FALSE);}}}
-else{
-t3=t2;
-f_7946(2,t3,C_SCHEME_FALSE);}}
-
-/* k7973 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1129 file-exists? */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7946,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7949,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=t1;
-if(C_truep(t3)){
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7956,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1130 ##sys#string-append */
-t4=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],lf[7]);}}
-
-/* k7954 in k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1130 file-exists? */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7947 in k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7949(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* ##sys#repository-path in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7899(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7899r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7899r(t0,t1,t2);}}
-
-static void C_ccall f_7899r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7903,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=((C_word*)((C_word*)t0)[2])[1];
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=C_i_car(t2);
-if(C_truep(t5)){
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k7901 in ##sys#repository-path in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7903(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7738(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7738,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7741,a[2]=t2,a[3]=t3,a[4]=((C_word)li181),tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7760,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_stringp(t2))){
-t6=t5;
-f_7760(2,t6,t2);}
-else{
-if(C_truep(C_i_symbolp(t2))){
-/* eval.scm: 1077 ##sys#symbol->string */
-t6=*((C_word*)lf[237]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-else{
-if(C_truep(C_i_listp(t2))){
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7843,a[2]=t4,a[3]=t7,a[4]=((C_word*)t0)[2],a[5]=((C_word)li183),tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_7843(t9,t5,t2);}
-else{
-t6=t5;
-f_7760(2,t6,C_SCHEME_UNDEFINED);}}}}
-
-/* loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7843(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7843,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[238]);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7860,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_symbolp(t3))){
-/* eval.scm: 1084 ##sys#symbol->string */
-t5=*((C_word*)lf[237]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-if(C_truep(C_i_stringp(t3))){
-t5=t4;
-f_7860(2,t5,t3);}
-else{
-/* eval.scm: 1086 err */
-t5=((C_word*)t0)[2];
-f_7741(t5,t4);}}}}
-
-/* k7858 in loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7860,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-t3=C_i_nullp(t2);
-t4=(C_truep(t3)?lf[239]:lf[240]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7868,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t6=C_slot(((C_word*)t0)[5],C_fix(1));
-/* eval.scm: 1090 loop */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_7843(t7,t5,t6);}
-
-/* k7866 in k7858 in loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7868(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1082 string-append */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7760(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7760,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7765,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li182),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_7765(t5,((C_word*)t0)[2],t1);}
-
-/* check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7765(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7765,NULL,3,t0,t1,t2);}
-t3=C_block_size(t2);
-t4=C_eqp(C_fix(0),t3);
-if(C_truep(t4)){
-/* eval.scm: 1093 err */
-t5=((C_word*)t0)[3];
-f_7741(t5,t1);}
-else{
-t5=C_i_string_ref(t2,C_fix(0));
-t6=C_eqp(C_make_character(92),t5);
-t7=(C_truep(t6)?t6:C_eqp(C_make_character(47),t5));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7791,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1095 ##sys#substring */
-t9=*((C_word*)lf[197]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,t2,C_fix(1),t3);}
-else{
-t8=C_fixnum_difference(t3,C_fix(1));
-t9=C_i_string_ref(t2,t8);
-t10=C_eqp(C_make_character(92),t9);
-t11=(C_truep(t10)?t10:C_eqp(C_make_character(47),t9));
-if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7804,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t13=C_fixnum_difference(t3,C_fix(1));
-/* eval.scm: 1097 ##sys#substring */
-t14=*((C_word*)lf[197]+1);
-((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t12,t2,C_fix(0),t13);}
-else{
-t12=t2;
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,t12);}}}}
-
-/* k7802 in check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7804(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1097 check */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_7765(t2,((C_word*)t0)[2],t1);}
-
-/* k7789 in check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1095 check */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_7765(t2,((C_word*)t0)[2],t1);}
-
-/* err in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7741(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7741,NULL,2,t0,t1);}
-/* eval.scm: 1074 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[236],((C_word*)t0)[2]);}
-
-/* ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7652(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7652r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7652r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7652r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-t4=C_i_check_symbol_2(t2,lf[233]);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7659,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_pairp(t3))){
-t6=C_i_car(t3);
-/* eval.scm: 1051 ##sys#load-library-0 */
-t7=*((C_word*)lf[225]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t2,t6);}
-else{
-/* eval.scm: 1051 ##sys#load-library-0 */
-t6=*((C_word*)lf[225]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,C_SCHEME_FALSE);}}
-
-/* k7657 in ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7659,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7669,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#peek-c-string */
-t3=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}}
-
-/* k7667 in k7657 in ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1052 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[233],lf[234],((C_word*)t0)[2],t1);}
-
-/* ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7546,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7550,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 1024 ##sys#->feature-id */
-t5=*((C_word*)lf[231]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7550(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7550,2,t0,t1);}
-t2=C_i_memq(t1,C_retrieve(lf[138]));
-if(C_truep(t2)){
-t3=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7559,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t4=t3;
-f_7559(t4,C_a_i_list(&a,1,((C_word*)t0)[3]));}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7642,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=C_slot(((C_word*)t0)[6],C_fix(1));
-/* eval.scm: 1029 ##sys#string-append */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t5,C_retrieve(lf[219]));}}}
-
-/* k7640 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7642,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7646,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1030 dynamic-load-libraries */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k7644 in k7640 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7646(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7646,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_7559(t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7559(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7559,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7562,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7624,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7628,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=C_slot(((C_word*)t0)[4],C_fix(1));
-/* eval.scm: 1035 ##sys#string->c-identifier */
-t6=*((C_word*)lf[230]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* k7626 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1033 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[228],t1,lf[229]);}
-
-/* k7622 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1032 ##sys#make-c-string */
-t2=*((C_word*)lf[201]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7562,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7565,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7611,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1037 load-verbose */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7611(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7611,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7614,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1038 display */
-t3=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[227]);}
-else{
-t2=((C_word*)t0)[3];
-f_7565(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k7612 in k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7614,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7617,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 1039 display */
-t3=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k7615 in k7612 in k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1040 display */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[226]);}
-
-/* k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7565,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7570,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li178),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_7570(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7570(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7570,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7604,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=C_slot(t2,C_fix(0));
-/* eval.scm: 1043 ##sys#make-c-string */
-t6=*((C_word*)lf[201]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
-
-/* k7602 in loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 1043 ##sys#dload */
-t2=*((C_word*)lf[200]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k7581 in loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7583(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7583,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(C_i_memq(((C_word*)t0)[5],C_retrieve(lf[138])))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-else{
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_retrieve(lf[138]));
-t3=C_mutate((C_word*)lf[138]+1 /* (set! features ...) */,t2);
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}}
-else{
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1046 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_7570(t3,((C_word*)t0)[4],t2);}}
-
-/* complete in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7537(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7537,NULL,3,t0,t1,t2);}
-t3=*((C_word*)lf[10]+1);
-/* g17091710 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,((C_word*)t0)[2]);}
-
-/* load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7497(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7497r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7497r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7497r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(8);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7501,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7518,a[2]=((C_word)li175),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#get-keyword */
-t6=*((C_word*)lf[215]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[218],t3,t5);}
-
-/* a7517 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7518,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7501,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7504,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7515,a[2]=((C_word)li174),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#get-keyword */
-t4=*((C_word*)lf[215]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[217],((C_word*)t0)[2],t3);}
-
-/* a7514 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7515(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7515,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7504(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7504,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7507,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7512,a[2]=((C_word)li173),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#get-keyword */
-t4=*((C_word*)lf[215]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[216],((C_word*)t0)[2],t3);}
-
-/* a7511 in k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7512,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* k7505 in k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 985 ##sys#load */
-t2=*((C_word*)lf[189]+1);
-((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2],t1);}
-
-/* load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7454r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7454r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7454r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7462,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=C_i_string_ref(t2,C_fix(0));
-if(C_truep((C_truep(C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t6=t4;
-f_7462(2,t6,t2);}
-else{
-/* eval.scm: 981 ##sys#string-append */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[172]),t2);}}
-
-/* k7460 in load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7462(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7462,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7466,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t2))){
-/* eval.scm: 978 ##sys#load */
-t4=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=C_i_car(t2);
-/* eval.scm: 978 ##sys#load */
-t6=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t1,t5,C_SCHEME_FALSE);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k7464 in k7460 in load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 978 ##sys#load */
-t2=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7425(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7425r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7425r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7425r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7433,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-/* eval.scm: 975 ##sys#load */
-t5=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-/* eval.scm: 975 ##sys#load */
-t7=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t1,t2,t6,C_SCHEME_FALSE);}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k7431 in load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 975 ##sys#load */
-t2=*((C_word*)lf[189]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+27)){
-C_save_and_reclaim((void*)tr5r,(void*)f_7004r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_7004r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_7004r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a=C_alloc(27);
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_7006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t6,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t4,a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=t3,a[16]=((C_word)li167),tmp=(C_word)a,a+=17,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7372,a[2]=t7,a[3]=((C_word)li168),tmp=(C_word)a,a+=4,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7377,a[2]=t8,a[3]=((C_word)li169),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t5))){
-/* def-timer14931651 */
-t10=t9;
-f_7377(t10,t1);}
-else{
-t10=C_i_car(t5);
-t11=C_i_cdr(t5);
-if(C_truep(C_i_nullp(t11))){
-/* def-printer14941649 */
-t12=t8;
-f_7372(t12,t1,t10);}
-else{
-t12=C_i_car(t11);
-t13=C_i_cdr(t11);
-if(C_truep(C_i_nullp(t13))){
-/* body14911499 */
-t14=t7;
-f_7006(t14,t1,t10,t12);}
-else{
-/* ##sys#error */
-t14=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t1,lf[0],t13);}}}}
-
-/* def-timer1493 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7377(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7377,NULL,2,t0,t1);}
-/* def-printer14941649 */
-t2=((C_word*)t0)[2];
-f_7372(t2,t1,C_SCHEME_FALSE);}
-
-/* def-printer1494 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7372(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7372,NULL,3,t0,t1,t2);}
-/* body14911499 */
-t3=((C_word*)t0)[2];
-f_7006(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7006(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7006,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_7010,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t3,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t2,a[15]=((C_word*)t0)[13],a[16]=t1,a[17]=((C_word*)t0)[14],a[18]=((C_word*)t0)[15],tmp=(C_word)a,a+=19,tmp);
-if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[7])[1]))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7371,a[2]=t4,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 907 ##sys#expand-home-path */
-t6=*((C_word*)lf[212]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
-else{
-t5=t4;
-f_7010(t5,C_SCHEME_UNDEFINED);}}
-
-/* k7369 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_7010(t3,t2);}
-
-/* k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7010(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[26],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7010,NULL,2,t0,t1);}
-t2=C_SCHEME_FALSE;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_7013,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7293,a[2]=t3,a[3]=((C_word*)t0)[7],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 910 port? */
-t6=*((C_word*)lf[211]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
-
-/* k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7293(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7293,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_7013(2,t2,C_SCHEME_FALSE);}
-else{
-if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[3])[1]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7308,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 912 ##sys#file-info */
-t3=*((C_word*)lf[207]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t2=((C_word*)((C_word*)t0)[3])[1];
-/* eval.scm: 903 ##sys#signal-hook */
-t3=*((C_word*)lf[181]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],lf[209],lf[194],lf[210],t2);}}}
-
-/* k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7308,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=C_slot(t1,C_fix(4));
-if(C_truep(t3)){
-t4=C_eqp(C_fix(1),t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
-t6=t2;
-f_7311(t6,C_i_not(((C_word*)((C_word*)t0)[2])[1]));}
-else{
-t4=t2;
-f_7311(t4,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_7311(t3,C_SCHEME_FALSE);}}
-
-/* k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7311(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7311,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_7013(2,t2,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7314,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 918 ##sys#string-append */
-t3=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[3])[1],C_retrieve(lf[208]));}}
-
-/* k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7314,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=C_retrieve(lf[174]);
-if(C_truep(t3)){
-t4=t2;
-f_7320(2,t4,C_SCHEME_FALSE);}
-else{
-if(C_truep(C_fudge(C_fix(24)))){
-/* eval.scm: 921 ##sys#file-info */
-t4=*((C_word*)lf[207]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t1);}
-else{
-t4=t2;
-f_7320(2,t4,C_SCHEME_FALSE);}}}
-
-/* k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7320,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-t3=((C_word*)t0)[4];
-f_7013(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 923 ##sys#string-append */
-t3=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[2])[1],lf[7]);}}
-
-/* k7321 in k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7323,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 924 ##sys#file-info */
-t3=*((C_word*)lf[207]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-
-/* k7327 in k7321 in k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7329(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-f_7013(2,t2,((C_word*)t0)[4]);}
-else{
-t2=((C_word*)((C_word*)t0)[3])[1];
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-f_7013(2,t3,C_SCHEME_FALSE);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=((C_word*)t0)[5];
-f_7013(2,t4,t3);}}}
-
-/* k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[22],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7013,2,t0,t1);}
-t2=((C_word*)t0)[18];
-t3=(C_truep(t2)?t2:((C_word*)t0)[17]);
-t4=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_7019,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=t3,a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=t1,a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
-t5=C_i_stringp(((C_word*)((C_word*)t0)[7])[1]);
-t6=(C_truep(t5)?C_i_not(t1):C_SCHEME_FALSE);
-if(C_truep(t6)){
-/* eval.scm: 929 ##sys#signal-hook */
-t7=*((C_word*)lf[181]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t4,lf[203],lf[194],lf[204],((C_word*)((C_word*)t0)[7])[1]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7284,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 930 load-verbose */
-t8=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t8))(2,t8,t7);}}
-
-/* k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7284(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7284,2,t0,t1);}
-t2=(C_truep(t1)?((C_word*)t0)[5]:C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7272,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 931 display */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[206]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-f_7019(2,t4,t3);}}
-
-/* k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7272,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7275,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 932 display */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k7273 in k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7275,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7278,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 933 display */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[205]);}
-
-/* k7276 in k7273 in k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 934 flush-output */
-t2=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7019(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[25],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7019,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
-if(C_truep(((C_word*)t0)[14])){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7229,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[2],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7257,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 936 ##sys#make-c-string */
-t5=*((C_word*)lf[201]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[14]);}
-else{
-t3=t2;
-f_7022(2,t3,C_SCHEME_FALSE);}}
-
-/* k7255 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7257(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 936 ##sys#dload */
-t2=*((C_word*)lf[200]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7229(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7229,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[5];
-f_7022(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7253,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 937 has-sep? */
-f_6958(t2,((C_word*)t0)[3]);}}
-
-/* k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7253,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_7022(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7245,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7249,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 938 ##sys#string-append */
-t4=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[202],((C_word*)t0)[2]);}}
-
-/* k7247 in k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7249(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 938 ##sys#make-c-string */
-t2=*((C_word*)lf[201]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7243 in k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 938 ##sys#dload */
-t2=*((C_word*)lf[200]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7022,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7025,a[2]=((C_word*)t0)[14],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t1)){
-t3=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7030,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word)li166),tmp=(C_word)a,a+=15,tmp);
-/* eval.scm: 939 call-with-current-continuation */
-t4=*((C_word*)lf[199]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}}
-
-/* a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7030(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[25],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7030,3,t0,t1,t2);}
-t3=C_SCHEME_TRUE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=((C_word*)t0)[13];
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_7034,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t6,a[15]=t4,a[16]=t2,tmp=(C_word)a,a+=17,tmp);
-if(C_truep(((C_word*)t0)[13])){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7216,a[2]=((C_word*)t0)[13],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 945 has-sep? */
-f_6958(t8,((C_word*)t0)[13]);}
-else{
-t8=t7;
-f_7034(2,t8,C_SCHEME_FALSE);}}
-
-/* k7214 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7216(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_fixnum_plus(t1,C_fix(1));
-/* eval.scm: 946 ##sys#substring */
-t3=*((C_word*)lf[197]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2);}
-else{
-t2=((C_word*)t0)[3];
-f_7034(2,t2,lf[198]);}}
-
-/* k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7034(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[52],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7034,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7035,a[2]=((C_word*)t0)[16],a[3]=((C_word)li152),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_FALSE;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7044,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=t13,a[7]=t11,a[8]=t9,a[9]=t7,a[10]=((C_word)li153),tmp=(C_word)a,a+=11,tmp);
-t15=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7055,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word)li164),tmp=(C_word)a,a+=14,tmp);
-t16=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7204,a[2]=t13,a[3]=t11,a[4]=t9,a[5]=t7,a[6]=t5,a[7]=t3,a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[15],a[10]=((C_word)li165),tmp=(C_word)a,a+=11,tmp);
-/* ##sys#dynamic-wind */
-t17=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t17+1)))(5,t17,((C_word*)t0)[2],t14,t15,t16);}
-
-/* a7203 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7204(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7204,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[190]));
-t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[171]));
-t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[172]));
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[170]));
-t6=C_mutate((C_word*)lf[190]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
-t7=C_mutate((C_word*)lf[171]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
-t8=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
-t9=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-
-/* a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7055,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7059,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[5])){
-/* eval.scm: 948 open-input-file */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-t3=t2;
-f_7059(2,t3,((C_word*)((C_word*)t0)[2])[1]);}}
-
-/* k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7059(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[20],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7059,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7064,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7067,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],a[11]=((C_word)li162),tmp=(C_word)a,a+=12,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7195,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li163),tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 949 ##sys#dynamic-wind */
-t5=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,((C_word*)t0)[2],t2,t3,t4);}
-
-/* a7194 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7195(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7195,2,t0,t1);}
-/* eval.scm: 971 close-input-port */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7067,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7071,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* eval.scm: 952 peek-char */
-t3=*((C_word*)lf[196]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[9]);}
-
-/* k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7071(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7071,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7074,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-t3=C_eqp(t1,C_make_character(127));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7189,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#peek-c-string */
-t5=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}
-else{
-t4=t2;
-f_7074(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k7187 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 954 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[194],lf[195],((C_word*)t0)[2],t1);}
-
-/* k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7074,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7077,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* eval.scm: 955 read */
-t3=((C_word*)t0)[10];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[9]);}
-
-/* k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7077,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7082,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t3,a[11]=((C_word)li161),tmp=(C_word)a,a+=12,tmp));
-t5=((C_word*)t3)[1];
-f_7082(t5,((C_word*)t0)[2],t1);}
-
-/* doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7082(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7082,NULL,3,t0,t1,t2);}
-if(C_truep(C_eofp(t2))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7092,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* eval.scm: 958 printer */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-else{
-t4=t3;
-f_7092(2,t4,C_SCHEME_UNDEFINED);}}}
-
-/* k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7092(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7092,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7095,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7104,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li157),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7138,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li160),tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 959 ##sys#call-with-values */
-C_call_with_values(4,0,t2,t3,t4);}
-
-/* a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7138(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7138r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7138r(t0,t1,t2);}}
-
-static void C_ccall f_7138r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(8);
-if(C_truep(((C_word*)t0)[4])){
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7147,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li159),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_7147(t6,t1,t2);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7147(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7147,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7155,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li158),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7165,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g16281629 */
-t6=t3;
-f_7155(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7163 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7165(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_7147(t3,((C_word*)t0)[2],t2);}
-
-/* g1628 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_7155(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7155,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7159,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 968 write */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k7157 in g1628 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 969 newline */
-t2=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7104,2,t0,t1);}
-if(C_truep(((C_word*)t0)[4])){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7111,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* ##sys#start-timer */
-t3=*((C_word*)lf[193]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* eval.scm: 963 evproc */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}}
-
-/* k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7111,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7116,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7122,a[2]=((C_word)li156),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-
-/* a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7122(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7122r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7122r(t0,t1,t2);}}
-
-static void C_ccall f_7122r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(7);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7126,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7133,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#stop-timer */
-t5=*((C_word*)lf[192]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k7131 in a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#display-times */
-((C_proc3)C_retrieve_symbol_proc(lf[191]))(3,*((C_word*)lf[191]+1),((C_word*)t0)[2],t1);}
-
-/* k7124 in a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7126(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a7115 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7116,2,t0,t1);}
-/* eval.scm: 962 evproc */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* k7093 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7095,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7102,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 956 read */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k7100 in k7093 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7102(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_7082(t2,((C_word*)t0)[2],t1);}
-
-/* a7063 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7064(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7064,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* a7043 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7044(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7044,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[190]));
-t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[171]));
-t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[172]));
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[170]));
-t6=C_mutate((C_word*)lf[190]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
-t7=C_mutate((C_word*)lf[171]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
-t8=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
-t9=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-
-/* f_7035 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7035,2,t0,t1);}
-/* eval.scm: 947 abrt */
-t2=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,C_SCHEME_FALSE);}
-
-/* k7023 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_7025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* has-sep? in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_6958(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6958,NULL,2,t1,t2);}
-t3=C_block_size(t2);
-t4=C_fixnum_difference(t3,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6968,a[2]=t2,a[3]=((C_word)li150),tmp=(C_word)a,a+=4,tmp);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_6968(t5,t4));}
-
-/* loop in has-sep? in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static C_word C_fcall f_6968(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-loop:
-C_stack_check;
-if(C_truep(C_i_zerop(t1))){
-return(C_SCHEME_FALSE);}
-else{
-t2=C_subchar(((C_word*)t0)[2],t1);
-if(C_truep((C_truep(C_eqp(t2,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-return(t1);}
-else{
-t3=C_fixnum_difference(t1,C_fix(1));
-t5=t3;
-t1=t5;
-goto loop;}}}
-
-/* set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6883(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[20],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6883,3,t0,t1,t2);}
-t3=C_i_pairp(t2);
-t4=(C_truep(t3)?t2:C_a_i_list(&a,1,t2));
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_TRUE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6890,a[2]=t8,a[3]=t6,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6895,a[2]=t6,a[3]=t8,a[4]=t11,a[5]=((C_word)li148),tmp=(C_word)a,a+=6,tmp));
-t13=((C_word*)t11)[1];
-f_6895(t13,t9,t4);}
-
-/* loop in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_6895(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word *a;
-loop:
-a=C_alloc(5);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6895,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6908,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_eqp(t3,lf[177]);
-if(C_truep(t5)){
-t6=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_TRUE);
-t7=C_slot(t2,C_fix(1));
-/* eval.scm: 882 loop */
-t20=t1;
-t21=t7;
-t1=t20;
-t2=t21;
-goto loop;}
-else{
-t6=C_eqp(t3,lf[178]);
-if(C_truep(t6)){
-t7=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_FALSE);
-t8=C_slot(t2,C_fix(1));
-/* eval.scm: 882 loop */
-t20=t1;
-t21=t8;
-t1=t20;
-t2=t21;
-goto loop;}
-else{
-t7=C_eqp(t3,lf[179]);
-if(C_truep(t7)){
-t8=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_FALSE);
-t9=C_slot(t2,C_fix(1));
-/* eval.scm: 882 loop */
-t20=t1;
-t21=t9;
-t1=t20;
-t2=t21;
-goto loop;}
-else{
-t8=C_eqp(t3,lf[180]);
-if(C_truep(t8)){
-t9=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t10=C_slot(t2,C_fix(1));
-/* eval.scm: 882 loop */
-t20=t1;
-t21=t10;
-t1=t20;
-t2=t21;
-goto loop;}
-else{
-t9=C_slot(t2,C_fix(0));
-/* eval.scm: 881 ##sys#signal-hook */
-t10=*((C_word*)lf[181]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t4,lf[175],lf[182],t9);}}}}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6906 in loop in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* eval.scm: 882 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6895(t3,((C_word*)t0)[2],t2);}
-
-/* k6888 in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 883 ##sys#set-dlopen-flags! */
-t2=*((C_word*)lf[176]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* f_6877 in k6873 in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6877(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6877,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6793,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6796,a[2]=t2,a[3]=((C_word)li144),tmp=(C_word)a,a+=4,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6806,a[2]=t4,a[3]=t6,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=((C_word)li145),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_6806(t8,t1,t2,C_SCHEME_END_OF_LIST,C_fix(0));}
-
-/* loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_6806(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(9);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6806,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6820,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 850 reverse */
-t7=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t3);}
-else{
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_symbolp(t2))){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6839,a[2]=t2,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t7=C_a_i_cons(&a,2,t2,t3);
-/* eval.scm: 852 reverse */
-t8=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t8))(3,t8,t6,t7);}
-else{
-if(C_truep(C_pairp(t2))){
-t6=C_slot(t2,C_fix(1));
-t7=C_slot(t2,C_fix(0));
-t8=C_a_i_cons(&a,2,t7,t3);
-t9=C_fixnum_plus(t4,C_fix(1));
-/* eval.scm: 854 loop */
-t14=t1;
-t15=t6;
-t16=t8;
-t17=t9;
-t1=t14;
-t2=t15;
-t3=t16;
-t4=t17;
-goto loop;}
-else{
-/* eval.scm: 853 err */
-t6=((C_word*)t0)[2];
-f_6796(t6,t1);}}}
-else{
-/* eval.scm: 851 err */
-t6=((C_word*)t0)[2];
-f_6796(t6,t1);}}}
-
-/* k6837 in loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 852 k */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6818 in loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6820(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 850 k */
-t2=((C_word*)t0)[4];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* err in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
-static void C_fcall f_6796(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6796,NULL,2,t0,t1);}
-t2=C_set_block_item(lf[167] /* syntax-error-culprit */,0,C_SCHEME_FALSE);
-/* eval.scm: 847 ##sys#syntax-error-hook */
-t3=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[168],((C_word*)t0)[2]);}
-
-/* eval in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6783r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6783r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6783r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(5);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6791,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 835 ##sys#eval-handler */
-t5=*((C_word*)lf[164]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k6789 in eval in k6778 in k2988 in k2985 in k2952 */
-static void C_ccall f_6791(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(5,0,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr5r,(void*)f_3359r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_3359r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_3359r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(8);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3363,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[2],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_nullp(t5))){
-t7=t6;
-f_3363(2,t7,C_SCHEME_FALSE);}
-else{
-t7=C_i_cdr(t5);
-if(C_truep(C_i_nullp(t7))){
-t8=t6;
-f_3363(2,t8,C_i_car(t5));}
-else{
-/* ##sys#error */
-t8=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
-
-/* k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[41],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3363,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3365,a[2]=t3,a[3]=((C_word)li17),tmp=(C_word)a,a+=4,tmp));
-t15=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3404,a[2]=t3,a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp));
-t16=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3419,a[2]=t5,a[3]=((C_word)li22),tmp=(C_word)a,a+=4,tmp));
-t17=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3526,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
-t18=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3577,a[2]=t13,a[3]=((C_word*)t0)[6],a[4]=t5,a[5]=t9,a[6]=t11,a[7]=((C_word*)t0)[7],a[8]=t7,a[9]=((C_word)li129),tmp=(C_word)a,a+=10,tmp));
-t19=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6457,a[2]=t11,a[3]=((C_word)li141),tmp=(C_word)a,a+=4,tmp));
-t20=C_fixnum_greaterp(C_retrieve(lf[31]),C_fix(0));
-/* eval.scm: 814 compile */
-t21=((C_word*)t11)[1];
-f_3577(t21,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE,t20,t1,((C_word*)t0)[2]);}
-
-/* compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6457(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6457,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6461,a[2]=t6,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t5,a[6]=t4,a[7]=t1,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t8=C_slot(t2,C_fix(0));
-/* eval.scm: 778 compile */
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_3577(t9,t7,t8,t3,C_SCHEME_FALSE,t4,t5,t6);}
-
-/* k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[27],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6461,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[8],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6431,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp);
-t4=f_6431(t2,C_fix(0));
-t5=((C_word*)t0)[8];
-switch(t4){
-case C_SCHEME_FALSE:
-/* eval.scm: 783 ##sys#syntax-error-hook */
-t6=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,((C_word*)t0)[7],lf[163],((C_word*)t0)[8]);
-case C_fix(0):
-t6=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6483,a[2]=t1,a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li131),tmp=(C_word)a,a+=7,tmp));
-case C_fix(1):
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6502,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t7=C_slot(t2,C_fix(0));
-/* eval.scm: 787 compile */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
-case C_fix(2):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6530,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t1,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
-t7=C_slot(t2,C_fix(0));
-/* eval.scm: 791 compile */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
-case C_fix(3):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6565,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=t5,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-t7=C_slot(t2,C_fix(0));
-/* eval.scm: 796 compile */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
-case C_fix(4):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t1,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
-t7=C_slot(t2,C_fix(0));
-/* eval.scm: 802 compile */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
-default:
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6650,a[2]=t5,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6708,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[4],a[10]=((C_word)li140),tmp=(C_word)a,a+=11,tmp));
-t14=((C_word*)t12)[1];
-f_6708(t14,t10,t2);}}
-
-/* loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6708(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6708,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6735,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word)li139),tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6742,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g13371338 */
-t6=t3;
-f_6735(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6740 in loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6742,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13211334 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6708(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13211334 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6708(t6,((C_word*)t0)[3],t5);}}
-
-/* g1337 in loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6735(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6735,NULL,3,t0,t1,t2);}
-/* eval.scm: 809 compile */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t3,t1,t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6648 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6650,2,t0,t1);}
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6651,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word)li138),tmp=(C_word)a,a+=8,tmp));}
-
-/* f_6651 in k6648 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6651(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6651,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6655,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-if(C_truep(t4)){
-t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
-t7=t3;
-f_6655(t7,t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t3;
-f_6655(t7,t6);}}
-
-/* k6653 */
-static void C_fcall f_6655(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6655,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6662,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k6660 in k6653 */
-static void C_ccall f_6662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6662,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6666,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6668,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word)li137),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_6668(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1346 in k6660 in k6653 */
-static void C_fcall f_6668(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6668,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6695,a[2]=((C_word*)t0)[5],a[3]=((C_word)li136),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6702,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g13621363 */
-t6=t3;
-f_6695(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6700 in loop1346 in k6660 in k6653 */
-static void C_ccall f_6702(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6702,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13461359 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6668(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13461359 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6668(t6,((C_word*)t0)[3],t5);}}
-
-/* g1362 in loop1346 in k6660 in k6653 */
-static void C_fcall f_6695(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6695,NULL,3,t0,t1,t2);}
-t3=t2;
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,((C_word*)t0)[2]);}
-
-/* k6664 in k6660 in k6653 */
-static void C_ccall f_6666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6607,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* eval.scm: 803 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6610,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6613,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* eval.scm: 804 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6613,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6616,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 805 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(3)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* k6614 in k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6616,2,t0,t1);}
-t2=((C_word*)t0)[9];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6617,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word)li135),tmp=(C_word)a,a+=11,tmp));}
-
-/* f_6617 in k6614 in k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6617(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6617,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6621,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t2,a[7]=((C_word*)t0)[9],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-if(C_truep(t4)){
-t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
-t7=t3;
-f_6621(t7,t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t3;
-f_6621(t7,t6);}}
-
-/* k6619 */
-static void C_fcall f_6621(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6621,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6624,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-
-/* k6622 in k6619 */
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6631,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k6629 in k6622 in k6619 */
-static void C_ccall f_6631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6631,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k6633 in k6629 in k6622 in k6619 */
-static void C_ccall f_6635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6635,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6639,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k6637 in k6633 in k6629 in k6622 in k6619 */
-static void C_ccall f_6639(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6639,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6643,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6641 in k6637 in k6633 in k6629 in k6622 in k6619 */
-static void C_ccall f_6643(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g13151316 */
-t2=((C_word*)t0)[6];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6565,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6568,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-/* eval.scm: 797 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[2]);}
-
-/* k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6568,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6571,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 798 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[2]);}
-
-/* k6569 in k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6571(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6571,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6572,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word)li134),tmp=(C_word)a,a+=10,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_6572 in k6569 in k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6572(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6572,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6576,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t2,a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-if(C_truep(t4)){
-t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
-t7=t3;
-f_6576(t7,t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t3;
-f_6576(t7,t6);}}
-
-/* k6574 */
-static void C_fcall f_6576(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6576,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6579,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k6577 in k6574 */
-static void C_ccall f_6579(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6579,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6586,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k6584 in k6577 in k6574 */
-static void C_ccall f_6586(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6586,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6590,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k6588 in k6584 in k6577 in k6574 */
-static void C_ccall f_6590(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6590,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6594,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6592 in k6588 in k6584 in k6577 in k6574 */
-static void C_ccall f_6594(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g13061307 */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6530,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6533,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t1,a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 792 compile */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* k6531 in k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6533,2,t0,t1);}
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6534,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word)li133),tmp=(C_word)a,a+=9,tmp));}
-
-/* f_6534 in k6531 in k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6534(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6534,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6538,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-if(C_truep(t4)){
-t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
-t7=t3;
-f_6538(t7,t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t3;
-f_6538(t7,t6);}}
-
-/* k6536 */
-static void C_fcall f_6538(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6538,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6541,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k6539 in k6536 */
-static void C_ccall f_6541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6541,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6548,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k6546 in k6539 in k6536 */
-static void C_ccall f_6548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6548,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6552,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6550 in k6546 in k6539 in k6536 */
-static void C_ccall f_6552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g12981299 */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k6500 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6502(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6502,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6503,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word)li132),tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_6503 in k6500 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6503(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6503,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6507,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-if(C_truep(t4)){
-t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
-t7=t3;
-f_6507(t7,t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=t3;
-f_6507(t7,t6);}}
-
-/* k6505 */
-static void C_fcall f_6507(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6507,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6510,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k6508 in k6505 */
-static void C_ccall f_6510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6510,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6517,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6515 in k6508 in k6505 */
-static void C_ccall f_6517(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g12911292 */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* f_6483 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6483(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6483,3,t0,t1,t2);}
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-if(C_truep(t3)){
-t5=C_emit_eval_trace_info(((C_word*)t0)[3],t4,C_retrieve(lf[159]));
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11763,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 786 fn */
-t7=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
-else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11767,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 786 fn */
-t6=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
-
-/* f11767 */
-static void C_ccall f11767(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g12861287 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* f11763 */
-static void C_ccall f11763(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g12861287 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* loop in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static C_word C_fcall f_6431(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-loop:
-C_stack_check;
-if(C_truep(C_i_nullp(t1))){
-t3=t2;
-return(t3);}
-else{
-if(C_truep(C_i_pairp(t1))){
-t3=C_slot(t1,C_fix(1));
-t4=C_fixnum_plus(t2,C_fix(1));
-t7=t3;
-t8=t4;
-t1=t7;
-t2=t8;
-goto loop;}
-else{
-return(C_SCHEME_FALSE);}}}
-
-/* compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3577(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
-C_word tmp;
-C_word t8;
-C_word t9;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3577,NULL,8,t0,t1,t2,t3,t4,t5,t6,t7);}
-t8=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3584,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t5,a[7]=t4,a[8]=((C_word*)t0)[6],a[9]=t6,a[10]=((C_word*)t0)[7],a[11]=t7,a[12]=t3,a[13]=((C_word*)t0)[8],a[14]=t1,a[15]=t2,tmp=(C_word)a,a+=16,tmp);
-/* eval.scm: 293 keyword? */
-t9=*((C_word*)lf[162]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t2);}
-
-/* k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3584,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3585,a[2]=((C_word*)t0)[15],a[3]=((C_word)li26),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[15]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3597,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[13],a[6]=((C_word)li27),tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3603,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word)li33),tmp=(C_word)a,a+=7,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[14],t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3704,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
-/* eval.scm: 319 ##sys#number? */
-t3=*((C_word*)lf[161]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[15]);}}}
-
-/* k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3704,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[14];
-switch(t2){
-case C_fix(-1):
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3711,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-case C_fix(0):
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3719,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp);
-t4=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);
-case C_fix(1):
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3727,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
-case C_fix(2):
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3735,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp);
-t4=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);
-default:
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3737,a[2]=((C_word*)t0)[14],a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-else{
-if(C_truep(C_booleanp(((C_word*)t0)[14]))){
-if(C_truep(((C_word*)t0)[14])){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3748,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3750,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-else{
-t2=C_charp(((C_word*)t0)[14]);
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3760,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_3760(t4,t2);}
-else{
-t4=C_eofp(((C_word*)t0)[14]);
-t5=t3;
-f_3760(t5,(C_truep(t4)?t4:C_i_stringp(((C_word*)t0)[14])));}}}}
-
-/* k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3760(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3760,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3761,a[2]=((C_word*)t0)[14],a[3]=((C_word)li41),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[14]))){
-t2=C_slot(((C_word*)t0)[14],C_fix(0));
-if(C_truep(C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3780,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-t4=((C_word*)t0)[8];
-t5=((C_word*)t0)[14];
-t6=((C_word*)t0)[7];
-if(C_truep(t4)){
-t7=C_emit_syntax_trace_info(t5,t6,C_retrieve(lf[159]));
-t8=t3;
-f_3780(t8,t7);}
-else{
-t7=C_SCHEME_UNDEFINED;
-t8=t3;
-f_3780(t8,t7);}}
-else{
-t3=((C_word*)t0)[8];
-t4=((C_word*)t0)[14];
-t5=((C_word*)t0)[7];
-if(C_truep(t3)){
-t6=C_emit_syntax_trace_info(t4,t5,C_retrieve(lf[159]));
-/* eval.scm: 755 compile-call */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_6457(t7,((C_word*)t0)[13],((C_word*)t0)[14],((C_word*)t0)[10],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-/* eval.scm: 755 compile-call */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_6457(t6,((C_word*)t0)[13],((C_word*)t0)[14],((C_word*)t0)[10],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}}}
-else{
-/* eval.scm: 334 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[13],lf[160],((C_word*)t0)[14]);}}}
-
-/* k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3780(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3780,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3783,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-/* eval.scm: 337 ##sys#expand */
-((C_proc5)C_retrieve_symbol_proc(lf[158]))(5,*((C_word*)lf[158]+1),t2,((C_word*)t0)[14],((C_word*)t0)[12],C_SCHEME_FALSE);}
-
-/* k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3783(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3783,2,t0,t1);}
-t2=C_retrieve(lf[40]);
-t3=C_eqp(t1,((C_word*)t0)[14]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3798,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-t5=C_slot(((C_word*)t0)[14],C_fix(0));
-/* eval.scm: 341 rename */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t6,t4,t5,((C_word*)t0)[12]);}
-else{
-/* eval.scm: 340 compile */
-t4=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t4,((C_word*)t0)[13],t1,((C_word*)t0)[10],((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}}
-
-/* k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3798(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word ab[21],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3798,2,t0,t1);}
-t2=C_eqp(t1,lf[52]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3807,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 347 ##sys#check-syntax */
-t4=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[52],((C_word*)t0)[13],lf[55],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t3=C_eqp(t1,lf[56]);
-t4=(C_truep(t3)?t3:C_eqp(t1,lf[57]));
-if(C_truep(t4)){
-t5=C_i_cadr(((C_word*)t0)[13]);
-t6=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3885,a[2]=t5,a[3]=((C_word)li50),tmp=(C_word)a,a+=4,tmp));}
-else{
-t5=C_eqp(t1,lf[58]);
-if(C_truep(t5)){
-t6=C_i_cadr(((C_word*)t0)[13]);
-if(C_truep(C_retrieve(lf[22]))){
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3901,a[2]=((C_word*)t0)[14],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 366 ##sys#hash-table-location */
-t8=*((C_word*)lf[21]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,C_retrieve(lf[22]),t6,C_SCHEME_TRUE);}
-else{
-t7=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3907,a[2]=t6,a[3]=((C_word)li52),tmp=(C_word)a,a+=4,tmp));}}
-else{
-t6=C_eqp(t1,lf[59]);
-if(C_truep(t6)){
-t7=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 371 compile */
-t8=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t8,((C_word*)t0)[14],t7,((C_word*)t0)[10],((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-t7=C_eqp(t1,lf[60]);
-if(C_truep(t7)){
-t8=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 374 compile */
-t9=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t9,((C_word*)t0)[14],t8,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-t8=C_eqp(t1,lf[61]);
-if(C_truep(t8)){
-t9=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3941,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp));}
-else{
-t9=C_eqp(t1,lf[62]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3951,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 379 ##sys#check-syntax */
-t11=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t11+1)))(7,t11,t10,lf[62],((C_word*)t0)[13],lf[64],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t10=C_eqp(t1,lf[65]);
-t11=(C_truep(t10)?t10:C_eqp(t1,lf[66]));
-if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 388 ##sys#check-syntax */
-t13=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t13+1)))(7,t13,t12,lf[65],((C_word*)t0)[13],lf[69],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t12=C_eqp(t1,lf[70]);
-t13=(C_truep(t12)?t12:C_eqp(t1,lf[71]));
-if(C_truep(t13)){
-t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4123,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 404 ##sys#check-syntax */
-t15=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t15+1)))(7,t15,t14,lf[70],((C_word*)t0)[13],lf[74],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t14=C_eqp(t1,lf[75]);
-t15=(C_truep(t14)?t14:C_eqp(t1,lf[76]));
-if(C_truep(t15)){
-t16=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4235,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 428 ##sys#check-syntax */
-t17=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t17+1)))(7,t17,t16,lf[75],((C_word*)t0)[13],lf[84],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t16=C_eqp(t1,lf[85]);
-t17=(C_truep(t16)?t16:C_eqp(t1,lf[86]));
-if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4732,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 480 ##sys#check-syntax */
-t19=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t19+1)))(5,t19,t18,lf[85],((C_word*)t0)[13],lf[88]);}
-else{
-t18=C_eqp(t1,lf[89]);
-t19=(C_truep(t18)?t18:C_eqp(t1,lf[90]));
-if(C_truep(t19)){
-t20=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4889,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 495 ##sys#check-syntax */
-t21=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t21+1)))(7,t21,t20,lf[89],((C_word*)t0)[13],lf[98],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t20=C_eqp(t1,lf[99]);
-if(C_truep(t20)){
-t21=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5337,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 590 ##sys#check-syntax */
-t22=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t22+1)))(7,t22,t21,lf[99],((C_word*)t0)[13],lf[101],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t21=C_eqp(t1,lf[102]);
-if(C_truep(t21)){
-t22=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5424,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 605 ##sys#check-syntax */
-t23=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t23+1)))(7,t23,t22,lf[102],((C_word*)t0)[13],lf[103],C_SCHEME_FALSE,((C_word*)t0)[12]);}
-else{
-t22=C_eqp(t1,lf[104]);
-if(C_truep(t22)){
-t23=C_i_cadr(((C_word*)t0)[13]);
-t24=C_i_caddr(((C_word*)t0)[13]);
-t25=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5551,a[2]=t24,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-/* eval.scm: 625 rename */
-t26=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t26,t25,t23,((C_word*)t0)[12]);}
-else{
-t23=C_eqp(t1,lf[109]);
-if(C_truep(t23)){
-/* eval.scm: 636 compile */
-t24=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t24,((C_word*)t0)[14],lf[110],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-t24=C_eqp(t1,lf[111]);
-if(C_truep(t24)){
-t25=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5598,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-t26=C_i_cddr(((C_word*)t0)[13]);
-/* eval.scm: 640 ##sys#canonicalize-body */
-t27=*((C_word*)lf[80]+1);
-((C_proc5)(void*)(*((C_word*)t27+1)))(5,t27,t25,t26,((C_word*)t0)[12],C_SCHEME_FALSE);}
-else{
-t25=C_eqp(t1,lf[112]);
-if(C_truep(t25)){
-t26=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5611,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
-t27=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 644 ##sys#strip-syntax */
-((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t26,t27);}
-else{
-t26=C_eqp(t1,lf[119]);
-if(C_truep(t26)){
-t27=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5868,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 689 rename */
-t28=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t28,t27,lf[89],((C_word*)t0)[12]);}
-else{
-t27=C_eqp(t1,lf[120]);
-if(C_truep(t27)){
-t28=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5897,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 692 rename */
-t29=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t29,t28,lf[89],((C_word*)t0)[12]);}
-else{
-t28=C_eqp(t1,lf[121]);
-if(C_truep(t28)){
-t29=C_SCHEME_END_OF_LIST;
-t30=(*a=C_VECTOR_TYPE|1,a[1]=t29,tmp=(C_word)a,a+=2,tmp);
-t31=C_SCHEME_FALSE;
-t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
-t33=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5914,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-t34=C_i_cdr(((C_word*)t0)[13]);
-t35=C_SCHEME_UNDEFINED;
-t36=(*a=C_VECTOR_TYPE|1,a[1]=t35,tmp=(C_word)a,a+=2,tmp);
-t37=C_set_block_item(t36,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5991,a[2]=t30,a[3]=t36,a[4]=t32,a[5]=((C_word*)t0)[5],a[6]=((C_word)li123),tmp=(C_word)a,a+=7,tmp));
-t38=((C_word*)t36)[1];
-f_5991(t38,t33,t34);}
-else{
-t29=C_eqp(t1,lf[125]);
-if(C_truep(t29)){
-t30=C_i_caddr(((C_word*)t0)[13]);
-t31=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6045,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6049,a[2]=t31,a[3]=t30,tmp=(C_word)a,a+=4,tmp);
-t33=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 709 ##sys#strip-syntax */
-((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t32,t33);}
-else{
-t30=C_eqp(t1,lf[128]);
-t31=(C_truep(t30)?t30:C_eqp(t1,lf[129]));
-if(C_truep(t31)){
-t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6109,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-t33=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 719 eval/meta */
-f_3526(t32,t33);}
-else{
-t32=C_eqp(t1,lf[131]);
-if(C_truep(t32)){
-t33=C_i_cadr(((C_word*)t0)[13]);
-/* eval.scm: 723 compile */
-t34=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t34,((C_word*)t0)[14],t33,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-t33=C_eqp(t1,lf[132]);
-t34=(C_truep(t33)?t33:C_eqp(t1,lf[133]));
-if(C_truep(t34)){
-/* eval.scm: 726 compile */
-t35=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t35,((C_word*)t0)[14],lf[134],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
-else{
-t35=C_eqp(t1,lf[135]);
-if(C_truep(t35)){
-t36=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6150,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_memq(lf[137],C_retrieve(lf[138])))){
-t37=C_i_cdr(((C_word*)t0)[13]);
-t38=C_SCHEME_UNDEFINED;
-t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
-t40=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6165,a[2]=t39,a[3]=((C_word*)t0)[12],a[4]=((C_word)li128),tmp=(C_word)a,a+=5,tmp));
-t41=((C_word*)t39)[1];
-f_6165(t41,t36,t37);}
-else{
-/* eval.scm: 731 ##sys#warn */
-t37=*((C_word*)lf[140]+1);
-((C_proc4)(void*)(*((C_word*)t37+1)))(4,t37,t36,lf[141],((C_word*)t0)[13]);}}
-else{
-t36=C_eqp(t1,lf[142]);
-t37=(C_truep(t36)?t36:C_eqp(t1,lf[143]));
-if(C_truep(t37)){
-t38=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6214,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 735 rename */
-t39=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t39,t38,lf[144],((C_word*)t0)[12]);}
-else{
-t38=C_eqp(t1,lf[50]);
-t39=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6231,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[2],a[7]=t1,a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t38)){
-t40=t39;
-f_6231(t40,t38);}
-else{
-t40=C_eqp(t1,lf[149]);
-if(C_truep(t40)){
-t41=t39;
-f_6231(t41,t40);}
-else{
-t41=C_eqp(t1,lf[150]);
-if(C_truep(t41)){
-t42=t39;
-f_6231(t42,t41);}
-else{
-t42=C_eqp(t1,lf[151]);
-if(C_truep(t42)){
-t43=t39;
-f_6231(t43,t42);}
-else{
-t43=C_eqp(t1,lf[152]);
-if(C_truep(t43)){
-t44=t39;
-f_6231(t44,t43);}
-else{
-t44=C_eqp(t1,lf[153]);
-if(C_truep(t44)){
-t45=t39;
-f_6231(t45,t44);}
-else{
-t45=C_eqp(t1,lf[154]);
-if(C_truep(t45)){
-t46=t39;
-f_6231(t46,t45);}
-else{
-t46=C_eqp(t1,lf[155]);
-if(C_truep(t46)){
-t47=t39;
-f_6231(t47,t46);}
-else{
-t47=C_eqp(t1,lf[156]);
-t48=t39;
-f_6231(t48,(C_truep(t47)?t47:C_eqp(t1,lf[157])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-
-/* k6229 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6231(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-/* eval.scm: 742 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[9],lf[145],((C_word*)t0)[8]);}
-else{
-t2=C_eqp(((C_word*)t0)[7],lf[146]);
-if(C_truep(t2)){
-t3=C_i_cdr(((C_word*)t0)[8]);
-/* eval.scm: 745 compile-call */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_6457(t4,((C_word*)t0)[9],t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t3=C_eqp(((C_word*)t0)[7],lf[147]);
-if(C_truep(t3)){
-/* eval.scm: 749 ##sys#syntax-error-hook */
-t4=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[9],lf[148],((C_word*)t0)[8]);}
-else{
-/* eval.scm: 751 compile-call */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_6457(t4,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}}}
-
-/* k6212 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6214(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6214,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6218,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k6216 in k6212 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6218,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-/* eval.scm: 735 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6165(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6165,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6173,a[2]=((C_word*)t0)[3],a[3]=((C_word)li127),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6180,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g11781179 */
-t6=t3;
-f_6173(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6178 in loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6165(t3,((C_word*)t0)[2],t2);}
-
-/* g1178 in loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6173(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6173,NULL,3,t0,t1,t2);}
-/* eval.scm: 730 ##compiler#process-declaration */
-((C_proc4)C_retrieve_symbol_proc(lf[139]))(4,*((C_word*)lf[139]+1),t1,t2,((C_word*)t0)[2]);}
-
-/* k6148 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 732 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],lf[136],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6107 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6109(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 720 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],lf[130],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6049,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6051,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_6051(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6051(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6051,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[126]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6063,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li124),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6073,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}}
-
-/* a6072 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6073,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6089,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=C_i_cdr(((C_word*)t0)[3]);
-/* eval.scm: 715 loop */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_6051(t6,t4,t5);}
-
-/* k6087 in a6072 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6089,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[66],t3));}
-
-/* a6062 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6063,2,t0,t1);}
-t2=C_i_car(((C_word*)t0)[3]);
-/* eval.scm: 713 ##sys#do-the-right-thing */
-t3=*((C_word*)lf[127]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k6043 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 708 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5991(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5991,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6018,a[2]=((C_word*)t0)[5],a[3]=((C_word)li122),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6025,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g11001101 */
-t6=t3;
-f_6018(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6023 in loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_6025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6025,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10841097 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5991(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10841097 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5991(t6,((C_word*)t0)[3],t5);}}
-
-/* g1100 in loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6018(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6018,NULL,3,t0,t1,t2);}
-/* eval.scm: 696 eval/meta */
-f_3526(t1,t2);}
-
-/* k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5914,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5917,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-C_apply(4,0,t2,C_retrieve(lf[123]),t1);}
-
-/* k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5917(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5917,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5920,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* eval.scm: 699 ##sys#lookup-runtime-requirements */
-t3=*((C_word*)lf[124]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5920(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5920,2,t0,t1);}
-if(C_truep(C_i_nullp(t1))){
-/* eval.scm: 700 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],lf[122],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5937,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5941,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5943,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li121),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_5943(t11,t7,t1);}}
-
-/* loop1113 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5943(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(9);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_5943,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=C_a_i_cons(&a,2,lf[52],t4);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop11131126 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop11131126 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5939 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k5935 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5937,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[123],t1);
-/* eval.scm: 700 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5895 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5897(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5897,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5901,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cddr(((C_word*)t0)[8]);
-/* ##sys#append */
-t4=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k5899 in k5895 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5901,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=C_i_cadr(((C_word*)t0)[8]);
-/* eval.scm: 692 compile */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t4,((C_word*)t0)[6],t2,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5866 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5868(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5872,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k5870 in k5866 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5872,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-/* eval.scm: 689 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5611(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5611,2,t0,t1);}
-t2=C_i_caddr(((C_word*)t0)[7]);
-t3=C_eqp(C_SCHEME_TRUE,t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5617,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_5617(2,t5,t3);}
-else{
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5755,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t10=C_i_caddr(((C_word*)t0)[7]);
-/* eval.scm: 659 ##sys#strip-syntax */
-((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t9,t10);}}
-
-/* k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5755,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5757,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li120),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_5757(t5,((C_word*)t0)[2],t1);}
-
-/* loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5757(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5757,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5784,a[2]=((C_word*)t0)[5],a[3]=((C_word)li119),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5835,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g994995 */
-t6=t3;
-f_5784(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5833 in loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5835(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5835,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop978991 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5757(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop978991 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5757(t6,((C_word*)t0)[3],t5);}}
-
-/* g994 in loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5784(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5784,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_symbolp(t2))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5797,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5808,a[2]=((C_word)li118),tmp=(C_word)a,a+=3,tmp);
-t5=t3;
-f_5797(t5,f_5808(t2));}
-else{
-t4=t3;
-f_5797(t4,C_SCHEME_FALSE);}}}
-
-/* loop in g994 in loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static C_word C_fcall f_5808(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-t2=C_i_nullp(t1);
-if(C_truep(t2)){
-return(t2);}
-else{
-t3=C_i_car(t1);
-if(C_truep(C_i_symbolp(t3))){
-t4=C_i_cdr(t1);
-t6=t4;
-t1=t6;
-goto loop;}
-else{
-return(C_SCHEME_FALSE);}}}
-
-/* k5795 in g994 in loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5797(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[3]);}
-else{
-/* eval.scm: 656 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[47]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[116],lf[118],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5617,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5620,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5745,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 660 ##sys#current-module */
-((C_proc2)C_retrieve_symbol_proc(lf[41]))(2,*((C_word*)lf[41]+1),t3);}
-
-/* k5743 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* eval.scm: 661 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[47]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[116],lf[117],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_5620(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5620(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5620,2,t0,t1);}
-t2=C_retrieve(lf[41]);
-t3=C_retrieve(lf[107]);
-t4=C_retrieve(lf[42]);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5623,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=t2,a[9]=t3,a[10]=t4,tmp=(C_word)a,a+=11,tmp);
-/* eval.scm: 663 ##sys#register-module */
-((C_proc4)C_retrieve_symbol_proc(lf[115]))(4,*((C_word*)lf[115]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5623,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_retrieve(lf[113]);
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5624,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=t7,a[6]=t5,a[7]=t3,a[8]=((C_word)li113),tmp=(C_word)a,a+=9,tmp);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5651,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word)li117),tmp=(C_word)a,a+=8,tmp);
-/* ##sys#dynamic-wind */
-t10=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,((C_word*)t0)[2],t8,t9,t8);}
-
-/* a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5651(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5651,2,t0,t1);}
-t2=C_i_cdddr(((C_word*)t0)[6]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5661,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word)li116),tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_5661(t6,t1,t2,C_SCHEME_END_OF_LIST);}
-
-/* loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5661(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5661,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5671,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 668 reverse */
-t5=((C_word*)t0)[6];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}
-else{
-t4=C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5734,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t6=C_i_car(t2);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5742,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t6,a[5]=t5,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 685 ##sys#current-environment */
-((C_proc2)C_retrieve_symbol_proc(lf[107]))(2,*((C_word*)lf[107]+1),t7);}}
-
-/* k5740 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 682 compile */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t2,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k5732 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5734,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-/* eval.scm: 680 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_5661(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k5669 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5671,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5674,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5719,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 669 ##sys#current-module */
-((C_proc2)C_retrieve_symbol_proc(lf[41]))(2,*((C_word*)lf[41]+1),t3);}
-
-/* k5717 in k5669 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 669 ##sys#finalize-module */
-((C_proc3)C_retrieve_symbol_proc(lf[114]))(3,*((C_word*)lf[114]+1),((C_word*)t0)[2],t1);}
-
-/* k5672 in k5669 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5674,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5675,a[2]=((C_word*)t0)[3],a[3]=((C_word)li115),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_5675 in k5672 in k5669 in loop in a5650 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5675(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5675,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5681,a[2]=t2,a[3]=t4,a[4]=((C_word)li114),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_5681(t6,t1,((C_word*)t0)[2]);}
-
-/* loop2 */
-static void C_fcall f_5681(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5681,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_retrieve(lf[40]));}
-else{
-t3=C_slot(t2,C_fix(1));
-if(C_truep(C_i_pairp(t3))){
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5706,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* g10641065 */
-t6=t4;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}
-else{
-t4=C_slot(t2,C_fix(0));
-/* g10671068 */
-t5=t4;
-((C_proc3)C_retrieve_proc(t5))(3,t5,t1,((C_word*)t0)[2]);}}}
-
-/* k5704 in loop2 */
-static void C_ccall f_5706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 677 loop2 */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_5681(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5624,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5628,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* g102310241035 */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5628,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5631,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* g102310241035 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
-
-/* k5629 in k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5631,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5635,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* g102510261036 */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k5633 in k5629 in k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5635,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5638,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* g102510261036 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k5636 in k5633 in k5629 in k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5638,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5642,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g102710281037 */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k5640 in k5636 in k5633 in k5629 in k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5642,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5645,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g102710281037 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k5643 in k5640 in k5636 in k5633 in k5629 in k5626 in swap1020 in k5621 in k5618 in k5615 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k5596 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 639 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5551,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5554,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5576,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 627 ##sys#current-module */
-((C_proc2)C_retrieve_symbol_proc(lf[41]))(2,*((C_word*)lf[41]+1),t3);}
-
-/* k5574 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5576(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 626 ##sys#register-syntax-export */
-((C_proc5)C_retrieve_symbol_proc(lf[108]))(5,*((C_word*)lf[108]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5552 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5554(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5554,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5557,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5564,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 631 ##sys#current-environment */
-((C_proc2)C_retrieve_symbol_proc(lf[107]))(2,*((C_word*)lf[107]+1),t3);}
-
-/* k5562 in k5552 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5564(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5564,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5568,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5572,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 632 eval/meta */
-f_3526(t3,((C_word*)t0)[2]);}
-
-/* k5570 in k5562 in k5552 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5572(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 632 ##sys#er-transformer */
-((C_proc3)C_retrieve_symbol_proc(lf[100]))(3,*((C_word*)lf[100]+1),((C_word*)t0)[2],t1);}
-
-/* k5566 in k5562 in k5552 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 629 ##sys#extend-macro-environment */
-((C_proc5)C_retrieve_symbol_proc(lf[106]))(5,*((C_word*)lf[106]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k5555 in k5552 in k5549 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5557(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 633 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],lf[105],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[22],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5424,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5427,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t7=C_i_cadr(((C_word*)t0)[4]);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5482,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li112),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_5482(t11,t6,t7);}
-
-/* loop923 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5482(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5482,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5509,a[2]=((C_word*)t0)[5],a[3]=((C_word)li111),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5532,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g939940 */
-t6=t3;
-f_5509(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5530 in loop923 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5532,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop923936 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5482(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop923936 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5482(t6,((C_word*)t0)[3],t5);}}
-
-/* g939 in loop923 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5509(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5509,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5521,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5525,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cadr(t2);
-/* eval.scm: 611 eval/meta */
-f_3526(t5,t6);}
-
-/* k5523 in g939 in loop923 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5525(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 610 ##sys#er-transformer */
-((C_proc3)C_retrieve_symbol_proc(lf[100]))(3,*((C_word*)lf[100]+1),((C_word*)t0)[2],t1);}
-
-/* k5519 in g939 in loop923 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5521,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,3,((C_word*)t0)[2],C_SCHEME_FALSE,t1));}
-
-/* k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5427(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5427,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5430,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 613 append */
-t3=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,((C_word*)t0)[2]);}
-
-/* k5428 in k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5430(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5433,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5446,a[2]=t4,a[3]=t1,a[4]=((C_word)li110),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_5446(t6,t2,((C_word*)t0)[2]);}
-
-/* loop948 in k5428 in k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5446(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_5446,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5454,a[2]=((C_word*)t0)[3],a[3]=((C_word)li109),tmp=(C_word)a,a+=4,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=f_5454(t3,t4);
-t6=C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g955 in loop948 in k5428 in k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static C_word C_fcall f_5454(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=C_i_cdr(t1);
-return(C_i_set_car(t2,((C_word*)t0)[2]));}
-
-/* k5431 in k5428 in k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5433,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5440,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-/* eval.scm: 619 ##sys#canonicalize-body */
-t4=*((C_word*)lf[80]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,((C_word*)t0)[3],C_SCHEME_FALSE);}
-
-/* k5438 in k5431 in k5428 in k5425 in k5422 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 618 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[26],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5337,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5340,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5355,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_i_cadr(((C_word*)t0)[4]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5361,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=((C_word)li108),tmp=(C_word)a,a+=8,tmp));
-t12=((C_word*)t10)[1];
-f_5361(t12,t7,t8);}
-
-/* loop896 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5361(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5361,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5388,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li107),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5411,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g912913 */
-t6=t3;
-f_5388(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5409 in loop896 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5411(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5411,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop896909 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5361(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop896909 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5361(t6,((C_word*)t0)[3],t5);}}
-
-/* g912 in loop896 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5388(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5388,NULL,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5400,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5404,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_i_cadr(t2);
-/* eval.scm: 597 eval/meta */
-f_3526(t5,t6);}
-
-/* k5402 in g912 in loop896 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5404(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 596 ##sys#er-transformer */
-((C_proc3)C_retrieve_symbol_proc(lf[100]))(3,*((C_word*)lf[100]+1),((C_word*)t0)[2],t1);}
-
-/* k5398 in g912 in loop896 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5400(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5400,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k5353 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 591 append */
-t2=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5338 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5340(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5340,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5347,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_i_cddr(((C_word*)t0)[2]);
-/* eval.scm: 601 ##sys#canonicalize-body */
-t4=*((C_word*)lf[80]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,t1,C_SCHEME_FALSE);}
-
-/* k5345 in k5338 in k5335 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 600 compile */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4889,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[7]);
-t3=t2;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_i_cddr(((C_word*)t0)[7]);
-t6=t5;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=((C_word*)t0)[6];
-t9=(C_truep(t8)?C_a_i_cons(&a,2,t8,((C_word*)t4)[1]):C_a_i_cons(&a,2,lf[91],((C_word*)t4)[1]));
-t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4901,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t7,a[6]=t9,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5310,a[2]=t10,a[3]=((C_word*)t0)[3],a[4]=t7,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 499 ##sys#extended-lambda-list? */
-t12=*((C_word*)lf[97]+1);
-((C_proc3)(void*)(*((C_word*)t12+1)))(3,t12,t11,((C_word*)t4)[1]);}
-
-/* k5308 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5310,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5315,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li105),tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5321,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li106),tmp=(C_word)a,a+=5,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-else{
-t2=((C_word*)t0)[2];
-f_4901(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* a5320 in k5308 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_5321,4,t0,t1,t2,t3);}
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* a5314 in k5308 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5315(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5315,2,t0,t1);}
-/* eval.scm: 502 ##sys#expand-extended-lambda-list */
-((C_proc6)C_retrieve_symbol_proc(lf[96]))(6,*((C_word*)lf[96]+1),t1,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],*((C_word*)lf[47]+1),((C_word*)t0)[2]);}
-
-/* k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4901,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4906,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word)li104),tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 504 ##sys#decompose-lambda-list */
-t3=*((C_word*)lf[95]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t2);}
-
-/* a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4906(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[24],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4906,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4910,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t4,a[9]=t1,a[10]=t3,a[11]=((C_word*)t0)[7],tmp=(C_word)a,a+=12,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5274,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word)li103),tmp=(C_word)a,a+=6,tmp));
-t13=((C_word*)t11)[1];
-f_5274(t13,t9,t2);}
-
-/* loop790 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5274(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5274,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[83]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5303,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g806807 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5301 in loop790 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5303,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop790803 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5274(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop790803 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5274(t6,((C_word*)t0)[3],t5);}}
-
-/* k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[27],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4910,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4913,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5223,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5225,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li102),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_5225(t11,t7,((C_word*)t0)[2],t1);}
-
-/* loop814 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5225(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5225,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[82]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5258,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g834835 */
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k5256 in loop814 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5258,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5238,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_5238(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_5238(t5,t4);}}
-
-/* k5236 in k5256 in loop814 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_5238(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop814828 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_5225(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k5221 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 508 append */
-t2=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4913(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4913,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[10],((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4919,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5215,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 512 ##sys#canonicalize-body */
-t5=*((C_word*)lf[80]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,((C_word*)((C_word*)t0)[2])[1],t1,C_SCHEME_FALSE);}
-
-/* k5213 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5215(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[6];
-if(C_truep(t2)){
-/* eval.scm: 511 ##sys#compile-to-closure */
-t3=*((C_word*)lf[35]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],t2);}
-else{
-t3=((C_word*)t0)[2];
-/* eval.scm: 511 ##sys#compile-to-closure */
-t4=*((C_word*)lf[35]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],t3);}}
-
-/* k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4919,2,t0,t1);}
-t2=((C_word*)t0)[7];
-switch(t2){
-case C_fix(0):
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(((C_word*)t0)[5])?(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4929,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li78),tmp=(C_word)a,a+=7,tmp):(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4948,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li80),tmp=(C_word)a,a+=7,tmp)));
-case C_fix(1):
-if(C_truep(((C_word*)t0)[5])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4972,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li82),tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4991,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li84),tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-case C_fix(2):
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(((C_word*)t0)[5])?(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5019,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li86),tmp=(C_word)a,a+=7,tmp):(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5038,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li88),tmp=(C_word)a,a+=7,tmp)));
-case C_fix(3):
-if(C_truep(((C_word*)t0)[5])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5066,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li90),tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li92),tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-default:
-t3=C_eqp(t2,C_fix(4));
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?(C_truep(((C_word*)t0)[5])?(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5113,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li94),tmp=(C_word)a,a+=7,tmp):(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5132,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word)li96),tmp=(C_word)a,a+=7,tmp)):(C_truep(((C_word*)t0)[5])?(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5154,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=((C_word)li99),tmp=(C_word)a,a+=8,tmp):(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5177,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[7],a[7]=((C_word)li101),tmp=(C_word)a,a+=8,tmp))));}}
-
-/* f_5177 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5177(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5177,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5183,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[6],a[5]=((C_word)li100),tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5182 */
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_5183r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_5183r(t0,t1,t2);}}
-
-static void C_ccall f_5183r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t3=C_i_length(t2);
-t4=C_eqp(t3,((C_word*)t0)[4]);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5207,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-C_apply(4,0,t5,*((C_word*)lf[92]+1),t2);}
-else{
-/* eval.scm: 585 ##sys#error */
-t5=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,lf[94],((C_word*)t0)[4],t3);}}
-
-/* k5205 in a5182 */
-static void C_ccall f_5207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5207,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* f_5154 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5154(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5154,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5160,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word)li98),tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5159 */
-static void C_ccall f_5160(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+15)){
-C_save_and_reclaim((void*)tr2r,(void*)f_5160r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_5160r(t0,t1,t2);}}
-
-static void C_ccall f_5160r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(15);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5172,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5176,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=((C_word*)t0)[2];
-if(C_truep(C_i_nullp(t2))){
-t6=C_a_i_list(&a,1,t2);
-C_apply(4,0,t3,*((C_word*)lf[92]+1),t6);}
-else{
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6385,a[2]=t7,a[3]=t2,a[4]=((C_word)li97),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_6385(t9,t4,t5,C_fix(0),t2,C_SCHEME_FALSE);}}
-
-/* doloop1249 in a5159 */
-static void C_fcall f_6385(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word *a;
-loop:
-a=C_alloc(7);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6385,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_eqp(t2,C_fix(0));
-if(C_truep(t6)){
-t7=C_a_i_list(&a,1,t4);
-t8=C_i_setslot(t5,C_fix(1),t7);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,((C_word*)t0)[3]);}
-else{
-t7=C_fixnum_difference(t2,C_fix(1));
-t8=C_fixnum_plus(t3,C_fix(1));
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6414,a[2]=t4,a[3]=t8,a[4]=t7,a[5]=t1,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-t10=C_eqp(C_SCHEME_END_OF_LIST,t4);
-if(C_truep(t10)){
-/* eval.scm: 764 ##sys#error */
-t11=*((C_word*)lf[11]+1);
-((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t9,lf[93],t2,t3);}
-else{
-t11=C_slot(t4,C_fix(1));
-t15=t1;
-t16=t7;
-t17=t8;
-t18=t11;
-t19=t4;
-t1=t15;
-t2=t16;
-t3=t17;
-t4=t18;
-t5=t19;
-goto loop;}}}
-
-/* k6412 in doloop1249 in a5159 */
-static void C_ccall f_6414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_6385(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k5174 in a5159 */
-static void C_ccall f_5176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[92]+1),t1);}
-
-/* k5170 in a5159 */
-static void C_ccall f_5172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5172,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* f_5132 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5132(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5132,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5138,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li95),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5137 */
-static void C_ccall f_5138(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_5138,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5150,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 569 ##sys#vector */
-t7=*((C_word*)lf[92]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t6,t2,t3,t4,t5);}
-
-/* k5148 in a5137 */
-static void C_ccall f_5150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5150,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* f_5113 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5113(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5113,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5119,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li93),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5118 */
-static void C_ccall f_5119(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,...){
-C_word tmp;
-C_word t6;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t5,c2,6);
-if(c<6) C_bad_min_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+9)){
-C_save_and_reclaim((void*)tr6r,(void*)f_5119r,6,t0,t1,t2,t3,t4,t5);}
-else{
-a=C_alloc((c-6)*3);
-t6=C_restore_rest(a,C_rest_count(0));
-f_5119r(t0,t1,t2,t3,t4,t5,t6);}}
-
-static void C_ccall f_5119r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(9);
-t7=C_a_i_vector(&a,5,t2,t3,t4,t5,t6);
-t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[3]);
-t9=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t1,t8);}
-
-/* f_5085 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5085(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5085,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5091,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li91),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5090 */
-static void C_ccall f_5091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5091,5,t0,t1,t2,t3,t4);}
-t5=C_a_i_vector(&a,3,t2,t3,t4);
-t6=C_a_i_cons(&a,2,t5,((C_word*)t0)[3]);
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t1,t6);}
-
-/* f_5066 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5066(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5066,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5072,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li89),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5071 */
-static void C_ccall f_5072(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr5r,(void*)f_5072r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_5072r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_5072r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(8);
-t6=C_a_i_vector(&a,4,t2,t3,t4,t5);
-t7=C_a_i_cons(&a,2,t6,((C_word*)t0)[3]);
-t8=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t1,t7);}
-
-/* f_5038 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5038(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5038,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5044,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li87),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5043 */
-static void C_ccall f_5044(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_5044,4,t0,t1,t2,t3);}
-t4=C_a_i_vector(&a,2,t2,t3);
-t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[3]);
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}
-
-/* f_5019 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_5019(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5019,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5025,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li85),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a5024 */
-static void C_ccall f_5025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr4r,(void*)f_5025r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_5025r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_5025r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(7);
-t5=C_a_i_vector(&a,3,t2,t3,t4);
-t6=C_a_i_cons(&a,2,t5,((C_word*)t0)[3]);
-t7=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t1,t6);}
-
-/* f_4991 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4991(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4991,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4997,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li83),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a4996 */
-static void C_ccall f_4997(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4997,3,t0,t1,t2);}
-t3=C_a_i_vector(&a,1,t2);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
-
-/* f_4972 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4972(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4972,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4978,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li81),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a4977 */
-static void C_ccall f_4978(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr3r,(void*)f_4978r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_4978r(t0,t1,t2,t3);}}
-
-static void C_ccall f_4978r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t4=C_a_i_vector(&a,2,t2,t3);
-t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[3]);
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}
-
-/* f_4948 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4948(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4948,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4954,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a4953 */
-static void C_ccall f_4954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4954,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-
-/* f_4929 in k4917 in k4911 in k4908 in a4905 in k4899 in k4887 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4929(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4929,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4935,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word)li77),tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-/* eval.scm: 274 ##sys#eval-decorator */
-t6=*((C_word*)lf[24]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,t3,((C_word*)t0)[2],t4,t5);}
-
-/* a4934 */
-static void C_ccall f_4935(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_4935r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_4935r(t0,t1,t2);}}
-
-static void C_ccall f_4935r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(5);
-t3=C_a_i_vector(&a,1,t2);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
-
-/* k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4732(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4732,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[9]);
-t3=C_i_cddr(((C_word*)t0)[9]);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4753,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4835,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li76),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_4835(t12,t8,t2);}
-
-/* loop710 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4835(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(9);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4835,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_a_i_list(&a,2,t4,lf[87]);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop710723 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=C_slot(t2,C_fix(1));
-/* loop710723 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4751 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[26],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4753,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4757,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4761,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4779,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li75),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_4779(t11,t7,((C_word*)t0)[2]);}
-
-/* loop734 in k4751 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4779(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word *a;
-loop:
-a=C_alloc(12);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4779,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_i_cadr(t3);
-t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=C_a_i_cons(&a,2,t4,t6);
-t8=C_a_i_cons(&a,2,lf[71],t7);
-t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t10=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t9);
-t11=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t12=C_slot(t2,C_fix(1));
-/* loop734747 */
-t18=t1;
-t19=t12;
-t1=t18;
-t2=t19;
-goto loop;}
-else{
-t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t9);
-t11=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t12=C_slot(t2,C_fix(1));
-/* loop734747 */
-t18=t1;
-t19=t12;
-t1=t18;
-t2=t19;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4759 in k4751 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4761,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4777,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k4775 in k4759 in k4751 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4777,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=C_a_i_cons(&a,2,lf[76],t2);
-t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t5=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* k4755 in k4751 in k4730 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4757(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4757,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=C_a_i_cons(&a,2,lf[76],t2);
-/* eval.scm: 483 compile */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_3577(t4,((C_word*)t0)[7],t3,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[23],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4235,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[8]);
-t3=C_i_length(t2);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4244,a[2]=((C_word*)t0)[8],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t3,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4682,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li74),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_4682(t12,t8,t2);}
-
-/* loop561 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4682(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4682,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_i_car(t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop561574 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop561574 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4244,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4247,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4647,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li73),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_4647(t10,t6,t1);}
-
-/* loop586 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4647(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4647,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_retrieve(lf[83]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4676,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g602603 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4674 in loop586 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4676,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop586599 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4647(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop586599 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4647(t6,((C_word*)t0)[3],t5);}}
-
-/* k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[32],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4247,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4253,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],tmp=(C_word)a,a+=13,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4596,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4598,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li72),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_4598(t12,t8,((C_word*)t0)[8],t1);}
-
-/* loop611 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4598(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4598,NULL,4,t0,t1,t2,t3);}
-t4=C_i_pairp(t2);
-t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[82]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4631,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=C_slot(t2,C_fix(0));
-t9=C_slot(t3,C_fix(0));
-/* g631632 */
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k4629 in loop611 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4631,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4611,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_4611(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_4611(t5,t4);}}
-
-/* k4609 in k4629 in loop611 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4611(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop611625 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_4598(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k4594 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4596(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 434 append */
-t2=*((C_word*)lf[81]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4253,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4256,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4588,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=C_i_cddr(((C_word*)t0)[2]);
-/* eval.scm: 436 ##sys#canonicalize-body */
-t5=*((C_word*)lf[80]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,t4,t1,C_SCHEME_FALSE);}
-
-/* k4586 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4588(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 435 ##sys#compile-to-closure */
-t2=*((C_word*)lf[35]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[22],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4256,2,t0,t1);}
-switch(((C_word*)t0)[10]){
-case C_fix(1):
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4265,a[2]=((C_word*)t0)[9],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4286,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 441 cadar */
-t4=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);
-case C_fix(2):
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4299,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4335,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 444 cadar */
-t4=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);
-case C_fix(3):
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4348,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[2],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 448 cadar */
-t4=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);
-case C_fix(4):
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4415,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[2],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4484,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 456 cadar */
-t4=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);
-default:
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4491,a[2]=((C_word*)t0)[10],a[3]=t1,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4538,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word)li71),tmp=(C_word)a,a+=11,tmp));
-t10=((C_word*)t8)[1];
-f_4538(t10,t6,((C_word*)t0)[2]);}}
-
-/* loop663 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4538(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4538,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4565,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word)li70),tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4580,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g679680 */
-t6=t3;
-f_4565(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4578 in loop663 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4580(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4580,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop663676 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4538(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop663676 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4538(t6,((C_word*)t0)[3],t5);}}
-
-/* g679 in loop663 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_4565(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4565,NULL,3,t0,t1,t2);}
-t3=C_i_cadr(t2);
-t4=C_i_car(t2);
-/* eval.scm: 470 compile */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t5,t1,t3,((C_word*)t0)[5],t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4489 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4491,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4492,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));}
-
-/* f_4492 in k4489 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4492(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4492,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4496,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 472 ##sys#make-vector */
-t4=*((C_word*)lf[79]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-
-/* k4494 */
-static void C_ccall f_4496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4496,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4499,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4508,a[2]=((C_word*)t0)[6],a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word)li68),tmp=(C_word)a,a+=7,tmp));
-t6=((C_word*)t4)[1];
-f_4508(t6,t2,C_fix(0),((C_word*)t0)[2]);}
-
-/* doloop687 in k4494 */
-static void C_fcall f_4508(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4508,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4533,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t3,C_fix(0));
-t6=t5;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,((C_word*)t0)[2]);}}
-
-/* k4531 in doloop687 in k4494 */
-static void C_ccall f_4533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[6],((C_word*)t0)[5],t1);
-t3=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_4508(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k4497 in k4494 */
-static void C_ccall f_4499(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4499,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* k4482 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4484(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[8]);
-/* eval.scm: 456 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[21],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4415,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4476,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 457 cadadr */
-t4=*((C_word*)lf[78]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[10]);}
-
-/* k4474 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[8]);
-/* eval.scm: 457 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[22],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4418,2,t0,t1);}
-t2=C_i_cddr(((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4424,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=t1,a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],tmp=(C_word)a,a+=13,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4468,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 459 cadar */
-t5=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k4466 in k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_caddr(((C_word*)t0)[8]);
-/* eval.scm: 459 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4422 in k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4424,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4427,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t1,a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4460,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 460 cadadr */
-t4=*((C_word*)lf[78]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k4458 in k4422 in k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4460(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cadddr(((C_word*)t0)[8]);
-/* eval.scm: 460 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4425 in k4422 in k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4427(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4427,2,t0,t1);}
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4428,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word)li67),tmp=(C_word)a,a+=8,tmp));}
-
-/* f_4428 in k4425 in k4422 in k4416 in k4413 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4428(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4428,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4444,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4442 */
-static void C_ccall f_4444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4444,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4448,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}
-
-/* k4446 in k4442 */
-static void C_ccall f_4448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4448,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4452,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-
-/* k4450 in k4446 in k4442 */
-static void C_ccall f_4452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4452,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4456,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k4454 in k4450 in k4446 in k4442 */
-static void C_ccall f_4456(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4456,2,t0,t1);}
-t2=C_a_i_vector(&a,4,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k4400 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[8]);
-/* eval.scm: 448 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[21],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4348,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4394,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 449 cadadr */
-t4=*((C_word*)lf[78]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[10]);}
-
-/* k4392 in k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4394(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[8]);
-/* eval.scm: 449 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4349 in k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4351,2,t0,t1);}
-t2=C_i_cddr(((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4357,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4386,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 451 cadar */
-t5=*((C_word*)lf[77]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k4384 in k4349 in k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_caddr(((C_word*)t0)[8]);
-/* eval.scm: 451 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4355 in k4349 in k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4357,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4358,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word)li66),tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_4358 in k4355 in k4349 in k4346 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4358,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4374,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4372 */
-static void C_ccall f_4374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4378,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-
-/* k4376 in k4372 */
-static void C_ccall f_4378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4378,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4382,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k4380 in k4376 in k4372 */
-static void C_ccall f_4382(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4382,2,t0,t1);}
-t2=C_a_i_vector(&a,3,((C_word*)t0)[6],((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k4333 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[8]);
-/* eval.scm: 444 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4297 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4299(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4299,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4302,a[2]=t1,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4327,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* eval.scm: 445 cadadr */
-t4=*((C_word*)lf[78]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k4325 in k4297 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cadr(((C_word*)t0)[8]);
-/* eval.scm: 445 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4300 in k4297 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4302,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4303,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word)li65),tmp=(C_word)a,a+=6,tmp));}
-
-/* f_4303 in k4300 in k4297 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4303(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4303,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4319,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4317 */
-static void C_ccall f_4319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4319,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4323,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k4321 in k4317 */
-static void C_ccall f_4323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4323,2,t0,t1);}
-t2=C_a_i_vector(&a,2,((C_word*)t0)[5],t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k4284 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_car(((C_word*)t0)[8]);
-/* eval.scm: 441 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t1,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4263 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4265(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4265,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4266,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li64),tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_4266 in k4263 in k4254 in k4251 in k4245 in k4242 in k4233 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4266(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4266,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4282,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4280 */
-static void C_ccall f_4282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4282,2,t0,t1);}
-t2=C_a_i_vector(&a,1,t1);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4123(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4123,2,t0,t1);}
-t2=C_i_cadr(((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4131,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t2,a[5]=((C_word*)t0)[8],a[6]=((C_word)li57),tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4137,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[9],a[9]=((C_word)li63),tmp=(C_word)a,a+=10,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-
-/* a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4137,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4141,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_i_caddr(((C_word*)t0)[8]);
-/* eval.scm: 407 compile */
-t6=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t6,t4,t5,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4141(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4141,2,t0,t1);}
-t2=((C_word*)t0)[4];
-if(C_truep(t2)){
-t3=C_i_zerop(((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4198,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word)li58),tmp=(C_word)a,a+=5,tmp):(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4211,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word)li59),tmp=(C_word)a,a+=6,tmp)));}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4150,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 409 ##sys#alias-global-hook */
-((C_proc4)C_retrieve_symbol_proc(lf[51]))(4,*((C_word*)lf[51]+1),t3,((C_word*)t0)[2],C_SCHEME_TRUE);}}
-
-/* k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4150,2,t0,t1);}
-if(C_truep(C_retrieve(lf[22]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4156,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 411 ##sys#hash-table-location */
-t3=*((C_word*)lf[21]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve(lf[22]),t1,C_retrieve(lf[23]));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4183,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li62),tmp=(C_word)a,a+=5,tmp));}}
-
-/* f_4183 in k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4183(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4183,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4191,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4189 */
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(((C_word*)t0)[2],C_fix(0),t1));}
-
-/* k4154 in k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4156(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4156,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4159,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_4159(2,t3,C_SCHEME_UNDEFINED);}
-else{
-/* eval.scm: 415 ##sys#error */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[73],((C_word*)t0)[2]);}}
-
-/* k4157 in k4154 in k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4159,2,t0,t1);}
-if(C_truep(C_slot(((C_word*)t0)[5],C_fix(2)))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4166,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li60),tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4175,a[2]=((C_word*)t0)[2],a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* f_4175 in k4157 in k4154 in k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4175(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4175,2,t0,t1);}
-/* eval.scm: 418 ##sys#error */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,t1,lf[72],((C_word*)t0)[2]);}
-
-/* f_4166 in k4157 in k4154 in k4148 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4166(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4166,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4174,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4172 */
-static void C_ccall f_4174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(((C_word*)t0)[2],C_fix(1),t1));}
-
-/* f_4211 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4211(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4211,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4219,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4217 */
-static void C_ccall f_4219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(C_u_i_list_ref(((C_word*)t0)[4],((C_word*)t0)[3]),((C_word*)t0)[2],t1));}
-
-/* f_4198 in k4139 in a4136 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4198(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4198,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4210,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k4208 */
-static void C_ccall f_4210(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* a4130 in k4121 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4131(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4131,2,t0,t1);}
-/* eval.scm: 406 lookup */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_3419(t2,t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4011,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[8],C_fix(1));
-t3=C_i_length(t2);
-switch(t3){
-case C_fix(0):
-/* eval.scm: 392 compile */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t4,((C_word*)t0)[6],lf[67],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);
-case C_fix(1):
-t4=C_slot(t2,C_fix(0));
-/* eval.scm: 393 compile */
-t5=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t5,((C_word*)t0)[6],t4,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);
-case C_fix(2):
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4048,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[7],a[7]=t2,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t5=C_slot(t2,C_fix(0));
-/* eval.scm: 394 compile */
-t6=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t6,t4,t5,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);
-default:
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4070,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t5=C_slot(t2,C_fix(0));
-/* eval.scm: 398 compile */
-t6=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t6,t4,t5,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k4068 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4070,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4073,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-/* eval.scm: 399 compile */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t4,t2,t3,((C_word*)t0)[6],C_SCHEME_FALSE,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-
-/* k4071 in k4068 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4073,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4076,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4095,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t4=C_slot(((C_word*)t0)[2],C_fix(1));
-t5=C_slot(t4,C_fix(1));
-/* ##sys#append */
-t6=*((C_word*)lf[68]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t5,C_SCHEME_END_OF_LIST);}
-
-/* k4093 in k4071 in k4068 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4095,2,t0,t1);}
-t2=C_a_i_cons(&a,2,lf[66],t1);
-/* eval.scm: 400 compile */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4074 in k4071 in k4068 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4076,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4077,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li56),tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_4077 in k4074 in k4071 in k4068 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4077(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4077,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4081,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4079 */
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4081,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4084,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k4082 in k4079 */
-static void C_ccall f_4084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4046 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4048(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4048,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4051,a[2]=((C_word*)t0)[8],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(((C_word*)t0)[7]);
-/* eval.scm: 395 compile */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t4,t2,t3,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4049 in k4046 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4051(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4051,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4052,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li55),tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_4052 in k4049 in k4046 in k4009 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_4052(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4052,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4056,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k4054 */
-static void C_ccall f_4056(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3949 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3951,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3954,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=C_i_cadr(((C_word*)t0)[7]);
-/* eval.scm: 380 compile */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t4,t2,t3,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3952 in k3949 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3954,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3957,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=C_i_caddr(((C_word*)t0)[7]);
-/* eval.scm: 381 compile */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t4,t2,t3,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k3955 in k3952 in k3949 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3960,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cdddr(((C_word*)t0)[7]);
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_cadddr(((C_word*)t0)[7]);
-/* eval.scm: 383 compile */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t5,t2,t4,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-/* eval.scm: 384 compile */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_3577(t4,t2,lf[63],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k3958 in k3955 in k3952 in k3949 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3961,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word)li54),tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_3961 in k3958 in k3955 in k3952 in k3949 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3961(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3961,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3968,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k3966 */
-static void C_ccall f_3968(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* f_3941 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3941(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3941,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-
-/* f_3907 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3907(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3907,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(0)));}
-
-/* k3899 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3901,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3902,a[2]=t1,a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_3902 in k3899 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3902(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3902,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(1)));}
-
-/* f_3885 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3885(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3885,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3807(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3807,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3810,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cadr(((C_word*)t0)[2]);
-/* eval.scm: 348 ##sys#strip-syntax */
-((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t2,t3);}
-
-/* k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3810(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3810,2,t0,t1);}
-switch(t1){
-case C_fix(-1):
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3817,a[2]=((C_word)li42),tmp=(C_word)a,a+=3,tmp));
-case C_fix(0):
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3825,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);
-case C_fix(1):
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3833,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp));
-case C_fix(2):
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3841,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);
-case C_SCHEME_TRUE:
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3849,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp));
-case C_SCHEME_FALSE:
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3857,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);
-default:
-t2=C_eqp(t1,C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3865,a[2]=((C_word)li48),tmp=(C_word)a,a+=3,tmp):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3867,a[2]=t1,a[3]=((C_word)li49),tmp=(C_word)a,a+=4,tmp)));}}
-
-/* f_3867 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3867(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3867,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* f_3865 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3865(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3865,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}
-
-/* f_3857 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3857(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3857,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* f_3849 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3849(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3849,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* f_3841 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3841(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3841,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(2));}
-
-/* f_3833 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3833(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3833,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(1));}
-
-/* f_3825 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3825(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3825,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-
-/* f_3817 in k3808 in k3805 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3817(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3817,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(-1));}
-
-/* f_3761 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3761(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3761,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* f_3750 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3750(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3750,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* f_3748 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3748(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3748,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* f_3737 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3737(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3737,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* f_3735 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3735(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3735,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(2));}
-
-/* f_3727 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3727(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3727,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(1));}
-
-/* f_3719 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3719(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3719,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-
-/* f_3711 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3711(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3711,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(-1));}
-
-/* a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3603(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3603,4,t0,t1,t2,t3);}
-t4=t2;
-if(C_truep(t4)){
-t5=C_i_zerop(t2);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3685,a[2]=t3,a[3]=((C_word)li28),tmp=(C_word)a,a+=4,tmp):(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3694,a[2]=t3,a[3]=t2,a[4]=((C_word)li29),tmp=(C_word)a,a+=5,tmp)));}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3613,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_assq(((C_word*)t0)[3],((C_word*)t0)[2]))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3671,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 299 ##sys#get */
-((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),t6,t3,lf[50]);}
-else{
-/* eval.scm: 298 ##sys#alias-global-hook */
-((C_proc4)C_retrieve_symbol_proc(lf[51]))(4,*((C_word*)lf[51]+1),t5,t3,C_SCHEME_FALSE);}}}
-
-/* k3669 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_3613(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-f_3613(2,t3,t2);}}
-
-/* k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3613,2,t0,t1);}
-if(C_truep(C_retrieve(lf[22]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3619,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 301 ##sys#hash-table-location */
-t3=*((C_word*)lf[21]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve(lf[22]),t1,C_SCHEME_TRUE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3647,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_retrieve(lf[30]))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3662,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 314 ##sys#symbol-has-toplevel-binding? */
-((C_proc3)C_retrieve_symbol_proc(lf[49]))(3,*((C_word*)lf[49]+1),t3,t1);}
-else{
-t3=t2;
-f_3647(t3,C_SCHEME_FALSE);}}}
-
-/* k3660 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_3647(t2,C_i_not(t1));}
-
-/* k3645 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3647(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3647,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=C_a_i_cons(&a,2,t2,C_retrieve(lf[30]));
-t4=C_mutate((C_word*)lf[30]+1 /* (set! unbound-in-eval ...) */,t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f10642,a[2]=((C_word*)t0)[4],a[3]=((C_word)li31),tmp=(C_word)a,a+=4,tmp));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f10647,a[2]=((C_word*)t0)[4],a[3]=((C_word)li32),tmp=(C_word)a,a+=4,tmp));}}
-
-/* f10647 in k3645 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f10647(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f10647,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve(((C_word*)t0)[2]));}
-
-/* f10642 in k3645 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f10642(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f10642,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve(((C_word*)t0)[2]));}
-
-/* k3617 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3619,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3622,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_3622(2,t3,C_SCHEME_UNDEFINED);}
-else{
-/* eval.scm: 302 ##sys#syntax-error-hook */
-t3=*((C_word*)lf[47]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[48],((C_word*)t0)[2]);}}
-
-/* k3620 in k3617 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3622,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3623,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li30),tmp=(C_word)a,a+=6,tmp));}
-
-/* f_3623 in k3620 in k3617 in k3611 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3623(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3623,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=C_eqp(((C_word*)t0)[3],t2);
-if(C_truep(t3)){
-/* eval.scm: 309 ##sys#error */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[46],((C_word*)t0)[2]);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}
-
-/* f_3694 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3694(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3694,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_slot(C_u_i_list_ref(t2,((C_word*)t0)[3]),((C_word*)t0)[2]));}
-
-/* f_3685 in a3602 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3685(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3685,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_slot(t3,((C_word*)t0)[2]));}
-
-/* a3596 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3597(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3597,2,t0,t1);}
-/* eval.scm: 295 lookup */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_3419(t2,t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* f_3585 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3585(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3585,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3526(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3526,NULL,2,t1,t2);}
-t3=C_retrieve(lf[41]);
-t4=C_retrieve(lf[42]);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3530,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-/* eval.scm: 278 ##sys#meta-macro-environment */
-((C_proc2)C_retrieve_symbol_proc(lf[45]))(2,*((C_word*)lf[45]+1),t7);}
-
-/* k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3530,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3531,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=((C_word*)t0)[6],a[6]=((C_word)li23),tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3551,a[2]=((C_word*)t0)[3],a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#dynamic-wind */
-t6=*((C_word*)lf[44]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t4,t5,t4);}
-
-/* a3550 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3551(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3551,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3555,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3562,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 282 ##sys#current-meta-environment */
-((C_proc2)C_retrieve_symbol_proc(lf[43]))(2,*((C_word*)lf[43]+1),t3);}
-
-/* k3560 in a3550 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 279 ##sys#compile-to-closure */
-t2=*((C_word*)lf[35]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-
-/* k3553 in a3550 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g371372 */
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* swap350 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3531,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3535,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* g353354361 */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k3533 in swap350 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3535,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3538,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* g353354361 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k3536 in k3533 in swap350 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3538,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3542,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g355356362 */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k3540 in k3536 in k3533 in swap350 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3542,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3545,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g355356362 */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k3543 in k3540 in k3536 in k3533 in swap350 in k3528 in eval/meta in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* lookup in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3419(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3419,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3423,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 252 rename */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_3404(t6,t5,t2,t4);}
-
-/* k3421 in lookup in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3423(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3423,2,t0,t1);}
-t2=C_retrieve(lf[40]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3431,a[2]=t4,a[3]=t1,a[4]=((C_word)li21),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_3431(t6,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
-
-/* loop in k3421 in lookup in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3431(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-loop:
-a=C_alloc(8);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3431,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t2))){
-/* eval.scm: 255 values */
-C_values(4,0,t1,C_SCHEME_FALSE,((C_word*)t0)[3]);}
-else{
-t4=C_slot(t2,C_fix(0));
-t5=((C_word*)t0)[3];
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3478,a[2]=t5,a[3]=((C_word)li19),tmp=(C_word)a,a+=4,tmp);
-t7=f_3478(t6,t4,C_fix(0));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3448,a[2]=t3,a[3]=((C_word)li20),tmp=(C_word)a,a+=4,tmp);
-/* g318319 */
-t9=t8;
-f_3448(t9,t1,t7);}
-else{
-t8=C_slot(t2,C_fix(1));
-t9=C_fixnum_plus(t3,C_fix(1));
-/* eval.scm: 257 loop */
-t12=t1;
-t13=t8;
-t14=t9;
-t1=t12;
-t2=t13;
-t3=t14;
-goto loop;}}}
-
-/* g318 in loop in k3421 in lookup in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3448(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3448,NULL,3,t0,t1,t2);}
-/* eval.scm: 256 values */
-C_values(4,0,t1,((C_word*)t0)[2],t2);}
-
-/* loop in loop in k3421 in lookup in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static C_word C_fcall f_3478(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-loop:
-C_stack_check;
-if(C_truep(C_i_nullp(t1))){
-return(C_SCHEME_FALSE);}
-else{
-t3=C_slot(t1,C_fix(0));
-t4=C_eqp(((C_word*)t0)[2],t3);
-if(C_truep(t4)){
-return(t2);}
-else{
-t5=C_slot(t1,C_fix(1));
-t6=C_fixnum_plus(t2,C_fix(1));
-t8=t5;
-t9=t6;
-t1=t8;
-t2=t9;
-goto loop;}}}
-
-/* rename in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3404(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3404,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3408,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 247 find-id */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3365(t5,t4,t2,t3);}
-
-/* k3406 in rename in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3408(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3408,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3414,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 248 ##sys#get */
-((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),t2,((C_word*)t0)[2],lf[39]);}}
-
-/* k3412 in k3406 in rename in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-
-/* find-id in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3365(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3365,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3378,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3402,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 243 caar */
-t6=*((C_word*)lf[37]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}}
-
-/* k3400 in find-id in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3402,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3398,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 243 cdar */
-t4=*((C_word*)lf[36]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-else{
-t3=((C_word*)t0)[3];
-f_3378(t3,C_SCHEME_FALSE);}}
-
-/* k3396 in k3400 in find-id in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_ccall f_3398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_3378(t2,C_i_symbolp(t1));}
-
-/* k3376 in find-id in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_3378(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* eval.scm: 243 cdar */
-t2=*((C_word*)lf[36]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[4]);
-/* eval.scm: 244 find-id */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3365(t3,((C_word*)t0)[5],((C_word*)t0)[2],t2);}}
-
-/* ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3315(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3315,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3321,a[2]=((C_word)li14),tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3334,a[2]=t3,a[3]=((C_word)li15),tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 216 ##sys#decorate-lambda */
-t8=*((C_word*)lf[29]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,t2,t6,t7);}
-
-/* a3333 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3334(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3334,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3342,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3346,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 223 open-output-string */
-t6=*((C_word*)lf[28]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* k3344 in a3333 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3346,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3349,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* eval.scm: 224 write */
-t3=*((C_word*)lf[27]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k3347 in k3344 in a3333 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3349(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3349,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3352,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 225 get-output-string */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k3350 in k3347 in k3344 in a3333 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3352(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 222 ##sys#make-lambda-info */
-t2=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3340 in a3333 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[4]);}
-
-/* a3320 in ##sys#eval-decorator in k2988 in k2985 in k2952 */
-static void C_ccall f_3321(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3321,3,t0,t1,t2);}
-if(C_truep(C_immp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=C_lambdainfop(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* ##sys#hash-table-location in k2988 in k2985 in k2952 */
-static void C_ccall f_3255(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3255,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3259,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t6=C_block_size(t2);
-/* eval.scm: 196 ##sys#hash-symbol */
-t7=*((C_word*)lf[15]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t3,t6);}
-
-/* k3257 in ##sys#hash-table-location in k2988 in k2985 in k2952 */
-static void C_ccall f_3259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3259,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[6],t1);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3267,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word)li12),tmp=(C_word)a,a+=10,tmp));
-t6=((C_word*)t4)[1];
-f_3267(t6,((C_word*)t0)[2],t2);}
-
-/* loop in k3257 in ##sys#hash-table-location in k2988 in k2985 in k2952 */
-static void C_fcall f_3267(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(7);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3267,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-if(C_truep(((C_word*)t0)[8])){
-t3=C_a_i_vector(&a,3,((C_word*)t0)[7],((C_word*)t0)[6],C_SCHEME_TRUE);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
-t5=C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t3,C_fix(0));
-t5=C_eqp(((C_word*)t0)[7],t4);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t3);}
-else{
-t6=C_slot(t2,C_fix(1));
-/* eval.scm: 207 loop */
-t11=t1;
-t12=t6;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_ccall f_3187(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3187,4,t0,t1,t2,t3);}
-t4=C_block_size(t3);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3193,a[2]=t2,a[3]=t3,a[4]=t6,a[5]=t4,a[6]=((C_word)li10),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_3193(t8,t1,C_fix(0));}
-
-/* doloop190 in ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_fcall f_3193(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3193,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3203,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(((C_word*)t0)[3],t2);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3216,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word)li9),tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_3216(t8,t3,t4);}}
-
-/* loop197 in doloop190 in ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_fcall f_3216(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3216,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3224,a[2]=((C_word*)t0)[3],a[3]=((C_word)li8),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3239,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g204205 */
-t6=t3;
-f_3224(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3237 in loop197 in doloop190 in ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_ccall f_3239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3216(t3,((C_word*)t0)[2],t2);}
-
-/* g204 in loop197 in doloop190 in ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_fcall f_3224(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3224,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t2,C_fix(1));
-/* eval.scm: 190 p */
-t5=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t1,t3,t4);}
-
-/* k3201 in doloop190 in ##sys#hash-table-for-each in k2988 in k2985 in k2952 */
-static void C_ccall f_3203(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_3193(t3,((C_word*)t0)[2],t2);}
-
-/* ##sys#hash-table-update! in k2988 in k2985 in k2952 */
-static void C_ccall f_3167(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_3167,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3175,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3179,a[2]=t5,a[3]=t6,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 184 ##sys#hash-table-ref */
-t8=*((C_word*)lf[16]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t2,t3);}
-
-/* k3177 in ##sys#hash-table-update! in k2988 in k2985 in k2952 */
-static void C_ccall f_3179(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3179,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3182,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=t1;
-/* eval.scm: 184 updtfunc */
-t4=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[3],t3);}
-else{
-/* eval.scm: 184 valufunc */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}}
-
-/* k3180 in k3177 in ##sys#hash-table-update! in k2988 in k2985 in k2952 */
-static void C_ccall f_3182(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 184 updtfunc */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k3173 in ##sys#hash-table-update! in k2988 in k2985 in k2952 */
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* eval.scm: 184 ##sys#hash-table-set! */
-t2=*((C_word*)lf[17]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* ##sys#hash-table-set! in k2988 in k2985 in k2952 */
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3107,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3111,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* eval.scm: 174 ##sys#hash-symbol */
-t6=*((C_word*)lf[15]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,C_block_size(t2));}
-
-/* k3109 in ##sys#hash-table-set! in k2988 in k2985 in k2952 */
-static void C_ccall f_3111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3111,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],t1);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3119,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word)li5),tmp=(C_word)a,a+=9,tmp));
-t6=((C_word*)t4)[1];
-f_3119(t6,((C_word*)t0)[2],t2);}
-
-/* loop in k3109 in ##sys#hash-table-set! in k2988 in k2985 in k2952 */
-static void C_fcall f_3119(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a;
-loop:
-a=C_alloc(6);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3119,NULL,3,t0,t1,t2);}
-t3=C_eqp(C_SCHEME_END_OF_LIST,t2);
-if(C_truep(t3)){
-t4=C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
-t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[5]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],t5));}
-else{
-t4=C_slot(t2,C_fix(0));
-t5=C_slot(t4,C_fix(0));
-t6=C_eqp(((C_word*)t0)[7],t5);
-if(C_truep(t6)){
-t7=C_slot(t2,C_fix(0));
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_i_setslot(t7,C_fix(1),((C_word*)t0)[6]));}
-else{
-t7=C_slot(t2,C_fix(1));
-/* eval.scm: 181 loop */
-t12=t1;
-t13=t7;
-t1=t12;
-t2=t13;
-goto loop;}}}
-
-/* ##sys#hash-table-ref in k2988 in k2985 in k2952 */
-static void C_ccall f_3052(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3052,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3105,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 167 ##sys#hash-symbol */
-t5=*((C_word*)lf[15]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,C_block_size(t2));}
-
-/* k3103 in ##sys#hash-table-ref in k2988 in k2985 in k2952 */
-static void C_ccall f_3105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3105,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[4],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3062,a[2]=((C_word*)t0)[3],a[3]=((C_word)li3),tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_3062(t3,t2));}
-
-/* loop in k3103 in ##sys#hash-table-ref in k2988 in k2985 in k2952 */
-static C_word C_fcall f_3062(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-loop:
-C_stack_check;
-t2=C_eqp(C_SCHEME_END_OF_LIST,t1);
-if(C_truep(t2)){
-return(C_SCHEME_FALSE);}
-else{
-t3=C_slot(t1,C_fix(0));
-t4=C_slot(t3,C_fix(0));
-t5=C_eqp(((C_word*)t0)[2],t4);
-if(C_truep(t5)){
-t6=C_slot(t1,C_fix(0));
-return(C_slot(t6,C_fix(1)));}
-else{
-t6=C_slot(t1,C_fix(1));
-t9=t6;
-t1=t9;
-goto loop;}}}
-
-/* ##sys#hash-symbol in k2988 in k2985 in k2952 */
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3037,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,((C_word*)((C_word*)t0)[3])[1]);
-if(C_truep(t4)){
-t5=C_fixnum_modulo(((C_word*)((C_word*)t0)[2])[1],t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t6=C_slot(t2,C_fix(1));
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,C_hash_string(t6));
-t8=C_fixnum_modulo(((C_word*)((C_word*)t0)[2])[1],t3);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-
-/* chicken-home in k2988 in k2985 in k2952 */
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3025,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3029,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 149 ##sys#chicken-prefix */
-((C_proc3)C_retrieve_symbol_proc(lf[9]))(3,*((C_word*)lf[9]+1),t2,lf[14]);}
-
-/* k3027 in chicken-home in k2988 in k2985 in k2952 */
-static void C_ccall f_3029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3029,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* ##sys#peek-c-string */
-t2=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_mpointer(&a,(void*)C_INSTALL_SHARE_HOME),C_fix(0));}}
-
-/* ##sys#chicken-prefix in k2988 in k2985 in k2952 */
-static void C_ccall f_2991(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_2991r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_2991r(t0,t1,t2);}}
-
-static void C_ccall f_2991r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2995,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_2995(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_2995(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k2993 in ##sys#chicken-prefix in k2988 in k2985 in k2952 */
-static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(((C_word*)t0)[3])){
-if(C_truep(t1)){
-/* eval.scm: 143 ##sys#string-append */
-t2=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],((C_word*)t0)[3],t1);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[3]);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[805] = {
-{"toplevel:eval_scm",(void*)C_eval_toplevel},
-{"f_2954:eval_scm",(void*)f_2954},
-{"f_2987:eval_scm",(void*)f_2987},
-{"f_2990:eval_scm",(void*)f_2990},
-{"f_10519:eval_scm",(void*)f_10519},
-{"f_10523:eval_scm",(void*)f_10523},
-{"f_10548:eval_scm",(void*)f_10548},
-{"f_10538:eval_scm",(void*)f_10538},
-{"f_10546:eval_scm",(void*)f_10546},
-{"f_10531:eval_scm",(void*)f_10531},
-{"f_10526:eval_scm",(void*)f_10526},
-{"f_6780:eval_scm",(void*)f_6780},
-{"f_6875:eval_scm",(void*)f_6875},
-{"f_6956:eval_scm",(void*)f_6956},
-{"f_10513:eval_scm",(void*)f_10513},
-{"f_10509:eval_scm",(void*)f_10509},
-{"f_10505:eval_scm",(void*)f_10505},
-{"f_10501:eval_scm",(void*)f_10501},
-{"f_7523:eval_scm",(void*)f_7523},
-{"f_7528:eval_scm",(void*)f_7528},
-{"f_10473:eval_scm",(void*)f_10473},
-{"f_10452:eval_scm",(void*)f_10452},
-{"f_10459:eval_scm",(void*)f_10459},
-{"f_7535:eval_scm",(void*)f_7535},
-{"f_10416:eval_scm",(void*)f_10416},
-{"f_10445:eval_scm",(void*)f_10445},
-{"f_10408:eval_scm",(void*)f_10408},
-{"f_10410:eval_scm",(void*)f_10410},
-{"f_7544:eval_scm",(void*)f_7544},
-{"f_10380:eval_scm",(void*)f_10380},
-{"f_10400:eval_scm",(void*)f_10400},
-{"f_10396:eval_scm",(void*)f_10396},
-{"f_10386:eval_scm",(void*)f_10386},
-{"f_7898:eval_scm",(void*)f_7898},
-{"f_8934:eval_scm",(void*)f_8934},
-{"f_10371:eval_scm",(void*)f_10371},
-{"f_9285:eval_scm",(void*)f_9285},
-{"f_9289:eval_scm",(void*)f_9289},
-{"f_10367:eval_scm",(void*)f_10367},
-{"f_9292:eval_scm",(void*)f_9292},
-{"f_9296:eval_scm",(void*)f_9296},
-{"f_9570:eval_scm",(void*)f_9570},
-{"f_10359:eval_scm",(void*)f_10359},
-{"f_9592:eval_scm",(void*)f_9592},
-{"f_9977:eval_scm",(void*)f_9977},
-{"f_10350:eval_scm",(void*)f_10350},
-{"f_10357:eval_scm",(void*)f_10357},
-{"f_10340:eval_scm",(void*)f_10340},
-{"f_10325:eval_scm",(void*)f_10325},
-{"f_10329:eval_scm",(void*)f_10329},
-{"f_10334:eval_scm",(void*)f_10334},
-{"f_10338:eval_scm",(void*)f_10338},
-{"f_10303:eval_scm",(void*)f_10303},
-{"f_10307:eval_scm",(void*)f_10307},
-{"f_10312:eval_scm",(void*)f_10312},
-{"f_10316:eval_scm",(void*)f_10316},
-{"f_10323:eval_scm",(void*)f_10323},
-{"f_10277:eval_scm",(void*)f_10277},
-{"f_10283:eval_scm",(void*)f_10283},
-{"f_10287:eval_scm",(void*)f_10287},
-{"f_10301:eval_scm",(void*)f_10301},
-{"f_10290:eval_scm",(void*)f_10290},
-{"f_10297:eval_scm",(void*)f_10297},
-{"f_10261:eval_scm",(void*)f_10261},
-{"f_10267:eval_scm",(void*)f_10267},
-{"f_10275:eval_scm",(void*)f_10275},
-{"f_10224:eval_scm",(void*)f_10224},
-{"f_10228:eval_scm",(void*)f_10228},
-{"f_10233:eval_scm",(void*)f_10233},
-{"f_10237:eval_scm",(void*)f_10237},
-{"f_10259:eval_scm",(void*)f_10259},
-{"f_10255:eval_scm",(void*)f_10255},
-{"f_10251:eval_scm",(void*)f_10251},
-{"f_10240:eval_scm",(void*)f_10240},
-{"f_10247:eval_scm",(void*)f_10247},
-{"f_10198:eval_scm",(void*)f_10198},
-{"f_10204:eval_scm",(void*)f_10204},
-{"f_10208:eval_scm",(void*)f_10208},
-{"f_10222:eval_scm",(void*)f_10222},
-{"f_10211:eval_scm",(void*)f_10211},
-{"f_10218:eval_scm",(void*)f_10218},
-{"f_10185:eval_scm",(void*)f_10185},
-{"f_10159:eval_scm",(void*)f_10159},
-{"f_10163:eval_scm",(void*)f_10163},
-{"f_10168:eval_scm",(void*)f_10168},
-{"f_10172:eval_scm",(void*)f_10172},
-{"f_10183:eval_scm",(void*)f_10183},
-{"f_10179:eval_scm",(void*)f_10179},
-{"f_10143:eval_scm",(void*)f_10143},
-{"f_10149:eval_scm",(void*)f_10149},
-{"f_10157:eval_scm",(void*)f_10157},
-{"f_10131:eval_scm",(void*)f_10131},
-{"f_10137:eval_scm",(void*)f_10137},
-{"f_10141:eval_scm",(void*)f_10141},
-{"f_10122:eval_scm",(void*)f_10122},
-{"f_10126:eval_scm",(void*)f_10126},
-{"f_10063:eval_scm",(void*)f_10063},
-{"f_10073:eval_scm",(void*)f_10073},
-{"f_10098:eval_scm",(void*)f_10098},
-{"f_10110:eval_scm",(void*)f_10110},
-{"f_10116:eval_scm",(void*)f_10116},
-{"f_10104:eval_scm",(void*)f_10104},
-{"f_10079:eval_scm",(void*)f_10079},
-{"f_10085:eval_scm",(void*)f_10085},
-{"f_10089:eval_scm",(void*)f_10089},
-{"f_10092:eval_scm",(void*)f_10092},
-{"f_10096:eval_scm",(void*)f_10096},
-{"f_10068:eval_scm",(void*)f_10068},
-{"f_9988:eval_scm",(void*)f_9988},
-{"f_9998:eval_scm",(void*)f_9998},
-{"f_10001:eval_scm",(void*)f_10001},
-{"f_10015:eval_scm",(void*)f_10015},
-{"f_10033:eval_scm",(void*)f_10033},
-{"f_10002:eval_scm",(void*)f_10002},
-{"f_9979:eval_scm",(void*)f_9979},
-{"f_9613:eval_scm",(void*)f_9613},
-{"f_9657:eval_scm",(void*)f_9657},
-{"f_9660:eval_scm",(void*)f_9660},
-{"f_9962:eval_scm",(void*)f_9962},
-{"f_9966:eval_scm",(void*)f_9966},
-{"f_9970:eval_scm",(void*)f_9970},
-{"f_9742:eval_scm",(void*)f_9742},
-{"f_9748:eval_scm",(void*)f_9748},
-{"f_9945:eval_scm",(void*)f_9945},
-{"f_9951:eval_scm",(void*)f_9951},
-{"f_9755:eval_scm",(void*)f_9755},
-{"f_9758:eval_scm",(void*)f_9758},
-{"f_9764:eval_scm",(void*)f_9764},
-{"f_9943:eval_scm",(void*)f_9943},
-{"f_9773:eval_scm",(void*)f_9773},
-{"f_9776:eval_scm",(void*)f_9776},
-{"f_9791:eval_scm",(void*)f_9791},
-{"f_9809:eval_scm",(void*)f_9809},
-{"f_9930:eval_scm",(void*)f_9930},
-{"f_9926:eval_scm",(void*)f_9926},
-{"f_9897:eval_scm",(void*)f_9897},
-{"f_9825:eval_scm",(void*)f_9825},
-{"f_9833:eval_scm",(void*)f_9833},
-{"f_9845:eval_scm",(void*)f_9845},
-{"f_9848:eval_scm",(void*)f_9848},
-{"f_9860:eval_scm",(void*)f_9860},
-{"f_9863:eval_scm",(void*)f_9863},
-{"f_9851:eval_scm",(void*)f_9851},
-{"f_9877:eval_scm",(void*)f_9877},
-{"f_9828:eval_scm",(void*)f_9828},
-{"f_9813:eval_scm",(void*)f_9813},
-{"f_9795:eval_scm",(void*)f_9795},
-{"f_9638:eval_scm",(void*)f_9638},
-{"f_9643:eval_scm",(void*)f_9643},
-{"f_9798:eval_scm",(void*)f_9798},
-{"f_9782:eval_scm",(void*)f_9782},
-{"f_9677:eval_scm",(void*)f_9677},
-{"f_9682:eval_scm",(void*)f_9682},
-{"f_9685:eval_scm",(void*)f_9685},
-{"f_9690:eval_scm",(void*)f_9690},
-{"f_9697:eval_scm",(void*)f_9697},
-{"f_9737:eval_scm",(void*)f_9737},
-{"f_9700:eval_scm",(void*)f_9700},
-{"f_9712:eval_scm",(void*)f_9712},
-{"f_9721:eval_scm",(void*)f_9721},
-{"f_9715:eval_scm",(void*)f_9715},
-{"f_9703:eval_scm",(void*)f_9703},
-{"f_9706:eval_scm",(void*)f_9706},
-{"f_9668:eval_scm",(void*)f_9668},
-{"f_9662:eval_scm",(void*)f_9662},
-{"f_9616:eval_scm",(void*)f_9616},
-{"f_9622:eval_scm",(void*)f_9622},
-{"f_9610:eval_scm",(void*)f_9610},
-{"f_9594:eval_scm",(void*)f_9594},
-{"f_9605:eval_scm",(void*)f_9605},
-{"f_9608:eval_scm",(void*)f_9608},
-{"f_9598:eval_scm",(void*)f_9598},
-{"f_9575:eval_scm",(void*)f_9575},
-{"f_9584:eval_scm",(void*)f_9584},
-{"f_9579:eval_scm",(void*)f_9579},
-{"f_9515:eval_scm",(void*)f_9515},
-{"f_9519:eval_scm",(void*)f_9519},
-{"f_9522:eval_scm",(void*)f_9522},
-{"f_9525:eval_scm",(void*)f_9525},
-{"f_9528:eval_scm",(void*)f_9528},
-{"f_9531:eval_scm",(void*)f_9531},
-{"f_9534:eval_scm",(void*)f_9534},
-{"f_9537:eval_scm",(void*)f_9537},
-{"f_9540:eval_scm",(void*)f_9540},
-{"f_9543:eval_scm",(void*)f_9543},
-{"f_9494:eval_scm",(void*)f_9494},
-{"f_9498:eval_scm",(void*)f_9498},
-{"f_9501:eval_scm",(void*)f_9501},
-{"f_9470:eval_scm",(void*)f_9470},
-{"f_9476:eval_scm",(void*)f_9476},
-{"f_9486:eval_scm",(void*)f_9486},
-{"f_9321:eval_scm",(void*)f_9321},
-{"f_9325:eval_scm",(void*)f_9325},
-{"f_9392:eval_scm",(void*)f_9392},
-{"f_9439:eval_scm",(void*)f_9439},
-{"f_9449:eval_scm",(void*)f_9449},
-{"f_9402:eval_scm",(void*)f_9402},
-{"f_9404:eval_scm",(void*)f_9404},
-{"f_9428:eval_scm",(void*)f_9428},
-{"f_9414:eval_scm",(void*)f_9414},
-{"f_9362:eval_scm",(void*)f_9362},
-{"f_9327:eval_scm",(void*)f_9327},
-{"f_9343:eval_scm",(void*)f_9343},
-{"f_9349:eval_scm",(void*)f_9349},
-{"f_9340:eval_scm",(void*)f_9340},
-{"f_9302:eval_scm",(void*)f_9302},
-{"f_9306:eval_scm",(void*)f_9306},
-{"f_9269:eval_scm",(void*)f_9269},
-{"f_9271:eval_scm",(void*)f_9271},
-{"f_9275:eval_scm",(void*)f_9275},
-{"f_9231:eval_scm",(void*)f_9231},
-{"f_9238:eval_scm",(void*)f_9238},
-{"f_9245:eval_scm",(void*)f_9245},
-{"f_9187:eval_scm",(void*)f_9187},
-{"f_9220:eval_scm",(void*)f_9220},
-{"f_9207:eval_scm",(void*)f_9207},
-{"f_9184:eval_scm",(void*)f_9184},
-{"f_9065:eval_scm",(void*)f_9065},
-{"f_9159:eval_scm",(void*)f_9159},
-{"f_9169:eval_scm",(void*)f_9169},
-{"f_9157:eval_scm",(void*)f_9157},
-{"f_9086:eval_scm",(void*)f_9086},
-{"f_9110:eval_scm",(void*)f_9110},
-{"f_9129:eval_scm",(void*)f_9129},
-{"f_9104:eval_scm",(void*)f_9104},
-{"f_8957:eval_scm",(void*)f_8957},
-{"f_8967:eval_scm",(void*)f_8967},
-{"f_8972:eval_scm",(void*)f_8972},
-{"f_8999:eval_scm",(void*)f_8999},
-{"f_9028:eval_scm",(void*)f_9028},
-{"f_9032:eval_scm",(void*)f_9032},
-{"f_8993:eval_scm",(void*)f_8993},
-{"f_8941:eval_scm",(void*)f_8941},
-{"f_8878:eval_scm",(void*)f_8878},
-{"f_8882:eval_scm",(void*)f_8882},
-{"f_8890:eval_scm",(void*)f_8890},
-{"f_8270:eval_scm",(void*)f_8270},
-{"f_8694:eval_scm",(void*)f_8694},
-{"f_8803:eval_scm",(void*)f_8803},
-{"f_8812:eval_scm",(void*)f_8812},
-{"f_8819:eval_scm",(void*)f_8819},
-{"f_8810:eval_scm",(void*)f_8810},
-{"f_8723:eval_scm",(void*)f_8723},
-{"f_8790:eval_scm",(void*)f_8790},
-{"f_8750:eval_scm",(void*)f_8750},
-{"f_8754:eval_scm",(void*)f_8754},
-{"f_8781:eval_scm",(void*)f_8781},
-{"f_8777:eval_scm",(void*)f_8777},
-{"f_8757:eval_scm",(void*)f_8757},
-{"f_8768:eval_scm",(void*)f_8768},
-{"f_8762:eval_scm",(void*)f_8762},
-{"f_8717:eval_scm",(void*)f_8717},
-{"f_8713:eval_scm",(void*)f_8713},
-{"f_8339:eval_scm",(void*)f_8339},
-{"f_8349:eval_scm",(void*)f_8349},
-{"f_8511:eval_scm",(void*)f_8511},
-{"f_8656:eval_scm",(void*)f_8656},
-{"f_8663:eval_scm",(void*)f_8663},
-{"f_8526:eval_scm",(void*)f_8526},
-{"f_8545:eval_scm",(void*)f_8545},
-{"f_8577:eval_scm",(void*)f_8577},
-{"f_8571:eval_scm",(void*)f_8571},
-{"f_8567:eval_scm",(void*)f_8567},
-{"f_8549:eval_scm",(void*)f_8549},
-{"f_8541:eval_scm",(void*)f_8541},
-{"f_8533:eval_scm",(void*)f_8533},
-{"f_8416:eval_scm",(void*)f_8416},
-{"f_8437:eval_scm",(void*)f_8437},
-{"f_8445:eval_scm",(void*)f_8445},
-{"f_8433:eval_scm",(void*)f_8433},
-{"f_8369:eval_scm",(void*)f_8369},
-{"f_8356:eval_scm",(void*)f_8356},
-{"f_8298:eval_scm",(void*)f_8298},
-{"f_8317:eval_scm",(void*)f_8317},
-{"f_8310:eval_scm",(void*)f_8310},
-{"f_8273:eval_scm",(void*)f_8273},
-{"f_8292:eval_scm",(void*)f_8292},
-{"f_8286:eval_scm",(void*)f_8286},
-{"f_8221:eval_scm",(void*)f_8221},
-{"f_8227:eval_scm",(void*)f_8227},
-{"f_8241:eval_scm",(void*)f_8241},
-{"f_8244:eval_scm",(void*)f_8244},
-{"f_8251:eval_scm",(void*)f_8251},
-{"f_8215:eval_scm",(void*)f_8215},
-{"f_8182:eval_scm",(void*)f_8182},
-{"f_8186:eval_scm",(void*)f_8186},
-{"f_8192:eval_scm",(void*)f_8192},
-{"f_8195:eval_scm",(void*)f_8195},
-{"f_8213:eval_scm",(void*)f_8213},
-{"f_8198:eval_scm",(void*)f_8198},
-{"f_8202:eval_scm",(void*)f_8202},
-{"f_8169:eval_scm",(void*)f_8169},
-{"f_8175:eval_scm",(void*)f_8175},
-{"f_8155:eval_scm",(void*)f_8155},
-{"f_8166:eval_scm",(void*)f_8166},
-{"f_8113:eval_scm",(void*)f_8113},
-{"f_8119:eval_scm",(void*)f_8119},
-{"f_8134:eval_scm",(void*)f_8134},
-{"f_8029:eval_scm",(void*)f_8029},
-{"f_8033:eval_scm",(void*)f_8033},
-{"f_8089:eval_scm",(void*)f_8089},
-{"f_8036:eval_scm",(void*)f_8036},
-{"f_8039:eval_scm",(void*)f_8039},
-{"f_8066:eval_scm",(void*)f_8066},
-{"f_8072:eval_scm",(void*)f_8072},
-{"f_8054:eval_scm",(void*)f_8054},
-{"f_7930:eval_scm",(void*)f_7930},
-{"f_7934:eval_scm",(void*)f_7934},
-{"f_7982:eval_scm",(void*)f_7982},
-{"f_7984:eval_scm",(void*)f_7984},
-{"f_7997:eval_scm",(void*)f_7997},
-{"f_7936:eval_scm",(void*)f_7936},
-{"f_7940:eval_scm",(void*)f_7940},
-{"f_7975:eval_scm",(void*)f_7975},
-{"f_7946:eval_scm",(void*)f_7946},
-{"f_7956:eval_scm",(void*)f_7956},
-{"f_7949:eval_scm",(void*)f_7949},
-{"f_7899:eval_scm",(void*)f_7899},
-{"f_7903:eval_scm",(void*)f_7903},
-{"f_7738:eval_scm",(void*)f_7738},
-{"f_7843:eval_scm",(void*)f_7843},
-{"f_7860:eval_scm",(void*)f_7860},
-{"f_7868:eval_scm",(void*)f_7868},
-{"f_7760:eval_scm",(void*)f_7760},
-{"f_7765:eval_scm",(void*)f_7765},
-{"f_7804:eval_scm",(void*)f_7804},
-{"f_7791:eval_scm",(void*)f_7791},
-{"f_7741:eval_scm",(void*)f_7741},
-{"f_7652:eval_scm",(void*)f_7652},
-{"f_7659:eval_scm",(void*)f_7659},
-{"f_7669:eval_scm",(void*)f_7669},
-{"f_7546:eval_scm",(void*)f_7546},
-{"f_7550:eval_scm",(void*)f_7550},
-{"f_7642:eval_scm",(void*)f_7642},
-{"f_7646:eval_scm",(void*)f_7646},
-{"f_7559:eval_scm",(void*)f_7559},
-{"f_7628:eval_scm",(void*)f_7628},
-{"f_7624:eval_scm",(void*)f_7624},
-{"f_7562:eval_scm",(void*)f_7562},
-{"f_7611:eval_scm",(void*)f_7611},
-{"f_7614:eval_scm",(void*)f_7614},
-{"f_7617:eval_scm",(void*)f_7617},
-{"f_7565:eval_scm",(void*)f_7565},
-{"f_7570:eval_scm",(void*)f_7570},
-{"f_7604:eval_scm",(void*)f_7604},
-{"f_7583:eval_scm",(void*)f_7583},
-{"f_7537:eval_scm",(void*)f_7537},
-{"f_7497:eval_scm",(void*)f_7497},
-{"f_7518:eval_scm",(void*)f_7518},
-{"f_7501:eval_scm",(void*)f_7501},
-{"f_7515:eval_scm",(void*)f_7515},
-{"f_7504:eval_scm",(void*)f_7504},
-{"f_7512:eval_scm",(void*)f_7512},
-{"f_7507:eval_scm",(void*)f_7507},
-{"f_7454:eval_scm",(void*)f_7454},
-{"f_7462:eval_scm",(void*)f_7462},
-{"f_7466:eval_scm",(void*)f_7466},
-{"f_7425:eval_scm",(void*)f_7425},
-{"f_7433:eval_scm",(void*)f_7433},
-{"f_7004:eval_scm",(void*)f_7004},
-{"f_7377:eval_scm",(void*)f_7377},
-{"f_7372:eval_scm",(void*)f_7372},
-{"f_7006:eval_scm",(void*)f_7006},
-{"f_7371:eval_scm",(void*)f_7371},
-{"f_7010:eval_scm",(void*)f_7010},
-{"f_7293:eval_scm",(void*)f_7293},
-{"f_7308:eval_scm",(void*)f_7308},
-{"f_7311:eval_scm",(void*)f_7311},
-{"f_7314:eval_scm",(void*)f_7314},
-{"f_7320:eval_scm",(void*)f_7320},
-{"f_7323:eval_scm",(void*)f_7323},
-{"f_7329:eval_scm",(void*)f_7329},
-{"f_7013:eval_scm",(void*)f_7013},
-{"f_7284:eval_scm",(void*)f_7284},
-{"f_7272:eval_scm",(void*)f_7272},
-{"f_7275:eval_scm",(void*)f_7275},
-{"f_7278:eval_scm",(void*)f_7278},
-{"f_7019:eval_scm",(void*)f_7019},
-{"f_7257:eval_scm",(void*)f_7257},
-{"f_7229:eval_scm",(void*)f_7229},
-{"f_7253:eval_scm",(void*)f_7253},
-{"f_7249:eval_scm",(void*)f_7249},
-{"f_7245:eval_scm",(void*)f_7245},
-{"f_7022:eval_scm",(void*)f_7022},
-{"f_7030:eval_scm",(void*)f_7030},
-{"f_7216:eval_scm",(void*)f_7216},
-{"f_7034:eval_scm",(void*)f_7034},
-{"f_7204:eval_scm",(void*)f_7204},
-{"f_7055:eval_scm",(void*)f_7055},
-{"f_7059:eval_scm",(void*)f_7059},
-{"f_7195:eval_scm",(void*)f_7195},
-{"f_7067:eval_scm",(void*)f_7067},
-{"f_7071:eval_scm",(void*)f_7071},
-{"f_7189:eval_scm",(void*)f_7189},
-{"f_7074:eval_scm",(void*)f_7074},
-{"f_7077:eval_scm",(void*)f_7077},
-{"f_7082:eval_scm",(void*)f_7082},
-{"f_7092:eval_scm",(void*)f_7092},
-{"f_7138:eval_scm",(void*)f_7138},
-{"f_7147:eval_scm",(void*)f_7147},
-{"f_7165:eval_scm",(void*)f_7165},
-{"f_7155:eval_scm",(void*)f_7155},
-{"f_7159:eval_scm",(void*)f_7159},
-{"f_7104:eval_scm",(void*)f_7104},
-{"f_7111:eval_scm",(void*)f_7111},
-{"f_7122:eval_scm",(void*)f_7122},
-{"f_7133:eval_scm",(void*)f_7133},
-{"f_7126:eval_scm",(void*)f_7126},
-{"f_7116:eval_scm",(void*)f_7116},
-{"f_7095:eval_scm",(void*)f_7095},
-{"f_7102:eval_scm",(void*)f_7102},
-{"f_7064:eval_scm",(void*)f_7064},
-{"f_7044:eval_scm",(void*)f_7044},
-{"f_7035:eval_scm",(void*)f_7035},
-{"f_7025:eval_scm",(void*)f_7025},
-{"f_6958:eval_scm",(void*)f_6958},
-{"f_6968:eval_scm",(void*)f_6968},
-{"f_6883:eval_scm",(void*)f_6883},
-{"f_6895:eval_scm",(void*)f_6895},
-{"f_6908:eval_scm",(void*)f_6908},
-{"f_6890:eval_scm",(void*)f_6890},
-{"f_6877:eval_scm",(void*)f_6877},
-{"f_6793:eval_scm",(void*)f_6793},
-{"f_6806:eval_scm",(void*)f_6806},
-{"f_6839:eval_scm",(void*)f_6839},
-{"f_6820:eval_scm",(void*)f_6820},
-{"f_6796:eval_scm",(void*)f_6796},
-{"f_6783:eval_scm",(void*)f_6783},
-{"f_6791:eval_scm",(void*)f_6791},
-{"f_3359:eval_scm",(void*)f_3359},
-{"f_3363:eval_scm",(void*)f_3363},
-{"f_6457:eval_scm",(void*)f_6457},
-{"f_6461:eval_scm",(void*)f_6461},
-{"f_6708:eval_scm",(void*)f_6708},
-{"f_6742:eval_scm",(void*)f_6742},
-{"f_6735:eval_scm",(void*)f_6735},
-{"f_6650:eval_scm",(void*)f_6650},
-{"f_6651:eval_scm",(void*)f_6651},
-{"f_6655:eval_scm",(void*)f_6655},
-{"f_6662:eval_scm",(void*)f_6662},
-{"f_6668:eval_scm",(void*)f_6668},
-{"f_6702:eval_scm",(void*)f_6702},
-{"f_6695:eval_scm",(void*)f_6695},
-{"f_6666:eval_scm",(void*)f_6666},
-{"f_6607:eval_scm",(void*)f_6607},
-{"f_6610:eval_scm",(void*)f_6610},
-{"f_6613:eval_scm",(void*)f_6613},
-{"f_6616:eval_scm",(void*)f_6616},
-{"f_6617:eval_scm",(void*)f_6617},
-{"f_6621:eval_scm",(void*)f_6621},
-{"f_6624:eval_scm",(void*)f_6624},
-{"f_6631:eval_scm",(void*)f_6631},
-{"f_6635:eval_scm",(void*)f_6635},
-{"f_6639:eval_scm",(void*)f_6639},
-{"f_6643:eval_scm",(void*)f_6643},
-{"f_6565:eval_scm",(void*)f_6565},
-{"f_6568:eval_scm",(void*)f_6568},
-{"f_6571:eval_scm",(void*)f_6571},
-{"f_6572:eval_scm",(void*)f_6572},
-{"f_6576:eval_scm",(void*)f_6576},
-{"f_6579:eval_scm",(void*)f_6579},
-{"f_6586:eval_scm",(void*)f_6586},
-{"f_6590:eval_scm",(void*)f_6590},
-{"f_6594:eval_scm",(void*)f_6594},
-{"f_6530:eval_scm",(void*)f_6530},
-{"f_6533:eval_scm",(void*)f_6533},
-{"f_6534:eval_scm",(void*)f_6534},
-{"f_6538:eval_scm",(void*)f_6538},
-{"f_6541:eval_scm",(void*)f_6541},
-{"f_6548:eval_scm",(void*)f_6548},
-{"f_6552:eval_scm",(void*)f_6552},
-{"f_6502:eval_scm",(void*)f_6502},
-{"f_6503:eval_scm",(void*)f_6503},
-{"f_6507:eval_scm",(void*)f_6507},
-{"f_6510:eval_scm",(void*)f_6510},
-{"f_6517:eval_scm",(void*)f_6517},
-{"f_6483:eval_scm",(void*)f_6483},
-{"f11767:eval_scm",(void*)f11767},
-{"f11763:eval_scm",(void*)f11763},
-{"f_6431:eval_scm",(void*)f_6431},
-{"f_3577:eval_scm",(void*)f_3577},
-{"f_3584:eval_scm",(void*)f_3584},
-{"f_3704:eval_scm",(void*)f_3704},
-{"f_3760:eval_scm",(void*)f_3760},
-{"f_3780:eval_scm",(void*)f_3780},
-{"f_3783:eval_scm",(void*)f_3783},
-{"f_3798:eval_scm",(void*)f_3798},
-{"f_6231:eval_scm",(void*)f_6231},
-{"f_6214:eval_scm",(void*)f_6214},
-{"f_6218:eval_scm",(void*)f_6218},
-{"f_6165:eval_scm",(void*)f_6165},
-{"f_6180:eval_scm",(void*)f_6180},
-{"f_6173:eval_scm",(void*)f_6173},
-{"f_6150:eval_scm",(void*)f_6150},
-{"f_6109:eval_scm",(void*)f_6109},
-{"f_6049:eval_scm",(void*)f_6049},
-{"f_6051:eval_scm",(void*)f_6051},
-{"f_6073:eval_scm",(void*)f_6073},
-{"f_6089:eval_scm",(void*)f_6089},
-{"f_6063:eval_scm",(void*)f_6063},
-{"f_6045:eval_scm",(void*)f_6045},
-{"f_5991:eval_scm",(void*)f_5991},
-{"f_6025:eval_scm",(void*)f_6025},
-{"f_6018:eval_scm",(void*)f_6018},
-{"f_5914:eval_scm",(void*)f_5914},
-{"f_5917:eval_scm",(void*)f_5917},
-{"f_5920:eval_scm",(void*)f_5920},
-{"f_5943:eval_scm",(void*)f_5943},
-{"f_5941:eval_scm",(void*)f_5941},
-{"f_5937:eval_scm",(void*)f_5937},
-{"f_5897:eval_scm",(void*)f_5897},
-{"f_5901:eval_scm",(void*)f_5901},
-{"f_5868:eval_scm",(void*)f_5868},
-{"f_5872:eval_scm",(void*)f_5872},
-{"f_5611:eval_scm",(void*)f_5611},
-{"f_5755:eval_scm",(void*)f_5755},
-{"f_5757:eval_scm",(void*)f_5757},
-{"f_5835:eval_scm",(void*)f_5835},
-{"f_5784:eval_scm",(void*)f_5784},
-{"f_5808:eval_scm",(void*)f_5808},
-{"f_5797:eval_scm",(void*)f_5797},
-{"f_5617:eval_scm",(void*)f_5617},
-{"f_5745:eval_scm",(void*)f_5745},
-{"f_5620:eval_scm",(void*)f_5620},
-{"f_5623:eval_scm",(void*)f_5623},
-{"f_5651:eval_scm",(void*)f_5651},
-{"f_5661:eval_scm",(void*)f_5661},
-{"f_5742:eval_scm",(void*)f_5742},
-{"f_5734:eval_scm",(void*)f_5734},
-{"f_5671:eval_scm",(void*)f_5671},
-{"f_5719:eval_scm",(void*)f_5719},
-{"f_5674:eval_scm",(void*)f_5674},
-{"f_5675:eval_scm",(void*)f_5675},
-{"f_5681:eval_scm",(void*)f_5681},
-{"f_5706:eval_scm",(void*)f_5706},
-{"f_5624:eval_scm",(void*)f_5624},
-{"f_5628:eval_scm",(void*)f_5628},
-{"f_5631:eval_scm",(void*)f_5631},
-{"f_5635:eval_scm",(void*)f_5635},
-{"f_5638:eval_scm",(void*)f_5638},
-{"f_5642:eval_scm",(void*)f_5642},
-{"f_5645:eval_scm",(void*)f_5645},
-{"f_5598:eval_scm",(void*)f_5598},
-{"f_5551:eval_scm",(void*)f_5551},
-{"f_5576:eval_scm",(void*)f_5576},
-{"f_5554:eval_scm",(void*)f_5554},
-{"f_5564:eval_scm",(void*)f_5564},
-{"f_5572:eval_scm",(void*)f_5572},
-{"f_5568:eval_scm",(void*)f_5568},
-{"f_5557:eval_scm",(void*)f_5557},
-{"f_5424:eval_scm",(void*)f_5424},
-{"f_5482:eval_scm",(void*)f_5482},
-{"f_5532:eval_scm",(void*)f_5532},
-{"f_5509:eval_scm",(void*)f_5509},
-{"f_5525:eval_scm",(void*)f_5525},
-{"f_5521:eval_scm",(void*)f_5521},
-{"f_5427:eval_scm",(void*)f_5427},
-{"f_5430:eval_scm",(void*)f_5430},
-{"f_5446:eval_scm",(void*)f_5446},
-{"f_5454:eval_scm",(void*)f_5454},
-{"f_5433:eval_scm",(void*)f_5433},
-{"f_5440:eval_scm",(void*)f_5440},
-{"f_5337:eval_scm",(void*)f_5337},
-{"f_5361:eval_scm",(void*)f_5361},
-{"f_5411:eval_scm",(void*)f_5411},
-{"f_5388:eval_scm",(void*)f_5388},
-{"f_5404:eval_scm",(void*)f_5404},
-{"f_5400:eval_scm",(void*)f_5400},
-{"f_5355:eval_scm",(void*)f_5355},
-{"f_5340:eval_scm",(void*)f_5340},
-{"f_5347:eval_scm",(void*)f_5347},
-{"f_4889:eval_scm",(void*)f_4889},
-{"f_5310:eval_scm",(void*)f_5310},
-{"f_5321:eval_scm",(void*)f_5321},
-{"f_5315:eval_scm",(void*)f_5315},
-{"f_4901:eval_scm",(void*)f_4901},
-{"f_4906:eval_scm",(void*)f_4906},
-{"f_5274:eval_scm",(void*)f_5274},
-{"f_5303:eval_scm",(void*)f_5303},
-{"f_4910:eval_scm",(void*)f_4910},
-{"f_5225:eval_scm",(void*)f_5225},
-{"f_5258:eval_scm",(void*)f_5258},
-{"f_5238:eval_scm",(void*)f_5238},
-{"f_5223:eval_scm",(void*)f_5223},
-{"f_4913:eval_scm",(void*)f_4913},
-{"f_5215:eval_scm",(void*)f_5215},
-{"f_4919:eval_scm",(void*)f_4919},
-{"f_5177:eval_scm",(void*)f_5177},
-{"f_5183:eval_scm",(void*)f_5183},
-{"f_5207:eval_scm",(void*)f_5207},
-{"f_5154:eval_scm",(void*)f_5154},
-{"f_5160:eval_scm",(void*)f_5160},
-{"f_6385:eval_scm",(void*)f_6385},
-{"f_6414:eval_scm",(void*)f_6414},
-{"f_5176:eval_scm",(void*)f_5176},
-{"f_5172:eval_scm",(void*)f_5172},
-{"f_5132:eval_scm",(void*)f_5132},
-{"f_5138:eval_scm",(void*)f_5138},
-{"f_5150:eval_scm",(void*)f_5150},
-{"f_5113:eval_scm",(void*)f_5113},
-{"f_5119:eval_scm",(void*)f_5119},
-{"f_5085:eval_scm",(void*)f_5085},
-{"f_5091:eval_scm",(void*)f_5091},
-{"f_5066:eval_scm",(void*)f_5066},
-{"f_5072:eval_scm",(void*)f_5072},
-{"f_5038:eval_scm",(void*)f_5038},
-{"f_5044:eval_scm",(void*)f_5044},
-{"f_5019:eval_scm",(void*)f_5019},
-{"f_5025:eval_scm",(void*)f_5025},
-{"f_4991:eval_scm",(void*)f_4991},
-{"f_4997:eval_scm",(void*)f_4997},
-{"f_4972:eval_scm",(void*)f_4972},
-{"f_4978:eval_scm",(void*)f_4978},
-{"f_4948:eval_scm",(void*)f_4948},
-{"f_4954:eval_scm",(void*)f_4954},
-{"f_4929:eval_scm",(void*)f_4929},
-{"f_4935:eval_scm",(void*)f_4935},
-{"f_4732:eval_scm",(void*)f_4732},
-{"f_4835:eval_scm",(void*)f_4835},
-{"f_4753:eval_scm",(void*)f_4753},
-{"f_4779:eval_scm",(void*)f_4779},
-{"f_4761:eval_scm",(void*)f_4761},
-{"f_4777:eval_scm",(void*)f_4777},
-{"f_4757:eval_scm",(void*)f_4757},
-{"f_4235:eval_scm",(void*)f_4235},
-{"f_4682:eval_scm",(void*)f_4682},
-{"f_4244:eval_scm",(void*)f_4244},
-{"f_4647:eval_scm",(void*)f_4647},
-{"f_4676:eval_scm",(void*)f_4676},
-{"f_4247:eval_scm",(void*)f_4247},
-{"f_4598:eval_scm",(void*)f_4598},
-{"f_4631:eval_scm",(void*)f_4631},
-{"f_4611:eval_scm",(void*)f_4611},
-{"f_4596:eval_scm",(void*)f_4596},
-{"f_4253:eval_scm",(void*)f_4253},
-{"f_4588:eval_scm",(void*)f_4588},
-{"f_4256:eval_scm",(void*)f_4256},
-{"f_4538:eval_scm",(void*)f_4538},
-{"f_4580:eval_scm",(void*)f_4580},
-{"f_4565:eval_scm",(void*)f_4565},
-{"f_4491:eval_scm",(void*)f_4491},
-{"f_4492:eval_scm",(void*)f_4492},
-{"f_4496:eval_scm",(void*)f_4496},
-{"f_4508:eval_scm",(void*)f_4508},
-{"f_4533:eval_scm",(void*)f_4533},
-{"f_4499:eval_scm",(void*)f_4499},
-{"f_4484:eval_scm",(void*)f_4484},
-{"f_4415:eval_scm",(void*)f_4415},
-{"f_4476:eval_scm",(void*)f_4476},
-{"f_4418:eval_scm",(void*)f_4418},
-{"f_4468:eval_scm",(void*)f_4468},
-{"f_4424:eval_scm",(void*)f_4424},
-{"f_4460:eval_scm",(void*)f_4460},
-{"f_4427:eval_scm",(void*)f_4427},
-{"f_4428:eval_scm",(void*)f_4428},
-{"f_4444:eval_scm",(void*)f_4444},
-{"f_4448:eval_scm",(void*)f_4448},
-{"f_4452:eval_scm",(void*)f_4452},
-{"f_4456:eval_scm",(void*)f_4456},
-{"f_4402:eval_scm",(void*)f_4402},
-{"f_4348:eval_scm",(void*)f_4348},
-{"f_4394:eval_scm",(void*)f_4394},
-{"f_4351:eval_scm",(void*)f_4351},
-{"f_4386:eval_scm",(void*)f_4386},
-{"f_4357:eval_scm",(void*)f_4357},
-{"f_4358:eval_scm",(void*)f_4358},
-{"f_4374:eval_scm",(void*)f_4374},
-{"f_4378:eval_scm",(void*)f_4378},
-{"f_4382:eval_scm",(void*)f_4382},
-{"f_4335:eval_scm",(void*)f_4335},
-{"f_4299:eval_scm",(void*)f_4299},
-{"f_4327:eval_scm",(void*)f_4327},
-{"f_4302:eval_scm",(void*)f_4302},
-{"f_4303:eval_scm",(void*)f_4303},
-{"f_4319:eval_scm",(void*)f_4319},
-{"f_4323:eval_scm",(void*)f_4323},
-{"f_4286:eval_scm",(void*)f_4286},
-{"f_4265:eval_scm",(void*)f_4265},
-{"f_4266:eval_scm",(void*)f_4266},
-{"f_4282:eval_scm",(void*)f_4282},
-{"f_4123:eval_scm",(void*)f_4123},
-{"f_4137:eval_scm",(void*)f_4137},
-{"f_4141:eval_scm",(void*)f_4141},
-{"f_4150:eval_scm",(void*)f_4150},
-{"f_4183:eval_scm",(void*)f_4183},
-{"f_4191:eval_scm",(void*)f_4191},
-{"f_4156:eval_scm",(void*)f_4156},
-{"f_4159:eval_scm",(void*)f_4159},
-{"f_4175:eval_scm",(void*)f_4175},
-{"f_4166:eval_scm",(void*)f_4166},
-{"f_4174:eval_scm",(void*)f_4174},
-{"f_4211:eval_scm",(void*)f_4211},
-{"f_4219:eval_scm",(void*)f_4219},
-{"f_4198:eval_scm",(void*)f_4198},
-{"f_4210:eval_scm",(void*)f_4210},
-{"f_4131:eval_scm",(void*)f_4131},
-{"f_4011:eval_scm",(void*)f_4011},
-{"f_4070:eval_scm",(void*)f_4070},
-{"f_4073:eval_scm",(void*)f_4073},
-{"f_4095:eval_scm",(void*)f_4095},
-{"f_4076:eval_scm",(void*)f_4076},
-{"f_4077:eval_scm",(void*)f_4077},
-{"f_4081:eval_scm",(void*)f_4081},
-{"f_4084:eval_scm",(void*)f_4084},
-{"f_4048:eval_scm",(void*)f_4048},
-{"f_4051:eval_scm",(void*)f_4051},
-{"f_4052:eval_scm",(void*)f_4052},
-{"f_4056:eval_scm",(void*)f_4056},
-{"f_3951:eval_scm",(void*)f_3951},
-{"f_3954:eval_scm",(void*)f_3954},
-{"f_3957:eval_scm",(void*)f_3957},
-{"f_3960:eval_scm",(void*)f_3960},
-{"f_3961:eval_scm",(void*)f_3961},
-{"f_3968:eval_scm",(void*)f_3968},
-{"f_3941:eval_scm",(void*)f_3941},
-{"f_3907:eval_scm",(void*)f_3907},
-{"f_3901:eval_scm",(void*)f_3901},
-{"f_3902:eval_scm",(void*)f_3902},
-{"f_3885:eval_scm",(void*)f_3885},
-{"f_3807:eval_scm",(void*)f_3807},
-{"f_3810:eval_scm",(void*)f_3810},
-{"f_3867:eval_scm",(void*)f_3867},
-{"f_3865:eval_scm",(void*)f_3865},
-{"f_3857:eval_scm",(void*)f_3857},
-{"f_3849:eval_scm",(void*)f_3849},
-{"f_3841:eval_scm",(void*)f_3841},
-{"f_3833:eval_scm",(void*)f_3833},
-{"f_3825:eval_scm",(void*)f_3825},
-{"f_3817:eval_scm",(void*)f_3817},
-{"f_3761:eval_scm",(void*)f_3761},
-{"f_3750:eval_scm",(void*)f_3750},
-{"f_3748:eval_scm",(void*)f_3748},
-{"f_3737:eval_scm",(void*)f_3737},
-{"f_3735:eval_scm",(void*)f_3735},
-{"f_3727:eval_scm",(void*)f_3727},
-{"f_3719:eval_scm",(void*)f_3719},
-{"f_3711:eval_scm",(void*)f_3711},
-{"f_3603:eval_scm",(void*)f_3603},
-{"f_3671:eval_scm",(void*)f_3671},
-{"f_3613:eval_scm",(void*)f_3613},
-{"f_3662:eval_scm",(void*)f_3662},
-{"f_3647:eval_scm",(void*)f_3647},
-{"f10647:eval_scm",(void*)f10647},
-{"f10642:eval_scm",(void*)f10642},
-{"f_3619:eval_scm",(void*)f_3619},
-{"f_3622:eval_scm",(void*)f_3622},
-{"f_3623:eval_scm",(void*)f_3623},
-{"f_3694:eval_scm",(void*)f_3694},
-{"f_3685:eval_scm",(void*)f_3685},
-{"f_3597:eval_scm",(void*)f_3597},
-{"f_3585:eval_scm",(void*)f_3585},
-{"f_3526:eval_scm",(void*)f_3526},
-{"f_3530:eval_scm",(void*)f_3530},
-{"f_3551:eval_scm",(void*)f_3551},
-{"f_3562:eval_scm",(void*)f_3562},
-{"f_3555:eval_scm",(void*)f_3555},
-{"f_3531:eval_scm",(void*)f_3531},
-{"f_3535:eval_scm",(void*)f_3535},
-{"f_3538:eval_scm",(void*)f_3538},
-{"f_3542:eval_scm",(void*)f_3542},
-{"f_3545:eval_scm",(void*)f_3545},
-{"f_3419:eval_scm",(void*)f_3419},
-{"f_3423:eval_scm",(void*)f_3423},
-{"f_3431:eval_scm",(void*)f_3431},
-{"f_3448:eval_scm",(void*)f_3448},
-{"f_3478:eval_scm",(void*)f_3478},
-{"f_3404:eval_scm",(void*)f_3404},
-{"f_3408:eval_scm",(void*)f_3408},
-{"f_3414:eval_scm",(void*)f_3414},
-{"f_3365:eval_scm",(void*)f_3365},
-{"f_3402:eval_scm",(void*)f_3402},
-{"f_3398:eval_scm",(void*)f_3398},
-{"f_3378:eval_scm",(void*)f_3378},
-{"f_3315:eval_scm",(void*)f_3315},
-{"f_3334:eval_scm",(void*)f_3334},
-{"f_3346:eval_scm",(void*)f_3346},
-{"f_3349:eval_scm",(void*)f_3349},
-{"f_3352:eval_scm",(void*)f_3352},
-{"f_3342:eval_scm",(void*)f_3342},
-{"f_3321:eval_scm",(void*)f_3321},
-{"f_3255:eval_scm",(void*)f_3255},
-{"f_3259:eval_scm",(void*)f_3259},
-{"f_3267:eval_scm",(void*)f_3267},
-{"f_3187:eval_scm",(void*)f_3187},
-{"f_3193:eval_scm",(void*)f_3193},
-{"f_3216:eval_scm",(void*)f_3216},
-{"f_3239:eval_scm",(void*)f_3239},
-{"f_3224:eval_scm",(void*)f_3224},
-{"f_3203:eval_scm",(void*)f_3203},
-{"f_3167:eval_scm",(void*)f_3167},
-{"f_3179:eval_scm",(void*)f_3179},
-{"f_3182:eval_scm",(void*)f_3182},
-{"f_3175:eval_scm",(void*)f_3175},
-{"f_3107:eval_scm",(void*)f_3107},
-{"f_3111:eval_scm",(void*)f_3111},
-{"f_3119:eval_scm",(void*)f_3119},
-{"f_3052:eval_scm",(void*)f_3052},
-{"f_3105:eval_scm",(void*)f_3105},
-{"f_3062:eval_scm",(void*)f_3062},
-{"f_3037:eval_scm",(void*)f_3037},
-{"f_3025:eval_scm",(void*)f_3025},
-{"f_3029:eval_scm",(void*)f_3029},
-{"f_2991:eval_scm",(void*)f_2991},
-{"f_2995:eval_scm",(void*)f_2995},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/expand.c b/bootstrap/expand.c
deleted file mode 100644
index a40ac328..00000000
--- a/bootstrap/expand.c
+++ /dev/null
@@ -1,23898 +0,0 @@
-/* Generated from expand.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:34
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: expand.scm -optimize-level 2 -include-path . -include-path ./ -inline -explicit-use -no-trace -output-file expand.c
- unit: expand
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-
-static C_TLS C_word lf[360];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,20),40,108,111,111,107,117,112,32,105,100,49,48,48,32,115,101,49,48,49,41,0,0,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,26),40,109,97,99,114,111,45,97,108,105,97,115,32,118,97,114,49,49,54,32,115,101,49,49,55,41,0,0,0,0,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,11),40,100,111,108,111,111,112,50,48,49,41,0,0,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,11),40,119,97,108,107,32,120,49,55,49,41,0,0,0,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,24),40,98,111,100,121,49,53,56,32,115,101,49,54,55,32,97,108,105,97,115,49,54,56,41};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,24),40,100,101,102,45,97,108,105,97,115,49,54,49,32,37,115,101,49,53,54,50,49,49,41};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,49,54,48,41,0,0,0,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,115,116,114,105,112,45,115,121,110,116,97,120,32,101,120,112,49,53,49,32,46,32,116,109,112,49,53,48,49,53,50,41,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,6),40,103,50,51,49,41,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,57),40,35,35,115,121,115,35,101,120,116,101,110,100,45,109,97,99,114,111,45,101,110,118,105,114,111,110,109,101,110,116,32,110,97,109,101,50,49,57,32,115,101,50,50,48,32,104,97,110,100,108,101,114,50,50,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,99,111,112,121,45,109,97,99,114,111,32,111,108,100,50,51,54,32,110,101,119,50,51,55,41};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,109,97,99,114,111,63,32,115,121,109,50,52,54,32,46,32,116,109,112,50,52,53,50,52,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,109,101,50,54,54,41,0,0,0,0};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,117,110,114,101,103,105,115,116,101,114,45,109,97,99,114,111,32,110,97,109,101,50,54,52,41};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,117,110,100,101,102,105,110,101,45,109,97,99,114,111,33,32,110,97,109,101,50,55,54,41,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,12),40,99,111,112,121,32,112,115,51,48,48,41,0,0,0,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,52,51,54,51,41,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,13),40,97,52,51,53,55,32,101,120,50,57,54,41,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,17),40,102,95,52,53,48,50,32,105,110,112,117,116,51,49,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,7),40,97,52,53,48,55,41,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,7),40,97,52,53,49,50,41,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,7),40,97,52,53,49,56,41,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,7),40,97,52,52,55,48,41,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,7),40,97,52,53,51,50,41,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,20),40,97,52,53,50,54,32,46,32,97,114,103,115,50,57,49,51,50,57,41,0,0,0,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,7),40,97,52,52,54,52,41,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,97,52,51,53,49,32,107,50,57,48,50,57,53,41,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,52),40,99,97,108,108,45,104,97,110,100,108,101,114,32,110,97,109,101,50,56,51,32,104,97,110,100,108,101,114,50,56,52,32,101,120,112,50,56,53,32,115,101,50,56,54,32,99,115,50,56,55,41,0,0,0,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,31),40,101,120,112,97,110,100,32,104,101,97,100,51,51,50,32,101,120,112,51,51,51,32,109,100,101,102,51,51,52,41,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,52,48,53,32,103,52,49,53,52,49,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,51,56,49,32,103,51,57,49,51,57,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,12),40,103,52,51,57,32,99,115,52,52,49,41,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,101,120,112,51,52,52,41,0,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,101,120,112,97,110,100,45,48,32,101,120,112,50,55,56,32,100,115,101,50,55,57,32,99,115,63,50,56,48,41,0,0,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,109,111,100,117,108,101,45,114,101,110,97,109,101,32,115,121,109,52,53,55,32,112,114,101,102,105,120,52,53,56,41,0,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,13),40,103,52,55,57,32,109,111,100,52,56,49,41,0,0,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,16),40,109,114,101,110,97,109,101,32,115,121,109,52,55,48,41};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,11),40,103,52,57,54,32,97,52,57,56,41,0,0,0,0,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,97,108,105,97,115,45,103,108,111,98,97,108,45,104,111,111,107,32,115,121,109,52,54,48,32,97,115,115,105,103,110,52,54,49,41,0,0,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,7),40,97,53,48,52,49,41,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,32),40,97,53,48,52,55,32,101,120,112,50,53,51,55,53,51,56,53,52,49,32,109,53,51,57,53,52,48,53,52,50,41};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,101,120,112,53,51,52,41,0,0,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,22),40,98,111,100,121,53,50,50,32,115,101,53,51,49,32,99,115,63,53,51,50,41,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,22),40,100,101,102,45,99,115,63,53,50,53,32,37,115,101,53,50,48,53,52,55,41,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,53,50,52,41,0,0,0,0,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,101,120,112,97,110,100,32,101,120,112,53,49,53,32,46,32,116,109,112,53,49,52,53,49,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,101,120,116,101,110,100,101,100,45,108,97,109,98,100,97,45,108,105,115,116,63,32,108,108,105,115,116,53,53,52,41,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,12),40,101,114,114,32,109,115,103,53,56,51,41,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,11),40,103,54,50,56,32,107,54,51,48,41,0,0,0,0,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,54,49,50,32,103,54,50,50,54,50,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,44),40,108,111,111,112,32,109,111,100,101,53,57,52,32,114,101,113,53,57,53,32,111,112,116,53,57,54,32,107,101,121,53,57,55,32,108,108,105,115,116,53,57,56,41,0,0,0,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,67),40,35,35,115,121,115,35,101,120,112,97,110,100,45,101,120,116,101,110,100,101,100,45,108,97,109,98,100,97,45,108,105,115,116,32,108,108,105,115,116,48,53,55,55,32,98,111,100,121,53,55,56,32,101,114,114,104,53,55,57,32,115,101,53,56,48,41,0,0,0,0,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,98,111,100,121,50,55,54,48,32,101,120,112,115,55,54,49,41,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,17),40,97,53,57,54,53,32,118,56,53,49,32,116,56,53,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,50,54,32,103,56,51,54,56,52,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,18),40,97,53,57,50,56,32,118,115,56,50,49,32,120,56,50,50,41,0,0,0,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,17),40,97,54,48,51,48,32,118,56,49,53,32,120,56,49,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,57,51,32,103,56,48,51,56,48,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,48),40,102,105,110,105,32,118,97,114,115,55,53,50,32,118,97,108,115,55,53,51,32,109,118,97,114,115,55,53,52,32,109,118,97,108,115,55,53,53,32,98,111,100,121,55,53,54,41};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,30),40,108,111,111,112,32,98,111,100,121,56,54,53,32,100,101,102,115,56,54,54,32,100,111,110,101,56,54,55,41,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,55),40,102,105,110,105,47,115,121,110,116,97,120,32,118,97,114,115,56,53,57,32,118,97,108,115,56,54,48,32,109,118,97,114,115,56,54,49,32,109,118,97,108,115,56,54,50,32,98,111,100,121,56,54,51,41,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,50,32,120,57,50,53,41,0,0,0,0};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,48),40,108,111,111,112,32,98,111,100,121,56,57,55,32,118,97,114,115,56,57,56,32,118,97,108,115,56,57,57,32,109,118,97,114,115,57,48,48,32,109,118,97,108,115,57,48,49,41};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,16),40,101,120,112,97,110,100,32,98,111,100,121,56,57,53,41};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,22),40,98,111,100,121,55,51,56,32,115,101,55,52,55,32,99,115,63,55,52,56,41,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,22),40,100,101,102,45,99,115,63,55,52,49,32,37,115,101,55,51,54,57,53,54,41,0,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,55,52,48,41,0,0,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,45),40,35,35,115,121,115,35,99,97,110,111,110,105,99,97,108,105,122,101,45,98,111,100,121,32,98,111,100,121,55,51,49,32,46,32,116,109,112,55,51,48,55,51,50,41,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,6),40,103,57,56,53,41,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,17),40,109,119,97,108,107,32,120,57,54,57,32,112,57,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,40),40,109,97,116,99,104,45,101,120,112,114,101,115,115,105,111,110,32,101,120,112,57,54,50,32,112,97,116,57,54,51,32,118,97,114,115,57,54,52,41};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,104,101,97,100,57,57,56,32,98,111,100,121,57,57,57,41,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,101,120,112,97,110,100,45,99,117,114,114,105,101,100,45,100,101,102,105,110,101,32,104,101,97,100,57,57,51,32,98,111,100,121,57,57,52,32,115,101,57,57,53,41,0,0,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,115,121,110,116,97,120,45,101,114,114,111,114,45,104,111,111,107,32,46,32,97,114,103,115,49,48,49,50,41,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,115,121,110,116,97,120,45,114,117,108,101,115,45,109,105,115,109,97,116,99,104,32,105,110,112,117,116,49,48,49,52,41,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,7),40,103,49,48,51,50,41,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,26),40,103,101,116,45,108,105,110,101,45,110,117,109,98,101,114,32,115,101,120,112,49,48,49,54,41,0,0,0,0,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,29),40,116,101,115,116,32,120,49,48,55,52,32,112,114,101,100,49,48,55,53,32,109,115,103,49,48,55,54,41,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,13),40,101,114,114,32,109,115,103,49,48,55,57,41,0,0,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,120,49,48,57,48,41,0,0,0,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,20),40,108,97,109,98,100,97,45,108,105,115,116,63,32,120,49,48,56,51,41,0,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,20),40,112,114,111,112,101,114,45,108,105,115,116,63,32,120,49,49,48,56,41,0,0,0,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,49,49,52,51,32,120,49,49,52,55,32,110,49,49,52,56,41};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,13),40,97,55,49,56,56,32,121,49,49,54,50,41,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,18),40,119,97,108,107,32,120,49,49,50,52,32,112,49,49,50,53,41,0,0,0,0,0,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,29),40,98,111,100,121,49,48,53,55,32,99,117,108,112,114,105,116,49,48,54,54,32,115,101,49,48,54,55,41,0,0,0};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,29),40,100,101,102,45,115,101,49,48,54,48,32,37,99,117,108,112,114,105,116,49,48,53,53,49,49,55,52,41,0,0,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,17),40,100,101,102,45,99,117,108,112,114,105,116,49,48,53,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,57),40,35,35,115,121,115,35,99,104,101,99,107,45,115,121,110,116,97,120,32,105,100,49,48,52,56,32,101,120,112,49,48,52,57,32,112,97,116,49,48,53,48,32,46,32,116,109,112,49,48,52,55,49,48,53,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,28),40,101,114,45,109,97,99,114,111,45,116,114,97,110,115,102,111,114,109,101,114,32,120,49,49,56,49,41,0,0,0,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,13),40,103,49,50,48,53,32,97,49,50,48,55,41,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,16),40,114,101,110,97,109,101,32,115,121,109,49,49,57,48,41};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,49,50,52,50,32,105,49,50,52,54,32,102,49,50,52,55,41};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,7),40,103,49,51,48,50,41,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,7),40,103,49,51,49,51,41,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,23),40,99,111,109,112,97,114,101,32,115,49,49,50,50,52,32,115,50,49,50,50,53,41,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,32),40,102,95,55,51,50,49,32,102,111,114,109,49,49,56,51,32,115,101,49,49,56,52,32,100,115,101,49,49,56,53,41};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,101,114,45,116,114,97,110,115,102,111,114,109,101,114,32,104,97,110,100,108,101,114,49,49,56,50,41,0,0,0,0,0,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,17),40,114,101,115,111,108,118,101,32,115,121,109,49,51,52,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,13),40,116,111,115,116,114,32,120,49,51,53,48,41,0,0,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,49,51,55,48,41,0,0,0,0,0,0};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,7),40,97,55,56,49,56,41,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,22),40,105,109,112,111,114,116,45,110,97,109,101,32,115,112,101,99,49,51,53,55,41,0,0};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,13),40,103,49,52,55,50,32,97,49,52,55,52,41,0,0,0};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,13),40,103,49,52,55,54,32,97,49,52,55,56,41,0,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,105,100,115,49,52,54,49,32,118,49,52,54,50,32,115,49,52,54,51,41,0,0,0,0,0,0};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,51,57,32,103,49,52,52,57,49,52,53,51,41,0,0,0,0};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,105,109,112,115,49,53,49,53,32,115,49,53,49,54,41,0,0,0};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,105,109,112,118,49,53,48,54,32,118,49,53,48,55,41,0,0,0};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,56,52,32,103,49,52,57,52,49,52,57,56,41,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,52,56,32,103,49,53,53,50,49,53,53,52,41,0,0,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,13),40,103,49,53,54,50,32,97,49,53,54,52,41,0,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,13),40,103,49,53,54,54,32,97,49,53,54,56,41,0,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,44),40,108,111,111,112,32,105,109,112,118,49,53,50,55,32,105,109,112,115,49,53,50,56,32,118,49,53,50,57,32,115,49,53,51,48,32,105,100,115,49,53,51,49,41,0,0,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,13),40,114,101,110,32,105,109,112,49,53,55,51,41,0,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,57,57,32,103,49,54,48,57,49,54,49,51,41,0,0,0,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,55,54,32,103,49,53,56,54,49,53,57,48,41,0,0,0,0};
-static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,22),40,105,109,112,111,114,116,45,115,112,101,99,32,115,112,101,99,49,52,49,51,41,0,0};
-static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,49,55,32,103,49,55,50,55,49,55,51,49,41,0,0,0,0};
-static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,57,52,32,103,49,55,48,52,49,55,48,56,41,0,0,0,0};
-static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,15),40,103,49,54,55,57,32,105,109,112,49,54,56,49,41,0};
-static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,55,50,32,103,49,54,55,54,49,54,55,56,41,0,0,0,0};
-static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,15),40,103,49,54,53,52,32,105,109,112,49,54,53,54,41,0};
-static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,52,55,32,103,49,54,53,49,49,54,53,51,41,0,0,0,0};
-static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,16),40,103,49,54,51,52,32,115,112,101,99,49,54,51,54,41};
-static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,50,55,32,103,49,54,51,49,49,54,51,51,41,0,0,0,0};
-static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,97),40,35,35,115,121,115,35,101,120,112,97,110,100,45,105,109,112,111,114,116,32,120,49,51,50,56,32,114,49,51,50,57,32,99,49,51,51,48,32,105,109,112,111,114,116,45,101,110,118,49,51,51,49,32,109,97,99,114,111,45,101,110,118,49,51,51,50,32,109,101,116,97,63,49,51,51,51,32,114,101,101,120,112,63,49,51,51,52,32,108,111,99,49,51,51,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,54,57,32,103,49,55,55,51,49,55,55,53,41,0,0,0,0};
-static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,109,97,114,107,45,112,114,105,109,105,116,105,118,101,32,112,114,105,109,115,49,55,54,54,41};
-static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,14),40,102,95,57,48,55,48,32,120,50,52,55,53,41,0,0};
-static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,52,56,51,32,103,50,52,57,51,50,52,57,55,41,0,0,0,0};
-static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,18),40,102,95,57,48,55,54,32,114,117,108,101,115,50,52,55,54,41,0,0,0,0,0,0};
-static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,13),40,97,57,50,53,48,32,120,50,53,49,53,41,0,0,0};
-static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,17),40,102,95,57,50,48,49,32,114,117,108,101,50,53,48,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,30),40,102,95,57,50,56,53,32,105,110,112,117,116,50,53,49,54,32,112,97,116,116,101,114,110,50,53,49,55,41,0,0};
-static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,30),40,102,95,57,53,48,54,32,105,110,112,117,116,50,53,54,50,32,112,97,116,116,101,114,110,50,53,54,51,41,0,0};
-static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,50,53,57,55,41,0,0,0,0,0,0};
-static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,30),40,102,95,57,54,50,56,32,105,110,112,117,116,50,53,55,55,32,112,97,116,116,101,114,110,50,53,55,56,41,0,0};
-static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,13),40,97,57,57,53,52,32,120,50,54,50,56,41,0,0,0};
-static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,50,54,53,49,41,0,0,0,0,0,0};
-static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,39),40,102,95,57,57,49,54,32,112,97,116,116,101,114,110,50,54,49,57,32,112,97,116,104,50,54,50,48,32,109,97,112,105,116,50,54,50,49,41,0};
-static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,26),40,100,111,108,111,111,112,50,54,57,53,32,100,50,54,57,57,32,103,101,110,50,55,48,48,41,0,0,0,0,0,0};
-static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,38),40,102,95,49,48,49,50,51,32,116,101,109,112,108,97,116,101,50,54,54,51,32,100,105,109,50,54,54,52,32,101,110,118,50,54,54,53,41,0,0};
-static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,38),40,102,95,49,48,51,55,55,32,112,97,116,116,101,114,110,50,55,50,50,32,100,105,109,50,55,50,51,32,118,97,114,115,50,55,50,52,41,0,0};
-static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,47),40,102,95,49,48,52,53,48,32,116,101,109,112,108,97,116,101,50,55,51,49,32,100,105,109,50,55,51,50,32,101,110,118,50,55,51,51,32,102,114,101,101,50,55,51,52,41,0};
-static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,53,52,51,32,112,97,116,116,101,114,110,50,55,52,54,41,0,0,0};
-static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,53,54,53,32,112,97,116,116,101,114,110,50,55,53,52,41,0,0,0};
-static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,53,57,49,32,112,97,116,116,101,114,110,50,55,53,57,41,0,0,0};
-static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,112,97,116,116,101,114,110,50,55,54,50,41,0,0,0,0,0,0};
-static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,54,49,49,32,112,97,116,116,101,114,110,50,55,54,48,41,0,0,0};
-static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,79),40,35,35,115,121,115,35,112,114,111,99,101,115,115,45,115,121,110,116,97,120,45,114,117,108,101,115,32,101,108,108,105,112,115,105,115,50,52,49,55,32,114,117,108,101,115,50,52,49,56,32,115,117,98,107,101,121,119,111,114,100,115,50,52,49,57,32,114,50,52,50,48,32,99,50,52,50,49,41,0};
-static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,109,101,50,56,51,54,41,0,0,0};
-static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,109,97,99,114,111,45,115,117,98,115,101,116,32,109,101,48,50,56,50,55,32,46,32,116,109,112,50,56,50,54,50,56,50,56,41,0,0,0,0,0,0};
-static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,16),40,103,50,56,54,55,32,115,100,101,102,50,56,54,57,41};
-static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,56,54,48,32,103,50,56,54,52,50,56,54,54,41,0,0,0,0};
-static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,52),40,35,35,115,121,115,35,102,105,120,117,112,45,109,97,99,114,111,45,101,110,118,105,114,111,110,109,101,110,116,32,115,101,50,56,53,48,32,46,32,116,109,112,50,56,52,57,50,56,53,49,41,0,0,0,0};
-static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,23),40,109,111,100,117,108,101,45,110,97,109,101,32,120,50,56,56,48,50,56,57,54,41,0};
-static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,48),40,115,101,116,45,109,111,100,117,108,101,45,117,110,100,101,102,105,110,101,100,45,108,105,115,116,33,32,120,50,56,56,48,50,57,50,51,32,121,50,56,56,49,50,57,50,52,41};
-static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,33),40,109,111,100,117,108,101,45,117,110,100,101,102,105,110,101,100,45,108,105,115,116,32,120,50,56,56,48,50,57,50,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,109,111,100,117,108,101,45,101,120,112,111,114,116,115,32,109,50,57,56,49,41,0,0,0,0};
-static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,102,105,110,100,45,109,111,100,117,108,101,32,110,97,109,101,50,57,57,52,32,46,32,116,109,112,50,57,57,51,50,57,57,53,41,0,0,0,0,0,0};
-static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,64),40,35,35,115,121,115,35,116,111,112,108,101,118,101,108,45,100,101,102,105,110,105,116,105,111,110,45,104,111,111,107,32,115,121,109,51,48,49,48,32,109,111,100,51,48,49,49,32,101,120,112,51,48,49,50,32,118,97,108,51,48,49,51,41};
-static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,109,101,116,97,45,101,120,112,114,101,115,115,105,111,110,32,101,120,112,51,48,49,53,41};
-static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,42),40,99,104,101,99,107,45,102,111,114,45,114,101,100,101,102,32,115,121,109,51,48,50,49,32,101,110,118,51,48,50,50,32,115,101,110,118,51,48,50,51,41,0,0,0,0,0,0};
-static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,101,120,112,111,114,116,32,115,121,109,51,48,51,52,32,109,111,100,51,48,51,53,41,0};
-static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,54),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,115,121,110,116,97,120,45,101,120,112,111,114,116,32,115,121,109,51,48,53,54,32,109,111,100,51,48,53,55,32,118,97,108,51,48,53,56,41,0,0};
-static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,117,110,100,101,102,105,110,101,100,32,115,121,109,51,48,55,57,32,109,111,100,51,48,56,48,41,0,0,0,0,0,0};
-static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,23),40,98,111,100,121,51,49,48,49,32,115,101,120,112,111,114,116,115,51,49,49,49,41,0};
-static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,18),40,100,101,102,45,115,101,120,112,111,114,116,115,51,49,48,52,41,0,0,0,0,0,0};
-static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,58),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,109,111,100,117,108,101,32,110,97,109,101,51,48,57,51,32,101,120,112,108,105,115,116,51,48,57,52,32,46,32,116,109,112,51,48,57,50,51,48,57,53,41,0,0,0,0,0,0};
-static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,49,50,53,32,103,51,49,50,57,51,49,51,49,41,0,0,0,0};
-static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,109,97,114,107,45,105,109,112,111,114,116,101,100,45,115,121,109,98,111,108,115,32,115,101,51,49,50,50,41,0,0,0,0};
-static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,21),40,119,97,114,110,32,109,115,103,51,49,54,51,32,105,100,51,49,54,52,41,0,0,0};
-static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,13),40,103,51,49,56,52,32,97,51,49,56,54,41,0,0,0};
-static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,13),40,103,51,49,57,51,32,97,51,49,57,53,41,0,0,0};
-static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,32,105,101,120,112,111,114,116,115,51,49,55,52,41,0,0,0,0};
-static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,101,120,112,111,114,116,115,51,49,54,54,41,0,0,0,0,0,0};
-static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,33),40,109,111,100,117,108,101,45,105,110,100,105,114,101,99,116,45,101,120,112,111,114,116,115,32,109,111,100,51,49,52,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,115,101,51,50,49,52,41,0,0,0};
-static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,18),40,109,101,114,103,101,45,115,101,32,115,101,115,51,50,48,57,41,0,0,0,0,0,0};
-static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,115,100,51,51,52,51,41,0,0,0};
-static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,19),40,103,51,51,49,55,32,115,101,120,112,111,114,116,51,51,49,57,41,0,0,0,0,0};
-static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,51,48,49,32,103,51,51,49,49,51,51,49,53,41,0,0,0,0};
-static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,50,54,57,32,103,51,50,55,57,51,50,56,51,41,0,0,0,0};
-static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,50,52,54,32,103,51,50,53,54,51,50,54,48,41,0,0,0,0};
-static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,44),40,35,35,115,121,115,35,99,111,109,112,105,108,101,100,45,109,111,100,117,108,101,45,114,101,103,105,115,116,114,97,116,105,111,110,32,109,111,100,51,50,50,54,41,0,0,0,0};
-static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,7),40,103,51,52,57,53,41,0};
-static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,56,56,32,103,51,52,57,50,51,52,57,52,41,0,0,0,0};
-static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,7),40,103,51,52,55,57,41,0};
-static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,55,50,32,103,51,52,55,54,51,52,55,56,41,0,0,0,0};
-static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,7),40,103,51,52,54,53,41,0};
-static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,53,56,32,103,51,52,54,50,51,52,54,52,41,0,0,0,0};
-static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,51,50,32,103,51,52,52,50,51,52,52,54,41,0,0,0,0};
-static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,48,55,32,103,51,52,49,55,51,52,50,49,41,0,0,0,0};
-static C_char C_TLS li196[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,51,56,50,32,103,51,51,57,50,51,51,57,54,41,0,0,0,0};
-static C_char C_TLS li197[] C_aligned={C_lihdr(0,0,94),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,99,111,109,112,105,108,101,100,45,109,111,100,117,108,101,32,110,97,109,101,51,51,54,51,32,105,101,120,112,111,114,116,115,51,51,54,52,32,118,101,120,112,111,114,116,115,51,51,54,53,32,115,101,120,112,111,114,116,115,51,51,54,54,32,46,32,116,109,112,51,51,54,50,51,51,54,55,41,0,0};
-static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,112,114,105,109,105,116,105,118,101,45,97,108,105,97,115,32,115,121,109,51,53,48,55,41,0};
-static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,14),40,103,51,53,55,48,32,115,101,51,53,55,50,41,0,0};
-static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,53,53,52,32,103,51,53,54,52,51,53,54,56,41,0,0,0,0};
-static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,53,51,48,32,103,51,53,52,48,51,53,52,52,41,0,0,0,0};
-static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,69),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,112,114,105,109,105,116,105,118,101,45,109,111,100,117,108,101,32,110,97,109,101,51,53,49,55,32,118,101,120,112,111,114,116,115,51,53,49,56,32,46,32,116,109,112,51,53,49,54,51,53,49,57,41,0,0,0};
-static C_char C_TLS li203[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,120,108,51,53,56,56,41,0,0,0};
-static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,48),40,35,35,115,121,115,35,102,105,110,100,45,101,120,112,111,114,116,32,115,121,109,51,53,56,51,32,109,111,100,51,53,56,52,32,105,110,100,105,114,101,99,116,51,53,56,53,41};
-static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,13),40,103,51,55,53,51,32,109,51,55,53,53,41,0,0,0};
-static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,55,52,54,32,103,51,55,53,48,51,55,53,50,41,0,0,0,0};
-static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,55,49,48,32,103,51,55,50,48,51,55,50,52,41,0,0,0,0};
-static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,51,54,57,56,41,0,0};
-static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,13),40,103,51,54,56,56,32,117,51,54,57,48,41,0,0,0};
-static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,54,56,49,32,103,51,54,56,53,51,54,56,55,41,0,0,0,0};
-static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,120,108,51,54,53,56,41,0,0,0};
-static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,109,101,51,54,52,56,41,0,0,0};
-static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,54,50,52,32,103,51,54,51,52,51,54,51,56,41,0,0,0,0};
-static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,102,105,110,97,108,105,122,101,45,109,111,100,117,108,101,32,109,111,100,51,54,49,52,41,0};
-static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,28),40,97,49,51,52,54,52,32,101,120,112,50,52,48,51,32,114,50,52,48,52,32,99,50,52,48,53,41,0,0,0,0};
-static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,51,55,56,32,103,50,51,56,56,50,51,57,50,41,0,0,0,0};
-static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,15),40,103,50,51,53,56,32,101,120,112,50,51,54,48,41,0};
-static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,51,53,49,32,103,50,51,53,53,50,51,53,55,41,0,0,0,0};
-static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,26),40,97,49,51,53,48,49,32,120,50,51,52,50,32,114,50,51,52,51,32,99,50,51,52,52,41,0,0,0,0,0,0};
-static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,26),40,97,49,51,54,54,49,32,120,50,51,50,57,32,114,50,51,51,48,32,99,50,51,51,49,41,0,0,0,0,0,0};
-static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,26),40,97,49,51,55,48,53,32,120,50,51,50,49,32,114,50,51,50,50,32,99,50,51,50,51,41,0,0,0,0,0,0};
-static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,26),40,97,49,51,55,53,54,32,120,50,51,49,51,32,114,50,51,49,52,32,99,50,51,49,53,41,0,0,0,0,0,0};
-static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,26),40,97,49,51,55,55,55,32,120,50,51,48,53,32,114,50,51,48,54,32,99,50,51,48,55,41,0,0,0,0,0,0};
-static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,11),40,101,114,114,32,120,50,50,49,52,41,0,0,0,0,0};
-static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,13),40,116,101,115,116,32,102,120,50,50,49,53,41,0,0,0};
-static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,50,54,50,32,103,50,50,55,50,50,50,55,54,41,0,0,0,0};
-static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,16),40,101,120,112,97,110,100,32,99,108,115,50,50,53,51,41};
-static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,29),40,97,49,51,55,57,56,32,102,111,114,109,50,50,48,52,32,114,50,50,48,53,32,99,50,50,48,54,41,0,0,0};
-static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,29),40,97,49,52,49,49,55,32,102,111,114,109,50,49,57,54,32,114,50,49,57,55,32,99,50,49,57,56,41,0,0,0};
-static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,18),40,119,97,108,107,32,120,50,49,48,51,32,110,50,49,48,52,41,0,0,0,0,0,0};
-static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,19),40,119,97,108,107,49,32,120,50,49,48,53,32,110,50,49,48,54,41,0,0,0,0,0};
-static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,15),40,103,50,49,55,50,32,101,110,118,50,49,55,52,41,0};
-static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,15),40,103,50,49,56,48,32,101,110,118,50,49,56,50,41,0};
-static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,16),40,115,105,109,112,108,105,102,121,32,120,50,49,54,51,41};
-static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,29),40,97,49,52,49,53,48,32,102,111,114,109,50,48,57,51,32,114,50,48,57,52,32,99,50,48,57,53,41,0,0,0};
-static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,48,55,48,32,103,50,48,56,48,50,48,56,52,41,0,0,0,0};
-static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,48,51,55,32,103,50,48,52,55,50,48,53,49,41,0,0,0,0};
-static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,29),40,97,49,52,53,54,56,32,102,111,114,109,50,48,50,50,32,114,50,48,50,51,32,99,50,48,50,52,41,0,0,0};
-static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,15),40,101,120,112,97,110,100,32,98,115,50,48,49,49,41,0};
-static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,29),40,97,49,52,56,49,53,32,102,111,114,109,50,48,48,52,32,114,50,48,48,53,32,99,50,48,48,54,41,0,0,0};
-static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,7),40,103,49,57,57,49,41,0};
-static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,57,55,53,32,103,49,57,56,53,49,57,56,57,41,0,0,0,0};
-static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,57,54,50,41,0,0,0,0};
-static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,29),40,97,49,52,56,56,52,32,102,111,114,109,49,57,52,56,32,114,49,57,52,57,32,99,49,57,53,48,41,0,0,0};
-static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,57,49,49,41,0,0,0,0};
-static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,29),40,97,49,53,48,56,53,32,102,111,114,109,49,57,48,48,32,114,49,57,48,49,32,99,49,57,48,50,41,0,0,0};
-static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,29),40,97,49,53,52,49,53,32,102,111,114,109,49,56,56,57,32,114,49,56,57,48,32,99,49,56,57,49,41,0,0,0};
-static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,29),40,97,49,53,53,48,53,32,102,111,114,109,49,56,55,57,32,114,49,56,56,48,32,99,49,56,56,49,41,0,0,0};
-static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,29),40,97,49,53,53,54,52,32,102,111,114,109,49,56,53,53,32,114,49,56,53,54,32,99,49,56,53,55,41,0,0,0};
-static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,102,111,114,109,49,56,51,48,41,0};
-static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,29),40,97,49,53,54,53,54,32,102,111,114,109,49,56,50,54,32,114,49,56,50,55,32,99,49,56,50,56,41,0,0,0};
-static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,50),40,97,49,53,55,56,51,32,103,49,56,49,53,49,56,49,54,49,56,50,49,32,103,49,56,49,55,49,56,49,56,49,56,50,50,32,103,49,56,49,57,49,56,50,48,49,56,50,51,41,0,0,0,0,0,0};
-static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,50),40,97,49,53,55,57,51,32,103,49,56,48,48,49,56,48,49,49,56,48,54,32,103,49,56,48,50,49,56,48,51,49,56,48,55,32,103,49,56,48,52,49,56,48,53,49,56,48,56,41,0,0,0,0,0,0};
-static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,50),40,97,49,53,56,48,51,32,103,49,55,56,53,49,55,56,54,49,55,57,49,32,103,49,55,56,55,49,55,56,56,49,55,57,50,32,103,49,55,56,57,49,55,57,48,49,55,57,51,41,0,0,0,0,0,0};
-static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-C_noret_decl(C_expand_toplevel)
-C_externexport void C_ccall C_expand_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3866)
-static void C_ccall f_3866(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3894)
-static void C_ccall f_3894(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3898)
-static void C_ccall f_3898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4172)
-static void C_ccall f_4172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15804)
-static void C_ccall f_15804(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15802)
-static void C_ccall f_15802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8911)
-static void C_ccall f_8911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15794)
-static void C_ccall f_15794(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15792)
-static void C_ccall f_15792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8914)
-static void C_ccall f_8914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15784)
-static void C_ccall f_15784(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15782)
-static void C_ccall f_15782(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8917)
-static void C_ccall f_8917(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8921)
-static void C_ccall f_8921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15657)
-static void C_ccall f_15657(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15667)
-static void C_fcall f_15667(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15683)
-static void C_ccall f_15683(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15686)
-static void C_ccall f_15686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15714)
-static void C_ccall f_15714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15689)
-static void C_ccall f_15689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15736)
-static void C_ccall f_15736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15739)
-static void C_ccall f_15739(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15758)
-static void C_ccall f_15758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15770)
-static void C_ccall f_15770(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15723)
-static void C_ccall f_15723(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15726)
-static void C_ccall f_15726(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15733)
-static void C_ccall f_15733(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15655)
-static void C_ccall f_15655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8924)
-static void C_ccall f_8924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15565)
-static void C_ccall f_15565(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15581)
-static void C_ccall f_15581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15584)
-static void C_ccall f_15584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15606)
-static void C_ccall f_15606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15587)
-static void C_ccall f_15587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15609)
-static void C_ccall f_15609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15612)
-static void C_ccall f_15612(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15635)
-static void C_ccall f_15635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15647)
-static void C_ccall f_15647(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15563)
-static void C_ccall f_15563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8927)
-static void C_ccall f_8927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15506)
-static void C_ccall f_15506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15535)
-static void C_ccall f_15535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15555)
-static void C_ccall f_15555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15559)
-static void C_ccall f_15559(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15504)
-static void C_ccall f_15504(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8930)
-static void C_ccall f_8930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15416)
-static void C_ccall f_15416(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15441)
-static void C_ccall f_15441(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15448)
-static void C_ccall f_15448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15468)
-static void C_ccall f_15468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15488)
-static void C_ccall f_15488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15492)
-static void C_ccall f_15492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15414)
-static void C_ccall f_15414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8933)
-static void C_ccall f_8933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15086)
-static void C_ccall f_15086(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15093)
-static void C_ccall f_15093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15096)
-static void C_ccall f_15096(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15099)
-static void C_ccall f_15099(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15102)
-static void C_ccall f_15102(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15105)
-static void C_ccall f_15105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15108)
-static void C_ccall f_15108(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15113)
-static void C_fcall f_15113(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15129)
-static void C_ccall f_15129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15135)
-static void C_ccall f_15135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15177)
-static void C_ccall f_15177(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15245)
-static void C_ccall f_15245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15370)
-static void C_ccall f_15370(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15366)
-static void C_ccall f_15366(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15248)
-static void C_ccall f_15248(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15303)
-static void C_ccall f_15303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15180)
-static void C_ccall f_15180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15219)
-static void C_ccall f_15219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15171)
-static void C_ccall f_15171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15142)
-static void C_ccall f_15142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15084)
-static void C_ccall f_15084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8936)
-static void C_ccall f_8936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14885)
-static void C_ccall f_14885(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14889)
-static void C_ccall f_14889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14898)
-static void C_ccall f_14898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14901)
-static void C_ccall f_14901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14904)
-static void C_ccall f_14904(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14907)
-static void C_ccall f_14907(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14928)
-static void C_fcall f_14928(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14944)
-static void C_ccall f_14944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14950)
-static void C_ccall f_14950(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15010)
-static void C_fcall f_15010(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15037)
-static C_word C_fcall f_15037(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_15004)
-static void C_ccall f_15004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15000)
-static void C_ccall f_15000(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14992)
-static void C_ccall f_14992(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14988)
-static void C_ccall f_14988(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14957)
-static void C_ccall f_14957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14926)
-static void C_ccall f_14926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14883)
-static void C_ccall f_14883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8939)
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14816)
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14820)
-static void C_ccall f_14820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14829)
-static void C_ccall f_14829(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14834)
-static void C_fcall f_14834(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14871)
-static void C_ccall f_14871(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14852)
-static void C_ccall f_14852(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14814)
-static void C_ccall f_14814(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8942)
-static void C_ccall f_8942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14569)
-static void C_ccall f_14569(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14573)
-static void C_ccall f_14573(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14585)
-static void C_ccall f_14585(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14588)
-static void C_ccall f_14588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14591)
-static void C_ccall f_14591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14760)
-static void C_fcall f_14760(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14606)
-static void C_ccall f_14606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14758)
-static void C_ccall f_14758(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14633)
-static void C_fcall f_14633(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14748)
-static void C_ccall f_14748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14649)
-static void C_fcall f_14649(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14671)
-static void C_fcall f_14671(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14730)
-static void C_fcall f_14730(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14669)
-static void C_ccall f_14669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14665)
-static void C_ccall f_14665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14567)
-static void C_ccall f_14567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8945)
-static void C_ccall f_8945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14151)
-static void C_ccall f_14151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14155)
-static void C_ccall f_14155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14158)
-static void C_ccall f_14158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14161)
-static void C_ccall f_14161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14164)
-static void C_ccall f_14164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14556)
-static void C_ccall f_14556(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14453)
-static void C_fcall f_14453(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14457)
-static void C_ccall f_14457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14487)
-static void C_ccall f_14487(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14538)
-static void C_ccall f_14538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14491)
-static void C_fcall f_14491(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14520)
-static void C_ccall f_14520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14461)
-static void C_fcall f_14461(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14176)
-static void C_fcall f_14176(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14223)
-static void C_ccall f_14223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14270)
-static void C_ccall f_14270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14439)
-static void C_ccall f_14439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14447)
-static void C_ccall f_14447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14425)
-static void C_ccall f_14425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14414)
-static void C_ccall f_14414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14422)
-static void C_ccall f_14422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14395)
-static void C_ccall f_14395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14379)
-static void C_ccall f_14379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14360)
-static void C_ccall f_14360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14318)
-static void C_ccall f_14318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14295)
-static void C_ccall f_14295(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14249)
-static void C_ccall f_14249(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14198)
-static void C_ccall f_14198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14194)
-static void C_ccall f_14194(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14166)
-static void C_fcall f_14166(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14174)
-static void C_ccall f_14174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14149)
-static void C_ccall f_14149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8948)
-static void C_ccall f_8948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14118)
-static void C_ccall f_14118(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14122)
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14116)
-static void C_ccall f_14116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8951)
-static void C_ccall f_8951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13799)
-static void C_ccall f_13799(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13806)
-static void C_ccall f_13806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13809)
-static void C_ccall f_13809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13812)
-static void C_ccall f_13812(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13815)
-static void C_ccall f_13815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13981)
-static void C_fcall f_13981(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14068)
-static void C_ccall f_14068(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14090)
-static void C_ccall f_14090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14097)
-static void C_ccall f_14097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14084)
-static void C_ccall f_14084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13997)
-static void C_fcall f_13997(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13995)
-static void C_ccall f_13995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13827)
-static void C_fcall f_13827(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13862)
-static void C_ccall f_13862(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13908)
-static void C_ccall f_13908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13958)
-static void C_ccall f_13958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13965)
-static void C_ccall f_13965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13923)
-static void C_ccall f_13923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13937)
-static void C_ccall f_13937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13880)
-static void C_ccall f_13880(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13891)
-static void C_ccall f_13891(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13841)
-static void C_ccall f_13841(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13817)
-static void C_fcall f_13817(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13797)
-static void C_ccall f_13797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8954)
-static void C_ccall f_8954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13778)
-static void C_ccall f_13778(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13776)
-static void C_ccall f_13776(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8957)
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13757)
-static void C_ccall f_13757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13755)
-static void C_ccall f_13755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8960)
-static void C_ccall f_8960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13706)
-static void C_ccall f_13706(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13710)
-static void C_ccall f_13710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13747)
-static void C_ccall f_13747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13733)
-static void C_ccall f_13733(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13704)
-static void C_ccall f_13704(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8963)
-static void C_ccall f_8963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13662)
-static void C_ccall f_13662(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13666)
-static void C_ccall f_13666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13696)
-static void C_ccall f_13696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13669)
-static void C_ccall f_13669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13684)
-static void C_ccall f_13684(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13660)
-static void C_ccall f_13660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8966)
-static void C_ccall f_8966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13502)
-static void C_ccall f_13502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13509)
-static void C_ccall f_13509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13512)
-static void C_ccall f_13512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13567)
-static void C_fcall f_13567(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13642)
-static void C_ccall f_13642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13575)
-static void C_fcall f_13575(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13597)
-static C_word C_fcall f_13597(C_word t0);
-C_noret_decl(f_13582)
-static void C_fcall f_13582(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13515)
-static void C_ccall f_13515(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13532)
-static void C_fcall f_13532(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13561)
-static void C_ccall f_13561(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13530)
-static void C_ccall f_13530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13522)
-static void C_ccall f_13522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13518)
-static void C_ccall f_13518(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13500)
-static void C_ccall f_13500(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8969)
-static void C_ccall f_8969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13465)
-static void C_ccall f_13465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13469)
-static void C_ccall f_13469(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13487)
-static void C_ccall f_13487(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13463)
-static void C_ccall f_13463(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8972)
-static void C_ccall f_8972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13459)
-static void C_ccall f_13459(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10811)
-static void C_ccall f_10811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13455)
-static void C_ccall f_13455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10815)
-static void C_ccall f_10815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10819)
-static void C_ccall f_10819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12941)
-static void C_ccall f_12941(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13404)
-static void C_fcall f_13404(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13443)
-static void C_ccall f_13443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12957)
-static void C_ccall f_12957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13357)
-static void C_ccall f_13357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13359)
-static void C_fcall f_13359(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13398)
-static void C_ccall f_13398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13372)
-static void C_ccall f_13372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13383)
-static void C_ccall f_13383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12960)
-static void C_ccall f_12960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13230)
-static void C_fcall f_13230(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13281)
-static void C_fcall f_13281(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13331)
-static void C_ccall f_13331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13293)
-static void C_fcall f_13293(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13317)
-static void C_ccall f_13317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13313)
-static void C_ccall f_13313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13309)
-static void C_ccall f_13309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13278)
-static void C_ccall f_13278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13263)
-static void C_fcall f_13263(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13267)
-static void C_ccall f_13267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12963)
-static void C_ccall f_12963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13119)
-static void C_ccall f_13119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13121)
-static void C_fcall f_13121(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13213)
-static void C_ccall f_13213(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13129)
-static void C_fcall f_13129(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13140)
-static void C_ccall f_13140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13143)
-static void C_ccall f_13143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13180)
-static void C_fcall f_13180(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13206)
-static void C_ccall f_13206(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13194)
-static void C_ccall f_13194(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13198)
-static void C_ccall f_13198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13178)
-static void C_ccall f_13178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13174)
-static void C_ccall f_13174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13167)
-static void C_ccall f_13167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13163)
-static void C_ccall f_13163(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13159)
-static void C_ccall f_13159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12966)
-static void C_ccall f_12966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12969)
-static void C_ccall f_12969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13044)
-static void C_ccall f_13044(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13046)
-static void C_fcall f_13046(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13101)
-static void C_ccall f_13101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13108)
-static void C_ccall f_13108(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13056)
-static void C_fcall f_13056(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12972)
-static void C_ccall f_12972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13036)
-static void C_ccall f_13036(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13040)
-static void C_ccall f_13040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12975)
-static void C_ccall f_12975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12978)
-static void C_ccall f_12978(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12992)
-static void C_fcall f_12992(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13021)
-static void C_ccall f_13021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13000)
-static void C_fcall f_13000(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13004)
-static void C_ccall f_13004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12981)
-static void C_ccall f_12981(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12987)
-static void C_ccall f_12987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12856)
-static void C_ccall f_12856(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_12867)
-static void C_ccall f_12867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12869)
-static void C_fcall f_12869(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12918)
-static void C_ccall f_12918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12914)
-static void C_ccall f_12914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12897)
-static void C_fcall f_12897(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12707)
-static void C_ccall f_12707(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_12707)
-static void C_ccall f_12707r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_12711)
-static void C_ccall f_12711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12714)
-static void C_ccall f_12714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12787)
-static void C_fcall f_12787(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12828)
-static void C_ccall f_12828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12797)
-static void C_fcall f_12797(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12729)
-static void C_ccall f_12729(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12735)
-static void C_fcall f_12735(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12781)
-static void C_ccall f_12781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12762)
-static void C_fcall f_12762(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12733)
-static void C_ccall f_12733(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12690)
-static void C_ccall f_12690(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12701)
-static void C_ccall f_12701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12694)
-static void C_ccall f_12694(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12697)
-static void C_ccall f_12697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12311)
-static void C_ccall f_12311(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,...) C_noret;
-C_noret_decl(f_12311)
-static void C_ccall f_12311r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t7) C_noret;
-C_noret_decl(f_12315)
-static void C_ccall f_12315(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12610)
-static void C_fcall f_12610(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12658)
-static void C_ccall f_12658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12341)
-static void C_ccall f_12341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12327)
-static void C_fcall f_12327(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12665)
-static void C_ccall f_12665(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12620)
-static void C_fcall f_12620(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12344)
-static void C_ccall f_12344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12544)
-static void C_fcall f_12544(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12593)
-static void C_ccall f_12593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12554)
-static void C_fcall f_12554(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12347)
-static void C_ccall f_12347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12492)
-static void C_fcall f_12492(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12531)
-static void C_ccall f_12531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12350)
-static void C_ccall f_12350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12486)
-static void C_ccall f_12486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12490)
-static void C_ccall f_12490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12356)
-static void C_ccall f_12356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12359)
-static void C_ccall f_12359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12452)
-static void C_fcall f_12452(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12460)
-static C_word C_fcall f_12460(C_word t0,C_word t1);
-C_noret_decl(f_12362)
-static void C_ccall f_12362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12410)
-static void C_fcall f_12410(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12418)
-static C_word C_fcall f_12418(C_word t0,C_word t1);
-C_noret_decl(f_12365)
-static void C_ccall f_12365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12378)
-static void C_fcall f_12378(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12386)
-static C_word C_fcall f_12386(C_word t0,C_word t1);
-C_noret_decl(f_12368)
-static void C_ccall f_12368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11806)
-static void C_ccall f_11806(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12309)
-static void C_ccall f_12309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12305)
-static void C_ccall f_12305(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11829)
-static void C_fcall f_11829(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12275)
-static void C_ccall f_12275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12271)
-static void C_ccall f_12271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11837)
-static void C_fcall f_11837(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12224)
-static void C_fcall f_12224(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12253)
-static void C_ccall f_12253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12218)
-static void C_ccall f_12218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11845)
-static void C_ccall f_11845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12101)
-static void C_ccall f_12101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12103)
-static void C_fcall f_12103(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12202)
-static void C_fcall f_12202(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12097)
-static void C_ccall f_12097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12093)
-static void C_ccall f_12093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11993)
-static void C_fcall f_11993(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12077)
-static void C_ccall f_12077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12020)
-static void C_fcall f_12020(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12052)
-static void C_ccall f_12052(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11991)
-static void C_ccall f_11991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11987)
-static void C_ccall f_11987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11913)
-static void C_fcall f_11913(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11983)
-static void C_ccall f_11983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11936)
-static void C_ccall f_11936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11979)
-static void C_ccall f_11979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11971)
-static void C_ccall f_11971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11967)
-static void C_ccall f_11967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11947)
-static void C_ccall f_11947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11901)
-static void C_ccall f_11901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11897)
-static void C_ccall f_11897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11841)
-static void C_ccall f_11841(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11833)
-static void C_ccall f_11833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11746)
-static void C_fcall f_11746(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11750)
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11761)
-static void C_fcall f_11761(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11800)
-static void C_ccall f_11800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11792)
-static void C_ccall f_11792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11756)
-static void C_ccall f_11756(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11460)
-static void C_fcall f_11460(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11541)
-static void C_fcall f_11541(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11568)
-static void C_ccall f_11568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11570)
-static void C_fcall f_11570(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11740)
-static void C_ccall f_11740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11728)
-static void C_ccall f_11728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11709)
-static void C_ccall f_11709(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11655)
-static void C_fcall f_11655(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11688)
-static void C_ccall f_11688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11673)
-static void C_ccall f_11673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11611)
-static void C_fcall f_11611(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11638)
-static void C_ccall f_11638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11619)
-static void C_fcall f_11619(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11623)
-static void C_ccall f_11623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11593)
-static void C_ccall f_11593(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11518)
-static void C_fcall f_11518(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11530)
-static void C_ccall f_11530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11526)
-static void C_ccall f_11526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11391)
-static void C_ccall f_11391(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11397)
-static void C_fcall f_11397(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11412)
-static void C_fcall f_11412(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11447)
-static void C_ccall f_11447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11323)
-static void C_ccall f_11323(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11323)
-static void C_ccall f_11323r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11343)
-static C_word C_fcall f_11343(C_word *a,C_word t0);
-C_noret_decl(f_11338)
-static C_word C_fcall f_11338(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_11325)
-static C_word C_fcall f_11325(C_word *a,C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_11301)
-static void C_ccall f_11301(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11308)
-static void C_ccall f_11308(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11220)
-static void C_ccall f_11220(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_11230)
-static void C_ccall f_11230(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11233)
-static void C_ccall f_11233(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11239)
-static void C_ccall f_11239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11282)
-static void C_ccall f_11282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11286)
-static void C_ccall f_11286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11242)
-static void C_ccall f_11242(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11248)
-static void C_ccall f_11248(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11131)
-static void C_ccall f_11131(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11141)
-static void C_ccall f_11141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11144)
-static void C_ccall f_11144(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11207)
-static void C_ccall f_11207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11147)
-static void C_ccall f_11147(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11203)
-static void C_ccall f_11203(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11150)
-static void C_ccall f_11150(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11189)
-static void C_ccall f_11189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11193)
-static void C_ccall f_11193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11153)
-static void C_ccall f_11153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11156)
-static void C_ccall f_11156(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11110)
-static void C_fcall f_11110(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11117)
-static void C_ccall f_11117(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11090)
-static void C_ccall f_11090(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11094)
-static void C_ccall f_11094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11087)
-static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_11047)
-static void C_ccall f_11047(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_11047)
-static void C_ccall f_11047r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_11051)
-static void C_ccall f_11051(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11023)
-static void C_ccall f_11023(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10923)
-static void C_ccall f_10923(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10914)
-static void C_ccall f_10914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10833)
-static void C_ccall f_10833(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10715)
-static void C_ccall f_10715(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_10715)
-static void C_ccall f_10715r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_10719)
-static void C_ccall f_10719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10722)
-static void C_ccall f_10722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10727)
-static void C_fcall f_10727(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10774)
-static void C_ccall f_10774(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10735)
-static void C_fcall f_10735(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10753)
-static void C_ccall f_10753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10725)
-static void C_ccall f_10725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10650)
-static void C_ccall f_10650(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_10650)
-static void C_ccall f_10650r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_10654)
-static void C_ccall f_10654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10664)
-static void C_ccall f_10664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10666)
-static void C_fcall f_10666(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10687)
-static void C_ccall f_10687(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10657)
-static void C_ccall f_10657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8974)
-static void C_ccall f_8974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_8981)
-static void C_ccall f_8981(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8995)
-static void C_ccall f_8995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8999)
-static void C_ccall f_8999(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9003)
-static void C_ccall f_9003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9008)
-static void C_ccall f_9008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9014)
-static void C_ccall f_9014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9018)
-static void C_ccall f_9018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9022)
-static void C_ccall f_9022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9026)
-static void C_ccall f_9026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9030)
-static void C_ccall f_9030(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9035)
-static void C_ccall f_9035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9039)
-static void C_ccall f_9039(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9046)
-static void C_ccall f_9046(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9051)
-static void C_ccall f_9051(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9055)
-static void C_ccall f_9055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9059)
-static void C_ccall f_9059(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9063)
-static void C_ccall f_9063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9068)
-static void C_ccall f_9068(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10611)
-static void C_ccall f_10611(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10621)
-static void C_fcall f_10621(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10628)
-static void C_ccall f_10628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10591)
-static void C_ccall f_10591(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10598)
-static void C_ccall f_10598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10605)
-static void C_ccall f_10605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10565)
-static void C_ccall f_10565(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10543)
-static void C_ccall f_10543(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10550)
-static void C_ccall f_10550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10450)
-static void C_ccall f_10450(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_10492)
-static void C_ccall f_10492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10541)
-static void C_ccall f_10541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10524)
-static void C_ccall f_10524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10503)
-static void C_ccall f_10503(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10377)
-static void C_ccall f_10377(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10403)
-static void C_ccall f_10403(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10448)
-static void C_ccall f_10448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10431)
-static void C_ccall f_10431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10123)
-static void C_ccall f_10123(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10170)
-static void C_ccall f_10170(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10368)
-static void C_ccall f_10368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10364)
-static void C_ccall f_10364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10331)
-static void C_ccall f_10331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10339)
-static void C_ccall f_10339(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10173)
-static void C_ccall f_10173(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10179)
-static void C_ccall f_10179(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10191)
-static void C_ccall f_10191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10257)
-static void C_fcall f_10257(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10272)
-static void C_ccall f_10272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10194)
-static void C_fcall f_10194(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10228)
-static void C_fcall f_10228(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10197)
-static void C_ccall f_10197(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10226)
-static void C_ccall f_10226(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10222)
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10218)
-static void C_ccall f_10218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9916)
-static void C_ccall f_9916(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9946)
-static void C_ccall f_9946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10046)
-static void C_ccall f_10046(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10069)
-static void C_fcall f_10069(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10083)
-static void C_ccall f_10083(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10087)
-static void C_ccall f_10087(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10056)
-static void C_ccall f_10056(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10006)
-static void C_ccall f_10006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10010)
-static void C_ccall f_10010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9955)
-static void C_ccall f_9955(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9940)
-static void C_ccall f_9940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9628)
-static void C_ccall f_9628(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9635)
-static void C_ccall f_9635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9674)
-static void C_fcall f_9674(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9684)
-static void C_fcall f_9684(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9815)
-static void C_ccall f_9815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9819)
-static void C_ccall f_9819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9748)
-static void C_ccall f_9748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9744)
-static void C_ccall f_9744(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9682)
-static void C_ccall f_9682(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9678)
-static void C_ccall f_9678(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9506)
-static void C_ccall f_9506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9510)
-static void C_ccall f_9510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9582)
-static void C_ccall f_9582(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9285)
-static void C_ccall f_9285(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9335)
-static void C_ccall f_9335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9449)
-static void C_fcall f_9449(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9387)
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9395)
-static void C_ccall f_9395(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9391)
-static void C_ccall f_9391(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9383)
-static void C_ccall f_9383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9201)
-static void C_ccall f_9201(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9208)
-static void C_fcall f_9208(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9211)
-static void C_ccall f_9211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9260)
-static void C_ccall f_9260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9256)
-static void C_ccall f_9256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9251)
-static void C_ccall f_9251(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9237)
-static void C_ccall f_9237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9249)
-static void C_ccall f_9249(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9245)
-static void C_ccall f_9245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9076)
-static void C_ccall f_9076(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9142)
-static void C_fcall f_9142(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9171)
-static void C_ccall f_9171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9120)
-static void C_ccall f_9120(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9116)
-static void C_ccall f_9116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9070)
-static void C_ccall f_9070(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8868)
-static void C_ccall f_8868(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8874)
-static void C_fcall f_8874(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8897)
-static void C_ccall f_8897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7682)
-static void C_ccall f_7682(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9) C_noret;
-C_noret_decl(f_7686)
-static void C_ccall f_7686(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7689)
-static void C_ccall f_7689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7692)
-static void C_ccall f_7692(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7695)
-static void C_ccall f_7695(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8476)
-static void C_ccall f_8476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8479)
-static void C_ccall f_8479(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8858)
-static void C_ccall f_8858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8843)
-static void C_ccall f_8843(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8482)
-static void C_ccall f_8482(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8491)
-static void C_fcall f_8491(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8822)
-static void C_ccall f_8822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8499)
-static void C_fcall f_8499(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8503)
-static void C_ccall f_8503(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8521)
-static void C_ccall f_8521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8753)
-static void C_fcall f_8753(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8808)
-static void C_ccall f_8808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8761)
-static void C_fcall f_8761(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8771)
-static void C_ccall f_8771(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8774)
-static void C_fcall f_8774(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8801)
-static void C_ccall f_8801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8524)
-static void C_ccall f_8524(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8689)
-static void C_fcall f_8689(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8740)
-static void C_ccall f_8740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8697)
-static void C_fcall f_8697(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8737)
-static void C_ccall f_8737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8527)
-static void C_ccall f_8527(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8555)
-static void C_ccall f_8555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8651)
-static void C_fcall f_8651(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8680)
-static void C_ccall f_8680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8610)
-static void C_ccall f_8610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8616)
-static void C_fcall f_8616(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8645)
-static void C_ccall f_8645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8614)
-static void C_ccall f_8614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8602)
-static void C_ccall f_8602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8558)
-static void C_ccall f_8558(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8574)
-static void C_ccall f_8574(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8561)
-static void C_ccall f_8561(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8530)
-static void C_fcall f_8530(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8552)
-static void C_ccall f_8552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8548)
-static void C_ccall f_8548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8533)
-static void C_ccall f_8533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8544)
-static void C_ccall f_8544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8540)
-static void C_ccall f_8540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8485)
-static void C_ccall f_8485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7836)
-static void C_fcall f_7836(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7855)
-static void C_fcall f_7855(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7864)
-static void C_ccall f_7864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7876)
-static void C_ccall f_7876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8001)
-static void C_ccall f_8001(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8143)
-static void C_ccall f_8143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8322)
-static void C_ccall f_8322(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8325)
-static void C_ccall f_8325(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8328)
-static void C_ccall f_8328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8402)
-static void C_fcall f_8402(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8431)
-static void C_ccall f_8431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8361)
-static void C_ccall f_8361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8367)
-static void C_fcall f_8367(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8396)
-static void C_ccall f_8396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8365)
-static void C_ccall f_8365(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8330)
-static void C_fcall f_8330(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8350)
-static void C_ccall f_8350(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8346)
-static void C_ccall f_8346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8338)
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8146)
-static void C_ccall f_8146(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8155)
-static void C_fcall f_8155(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_8316)
-static void C_ccall f_8316(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8266)
-static void C_fcall f_8266(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8294)
-static void C_ccall f_8294(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8282)
-static void C_ccall f_8282(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8259)
-static void C_ccall f_8259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8209)
-static void C_fcall f_8209(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8237)
-static void C_ccall f_8237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8225)
-static void C_ccall f_8225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8176)
-static void C_fcall f_8176(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8191)
-static void C_ccall f_8191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8171)
-static void C_ccall f_8171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8004)
-static void C_ccall f_8004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8104)
-static void C_fcall f_8104(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8133)
-static void C_ccall f_8133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8007)
-static void C_ccall f_8007(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8012)
-static void C_fcall f_8012(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8098)
-static void C_ccall f_8098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8024)
-static void C_fcall f_8024(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8066)
-static void C_ccall f_8066(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7879)
-static void C_ccall f_7879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7962)
-static void C_fcall f_7962(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7991)
-static void C_ccall f_7991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7882)
-static void C_ccall f_7882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7887)
-static void C_fcall f_7887(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7926)
-static void C_fcall f_7926(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7904)
-static void C_fcall f_7904(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7749)
-static void C_fcall f_7749(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7753)
-static void C_ccall f_7753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7756)
-static void C_ccall f_7756(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7834)
-static void C_ccall f_7834(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7830)
-static void C_ccall f_7830(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7771)
-static void C_ccall f_7771(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7777)
-static void C_ccall f_7777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7780)
-static void C_ccall f_7780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7819)
-static void C_ccall f_7819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7813)
-static void C_ccall f_7813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7817)
-static void C_ccall f_7817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7781)
-static void C_ccall f_7781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7785)
-static void C_ccall f_7785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7788)
-static void C_ccall f_7788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7792)
-static void C_ccall f_7792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7795)
-static void C_ccall f_7795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7799)
-static void C_ccall f_7799(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7802)
-static void C_ccall f_7802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7806)
-static void C_ccall f_7806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7809)
-static void C_ccall f_7809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7759)
-static void C_ccall f_7759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7706)
-static void C_fcall f_7706(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7719)
-static void C_ccall f_7719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7726)
-static void C_ccall f_7726(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7697)
-static void C_fcall f_7697(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7701)
-static void C_ccall f_7701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7319)
-static void C_ccall f_7319(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7321)
-static void C_ccall f_7321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7444)
-static void C_ccall f_7444(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7556)
-static void C_ccall f_7556(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f18259)
-static void C_ccall f18259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7559)
-static void C_fcall f_7559(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7562)
-static void C_ccall f_7562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f18252)
-static void C_ccall f18252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7565)
-static void C_fcall f_7565(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7644)
-static void C_ccall f_7644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7629)
-static C_word C_fcall f_7629(C_word t0,C_word t1);
-C_noret_decl(f_7616)
-static void C_ccall f_7616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7601)
-static C_word C_fcall f_7601(C_word t0,C_word t1);
-C_noret_decl(f_7584)
-static void C_ccall f_7584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7591)
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7511)
-static void C_fcall f_7511(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7532)
-static void C_ccall f_7532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7466)
-static void C_ccall f_7466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7448)
-static void C_ccall f_7448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7324)
-static void C_ccall f_7324(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7393)
-static void C_ccall f_7393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7427)
-static void C_ccall f_7427(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7397)
-static void C_fcall f_7397(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7410)
-static void C_ccall f_7410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7367)
-static void C_ccall f_7367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7363)
-static void C_ccall f_7363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7338)
-static void C_ccall f_7338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7342)
-static void C_ccall f_7342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7316)
-static void C_ccall f_7316(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6844)
-static void C_ccall f_6844(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_6844)
-static void C_ccall f_6844r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_7268)
-static void C_fcall f_7268(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7259)
-static void C_fcall f_7259(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7267)
-static void C_ccall f_7267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6846)
-static void C_fcall f_6846(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6987)
-static void C_fcall f_6987(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6992)
-static void C_fcall f_6992(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7230)
-static void C_ccall f_7230(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7189)
-static void C_ccall f_7189(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7193)
-static void C_ccall f_7193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7011)
-static void C_fcall f_7011(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7016)
-static void C_fcall f_7016(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7035)
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6958)
-static void C_ccall f_6958(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6964)
-static C_word C_fcall f_6964(C_word t0);
-C_noret_decl(f_6892)
-static void C_ccall f_6892(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6896)
-static void C_ccall f_6896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6904)
-static void C_fcall f_6904(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6956)
-static void C_ccall f_6956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6924)
-static void C_ccall f_6924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6861)
-static void C_fcall f_6861(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6865)
-static void C_ccall f_6865(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6890)
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6879)
-static void C_ccall f_6879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6883)
-static void C_ccall f_6883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6872)
-static void C_ccall f_6872(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6849)
-static void C_fcall f_6849(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6856)
-static void C_ccall f_6856(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6803)
-static void C_ccall f_6803(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6825)
-static void C_ccall f_6825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6829)
-static C_word C_fcall f_6829(C_word t0,C_word t1);
-C_noret_decl(f_6797)
-static void C_ccall f_6797(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6786)
-static void C_ccall f_6786(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6786)
-static void C_ccall f_6786r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6794)
-static void C_ccall f_6794(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6716)
-static void C_ccall f_6716(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6779)
-static void C_ccall f_6779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6719)
-static void C_fcall f_6719(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6772)
-static void C_ccall f_6772(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6745)
-static void C_ccall f_6745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6628)
-static void C_fcall f_6628(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6714)
-static void C_ccall f_6714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6631)
-static void C_fcall f_6631(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6645)
-static C_word C_fcall f_6645(C_word t0,C_word t1);
-C_noret_decl(f_6685)
-static void C_ccall f_6685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5785)
-static void C_ccall f_5785(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_5785)
-static void C_ccall f_5785r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6576)
-static void C_fcall f_6576(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6584)
-static void C_ccall f_6584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6571)
-static void C_fcall f_6571(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5787)
-static void C_fcall f_5787(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6284)
-static void C_fcall f_6284(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6290)
-static void C_fcall f_6290(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_6554)
-static void C_ccall f_6554(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6312)
-static void C_fcall f_6312(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6522)
-static void C_ccall f_6522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6496)
-static void C_ccall f_6496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6503)
-static void C_ccall f_6503(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6468)
-static void C_ccall f_6468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6456)
-static void C_ccall f_6456(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6330)
-static void C_ccall f_6330(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6335)
-static void C_fcall f_6335(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6348)
-static void C_ccall f_6348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6404)
-static void C_ccall f_6404(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6431)
-static void C_ccall f_6431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6382)
-static void C_ccall f_6382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6393)
-static void C_ccall f_6393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6397)
-static void C_ccall f_6397(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6103)
-static void C_fcall f_6103(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_6113)
-static void C_fcall f_6113(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6266)
-static void C_ccall f_6266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6262)
-static void C_ccall f_6262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6252)
-static void C_ccall f_6252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6255)
-static void C_ccall f_6255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6159)
-static void C_fcall f_6159(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6187)
-static void C_ccall f_6187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6195)
-static void C_ccall f_6195(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6207)
-static void C_ccall f_6207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6215)
-static void C_ccall f_6215(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6219)
-static void C_ccall f_6219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6128)
-static void C_ccall f_6128(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6144)
-static void C_ccall f_6144(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6136)
-static void C_ccall f_6136(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6140)
-static void C_ccall f_6140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6111)
-static void C_ccall f_6111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5790)
-static void C_fcall f_5790(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_5893)
-static void C_ccall f_5893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6051)
-static void C_ccall f_6051(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6053)
-static void C_fcall f_6053(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5907)
-static void C_ccall f_5907(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6047)
-static void C_ccall f_6047(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6031)
-static void C_ccall f_6031(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5915)
-static void C_ccall f_5915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6025)
-static void C_ccall f_6025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6029)
-static void C_ccall f_6029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5929)
-static void C_ccall f_5929(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5988)
-static void C_fcall f_5988(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6017)
-static void C_ccall f_6017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5933)
-static void C_ccall f_5933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5966)
-static void C_ccall f_5966(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5964)
-static void C_ccall f_5964(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5960)
-static void C_ccall f_5960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5923)
-static void C_ccall f_5923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5927)
-static void C_ccall f_5927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5919)
-static void C_ccall f_5919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5911)
-static void C_ccall f_5911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5802)
-static void C_fcall f_5802(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5883)
-static void C_ccall f_5883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5866)
-static void C_fcall f_5866(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5876)
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5821)
-static void C_fcall f_5821(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5832)
-static void C_ccall f_5832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5840)
-static void C_ccall f_5840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5828)
-static void C_ccall f_5828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5157)
-static void C_ccall f_5157(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5177)
-static void C_ccall f_5177(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5180)
-static void C_ccall f_5180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5183)
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5186)
-static void C_ccall f_5186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5189)
-static void C_ccall f_5189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5194)
-static void C_fcall f_5194(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_5536)
-static void C_ccall f_5536(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5712)
-static void C_fcall f_5712(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5650)
-static void C_ccall f_5650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5631)
-static void C_fcall f_5631(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5585)
-static void C_fcall f_5585(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5588)
-static void C_fcall f_5588(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5567)
-static void C_ccall f_5567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5551)
-static void C_fcall f_5551(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5495)
-static void C_ccall f_5495(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5208)
-static void C_ccall f_5208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5383)
-static void C_ccall f_5383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5385)
-static void C_fcall f_5385(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5484)
-static void C_ccall f_5484(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5412)
-static void C_fcall f_5412(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5481)
-static void C_ccall f_5481(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5465)
-static void C_ccall f_5465(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5443)
-static void C_ccall f_5443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5375)
-static void C_ccall f_5375(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5379)
-static void C_ccall f_5379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5212)
-static void C_fcall f_5212(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5224)
-static void C_fcall f_5224(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5327)
-static void C_ccall f_5327(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5319)
-static void C_ccall f_5319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5323)
-static void C_ccall f_5323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5296)
-static void C_ccall f_5296(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5300)
-static void C_ccall f_5300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5251)
-static void C_ccall f_5251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5271)
-static void C_ccall f_5271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5243)
-static void C_ccall f_5243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5160)
-static void C_fcall f_5160(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5114)
-static void C_ccall f_5114(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5120)
-static C_word C_fcall f_5120(C_word t0);
-C_noret_decl(f_5028)
-static void C_ccall f_5028(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_5028)
-static void C_ccall f_5028r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_5061)
-static void C_fcall f_5061(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5069)
-static void C_ccall f_5069(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5056)
-static void C_fcall f_5056(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5030)
-static void C_fcall f_5030(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5036)
-static void C_fcall f_5036(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5048)
-static void C_ccall f_5048(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5042)
-static void C_ccall f_5042(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4927)
-static void C_ccall f_4927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4964)
-static void C_ccall f_4964(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4967)
-static void C_ccall f_4967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4984)
-static void C_ccall f_4984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5026)
-static void C_ccall f_5026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4994)
-static void C_fcall f_4994(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5013)
-static void C_ccall f_5013(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4930)
-static void C_fcall f_4930(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4934)
-static void C_ccall f_4934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4938)
-static void C_fcall f_4938(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4945)
-static void C_ccall f_4945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4909)
-static void C_ccall f_4909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4917)
-static void C_ccall f_4917(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4334)
-static void C_ccall f_4334(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4585)
-static void C_fcall f_4585(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4607)
-static void C_ccall f_4607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4899)
-static void C_ccall f_4899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4892)
-static void C_ccall f_4892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4613)
-static void C_fcall f_4613(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4784)
-static void C_fcall f_4784(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4820)
-static void C_ccall f_4820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4824)
-static void C_fcall f_4824(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4828)
-static void C_ccall f_4828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4840)
-static void C_ccall f_4840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4790)
-static void C_ccall f_4790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4797)
-static void C_ccall f_4797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4622)
-static void C_ccall f_4622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4634)
-static void C_ccall f_4634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4737)
-static void C_fcall f_4737(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4727)
-static void C_ccall f_4727(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4731)
-static void C_ccall f_4731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4662)
-static void C_fcall f_4662(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4691)
-static void C_ccall f_4691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4660)
-static void C_ccall f_4660(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4656)
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4539)
-static void C_fcall f_4539(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4565)
-static void C_ccall f_4565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4337)
-static void C_fcall f_4337(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_4352)
-static void C_ccall f_4352(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4465)
-static void C_ccall f_4465(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4527)
-static void C_ccall f_4527(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_4527)
-static void C_ccall f_4527r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_4533)
-static void C_ccall f_4533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4471)
-static void C_ccall f_4471(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4519)
-static void C_ccall f_4519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4513)
-static void C_ccall f_4513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4508)
-static void C_ccall f_4508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4502)
-static void C_ccall f_4502(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4475)
-static void C_ccall f_4475(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4495)
-static void C_ccall f_4495(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4491)
-static void C_ccall f_4491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4478)
-static void C_ccall f_4478(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4358)
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4364)
-static void C_ccall f_4364(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4375)
-static void C_fcall f_4375(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4392)
-static void C_fcall f_4392(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4411)
-static void C_fcall f_4411(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4422)
-static void C_ccall f_4422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4386)
-static void C_ccall f_4386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4347)
-static void C_ccall f_4347(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4328)
-static void C_ccall f_4328(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4277)
-static void C_ccall f_4277(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4289)
-static void C_ccall f_4289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4291)
-static void C_fcall f_4291(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4326)
-static void C_ccall f_4326(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4318)
-static void C_ccall f_4318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4285)
-static void C_ccall f_4285(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4227)
-static void C_ccall f_4227(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_4227)
-static void C_ccall f_4227r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_4231)
-static void C_ccall f_4231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4234)
-static void C_ccall f_4234(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4253)
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4243)
-static void C_ccall f_4243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4214)
-static void C_ccall f_4214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4225)
-static void C_ccall f_4225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4218)
-static void C_ccall f_4218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4176)
-static void C_ccall f_4176(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4180)
-static void C_ccall f_4180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4183)
-static void C_ccall f_4183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4187)
-static C_word C_fcall f_4187(C_word t0,C_word t1);
-C_noret_decl(f_3963)
-static void C_ccall f_3963(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3963)
-static void C_ccall f_3963r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_4121)
-static void C_fcall f_4121(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4116)
-static void C_fcall f_4116(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3965)
-static void C_fcall f_3965(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3971)
-static void C_fcall f_3971(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4081)
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4090)
-static C_word C_fcall f_4090(C_word t0,C_word t1);
-C_noret_decl(f_4061)
-static void C_ccall f_4061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4053)
-static void C_ccall f_4053(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3990)
-static void C_ccall f_3990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3993)
-static void C_ccall f_3993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4002)
-static void C_fcall f_4002(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3918)
-static void C_fcall f_3918(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3925)
-static void C_ccall f_3925(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3928)
-static void C_fcall f_3928(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3931)
-static void C_ccall f_3931(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3934)
-static void C_ccall f_3934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3940)
-static void C_ccall f_3940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3943)
-static void C_ccall f_3943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3900)
-static void C_fcall f_3900(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3913)
-static void C_ccall f_3913(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_15667)
-static void C_fcall trf_15667(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15667(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15667(t0,t1,t2);}
-
-C_noret_decl(trf_15113)
-static void C_fcall trf_15113(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15113(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15113(t0,t1,t2);}
-
-C_noret_decl(trf_14928)
-static void C_fcall trf_14928(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14928(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14928(t0,t1,t2);}
-
-C_noret_decl(trf_15010)
-static void C_fcall trf_15010(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15010(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15010(t0,t1,t2);}
-
-C_noret_decl(trf_14834)
-static void C_fcall trf_14834(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14834(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14834(t0,t1,t2);}
-
-C_noret_decl(trf_14760)
-static void C_fcall trf_14760(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14760(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14760(t0,t1,t2);}
-
-C_noret_decl(trf_14633)
-static void C_fcall trf_14633(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14633(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14633(t0,t1);}
-
-C_noret_decl(trf_14649)
-static void C_fcall trf_14649(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14649(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14649(t0,t1);}
-
-C_noret_decl(trf_14671)
-static void C_fcall trf_14671(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14671(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14671(t0,t1,t2);}
-
-C_noret_decl(trf_14730)
-static void C_fcall trf_14730(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14730(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14730(t0,t1);}
-
-C_noret_decl(trf_14453)
-static void C_fcall trf_14453(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14453(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14453(t0,t1,t2);}
-
-C_noret_decl(trf_14491)
-static void C_fcall trf_14491(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14491(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14491(t0,t1,t2);}
-
-C_noret_decl(trf_14461)
-static void C_fcall trf_14461(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14461(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14461(t0,t1,t2);}
-
-C_noret_decl(trf_14176)
-static void C_fcall trf_14176(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14176(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14176(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14166)
-static void C_fcall trf_14166(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14166(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14166(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13981)
-static void C_fcall trf_13981(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13981(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13981(t0,t1,t2);}
-
-C_noret_decl(trf_13997)
-static void C_fcall trf_13997(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13997(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13997(t0,t1,t2);}
-
-C_noret_decl(trf_13827)
-static void C_fcall trf_13827(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13827(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13827(t0,t1,t2);}
-
-C_noret_decl(trf_13817)
-static void C_fcall trf_13817(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13817(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13817(t0,t1,t2);}
-
-C_noret_decl(trf_13567)
-static void C_fcall trf_13567(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13567(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13567(t0,t1,t2);}
-
-C_noret_decl(trf_13575)
-static void C_fcall trf_13575(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13575(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13575(t0,t1,t2);}
-
-C_noret_decl(trf_13582)
-static void C_fcall trf_13582(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13582(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13582(t0,t1);}
-
-C_noret_decl(trf_13532)
-static void C_fcall trf_13532(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13532(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13532(t0,t1,t2);}
-
-C_noret_decl(trf_13404)
-static void C_fcall trf_13404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13404(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13404(t0,t1,t2);}
-
-C_noret_decl(trf_13359)
-static void C_fcall trf_13359(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13359(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13359(t0,t1,t2);}
-
-C_noret_decl(trf_13230)
-static void C_fcall trf_13230(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13230(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13230(t0,t1,t2);}
-
-C_noret_decl(trf_13281)
-static void C_fcall trf_13281(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13281(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13281(t0,t1);}
-
-C_noret_decl(trf_13293)
-static void C_fcall trf_13293(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13293(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13293(t0,t1);}
-
-C_noret_decl(trf_13263)
-static void C_fcall trf_13263(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13263(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13263(t0,t1);}
-
-C_noret_decl(trf_13121)
-static void C_fcall trf_13121(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13121(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13121(t0,t1,t2);}
-
-C_noret_decl(trf_13129)
-static void C_fcall trf_13129(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13129(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13129(t0,t1,t2);}
-
-C_noret_decl(trf_13180)
-static void C_fcall trf_13180(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13180(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13180(t0,t1,t2);}
-
-C_noret_decl(trf_13046)
-static void C_fcall trf_13046(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13046(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13046(t0,t1,t2);}
-
-C_noret_decl(trf_13056)
-static void C_fcall trf_13056(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13056(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13056(t0,t1);}
-
-C_noret_decl(trf_12992)
-static void C_fcall trf_12992(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12992(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12992(t0,t1,t2);}
-
-C_noret_decl(trf_13000)
-static void C_fcall trf_13000(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13000(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13000(t0,t1,t2);}
-
-C_noret_decl(trf_12869)
-static void C_fcall trf_12869(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12869(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12869(t0,t1,t2);}
-
-C_noret_decl(trf_12897)
-static void C_fcall trf_12897(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12897(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12897(t0,t1);}
-
-C_noret_decl(trf_12787)
-static void C_fcall trf_12787(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12787(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12787(t0,t1,t2);}
-
-C_noret_decl(trf_12797)
-static void C_fcall trf_12797(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12797(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12797(t0,t1);}
-
-C_noret_decl(trf_12735)
-static void C_fcall trf_12735(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12735(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12735(t0,t1,t2);}
-
-C_noret_decl(trf_12762)
-static void C_fcall trf_12762(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12762(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12762(t0,t1,t2);}
-
-C_noret_decl(trf_12610)
-static void C_fcall trf_12610(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12610(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12610(t0,t1,t2);}
-
-C_noret_decl(trf_12327)
-static void C_fcall trf_12327(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12327(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12327(t0,t1);}
-
-C_noret_decl(trf_12620)
-static void C_fcall trf_12620(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12620(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12620(t0,t1);}
-
-C_noret_decl(trf_12544)
-static void C_fcall trf_12544(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12544(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12544(t0,t1,t2);}
-
-C_noret_decl(trf_12554)
-static void C_fcall trf_12554(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12554(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12554(t0,t1);}
-
-C_noret_decl(trf_12492)
-static void C_fcall trf_12492(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12492(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12492(t0,t1,t2);}
-
-C_noret_decl(trf_12452)
-static void C_fcall trf_12452(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12452(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12452(t0,t1,t2);}
-
-C_noret_decl(trf_12410)
-static void C_fcall trf_12410(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12410(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12410(t0,t1,t2);}
-
-C_noret_decl(trf_12378)
-static void C_fcall trf_12378(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12378(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12378(t0,t1,t2);}
-
-C_noret_decl(trf_11829)
-static void C_fcall trf_11829(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11829(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11829(t0,t1);}
-
-C_noret_decl(trf_11837)
-static void C_fcall trf_11837(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11837(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11837(t0,t1);}
-
-C_noret_decl(trf_12224)
-static void C_fcall trf_12224(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12224(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12224(t0,t1,t2);}
-
-C_noret_decl(trf_12103)
-static void C_fcall trf_12103(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12103(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12103(t0,t1,t2);}
-
-C_noret_decl(trf_12202)
-static void C_fcall trf_12202(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12202(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12202(t0,t1);}
-
-C_noret_decl(trf_11993)
-static void C_fcall trf_11993(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11993(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11993(t0,t1,t2);}
-
-C_noret_decl(trf_12020)
-static void C_fcall trf_12020(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12020(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12020(t0,t1,t2);}
-
-C_noret_decl(trf_11913)
-static void C_fcall trf_11913(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11913(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11913(t0,t1,t2);}
-
-C_noret_decl(trf_11746)
-static void C_fcall trf_11746(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11746(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11746(t0,t1);}
-
-C_noret_decl(trf_11761)
-static void C_fcall trf_11761(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11761(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11761(t0,t1,t2);}
-
-C_noret_decl(trf_11460)
-static void C_fcall trf_11460(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11460(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11460(t0,t1);}
-
-C_noret_decl(trf_11541)
-static void C_fcall trf_11541(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11541(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11541(t0,t1,t2);}
-
-C_noret_decl(trf_11570)
-static void C_fcall trf_11570(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11570(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11570(t0,t1,t2);}
-
-C_noret_decl(trf_11655)
-static void C_fcall trf_11655(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11655(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11655(t0,t1,t2);}
-
-C_noret_decl(trf_11611)
-static void C_fcall trf_11611(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11611(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11611(t0,t1,t2);}
-
-C_noret_decl(trf_11619)
-static void C_fcall trf_11619(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11619(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11619(t0,t1);}
-
-C_noret_decl(trf_11518)
-static void C_fcall trf_11518(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11518(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11518(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11397)
-static void C_fcall trf_11397(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11397(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11397(t0,t1,t2);}
-
-C_noret_decl(trf_11412)
-static void C_fcall trf_11412(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11412(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11412(t0,t1);}
-
-C_noret_decl(trf_11110)
-static void C_fcall trf_11110(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11110(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11110(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10727)
-static void C_fcall trf_10727(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10727(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10727(t0,t1,t2);}
-
-C_noret_decl(trf_10735)
-static void C_fcall trf_10735(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10735(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10735(t0,t1,t2);}
-
-C_noret_decl(trf_10666)
-static void C_fcall trf_10666(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10666(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10666(t0,t1,t2);}
-
-C_noret_decl(trf_10621)
-static void C_fcall trf_10621(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10621(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10621(t0,t1,t2);}
-
-C_noret_decl(trf_10257)
-static void C_fcall trf_10257(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10257(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10257(t0,t1);}
-
-C_noret_decl(trf_10194)
-static void C_fcall trf_10194(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10194(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10194(t0,t1);}
-
-C_noret_decl(trf_10228)
-static void C_fcall trf_10228(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10228(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10228(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10069)
-static void C_fcall trf_10069(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10069(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10069(t0,t1,t2);}
-
-C_noret_decl(trf_9674)
-static void C_fcall trf_9674(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9674(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9674(t0,t1);}
-
-C_noret_decl(trf_9684)
-static void C_fcall trf_9684(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9684(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9684(t0,t1,t2);}
-
-C_noret_decl(trf_9449)
-static void C_fcall trf_9449(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9449(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9449(t0,t1);}
-
-C_noret_decl(trf_9208)
-static void C_fcall trf_9208(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9208(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9208(t0,t1);}
-
-C_noret_decl(trf_9142)
-static void C_fcall trf_9142(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9142(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9142(t0,t1,t2);}
-
-C_noret_decl(trf_8874)
-static void C_fcall trf_8874(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8874(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8874(t0,t1,t2);}
-
-C_noret_decl(trf_8491)
-static void C_fcall trf_8491(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8491(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8491(t0,t1,t2);}
-
-C_noret_decl(trf_8499)
-static void C_fcall trf_8499(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8499(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8499(t0,t1,t2);}
-
-C_noret_decl(trf_8753)
-static void C_fcall trf_8753(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8753(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8753(t0,t1,t2);}
-
-C_noret_decl(trf_8761)
-static void C_fcall trf_8761(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8761(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8761(t0,t1,t2);}
-
-C_noret_decl(trf_8774)
-static void C_fcall trf_8774(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8774(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8774(t0,t1);}
-
-C_noret_decl(trf_8689)
-static void C_fcall trf_8689(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8689(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8689(t0,t1,t2);}
-
-C_noret_decl(trf_8697)
-static void C_fcall trf_8697(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8697(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8697(t0,t1,t2);}
-
-C_noret_decl(trf_8651)
-static void C_fcall trf_8651(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8651(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8651(t0,t1,t2);}
-
-C_noret_decl(trf_8616)
-static void C_fcall trf_8616(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8616(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8616(t0,t1,t2);}
-
-C_noret_decl(trf_8530)
-static void C_fcall trf_8530(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8530(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8530(t0,t1);}
-
-C_noret_decl(trf_7836)
-static void C_fcall trf_7836(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7836(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7836(t0,t1,t2);}
-
-C_noret_decl(trf_7855)
-static void C_fcall trf_7855(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7855(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7855(t0,t1);}
-
-C_noret_decl(trf_8402)
-static void C_fcall trf_8402(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8402(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8402(t0,t1,t2);}
-
-C_noret_decl(trf_8367)
-static void C_fcall trf_8367(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8367(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8367(t0,t1,t2);}
-
-C_noret_decl(trf_8330)
-static void C_fcall trf_8330(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8330(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8330(t0,t1,t2);}
-
-C_noret_decl(trf_8155)
-static void C_fcall trf_8155(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8155(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_8155(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_8266)
-static void C_fcall trf_8266(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8266(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8266(t0,t1,t2);}
-
-C_noret_decl(trf_8209)
-static void C_fcall trf_8209(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8209(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8209(t0,t1,t2);}
-
-C_noret_decl(trf_8176)
-static void C_fcall trf_8176(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8176(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8176(t0,t1,t2);}
-
-C_noret_decl(trf_8104)
-static void C_fcall trf_8104(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8104(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_8104(t0,t1,t2);}
-
-C_noret_decl(trf_8012)
-static void C_fcall trf_8012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8012(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8012(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8024)
-static void C_fcall trf_8024(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8024(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8024(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7962)
-static void C_fcall trf_7962(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7962(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7962(t0,t1,t2);}
-
-C_noret_decl(trf_7887)
-static void C_fcall trf_7887(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7887(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_7887(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_7926)
-static void C_fcall trf_7926(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7926(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7926(t0,t1,t2);}
-
-C_noret_decl(trf_7904)
-static void C_fcall trf_7904(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7904(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7904(t0,t1,t2);}
-
-C_noret_decl(trf_7749)
-static void C_fcall trf_7749(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7749(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7749(t0,t1,t2);}
-
-C_noret_decl(trf_7706)
-static void C_fcall trf_7706(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7706(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7706(t0,t1,t2);}
-
-C_noret_decl(trf_7697)
-static void C_fcall trf_7697(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7697(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7697(t0,t1);}
-
-C_noret_decl(trf_7559)
-static void C_fcall trf_7559(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7559(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7559(t0,t1);}
-
-C_noret_decl(trf_7565)
-static void C_fcall trf_7565(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7565(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7565(t0,t1);}
-
-C_noret_decl(trf_7511)
-static void C_fcall trf_7511(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7511(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7511(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7397)
-static void C_fcall trf_7397(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7397(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7397(t0,t1,t2);}
-
-C_noret_decl(trf_7268)
-static void C_fcall trf_7268(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7268(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7268(t0,t1);}
-
-C_noret_decl(trf_7259)
-static void C_fcall trf_7259(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7259(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7259(t0,t1,t2);}
-
-C_noret_decl(trf_6846)
-static void C_fcall trf_6846(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6846(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6846(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6987)
-static void C_fcall trf_6987(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6987(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6987(t0,t1);}
-
-C_noret_decl(trf_6992)
-static void C_fcall trf_6992(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6992(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6992(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7011)
-static void C_fcall trf_7011(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7011(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7011(t0,t1);}
-
-C_noret_decl(trf_7016)
-static void C_fcall trf_7016(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7016(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7016(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6904)
-static void C_fcall trf_6904(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6904(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6904(t0,t1,t2);}
-
-C_noret_decl(trf_6861)
-static void C_fcall trf_6861(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6861(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6861(t0,t1,t2);}
-
-C_noret_decl(trf_6849)
-static void C_fcall trf_6849(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6849(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_6849(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_6719)
-static void C_fcall trf_6719(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6719(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6719(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6628)
-static void C_fcall trf_6628(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6628(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6628(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6631)
-static void C_fcall trf_6631(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6631(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6631(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6576)
-static void C_fcall trf_6576(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6576(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6576(t0,t1);}
-
-C_noret_decl(trf_6571)
-static void C_fcall trf_6571(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6571(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6571(t0,t1,t2);}
-
-C_noret_decl(trf_5787)
-static void C_fcall trf_5787(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5787(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5787(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6284)
-static void C_fcall trf_6284(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6284(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6284(t0,t1,t2);}
-
-C_noret_decl(trf_6290)
-static void C_fcall trf_6290(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6290(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_6290(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_6312)
-static void C_fcall trf_6312(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6312(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6312(t0,t1);}
-
-C_noret_decl(trf_6335)
-static void C_fcall trf_6335(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6335(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6335(t0,t1,t2);}
-
-C_noret_decl(trf_6103)
-static void C_fcall trf_6103(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6103(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_6103(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_6113)
-static void C_fcall trf_6113(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6113(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_6113(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_6159)
-static void C_fcall trf_6159(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6159(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6159(t0,t1);}
-
-C_noret_decl(trf_5790)
-static void C_fcall trf_5790(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5790(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_5790(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_6053)
-static void C_fcall trf_6053(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6053(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6053(t0,t1,t2);}
-
-C_noret_decl(trf_5988)
-static void C_fcall trf_5988(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5988(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5988(t0,t1,t2);}
-
-C_noret_decl(trf_5802)
-static void C_fcall trf_5802(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5802(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5802(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5866)
-static void C_fcall trf_5866(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5866(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5866(t0,t1);}
-
-C_noret_decl(trf_5821)
-static void C_fcall trf_5821(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5821(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5821(t0,t1);}
-
-C_noret_decl(trf_5194)
-static void C_fcall trf_5194(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5194(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_5194(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_5712)
-static void C_fcall trf_5712(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5712(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5712(t0,t1);}
-
-C_noret_decl(trf_5631)
-static void C_fcall trf_5631(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5631(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5631(t0,t1);}
-
-C_noret_decl(trf_5585)
-static void C_fcall trf_5585(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5585(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5585(t0,t1);}
-
-C_noret_decl(trf_5588)
-static void C_fcall trf_5588(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5588(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5588(t0,t1);}
-
-C_noret_decl(trf_5551)
-static void C_fcall trf_5551(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5551(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5551(t0,t1);}
-
-C_noret_decl(trf_5385)
-static void C_fcall trf_5385(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5385(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5385(t0,t1,t2);}
-
-C_noret_decl(trf_5412)
-static void C_fcall trf_5412(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5412(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5412(t0,t1,t2);}
-
-C_noret_decl(trf_5212)
-static void C_fcall trf_5212(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5212(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5212(t0,t1);}
-
-C_noret_decl(trf_5224)
-static void C_fcall trf_5224(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5224(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5224(t0,t1);}
-
-C_noret_decl(trf_5160)
-static void C_fcall trf_5160(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5160(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5160(t0,t1,t2);}
-
-C_noret_decl(trf_5061)
-static void C_fcall trf_5061(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5061(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5061(t0,t1);}
-
-C_noret_decl(trf_5056)
-static void C_fcall trf_5056(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5056(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5056(t0,t1,t2);}
-
-C_noret_decl(trf_5030)
-static void C_fcall trf_5030(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5030(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_5030(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5036)
-static void C_fcall trf_5036(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5036(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_5036(t0,t1,t2);}
-
-C_noret_decl(trf_4994)
-static void C_fcall trf_4994(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4994(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4994(t0,t1,t2);}
-
-C_noret_decl(trf_4930)
-static void C_fcall trf_4930(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4930(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4930(t0,t1,t2);}
-
-C_noret_decl(trf_4938)
-static void C_fcall trf_4938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4938(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4938(t0,t1,t2);}
-
-C_noret_decl(trf_4585)
-static void C_fcall trf_4585(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4585(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4585(t0,t1,t2);}
-
-C_noret_decl(trf_4613)
-static void C_fcall trf_4613(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4613(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4613(t0,t1);}
-
-C_noret_decl(trf_4784)
-static void C_fcall trf_4784(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4784(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4784(t0,t1);}
-
-C_noret_decl(trf_4824)
-static void C_fcall trf_4824(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4824(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4824(t0,t1,t2);}
-
-C_noret_decl(trf_4737)
-static void C_fcall trf_4737(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4737(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4737(t0,t1,t2);}
-
-C_noret_decl(trf_4662)
-static void C_fcall trf_4662(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4662(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4662(t0,t1,t2);}
-
-C_noret_decl(trf_4539)
-static void C_fcall trf_4539(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4539(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_4539(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_4337)
-static void C_fcall trf_4337(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4337(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_4337(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_4375)
-static void C_fcall trf_4375(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4375(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4375(t0,t1);}
-
-C_noret_decl(trf_4392)
-static void C_fcall trf_4392(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4392(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4392(t0,t1,t2);}
-
-C_noret_decl(trf_4411)
-static void C_fcall trf_4411(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4411(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4411(t0,t1);}
-
-C_noret_decl(trf_4291)
-static void C_fcall trf_4291(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4291(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4291(t0,t1,t2);}
-
-C_noret_decl(trf_4121)
-static void C_fcall trf_4121(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4121(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4121(t0,t1);}
-
-C_noret_decl(trf_4116)
-static void C_fcall trf_4116(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4116(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4116(t0,t1,t2);}
-
-C_noret_decl(trf_3965)
-static void C_fcall trf_3965(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3965(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3965(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3971)
-static void C_fcall trf_3971(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3971(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3971(t0,t1,t2);}
-
-C_noret_decl(trf_4002)
-static void C_fcall trf_4002(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4002(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4002(t0,t1);}
-
-C_noret_decl(trf_3918)
-static void C_fcall trf_3918(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3918(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3918(t0,t1,t2);}
-
-C_noret_decl(trf_3928)
-static void C_fcall trf_3928(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3928(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3928(t0,t1);}
-
-C_noret_decl(trf_3900)
-static void C_fcall trf_3900(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3900(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3900(t0,t1,t2);}
-
-C_noret_decl(tr10)
-static void C_fcall tr10(C_proc10 k) C_regparm C_noret;
-C_regparm static void C_fcall tr10(C_proc10 k){
-C_word t9=C_pick(0);
-C_word t8=C_pick(1);
-C_word t7=C_pick(2);
-C_word t6=C_pick(3);
-C_word t5=C_pick(4);
-C_word t4=C_pick(5);
-C_word t3=C_pick(6);
-C_word t2=C_pick(7);
-C_word t1=C_pick(8);
-C_word t0=C_pick(9);
-C_adjust_stack(-10);
-(k)(10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-
-C_noret_decl(tr7)
-static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
-C_regparm static void C_fcall tr7(C_proc7 k){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-(k)(7,t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr5r)
-static void C_fcall tr5r(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5r(C_proc5 k){
-int n;
-C_word *a,t5;
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t5=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-C_noret_decl(tr6r)
-static void C_fcall tr6r(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6r(C_proc6 k){
-int n;
-C_word *a,t6;
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t6=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_expand_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_expand_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("expand_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(3713)){
-C_save(t1);
-C_rereclaim2(3713*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,360);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],12,"\003sysfeatures");
-lf[3]=C_h_intern(&lf[3],23,"\003syscurrent-environment");
-lf[4]=C_h_intern(&lf[4],28,"\003syscurrent-meta-environment");
-lf[6]=C_h_intern(&lf[6],7,"\003sysget");
-lf[7]=C_h_intern(&lf[7],16,"\004coremacro-alias");
-lf[9]=C_h_intern(&lf[9],19,"\003sysundefined-value");
-lf[10]=C_h_intern(&lf[10],8,"\003sysput!");
-lf[11]=C_h_intern(&lf[11],14,"\004corereal-name");
-lf[12]=C_h_intern(&lf[12],6,"gensym");
-lf[13]=C_h_intern(&lf[13],21,"\003sysqualified-symbol\077");
-lf[14]=C_h_intern(&lf[14],16,"\003sysstrip-syntax");
-lf[15]=C_h_intern(&lf[15],21,"\003sysalias-global-hook");
-lf[16]=C_h_intern(&lf[16],3,"get");
-lf[17]=C_h_intern(&lf[17],11,"make-vector");
-lf[18]=C_h_intern(&lf[18],9,"\003syserror");
-lf[19]=C_h_intern(&lf[19],12,"strip-syntax");
-lf[20]=C_h_intern(&lf[20],21,"\003sysmacro-environment");
-lf[21]=C_h_intern(&lf[21],29,"\003syschicken-macro-environment");
-lf[22]=C_h_intern(&lf[22],33,"\003syschicken-ffi-macro-environment");
-lf[23]=C_h_intern(&lf[23],28,"\003sysextend-macro-environment");
-lf[24]=C_h_intern(&lf[24],14,"\003syscopy-macro");
-lf[25]=C_h_intern(&lf[25],10,"\003sysmacro\077");
-lf[26]=C_h_intern(&lf[26],20,"\003sysunregister-macro");
-lf[27]=C_h_intern(&lf[27],4,"caar");
-lf[28]=C_h_intern(&lf[28],19,"\003sysundefine-macro!");
-lf[29]=C_h_intern(&lf[29],12,"\003sysexpand-0");
-lf[30]=C_h_intern(&lf[30],9,"condition");
-lf[31]=C_h_intern(&lf[31],9,"\003sysabort");
-lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
-lf[33]=C_h_intern(&lf[33],13,"string-append");
-lf[34]=C_decode_literal(C_heaptop,"\376B\000\000\025during expansion of (");
-lf[35]=C_decode_literal(C_heaptop,"\376B\000\000\010 ...) - ");
-lf[36]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
-lf[37]=C_h_intern(&lf[37],3,"exn");
-lf[38]=C_h_intern(&lf[38],21,"\003syssyntax-error-hook");
-lf[39]=C_decode_literal(C_heaptop,"\376B\000\000\030syntax transformer for `");
-lf[40]=C_decode_literal(C_heaptop,"\376B\000\000@\047 returns original form, which would result in endless expansion");
-lf[41]=C_h_intern(&lf[41],14,"symbol->string");
-lf[42]=C_h_intern(&lf[42],25,"\003syssyntax-rules-mismatch");
-lf[43]=C_h_intern(&lf[43],16,"\003sysdynamic-wind");
-lf[44]=C_h_intern(&lf[44],22,"with-exception-handler");
-lf[45]=C_h_intern(&lf[45],30,"call-with-current-continuation");
-lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\034invalid syntax in macro form");
-lf[47]=C_h_intern(&lf[47],3,"let");
-lf[48]=C_h_intern(&lf[48],8,"\004corelet");
-lf[49]=C_h_intern(&lf[49],16,"\004coreloop-lambda");
-lf[50]=C_h_intern(&lf[50],11,"\004coreletrec");
-lf[51]=C_h_intern(&lf[51],8,"\004coreapp");
-lf[52]=C_h_intern(&lf[52],10,"\003sysappend");
-lf[53]=C_h_intern(&lf[53],4,"cadr");
-lf[54]=C_h_intern(&lf[54],16,"\003syscheck-syntax");
-lf[55]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[56]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[57]=C_h_intern(&lf[57],10,"\003syssetter");
-lf[58]=C_h_intern(&lf[58],6,"append");
-lf[59]=C_h_intern(&lf[59],4,"set!");
-lf[60]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[61]=C_h_intern(&lf[61],24,"\003syscompiler-syntax-hook");
-lf[62]=C_h_intern(&lf[62],24,"\010compilercompiler-syntax");
-lf[63]=C_h_intern(&lf[63],9,"\004coreset!");
-lf[64]=C_h_intern(&lf[64],25,"\003sysenable-runtime-macros");
-lf[65]=C_h_intern(&lf[65],17,"\003sysmodule-rename");
-lf[66]=C_h_intern(&lf[66],18,"\003sysstring->symbol");
-lf[67]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
-lf[68]=C_h_intern(&lf[68],6,"module");
-lf[69]=C_h_intern(&lf[69],22,"\003sysregister-undefined");
-lf[70]=C_h_intern(&lf[70],18,"\003syscurrent-module");
-lf[71]=C_h_intern(&lf[71],14,"\004coreprimitive");
-lf[72]=C_h_intern(&lf[72],12,"\004corealiased");
-lf[73]=C_h_intern(&lf[73],10,"\003sysexpand");
-lf[74]=C_h_intern(&lf[74],6,"expand");
-lf[75]=C_h_intern(&lf[75],25,"\003sysextended-lambda-list\077");
-lf[76]=C_h_intern(&lf[76],6,"#!rest");
-lf[77]=C_h_intern(&lf[77],10,"#!optional");
-lf[78]=C_h_intern(&lf[78],5,"#!key");
-lf[79]=C_h_intern(&lf[79],7,"reverse");
-lf[80]=C_h_intern(&lf[80],31,"\003sysexpand-extended-lambda-list");
-lf[81]=C_h_intern(&lf[81],5,"cadar");
-lf[82]=C_h_intern(&lf[82],5,"quote");
-lf[83]=C_h_intern(&lf[83],15,"\003sysget-keyword");
-lf[84]=C_h_intern(&lf[84],11,"\004corelambda");
-lf[85]=C_h_intern(&lf[85],15,"string->keyword");
-lf[86]=C_decode_literal(C_heaptop,"\376B\000\000+rest argument list specified more than once");
-lf[87]=C_decode_literal(C_heaptop,"\376B\000\000-`#!optional\047 argument marker in wrong context");
-lf[88]=C_h_intern(&lf[88],3,"tmp");
-lf[89]=C_decode_literal(C_heaptop,"\376B\000\000#invalid syntax of `#!rest\047 argument");
-lf[90]=C_decode_literal(C_heaptop,"\376B\000\000)`#!rest\047 argument marker in wrong context");
-lf[91]=C_decode_literal(C_heaptop,"\376B\000\000(`#!key\047 argument marker in wrong context");
-lf[92]=C_decode_literal(C_heaptop,"\376B\000\0000invalid lambda list syntax after `#!rest\047 marker");
-lf[93]=C_decode_literal(C_heaptop,"\376B\000\000 invalid required argument syntax");
-lf[94]=C_decode_literal(C_heaptop,"\376B\000\0000invalid lambda list syntax after `#!rest\047 marker");
-lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid lambda list syntax");
-lf[96]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid lambda list syntax");
-lf[97]=C_h_intern(&lf[97],14,"let-optionals*");
-lf[98]=C_h_intern(&lf[98],13,"let-optionals");
-lf[99]=C_h_intern(&lf[99],8,"optional");
-lf[100]=C_h_intern(&lf[100],4,"let*");
-lf[101]=C_h_intern(&lf[101],3,"map");
-lf[102]=C_h_intern(&lf[102],21,"\003syscanonicalize-body");
-lf[103]=C_h_intern(&lf[103],10,"\004corebegin");
-lf[104]=C_h_intern(&lf[104],13,"define-values");
-lf[105]=C_h_intern(&lf[105],6,"define");
-lf[106]=C_h_intern(&lf[106],20,"\003syscall-with-values");
-lf[107]=C_h_intern(&lf[107],14,"\004coreundefined");
-lf[108]=C_h_intern(&lf[108],3,"cdr");
-lf[109]=C_h_intern(&lf[109],13,"letrec-syntax");
-lf[110]=C_h_intern(&lf[110],5,"cdadr");
-lf[111]=C_h_intern(&lf[111],6,"lambda");
-lf[112]=C_h_intern(&lf[112],5,"caadr");
-lf[113]=C_h_intern(&lf[113],13,"define-syntax");
-lf[114]=C_h_intern(&lf[114],25,"\003sysexpand-curried-define");
-lf[115]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006define\376\003\000\000\002\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[116]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006define\376\003\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[118]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006define\376\003\000\000\002\376\001\000\000\010variable\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[119]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006define\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[120]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015define-syntax\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[121]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015define-values\376\003\000\000\002\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[122]=C_h_intern(&lf[122],5,"begin");
-lf[123]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005begin\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[125]=C_h_intern(&lf[125],24,"\003sysline-number-database");
-lf[126]=C_h_intern(&lf[126],24,"\003syssyntax-error-culprit");
-lf[127]=C_h_intern(&lf[127],15,"\003syssignal-hook");
-lf[128]=C_h_intern(&lf[128],13,"\000syntax-error");
-lf[129]=C_h_intern(&lf[129],12,"syntax-error");
-lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\024no rule matches form");
-lf[131]=C_h_intern(&lf[131],15,"get-line-number");
-lf[132]=C_h_intern(&lf[132],18,"\003syshash-table-ref");
-lf[133]=C_h_intern(&lf[133],8,"keyword\077");
-lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\012) in line ");
-lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\003 - ");
-lf[137]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\002) ");
-lf[139]=C_decode_literal(C_heaptop,"\376B\000\000\024not enough arguments");
-lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\022too many arguments");
-lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\021not a proper list");
-lf[142]=C_decode_literal(C_heaptop,"\376B\000\000\021unexpected object");
-lf[143]=C_h_intern(&lf[143],1,"_");
-lf[144]=C_h_intern(&lf[144],4,"pair");
-lf[145]=C_h_intern(&lf[145],5,"pair\077");
-lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\015pair expected");
-lf[147]=C_h_intern(&lf[147],8,"variable");
-lf[148]=C_h_intern(&lf[148],7,"symbol\077");
-lf[149]=C_decode_literal(C_heaptop,"\376B\000\000\023identifier expected");
-lf[150]=C_h_intern(&lf[150],6,"symbol");
-lf[151]=C_decode_literal(C_heaptop,"\376B\000\000\017symbol expected");
-lf[152]=C_h_intern(&lf[152],4,"list");
-lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\024proper list expected");
-lf[154]=C_h_intern(&lf[154],6,"number");
-lf[155]=C_h_intern(&lf[155],7,"number\077");
-lf[156]=C_decode_literal(C_heaptop,"\376B\000\000\017number expected");
-lf[157]=C_h_intern(&lf[157],6,"string");
-lf[158]=C_h_intern(&lf[158],7,"string\077");
-lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\017string expected");
-lf[160]=C_h_intern(&lf[160],11,"lambda-list");
-lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\024lambda-list expected");
-lf[162]=C_decode_literal(C_heaptop,"\376B\000\000\017missing keyword");
-lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\015pair expected");
-lf[164]=C_decode_literal(C_heaptop,"\376B\000\000\017incomplete form");
-lf[165]=C_h_intern(&lf[165],20,"er-macro-transformer");
-lf[166]=C_h_intern(&lf[166],18,"\003syser-transformer");
-lf[167]=C_h_intern(&lf[167],12,"list->vector");
-lf[168]=C_h_intern(&lf[168],12,"vector->list");
-lf[169]=C_h_intern(&lf[169],17,"\003sysexpand-import");
-lf[170]=C_h_intern(&lf[170],17,"\003sysstring-append");
-lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\001:");
-lf[172]=C_h_intern(&lf[172],18,"\003syssymbol->string");
-lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\016invalid prefix");
-lf[174]=C_h_intern(&lf[174],15,"\003sysfind-module");
-lf[175]=C_h_intern(&lf[175],8,"\003sysload");
-lf[176]=C_h_intern(&lf[176],26,"\003sysmeta-macro-environment");
-lf[177]=C_decode_literal(C_heaptop,"\376B\000\000#cannot import from undefined module");
-lf[178]=C_h_intern(&lf[178],18,"\003sysfind-extension");
-lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\007.import");
-lf[180]=C_decode_literal(C_heaptop,"\376B\000\000\034invalid import specification");
-lf[181]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006symbol\376\377\001\000\000\000\000");
-lf[182]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006symbol\376\377\001\000\000\000\000");
-lf[183]=C_h_intern(&lf[183],8,"\003syswarn");
-lf[184]=C_decode_literal(C_heaptop,"\376B\000\000\037renamed identifier not imported");
-lf[185]=C_h_intern(&lf[185],8,"\003sysdelq");
-lf[186]=C_h_intern(&lf[186],4,"cdar");
-lf[187]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\377\001\000\000\000\000");
-lf[188]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[189]=C_decode_literal(C_heaptop,"\376B\000\000\034invalid import specification");
-lf[190]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[191]=C_h_intern(&lf[191],14,"\003sysblock-set!");
-lf[192]=C_h_intern(&lf[192],18,"\003sysmark-primitive");
-lf[193]=C_h_intern(&lf[193],3,"car");
-lf[194]=C_decode_literal(C_heaptop,"\376B\000\000%`reexport\047 only valid inside a module");
-lf[195]=C_decode_literal(C_heaptop,"\376B\000\000$re-importing already imported syntax");
-lf[196]=C_decode_literal(C_heaptop,"\376B\000\000(re-importing already imported identifier");
-lf[197]=C_h_intern(&lf[197],25,"\003sysmark-imported-symbols");
-lf[198]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[199]=C_h_intern(&lf[199],6,"prefix");
-lf[200]=C_h_intern(&lf[200],6,"except");
-lf[201]=C_h_intern(&lf[201],6,"rename");
-lf[202]=C_h_intern(&lf[202],4,"only");
-lf[203]=C_h_intern(&lf[203],29,"\003sysinitial-macro-environment");
-lf[204]=C_h_intern(&lf[204],24,"\003sysprocess-syntax-rules");
-lf[205]=C_h_intern(&lf[205],7,"\003syscar");
-lf[206]=C_h_intern(&lf[206],7,"\003syscdr");
-lf[207]=C_h_intern(&lf[207],11,"\003sysvector\077");
-lf[208]=C_h_intern(&lf[208],17,"\003sysvector-length");
-lf[209]=C_h_intern(&lf[209],14,"\003sysvector-ref");
-lf[210]=C_h_intern(&lf[210],16,"\003sysvector->list");
-lf[211]=C_h_intern(&lf[211],16,"\003syslist->vector");
-lf[212]=C_h_intern(&lf[212],6,"\003sys>=");
-lf[213]=C_h_intern(&lf[213],5,"\003sys=");
-lf[214]=C_h_intern(&lf[214],5,"\003sys+");
-lf[215]=C_h_intern(&lf[215],8,"\003syscons");
-lf[216]=C_h_intern(&lf[216],7,"\003syseq\077");
-lf[217]=C_h_intern(&lf[217],10,"\003sysequal\077");
-lf[218]=C_h_intern(&lf[218],9,"\003syslist\077");
-lf[219]=C_h_intern(&lf[219],7,"\003sysmap");
-lf[220]=C_h_intern(&lf[220],9,"\003sysmap-n");
-lf[221]=C_h_intern(&lf[221],9,"\003sysnull\077");
-lf[222]=C_h_intern(&lf[222],9,"\003syspair\077");
-lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\026ill-formed syntax rule");
-lf[224]=C_h_intern(&lf[224],11,"\004coresyntax");
-lf[225]=C_decode_literal(C_heaptop,"\376B\000\000,template dimension error (too few ellipses\077)");
-lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\021too many ellipses");
-lf[227]=C_h_intern(&lf[227],9,"\003sysapply");
-lf[228]=C_decode_literal(C_heaptop,"\376B\000\000 segment matching not implemented");
-lf[229]=C_h_intern(&lf[229],4,"temp");
-lf[230]=C_h_intern(&lf[230],4,"tail");
-lf[231]=C_h_intern(&lf[231],2,"or");
-lf[232]=C_h_intern(&lf[232],4,"loop");
-lf[233]=C_h_intern(&lf[233],1,"l");
-lf[234]=C_h_intern(&lf[234],5,"input");
-lf[235]=C_h_intern(&lf[235],4,"else");
-lf[236]=C_h_intern(&lf[236],4,"cond");
-lf[237]=C_h_intern(&lf[237],7,"compare");
-lf[238]=C_h_intern(&lf[238],1,"i");
-lf[239]=C_h_intern(&lf[239],3,"and");
-lf[240]=C_h_intern(&lf[240],16,"\003sysmacro-subset");
-lf[241]=C_h_intern(&lf[241],27,"\003sysfixup-macro-environment");
-lf[242]=C_h_intern(&lf[242],29,"\003sysdefault-macro-environment");
-lf[244]=C_h_intern(&lf[244],26,"set-module-undefined-list!");
-lf[245]=C_h_intern(&lf[245],21,"module-undefined-list");
-lf[246]=C_h_intern(&lf[246],15,"\003sysmodule-name");
-lf[247]=C_h_intern(&lf[247],18,"\003sysmodule-exports");
-lf[248]=C_h_intern(&lf[248],16,"\003sysmodule-table");
-lf[249]=C_h_intern(&lf[249],5,"error");
-lf[250]=C_h_intern(&lf[250],6,"import");
-lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\020module not found");
-lf[252]=C_h_intern(&lf[252],28,"\003systoplevel-definition-hook");
-lf[253]=C_h_intern(&lf[253],28,"\003sysregister-meta-expression");
-lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\047redefinition of imported syntax binding");
-lf[256]=C_decode_literal(C_heaptop,"\376B\000\000&redefinition of imported value binding");
-lf[257]=C_h_intern(&lf[257],19,"\003sysregister-export");
-lf[258]=C_h_intern(&lf[258],15,"\003sysfind-export");
-lf[259]=C_h_intern(&lf[259],26,"\003sysregister-syntax-export");
-lf[260]=C_decode_literal(C_heaptop,"\376B\000\000!use of syntax precedes definition");
-lf[261]=C_h_intern(&lf[261],19,"\003sysregister-module");
-lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\014 in module `");
-lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
-lf[265]=C_decode_literal(C_heaptop,"\376B\000\000!indirect export of syntax binding");
-lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\033indirect reexport of syntax");
-lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\042indirect export of unknown binding");
-lf[269]=C_h_intern(&lf[269],32,"\003syscompiled-module-registration");
-lf[270]=C_h_intern(&lf[270],28,"\003sysregister-compiled-module");
-lf[271]=C_h_intern(&lf[271],4,"cons");
-lf[272]=C_h_intern(&lf[272],4,"eval");
-lf[273]=C_decode_literal(C_heaptop,"\376B\000\0000cannot find implementation of re-exported syntax");
-lf[274]=C_h_intern(&lf[274],19,"\003sysprimitive-alias");
-lf[275]=C_decode_literal(C_heaptop,"\376B\000\000\002#%");
-lf[276]=C_h_intern(&lf[276],29,"\003sysregister-primitive-module");
-lf[277]=C_decode_literal(C_heaptop,"\376B\000\0001unknown macro referenced while registering module");
-lf[278]=C_h_intern(&lf[278],18,"module-exists-list");
-lf[279]=C_h_intern(&lf[279],19,"\003sysfinalize-module");
-lf[280]=C_decode_literal(C_heaptop,"\376B\000\000$(internal) indirect export not found");
-lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\021module unresolved");
-lf[282]=C_decode_literal(C_heaptop,"\376B\000\000\027 suggesting: `(import ");
-lf[283]=C_decode_literal(C_heaptop,"\376B\000\000\002)\047");
-lf[284]=C_decode_literal(C_heaptop,"\376B\000\000\025 suggesting one of:\012");
-lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\026Warning: `(import ");
-lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\003)\047\012");
-lf[288]=C_h_intern(&lf[288],7,"\004coredb");
-lf[289]=C_decode_literal(C_heaptop,"\376B\000\000(reference to possibly unbound identifier");
-lf[290]=C_decode_literal(C_heaptop,"\376B\000\000 exported identifier for module `");
-lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\026\047 has not been defined");
-lf[292]=C_h_intern(&lf[292],14,"make-parameter");
-lf[293]=C_h_intern(&lf[293],12,"syntax-rules");
-lf[294]=C_h_intern(&lf[294],3,"...");
-lf[295]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\004list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[296]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
-lf[297]=C_h_intern(&lf[297],6,"export");
-lf[298]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
-lf[300]=C_decode_literal(C_heaptop,"\376B\000\000!`export\047 used outside module body");
-lf[301]=C_h_intern(&lf[301],16,"begin-for-syntax");
-lf[302]=C_h_intern(&lf[302],24,"\004coreelaborationtimeonly");
-lf[303]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[304]=C_h_intern(&lf[304],1,"*");
-lf[305]=C_h_intern(&lf[305],11,"\004coremodule");
-lf[306]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[307]=C_h_intern(&lf[307],17,"require-extension");
-lf[308]=C_h_intern(&lf[308],22,"\004corerequire-extension");
-lf[309]=C_h_intern(&lf[309],15,"require-library");
-lf[310]=C_h_intern(&lf[310],11,"cond-expand");
-lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\042syntax error in `cond-expand\047 form");
-lf[312]=C_h_intern(&lf[312],12,"\003sysfeature\077");
-lf[313]=C_decode_literal(C_heaptop,"\376B\000\000(no matching clause in `cond-expand\047 form");
-lf[314]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[315]=C_h_intern(&lf[315],3,"not");
-lf[316]=C_h_intern(&lf[316],5,"delay");
-lf[317]=C_h_intern(&lf[317],16,"\003sysmake-promise");
-lf[318]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[319]=C_h_intern(&lf[319],10,"quasiquote");
-lf[320]=C_h_intern(&lf[320],8,"\003syslist");
-lf[321]=C_h_intern(&lf[321],1,"a");
-lf[322]=C_h_intern(&lf[322],1,"b");
-lf[323]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012\003sysappend\376\003\000\000\002\376\001\000\000\001a\376\003\000\000\002\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\377\016\376\377\016\376\377\016");
-lf[324]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001a\376\377\016");
-lf[325]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\003syscons\376\003\000\000\002\376\001\000\000\001a\376\003\000\000\002\376\003\000\000\002\376\001\000\000\010\003syslist\376\001\000\000\001b\376\377\016");
-lf[326]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001a\376\003\000\000\002\376\001\000\000\001b\376\377\016");
-lf[327]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\003syscons\376\003\000\000\002\376\001\000\000\001a\376\003\000\000\002\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\377\016\376\377\016\376\377\016");
-lf[328]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001a\376\377\016");
-lf[329]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
-lf[330]=C_h_intern(&lf[330],16,"unquote-splicing");
-lf[331]=C_h_intern(&lf[331],7,"unquote");
-lf[332]=C_h_intern(&lf[332],2,"do");
-lf[333]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[334]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[335]=C_h_intern(&lf[335],2,"if");
-lf[336]=C_h_intern(&lf[336],6,"doloop");
-lf[337]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\001\376\001\000\000\001_\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001"
-"\000\000\000\001");
-lf[338]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[339]=C_h_intern(&lf[339],4,"case");
-lf[340]=C_h_intern(&lf[340],8,"\003syseqv\077");
-lf[341]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[342]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[343]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
-lf[344]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[345]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[346]=C_h_intern(&lf[346],2,"=>");
-lf[347]=C_h_intern(&lf[347],18,"\004coredefine-syntax");
-lf[348]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[349]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\013lambda-list");
-lf[350]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[351]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[352]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\013lambda-list");
-lf[353]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[354]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\001\000\000\013lambda-list");
-lf[355]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[356]=C_decode_literal(C_heaptop,"\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
-lf[357]=C_h_intern(&lf[357],8,"reexport");
-lf[358]=C_h_intern(&lf[358],17,"import-for-syntax");
-lf[359]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\020\000hygienic-macros\376\003\000\000\002\376\001\000\000\015\000syntax-rules\376\377\016");
-C_register_lf2(lf,360,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c217 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3866,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 41 append */
-t4=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[359],*((C_word*)lf[2]+1));}
-
-/* k3864 */
-static void C_ccall f_3866(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3866,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! features ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3894,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 68 make-parameter */
-t4=*((C_word*)lf[292]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_END_OF_LIST);}
-
-/* k3892 in k3864 */
-static void C_ccall f_3894(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3894,2,t0,t1);}
-t2=C_mutate((C_word*)lf[3]+1 /* (set! current-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3898,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 69 make-parameter */
-t4=*((C_word*)lf[292]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_END_OF_LIST);}
-
-/* k3896 in k3892 in k3864 */
-static void C_ccall f_3898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3898,2,t0,t1);}
-t2=C_mutate((C_word*)lf[4]+1 /* (set! current-meta-environment ...) */,t1);
-t3=C_mutate(&lf[5] /* (set! lookup ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3900,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate(&lf[8] /* (set! macro-alias ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3918,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[14]+1 /* (set! strip-syntax ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3963,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[19]+1 /* (set! strip-syntax ...) */,*((C_word*)lf[14]+1));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4172,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 134 make-parameter */
-t8=*((C_word*)lf[292]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,C_SCHEME_END_OF_LIST);}
-
-/* k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4172(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word ab[82],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4172,2,t0,t1);}
-t2=C_mutate((C_word*)lf[20]+1 /* (set! macro-environment ...) */,t1);
-t3=C_set_block_item(lf[21] /* chicken-macro-environment */,0,C_SCHEME_END_OF_LIST);
-t4=C_set_block_item(lf[22] /* chicken-ffi-macro-environment */,0,C_SCHEME_END_OF_LIST);
-t5=C_mutate((C_word*)lf[23]+1 /* (set! extend-macro-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4176,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[24]+1 /* (set! copy-macro ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4214,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[25]+1 /* (set! macro? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4227,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[26]+1 /* (set! unregister-macro ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4277,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[28]+1 /* (set! undefine-macro! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4328,a[2]=((C_word)li14),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[29]+1 /* (set! expand-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4334,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
-t11=C_set_block_item(lf[61] /* compiler-syntax-hook */,0,C_SCHEME_FALSE);
-t12=C_set_block_item(lf[64] /* enable-runtime-macros */,0,C_SCHEME_FALSE);
-t13=C_mutate((C_word*)lf[65]+1 /* (set! module-rename ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4909,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[15]+1 /* (set! alias-global-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4927,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[73]+1 /* (set! expand ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5028,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[74]+1 /* (set! expand ...) */,*((C_word*)lf[73]+1));
-t17=C_mutate((C_word*)lf[75]+1 /* (set! extended-lambda-list? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5114,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
-t18=*((C_word*)lf[79]+1);
-t19=*((C_word*)lf[12]+1);
-t20=C_mutate((C_word*)lf[80]+1 /* (set! expand-extended-lambda-list ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5157,a[2]=t18,a[3]=((C_word)li52),tmp=(C_word)a,a+=4,tmp));
-t21=*((C_word*)lf[79]+1);
-t22=*((C_word*)lf[101]+1);
-t23=C_mutate((C_word*)lf[102]+1 /* (set! canonicalize-body ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5785,a[2]=t22,a[3]=t21,a[4]=((C_word)li68),tmp=(C_word)a,a+=5,tmp));
-t24=C_mutate(&lf[124] /* (set! match-expression ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6628,a[2]=((C_word)li71),tmp=(C_word)a,a+=3,tmp));
-t25=C_mutate((C_word*)lf[114]+1 /* (set! expand-curried-define ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6716,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp));
-t26=C_set_block_item(lf[125] /* line-number-database */,0,C_SCHEME_FALSE);
-t27=C_set_block_item(lf[126] /* syntax-error-culprit */,0,C_SCHEME_FALSE);
-t28=C_mutate((C_word*)lf[38]+1 /* (set! syntax-error-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6786,a[2]=((C_word)li74),tmp=(C_word)a,a+=3,tmp));
-t29=C_mutate((C_word*)lf[129]+1 /* (set! syntax-error ...) */,*((C_word*)lf[38]+1));
-t30=C_mutate((C_word*)lf[42]+1 /* (set! syntax-rules-mismatch ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6797,a[2]=((C_word)li75),tmp=(C_word)a,a+=3,tmp));
-t31=C_mutate((C_word*)lf[131]+1 /* (set! get-line-number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6803,a[2]=((C_word)li77),tmp=(C_word)a,a+=3,tmp));
-t32=*((C_word*)lf[33]+1);
-t33=*((C_word*)lf[133]+1);
-t34=*((C_word*)lf[131]+1);
-t35=*((C_word*)lf[41]+1);
-t36=C_mutate((C_word*)lf[54]+1 /* (set! check-syntax ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6844,a[2]=t33,a[3]=t34,a[4]=t35,a[5]=t32,a[6]=((C_word)li90),tmp=(C_word)a,a+=7,tmp));
-t37=C_mutate((C_word*)lf[165]+1 /* (set! er-macro-transformer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7316,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[166]+1 /* (set! er-transformer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7319,a[2]=((C_word)li99),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[169]+1 /* (set! expand-import ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7682,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp));
-t40=C_mutate((C_word*)lf[192]+1 /* (set! mark-primitive ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8868,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp));
-t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8911,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15802,a[2]=t41,tmp=(C_word)a,a+=3,tmp);
-t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15804,a[2]=((C_word)li255),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 951 ##sys#er-transformer */
-t44=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t44+1)))(3,t44,t42,t43);}
-
-/* a15803 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15804(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15804,5,t0,t1,t2,t3,t4);}
-t5=*((C_word*)lf[169]+1);
-/* g17941795 */
-t6=t5;
-((C_proc10)(void*)(*((C_word*)t6+1)))(10,t6,t1,t2,t3,t4,*((C_word*)lf[3]+1),*((C_word*)lf[20]+1),C_SCHEME_FALSE,C_SCHEME_FALSE,lf[250]);}
-
-/* k15800 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 949 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[250],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8911,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8914,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15792,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15794,a[2]=((C_word)li254),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 957 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15793 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15794(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15794,5,t0,t1,t2,t3,t4);}
-t5=*((C_word*)lf[169]+1);
-/* g18091810 */
-t6=t5;
-((C_proc10)(void*)(*((C_word*)t6+1)))(10,t6,t1,t2,t3,t4,*((C_word*)lf[4]+1),*((C_word*)lf[176]+1),C_SCHEME_TRUE,C_SCHEME_FALSE,lf[358]);}
-
-/* k15790 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 955 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[358],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8914,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8917,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15782,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15784,a[2]=((C_word)li253),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 963 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15783 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15784(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15784,5,t0,t1,t2,t3,t4);}
-t5=*((C_word*)lf[169]+1);
-/* g18241825 */
-t6=t5;
-((C_proc10)(void*)(*((C_word*)t6+1)))(10,t6,t1,t2,t3,t4,*((C_word*)lf[3]+1),*((C_word*)lf[20]+1),C_SCHEME_FALSE,C_SCHEME_TRUE,lf[357]);}
-
-/* k15780 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15782(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 961 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[357],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8917(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8917,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8921,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 967 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8921,2,t0,t1);}
-t2=C_mutate((C_word*)lf[203]+1 /* (set! initial-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8924,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15655,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15657,a[2]=((C_word)li252),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 972 ##sys#er-transformer */
-t6=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15657(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15657,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15667,a[2]=t3,a[3]=t7,a[4]=((C_word)li251),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_15667(t9,t1,t5);}
-
-/* loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_15667(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15667,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t3))){
-t5=(C_word)C_i_car(t3);
-if(C_truep((C_word)C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15723,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 985 ##sys#check-syntax */
-t7=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[105],t3,lf[352]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15736,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 989 ##sys#check-syntax */
-t7=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[105],t3,lf[354]);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15683,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 978 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[105],t3,lf[150]);}}
-
-/* k15681 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15683(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15683,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15686,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 979 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[105],((C_word*)t0)[4],lf[356]);}
-
-/* k15684 in k15681 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15686,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15689,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15714,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 980 ##sys#current-module */
-t4=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k15712 in k15684 in k15681 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 980 ##sys#register-export */
-t2=*((C_word*)lf[257]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15687 in k15684 in k15681 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15689,2,t0,t1);}
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
-t2=(C_word)C_i_car(((C_word*)t0)[4]);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[63],t4));}
-else{
-t2=(C_word)C_a_i_cons(&a,2,lf[355],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[63],t3));}}
-
-/* k15734 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15736,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15739,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 990 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[105],((C_word*)t0)[3],lf[353]);}
-
-/* k15737 in k15734 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15739(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15739,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15758,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 991 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[111]);}
-
-/* k15756 in k15737 in k15734 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15758,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15770,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k15768 in k15756 in k15737 in k15734 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15770(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15770,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t3);
-/* expand.scm: 991 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_15667(t5,((C_word*)t0)[2],t4);}
-
-/* k15721 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15723(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15723,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15726,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 986 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[105],((C_word*)t0)[2],lf[351]);}
-
-/* k15724 in k15721 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15726(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15726,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15733,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 987 ##sys#expand-curried-define */
-t3=*((C_word*)lf[114]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k15731 in k15724 in k15721 in loop in a15656 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15733(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 987 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_15667(t2,((C_word*)t0)[2],t1);}
-
-/* k15653 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 969 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[105],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8924,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8927,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15563,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15565,a[2]=((C_word)li250),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 996 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15565(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15565,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cadr(t2);
-t6=(C_word)C_i_cddr(t2);
-if(C_truep((C_word)C_i_pairp(t5))){
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15609,a[2]=t3,a[3]=t6,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1006 ##sys#check-syntax */
-t8=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,lf[113],t5,lf[349]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15581,a[2]=t1,a[3]=t5,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1001 ##sys#check-syntax */
-t8=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,lf[113],t5,lf[150]);}}
-
-/* k15579 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15581,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15584,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1002 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[113],((C_word*)t0)[4],lf[350]);}
-
-/* k15582 in k15579 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15584,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15587,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15606,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1003 ##sys#current-module */
-t4=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k15604 in k15582 in k15579 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1003 ##sys#register-export */
-t2=*((C_word*)lf[257]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15585 in k15582 in k15579 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15587,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[4]);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[347],t4));}
-
-/* k15607 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15609,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15612,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1007 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[113],((C_word*)t0)[3],lf[348]);}
-
-/* k15610 in k15607 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15612(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15612,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1010 r */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[111]);}
-
-/* k15633 in k15610 in k15607 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15635,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15647,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k15645 in k15633 in k15610 in k15607 in a15564 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15647(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15647,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[347],t5));}
-
-/* k15561 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15563(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 993 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[113],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8927,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8930,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15504,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15506,a[2]=((C_word)li249),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1015 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15505 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15506,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_TRUE);}
-else{
-t6=(C_word)C_i_cdr(t5);
-t7=(C_word)C_i_car(t5);
-if(C_truep((C_word)C_i_nullp(t6))){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-else{
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15535,a[2]=t3,a[3]=t6,a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1024 r */
-t9=t3;
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,lf[335]);}}}
-
-/* k15533 in a15505 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15535,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15555,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1024 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[239]);}
-
-/* k15553 in k15533 in a15505 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15555,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15559,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k15557 in k15553 in k15533 in a15505 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15559(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15559,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,t2,t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k15502 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15504(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1012 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[239],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8930,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8933,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15414,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15416,a[2]=((C_word)li248),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1029 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15416(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15416,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
-else{
-t6=(C_word)C_i_cdr(t5);
-t7=(C_word)C_i_car(t5);
-if(C_truep((C_word)C_i_nullp(t6))){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-else{
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15441,a[2]=t3,a[3]=t6,a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1038 r */
-t9=t3;
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,lf[88]);}}}
-
-/* k15439 in a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15441(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15441,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1039 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[47]);}
-
-/* k15446 in k15439 in a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15448,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15468,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1040 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[335]);}
-
-/* k15466 in k15446 in k15439 in a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15468,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15488,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1040 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[231]);}
-
-/* k15486 in k15466 in k15446 in k15439 in a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15492,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k15490 in k15486 in k15466 in k15446 in k15439 in a15415 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15492,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
-
-/* k15412 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1026 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[231],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8933,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8936,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15084,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15086,a[2]=((C_word)li247),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1045 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15086(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15086,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15093,a[2]=t5,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1048 r */
-t7=t3;
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[47]);}
-
-/* k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15093,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15096,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1049 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[335]);}
-
-/* k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15096(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15096,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15099,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1050 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[346]);}
-
-/* k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15099(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15099,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15102,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 1051 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[231]);}
-
-/* k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15102(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15102,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_15105,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 1052 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[235]);}
-
-/* k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15105,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_15108,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 1053 r */
-t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[111]);}
-
-/* k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15108(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15108,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15113,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t3,a[10]=((C_word*)t0)[10],a[11]=((C_word)li246),tmp=(C_word)a,a+=12,tmp));
-t5=((C_word*)t3)[1];
-f_15113(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_15113(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15113,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_15129,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t4,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t3,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
-/* expand.scm: 1059 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[236],t3,lf[344]);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[345]);}}
-
-/* k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15129,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15135,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[12]);
-/* expand.scm: 1060 c */
-t4=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
-
-/* k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15135,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15142,a[2]=((C_word*)t0)[12],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[11]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[11]);
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(C_word)C_i_car(((C_word*)t0)[11]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15171,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[12],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1061 expand */
-t5=((C_word*)((C_word*)t0)[9])[1];
-f_15113(t5,t4,((C_word*)t0)[8]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15177,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-t4=(C_word)C_i_cadr(((C_word*)t0)[11]);
-/* expand.scm: 1062 c */
-t5=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,((C_word*)t0)[2],t4);}}}
-
-/* k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15177(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15177,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15180,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1063 r */
-t3=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[88]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15245,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-if(C_truep((C_word)C_i_listp(((C_word*)t0)[11]))){
-t3=(C_word)C_i_length(((C_word*)t0)[11]);
-t4=(C_word)C_eqp(t3,C_fix(4));
-if(C_truep(t4)){
-t5=(C_word)C_i_caddr(((C_word*)t0)[11]);
-/* expand.scm: 1069 c */
-t6=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,((C_word*)t0)[2],t5);}
-else{
-t5=t2;
-f_15245(2,t5,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_15245(2,t3,C_SCHEME_FALSE);}}}
-
-/* k15243 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15245,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15248,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1070 r */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[88]);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[8]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15370,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[6],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[8]);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}}
-
-/* k15368 in k15243 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15370(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15370,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[103],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15366,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1079 expand */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_15113(t4,t3,((C_word*)t0)[2]);}
-
-/* k15364 in k15368 in k15243 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15366(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15366,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k15246 in k15243 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15248(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15248,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_i_cadr(((C_word*)t0)[6]);
-t7=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,t6,t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[227],t8);
-t10=(C_word)C_i_cadddr(((C_word*)t0)[6]);
-t11=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,t10,t11);
-t13=(C_word)C_a_i_cons(&a,2,lf[227],t12);
-t14=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15303,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t9,a[7]=t13,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1076 expand */
-t15=((C_word*)((C_word*)t0)[3])[1];
-f_15113(t15,t14,((C_word*)t0)[2]);}
-
-/* k15301 in k15246 in k15243 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15303,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,lf[335],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t9);
-t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,lf[106],t10));}
-
-/* k15178 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15180,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,t1,t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_i_caddr(((C_word*)t0)[7]);
-t7=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,t6,t7);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15219,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=t8,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1067 expand */
-t10=((C_word*)((C_word*)t0)[3])[1];
-f_15113(t10,t9,((C_word*)t0)[2]);}
-
-/* k15217 in k15178 in k15175 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15219,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
-
-/* k15169 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15171,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k15140 in k15133 in k15127 in expand in k15106 in k15103 in k15100 in k15097 in k15094 in k15091 in a15085 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15142,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* k15082 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1042 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[236],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8936(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8936,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8939,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14883,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14885,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1084 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14885(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14885,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14889,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1086 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[339],t2,lf[343]);}
-
-/* k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14889,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cddr(((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14898,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1089 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[88]);}
-
-/* k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14898,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14901,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1090 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[335]);}
-
-/* k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14901,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14904,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 1091 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[231]);}
-
-/* k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14904(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14904,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14907,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 1092 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[235]);}
-
-/* k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14907(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14907,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14926,a[2]=((C_word*)t0)[6],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14928,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=t7,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word)li244),tmp=(C_word)a,a+=9,tmp));
-t9=((C_word*)t7)[1];
-f_14928(t9,t5,((C_word*)t0)[2]);}
-
-/* expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14928(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14928,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14944,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t3,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 1099 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[339],t3,lf[341]);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[342]);}}
-
-/* k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14944(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14944,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14950,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[9]);
-/* expand.scm: 1100 c */
-t4=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
-
-/* k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14950(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14950,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14957,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15000,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15004,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=(C_word)C_i_car(((C_word*)t0)[7]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15010,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li243),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_15010(t12,t7,t8);}}
-
-/* loop1975 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_15010(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(22);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_15010,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15037,a[2]=((C_word*)t0)[5],a[3]=((C_word)li242),tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_15037(C_a_i(&a,15),t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop19751988 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop19751988 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g1991 in loop1975 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_15037(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_stack_check;
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[82],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4);
-return((C_word)C_a_i_cons(&a,2,lf[340],t5));}
-
-/* k15002 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k14998 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_15000(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15000,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14992,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k14990 in k14998 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14992(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14992,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[103],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14988,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1105 expand */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_14928(t4,t3,((C_word*)t0)[2]);}
-
-/* k14986 in k14990 in k14998 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14988(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14988,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
-
-/* k14955 in k14948 in k14942 in expand in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14957,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* k14924 in k14905 in k14902 in k14899 in k14896 in k14887 in a14884 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14926,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[47],t3));}
-
-/* k14881 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1081 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[339],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8939,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8942,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14814,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14816,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1110 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14816,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14820,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1112 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[100],t2,lf[338]);}
-
-/* k14818 in a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14820(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14820,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t3=(C_word)C_i_cddr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14829,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1115 r */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[47]);}
-
-/* k14827 in k14818 in a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14829(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14829,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14834,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li240),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_14834(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* expand in k14827 in k14818 in a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14834(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_14834,NULL,3,t0,t1,t2);}
-t3=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14852,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}
-else{
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14871,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t7=(C_word)C_i_cdr(t2);
-/* expand.scm: 1119 expand */
-t10=t6;
-t11=t7;
-t1=t10;
-t2=t11;
-goto loop;}}
-
-/* k14869 in expand in k14827 in k14818 in a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14871(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14871,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
-
-/* k14850 in expand in k14827 in k14818 in a14815 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14852(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14852,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k14812 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14814(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1107 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[100],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8942,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8945,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14567,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14569,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1124 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14569(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14569,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14573,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1126 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[332],t2,lf[337]);}
-
-/* k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14573(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14573,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t3=(C_word)C_i_caddr(((C_word*)t0)[4]);
-t4=(C_word)C_i_cdddr(((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14585,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1130 r */
-t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[336]);}
-
-/* k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14585(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14585,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14588,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1131 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[47]);}
-
-/* k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14588(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14588,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14591,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1132 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[335]);}
-
-/* k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14591,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14606,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14760,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li238),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_14760(t10,t6,((C_word*)t0)[3]);}
-
-/* loop2037 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14760(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_14760,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_i_cdr(t3);
-t6=(C_word)C_i_car(t5);
-t7=(C_word)C_a_i_list(&a,2,t4,t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t9=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t8);
-t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t8);
-t11=(C_word)C_slot(t2,C_fix(1));
-/* loop20372050 */
-t17=t1;
-t18=t11;
-t1=t17;
-t2=t18;
-goto loop;}
-else{
-t9=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
-t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t8);
-t11=(C_word)C_slot(t2,C_fix(1));
-/* loop20372050 */
-t17=t1;
-t18=t11;
-t1=t17;
-t2=t18;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14606,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[8]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-t5=(C_word)C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t5)){
-t6=t4;
-f_14633(t6,lf[334]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14758,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#append */
-t7=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t3,C_SCHEME_END_OF_LIST);}}
-
-/* k14756 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14758(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14758,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_14633(t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14633(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14633,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14649,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=(C_word)C_eqp(((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=t2;
-f_14649(t4,lf[333]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14748,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
-
-/* k14746 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14748,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=((C_word*)t0)[3];
-f_14649(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k14647 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14649(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14649,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14665,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14669,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14671,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li237),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_14671(t11,t7,((C_word*)t0)[2]);}
-
-/* loop2070 in k14647 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14671(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14671,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14730,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_i_cdr(t4);
-t6=(C_word)C_i_cdr(t5);
-t7=(C_word)C_eqp(t6,C_SCHEME_END_OF_LIST);
-if(C_truep(t7)){
-t8=t3;
-f_14730(t8,(C_word)C_i_car(t4));}
-else{
-t8=(C_word)C_i_cdr(t4);
-t9=(C_word)C_i_cdr(t8);
-t10=t3;
-f_14730(t10,(C_word)C_i_car(t9));}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k14728 in loop2070 in k14647 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14730(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14730,NULL,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop20702083 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_14671(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop20702083 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_14671(t6,((C_word*)t0)[3],t5);}}
-
-/* k14667 in k14647 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k14663 in k14647 in k14631 in k14604 in k14589 in k14586 in k14583 in k14571 in a14568 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[39],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14665,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[51],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[103],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t9);
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t11);
-t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t12);
-t14=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t13));}
-
-/* k14565 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1121 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[332],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8945,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8948,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14149,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14151,a[2]=((C_word)li236),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1153 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14151,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14155,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1155 r */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[82]);}
-
-/* k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14155,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14158,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1156 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[319]);}
-
-/* k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14158,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14161,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1157 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[331]);}
-
-/* k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14161,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14164,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1158 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[330]);}
-
-/* k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[29],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14164,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14166,a[2]=t5,a[3]=t7,a[4]=((C_word)li231),tmp=(C_word)a,a+=5,tmp));
-t9=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14176,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t3,a[8]=((C_word)li232),tmp=(C_word)a,a+=9,tmp));
-t10=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14453,a[2]=t7,a[3]=((C_word)li235),tmp=(C_word)a,a+=4,tmp));
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14556,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1208 ##sys#check-syntax */
-t12=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t12+1)))(5,t12,t11,lf[319],((C_word*)t0)[3],lf[329]);}
-
-/* k14554 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14556(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
-/* expand.scm: 1209 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_14166(t3,((C_word*)t0)[2],t2,C_fix(0));}
-
-/* simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14453(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14453,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14457,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1196 match-expression */
-f_6628(t3,t2,lf[327],lf[328]);}
-
-/* k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14457,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14461,a[2]=((C_word*)t0)[4],a[3]=((C_word)li233),tmp=(C_word)a,a+=4,tmp);
-/* g21722173 */
-t3=t2;
-f_14461(t3,((C_word*)t0)[3],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14487,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1198 match-expression */
-f_6628(t2,((C_word*)t0)[2],lf[325],lf[326]);}}
-
-/* k14485 in k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14487(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14487,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14491,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li234),tmp=(C_word)a,a+=5,tmp);
-/* g21802181 */
-t3=t2;
-f_14491(t3,((C_word*)t0)[2],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14538,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1205 match-expression */
-f_6628(t2,((C_word*)t0)[3],lf[323],lf[324]);}}
-
-/* k14536 in k14485 in k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-t3=t1;
-t4=(C_word)C_i_assq(lf[321],t3);
-t5=t2;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_slot(t4,C_fix(1)));}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* g2180 in k14485 in k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14491(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14491,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(lf[322],t2);
-t4=(C_word)C_i_length(t3);
-if(C_truep((C_word)C_fixnum_lessp(t4,C_fix(32)))){
-t5=(C_word)C_i_assq(lf[321],t2);
-t6=(C_word)C_slot(t5,C_fix(1));
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14520,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t8=(C_word)C_i_cdr(t3);
-/* ##sys#append */
-t9=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
-else{
-t5=((C_word*)t0)[2];
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k14518 in g2180 in k14485 in k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14520,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[320],t2);
-/* expand.scm: 1202 simplify */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_14453(t4,((C_word*)t0)[2],t3);}
-
-/* g2172 in k14455 in simplify in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14461(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14461,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(lf[321],t2);
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,lf[320],t5);
-/* expand.scm: 1197 simplify */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_14453(t7,t1,t6);}
-
-/* walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14176(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14176,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_vectorp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14194,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14198,a[2]=t3,a[3]=t4,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1162 vector->list */
-t6=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14223,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t1,a[10]=t3,a[11]=t5,tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 1167 c */
-t7=((C_word*)t0)[2];
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[6],t4);}
-else{
-t4=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4));}}}
-
-/* k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14223,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[11]))){
-t2=(C_word)C_i_car(((C_word*)t0)[11]);
-t3=(C_word)C_eqp(((C_word*)t0)[10],C_fix(0));
-if(C_truep(t3)){
-t4=((C_word*)t0)[9];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-else{
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14249,a[2]=t5,a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-t7=(C_word)C_fixnum_difference(((C_word*)t0)[10],C_fix(1));
-/* expand.scm: 1173 walk */
-t8=((C_word*)((C_word*)t0)[6])[1];
-f_14166(t8,t6,t2,t7);}}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[9];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2));}}
-else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[5],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 1175 c */
-t3=((C_word*)t0)[2];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}}
-
-/* k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14270,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[10]))){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14295,a[2]=((C_word*)t0)[7],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=(C_word)C_i_car(((C_word*)t0)[10]);
-t6=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-/* expand.scm: 1178 walk */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_14166(t7,t4,t5,t6);}
-else{
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[8],((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14318,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1180 walk */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_14166(t4,t3,((C_word*)t0)[10],((C_word*)t0)[6]);}}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
-t2=(C_word)C_i_car(((C_word*)t0)[4]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14425,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[6],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 1184 c */
-t5=((C_word*)t0)[2];
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,((C_word*)t0)[3]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14439,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1194 walk */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_14166(t3,t2,((C_word*)t0)[4],((C_word*)t0)[6]);}}}
-
-/* k14437 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14447,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1194 walk */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_14166(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14445 in k14437 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14447,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[215],t3));}
-
-/* k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14425,2,t0,t1);}
-t2=(C_truep(t1)?(C_word)C_i_pairp(((C_word*)t0)[9]):C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=(C_word)C_i_car(((C_word*)t0)[9]);
-t4=(C_word)C_eqp(((C_word*)t0)[8],C_fix(0));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14360,a[2]=((C_word*)t0)[7],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1188 walk */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_14166(t6,t5,((C_word*)t0)[5],((C_word*)t0)[8]);}
-else{
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14395,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-t8=(C_word)C_fixnum_difference(((C_word*)t0)[8],C_fix(1));
-/* expand.scm: 1190 walk */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_14166(t9,t7,t3,t8);}}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14414,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1192 walk */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_14166(t4,t3,((C_word*)t0)[2],((C_word*)t0)[8]);}}
-
-/* k14412 in k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14414,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14422,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1192 walk */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_14166(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14420 in k14412 in k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14422,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[215],t3));}
-
-/* k14393 in k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14395,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=(C_word)C_a_i_cons(&a,2,lf[320],t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14379,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1191 walk */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_14166(t6,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14377 in k14393 in k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14379,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[215],t3));}
-
-/* k14358 in k14423 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14360,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[52],t3));}
-
-/* k14316 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14318(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14318,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,lf[215],((C_word*)t0)[2],t1));}
-
-/* k14293 in k14268 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14295(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14295,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[320],t3));}
-
-/* k14247 in k14221 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14249(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14249,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,lf[320],((C_word*)t0)[2],t1));}
-
-/* k14196 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1162 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14166(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k14192 in walk1 in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14194(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14194,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[211],t2));}
-
-/* walk in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_14166(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14166,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14174,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1159 walk1 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_14176(t5,t4,t2,t3);}
-
-/* k14172 in walk in k14162 in k14159 in k14156 in k14153 in a14150 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1159 simplify */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_14453(t2,((C_word*)t0)[2],t1);}
-
-/* k14147 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1150 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[319],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8948,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8951,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14116,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14118,a[2]=((C_word)li230),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1214 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a14117 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14118(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14118,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14122,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1216 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[316],t2,lf[318]);}
-
-/* k14120 in a14117 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14122,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[3]);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
-t5=(C_word)C_a_i_cons(&a,2,lf[111],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,lf[317],t6));}
-
-/* k14114 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1211 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[316],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8951,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8954,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13797,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13799,a[2]=((C_word)li229),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1222 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13799(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13799,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13806,a[2]=t3,a[3]=t1,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1225 r */
-t7=t3;
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[231]);}
-
-/* k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13806,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1226 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[315]);}
-
-/* k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13809,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13812,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1227 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[235]);}
-
-/* k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13812(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13812,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13815,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1228 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[239]);}
-
-/* k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13815,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13817,a[2]=((C_word*)t0)[7],a[3]=((C_word)li225),tmp=(C_word)a,a+=4,tmp));
-t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13827,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t3,a[6]=t5,a[7]=t1,a[8]=((C_word)li226),tmp=(C_word)a,a+=9,tmp));
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13981,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t9,a[7]=((C_word*)t0)[7],a[8]=((C_word)li228),tmp=(C_word)a,a+=9,tmp));
-t11=((C_word*)t9)[1];
-f_13981(t11,((C_word*)t0)[2],((C_word*)t0)[7]);}
-
-/* expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13981(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13981,NULL,3,t0,t1,t2);}
-t3=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13995,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13997,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li227),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_13997(t12,t8,((C_word*)t0)[7]);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t4))){
-t6=(C_word)C_i_car(t4);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14068,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1265 c */
-t8=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t6,((C_word*)t0)[3]);}
-else{
-/* expand.scm: 1263 err */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_13817(t6,t1,t4);}}
-else{
-/* expand.scm: 1258 err */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_13817(t4,t1,t2);}}}
-
-/* k14066 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14068(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14068,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t3=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[314]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14084,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_SCHEME_END_OF_LIST);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14090,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1270 test */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13827(t3,t2,((C_word*)t0)[2]);}}
-
-/* k14088 in k14066 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14090,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14097,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-else{
-/* expand.scm: 1271 expand */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13981(t2,((C_word*)t0)[5],((C_word*)t0)[2]);}}
-
-/* k14095 in k14088 in k14066 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14097,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* k14082 in k14066 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_14084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14084,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* loop2262 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13997(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_13997,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop22622275 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop22622275 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13993 in expand in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(5,0,((C_word*)t0)[2],*((C_word*)lf[18]+1),lf[313],t1);}
-
-/* test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13827(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13827,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13841,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1234 ##sys#strip-syntax */
-t4=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13862,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t1,a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 1239 c */
-t6=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[7],t3);}
-else{
-/* expand.scm: 1235 err */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_13817(t3,t1,t2);}}}
-
-/* k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13862(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13862,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_eqp(((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
-if(C_truep(t2)){
-t3=((C_word*)t0)[10];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[11]))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13880,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-t4=(C_word)C_i_car(((C_word*)t0)[11]);
-/* expand.scm: 1242 test */
-t5=((C_word*)((C_word*)t0)[8])[1];
-f_13827(t5,t3,t4);}
-else{
-/* expand.scm: 1244 err */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_13817(t3,((C_word*)t0)[10],((C_word*)t0)[6]);}}}
-else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13908,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 1245 c */
-t3=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[5],((C_word*)t0)[2]);}}
-
-/* k13906 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13908,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_eqp(((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
-if(C_truep(t2)){
-t3=((C_word*)t0)[9];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[10]))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13923,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-t4=(C_word)C_i_car(((C_word*)t0)[10]);
-/* expand.scm: 1248 test */
-t5=((C_word*)((C_word*)t0)[7])[1];
-f_13827(t5,t3,t4);}
-else{
-/* expand.scm: 1250 err */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_13817(t3,((C_word*)t0)[9],((C_word*)t0)[5]);}}}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13958,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1251 c */
-t3=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k13956 in k13906 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13958,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13965,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
-/* expand.scm: 1251 test */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_13827(t4,t2,t3);}
-else{
-/* expand.scm: 1252 err */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_13817(t2,((C_word*)t0)[5],((C_word*)t0)[4]);}}
-
-/* k13963 in k13956 in k13906 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_not(t1));}
-
-/* k13921 in k13906 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13923,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13937,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}}
-
-/* k13935 in k13921 in k13906 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13937,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* expand.scm: 1249 test */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13827(t3,((C_word*)t0)[2],t2);}
-
-/* k13878 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13880(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13880,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13891,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k13889 in k13878 in k13860 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13891(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13891,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* expand.scm: 1243 test */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13827(t3,((C_word*)t0)[2],t2);}
-
-/* k13839 in test in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13841(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1234 ##sys#feature? */
-t2=*((C_word*)lf[312]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* err in k13813 in k13810 in k13807 in k13804 in a13798 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13817(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13817,NULL,3,t0,t1,t2);}
-t3=(C_word)C_a_i_cons(&a,2,lf[310],((C_word*)t0)[2]);
-/* expand.scm: 1230 ##sys#error */
-t4=*((C_word*)lf[18]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,lf[311],t2,t3);}
-
-/* k13795 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1219 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[310],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8954,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8957,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13776,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13778,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1276 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13777 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13778(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13778,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,t5,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,lf[308],t7));}
-
-/* k13774 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13776(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1273 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[309],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8960,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13755,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13757,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1284 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13756 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13757,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=(C_word)C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,t5,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,lf[308],t7));}
-
-/* k13753 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1281 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[307],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8963,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13704,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13706,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1292 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13705 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13706(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13706,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13710,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1294 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[68],t2,lf[306]);}
-
-/* k13708 in a13705 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13710,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13747,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_caddr(((C_word*)t0)[3]);
-/* expand.scm: 1297 ##sys#strip-syntax */
-t5=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* k13745 in k13708 in a13705 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13747,2,t0,t1);}
-t2=(C_word)C_eqp(lf[304],t1);
-t3=(C_truep(t2)?C_SCHEME_TRUE:(C_word)C_i_caddr(((C_word*)t0)[4]));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13733,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_i_cdddr(((C_word*)t0)[4]);
-/* ##sys#append */
-t6=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t5,C_SCHEME_END_OF_LIST);}
-
-/* k13731 in k13745 in k13708 in a13705 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13733(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13733,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[305],t3));}
-
-/* k13702 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13704(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1289 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[68],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8963,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8966,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13660,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13662,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1305 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13661 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13662(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13662,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13666,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1307 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[301],t2,lf[303]);}
-
-/* k13664 in a13661 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13666,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13669,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13696,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k13694 in k13664 in a13661 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13696,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[103],t1);
-/* expand.scm: 1308 ##sys#register-meta-expression */
-t3=*((C_word*)lf[253]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* k13667 in k13664 in a13661 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13669(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13669,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13684,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k13682 in k13667 in k13664 in a13661 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13684(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13684,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[103],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[302],t3));}
-
-/* k13658 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1302 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[301],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8966,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8969,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13500,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13502,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1314 ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13502,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13509,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1317 ##sys#current-module */
-t7=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-
-/* k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13509,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13512,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_13512(2,t3,C_SCHEME_UNDEFINED);}
-else{
-/* expand.scm: 1319 syntax-error */
-t3=*((C_word*)lf[129]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[297],lf[300]);}}
-
-/* k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13512,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13515,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13567,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li219),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_13567(t6,t2,((C_word*)t0)[2]);}
-
-/* loop2351 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13567(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13567,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13575,a[2]=((C_word*)t0)[3],a[3]=((C_word)li218),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13642,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g23582359 */
-t6=t3;
-f_13575(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13640 in loop2351 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13567(t3,((C_word*)t0)[2],t2);}
-
-/* g2358 in loop2351 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13575(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13575,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13582,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_symbolp(t2))){
-t4=t3;
-f_13582(t4,C_SCHEME_FALSE);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13597,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp);
-t5=t3;
-f_13582(t5,f_13597(t2));}}
-
-/* loop in g2358 in loop2351 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_13597(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_i_nullp(t1))){
-return(C_SCHEME_FALSE);}
-else{
-if(C_truep((C_word)C_i_pairp(t1))){
-t2=(C_word)C_i_car(t1);
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(C_word)C_i_cdr(t1);
-t5=t3;
-t1=t5;
-goto loop;}
-else{
-return(C_SCHEME_TRUE);}}
-else{
-return(C_SCHEME_TRUE);}}}
-
-/* k13580 in g2358 in loop2351 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13582(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(1));
-/* expand.scm: 1328 syntax-error */
-t5=*((C_word*)lf[129]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,((C_word*)t0)[3],lf[297],lf[299],((C_word*)t0)[2],t4);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13515(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13515,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13518,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13522,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[3];
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(2));
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13530,a[2]=t6,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13532,a[2]=t8,a[3]=t13,a[4]=t10,a[5]=((C_word)li216),tmp=(C_word)a,a+=6,tmp));
-t15=((C_word*)t13)[1];
-f_13532(t15,t11,((C_word*)t0)[2]);}
-
-/* loop2378 in k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13532(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13532,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[14]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13561,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g23942395 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13559 in loop2378 in k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13561(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13561,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop23782391 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_13532(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop23782391 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_13532(t6,((C_word*)t0)[3],t5);}}
-
-/* k13528 in k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1332 append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k13520 in k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t4=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(2),t1);}
-
-/* k13516 in k13513 in k13510 in k13507 in a13501 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13518(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[298]);}
-
-/* k13498 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13500(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1311 ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[297],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8969,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8972,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13463,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13465,a[2]=((C_word)li215),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#er-transformer */
-t5=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a13464 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13465,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13469,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[293],t2,lf[296]);}
-
-/* k13467 in a13464 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13469(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13469,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
-t3=t2;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(C_word)C_i_cddr(((C_word*)t0)[5]);
-t6=t5;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=lf[294];
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-if(C_truep((C_word)C_i_symbolp(((C_word*)t4)[1]))){
-t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13487,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t7,a[6]=t4,a[7]=t9,tmp=(C_word)a,a+=8,tmp);
-/* ##sys#check-syntax */
-t11=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t10,lf[293],((C_word*)t0)[5],lf[295]);}
-else{
-/* ##sys#process-syntax-rules */
-t10=*((C_word*)lf[204]+1);
-((C_proc7)(void*)(*((C_word*)t10+1)))(7,t10,((C_word*)t0)[4],((C_word*)t9)[1],((C_word*)t7)[1],((C_word*)t4)[1],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k13485 in k13467 in a13464 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13487(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)((C_word*)t0)[6])[1]);
-t3=(C_word)C_i_car(((C_word*)((C_word*)t0)[5])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t5=(C_word)C_i_cdr(((C_word*)((C_word*)t0)[5])[1]);
-t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,t5);
-/* ##sys#process-syntax-rules */
-t7=*((C_word*)lf[204]+1);
-((C_proc7)(void*)(*((C_word*)t7+1)))(7,t7,((C_word*)t0)[4],((C_word*)((C_word*)t0)[7])[1],((C_word*)((C_word*)t0)[5])[1],((C_word*)((C_word*)t0)[6])[1],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13461 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13463(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#extend-macro-environment */
-t2=*((C_word*)lf[23]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[293],C_SCHEME_END_OF_LIST,t1);}
-
-/* k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8972,2,t0,t1);}
-t2=C_mutate((C_word*)lf[204]+1 /* (set! process-syntax-rules ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8974,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate((C_word*)lf[240]+1 /* (set! macro-subset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10650,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[241]+1 /* (set! fixup-macro-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10715,a[2]=((C_word)li157),tmp=(C_word)a,a+=3,tmp));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10811,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13459,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1365 ##sys#macro-environment */
-t7=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-
-/* k13457 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13459(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1365 ##sys#fixup-macro-environment */
-t2=*((C_word*)lf[241]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10811,2,t0,t1);}
-t2=C_mutate((C_word*)lf[242]+1 /* (set! default-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10815,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13455,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1370 ##sys#macro-environment */
-t5=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k13453 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1370 make-parameter */
-t2=*((C_word*)lf[292]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10815,2,t0,t1);}
-t2=C_mutate((C_word*)lf[176]+1 /* (set! meta-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10819,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1371 make-parameter */
-t4=*((C_word*)lf[292]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
-
-/* k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word ab[63],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10819,2,t0,t1);}
-t2=C_mutate((C_word*)lf[70]+1 /* (set! current-module ...) */,t1);
-t3=C_mutate(&lf[243] /* (set! module-name ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10833,a[2]=((C_word)li158),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[244]+1 /* (set! set-module-undefined-list! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10914,a[2]=((C_word)li159),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[245]+1 /* (set! module-undefined-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10923,a[2]=((C_word)li160),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[246]+1 /* (set! module-name ...) */,lf[243]);
-t7=C_mutate((C_word*)lf[247]+1 /* (set! module-exports ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11023,a[2]=((C_word)li161),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[174]+1 /* (set! find-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11047,a[2]=((C_word)li162),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[252]+1 /* (set! toplevel-definition-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11087,a[2]=((C_word)li163),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[253]+1 /* (set! register-meta-expression ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11090,a[2]=((C_word)li164),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate(&lf[254] /* (set! check-for-redef ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11110,a[2]=((C_word)li165),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[257]+1 /* (set! register-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11131,a[2]=((C_word)li166),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[259]+1 /* (set! register-syntax-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11220,a[2]=((C_word)li167),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[69]+1 /* (set! register-undefined ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11301,a[2]=((C_word)li168),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[261]+1 /* (set! register-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11323,a[2]=((C_word)li171),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[197]+1 /* (set! mark-imported-symbols ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11391,a[2]=((C_word)li173),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate(&lf[262] /* (set! module-indirect-exports ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11460,a[2]=((C_word)li179),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate(&lf[268] /* (set! merge-se ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11746,a[2]=((C_word)li181),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate((C_word*)lf[269]+1 /* (set! compiled-module-registration ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11806,a[2]=((C_word)li187),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[270]+1 /* (set! register-compiled-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12311,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
-t21=C_mutate((C_word*)lf[274]+1 /* (set! primitive-alias ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12690,a[2]=((C_word)li198),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[276]+1 /* (set! register-primitive-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12707,a[2]=((C_word)li202),tmp=(C_word)a,a+=3,tmp));
-t23=C_mutate((C_word*)lf[258]+1 /* (set! find-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12856,a[2]=((C_word)li204),tmp=(C_word)a,a+=3,tmp));
-t24=C_mutate((C_word*)lf[279]+1 /* (set! finalize-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12941,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
-t25=C_set_block_item(lf[248] /* module-table */,0,C_SCHEME_END_OF_LIST);
-t26=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t26+1)))(2,t26,C_SCHEME_UNDEFINED);}
-
-/* ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12941(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word ab[23],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12941,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(2));
-t6=t2;
-t7=(C_word)C_i_check_structure(t6,lf[68]);
-t8=(C_word)C_i_block_ref(t6,C_fix(1));
-t9=t2;
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-t11=(C_word)C_i_block_ref(t9,C_fix(3));
-t12=t2;
-t13=(C_word)C_i_check_structure(t12,lf[68]);
-t14=(C_word)C_i_block_ref(t12,C_fix(4));
-t15=C_SCHEME_FALSE;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_SCHEME_END_OF_LIST;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_FALSE;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12957,a[2]=t11,a[3]=t5,a[4]=t14,a[5]=t8,a[6]=t16,a[7]=t2,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t22=t2;
-t23=(C_word)C_i_check_structure(t22,lf[68]);
-t24=(C_word)C_i_block_ref(t22,C_fix(5));
-t25=C_SCHEME_UNDEFINED;
-t26=(*a=C_VECTOR_TYPE|1,a[1]=t25,tmp=(C_word)a,a+=2,tmp);
-t27=C_set_block_item(t26,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13404,a[2]=t18,a[3]=t26,a[4]=t20,a[5]=((C_word)li213),tmp=(C_word)a,a+=6,tmp));
-t28=((C_word*)t26)[1];
-f_13404(t28,t21,t24);}
-
-/* loop3624 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13404(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13404,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13443,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1669 ##sys#macro-environment */
-t6=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13441 in loop3624 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13443,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[7],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t4=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop36243637 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_13404(t7,((C_word*)t0)[3],t6);}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop36243637 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_13404(t7,((C_word*)t0)[3],t6);}}
-
-/* k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12960,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=(C_word)C_eqp(C_SCHEME_TRUE,((C_word*)t0)[3]);
-if(C_truep(t3)){
-t4=t2;
-f_12960(2,t4,t1);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13357,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1674 ##sys#macro-environment */
-t5=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k13355 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13357,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13359,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li212),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_13359(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k13355 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13359(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13359,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13372,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13398,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1676 caar */
-t5=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k13396 in loop in k13355 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1676 ##sys#find-export */
-t2=*((C_word*)lf[258]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k13370 in loop in k13355 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13372(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13372,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13383,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1677 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_13359(t5,t3,t4);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1678 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_13359(t3,((C_word*)t0)[3],t2);}}
-
-/* k13381 in k13370 in loop in k13355 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13383,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12963,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t3=(C_word)C_eqp(C_SCHEME_TRUE,((C_word*)t0)[3]);
-t4=(C_truep(t3)?((C_word*)t0)[4]:((C_word*)t0)[3]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13230,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=t6,a[6]=t1,a[7]=((C_word)li211),tmp=(C_word)a,a+=8,tmp));
-t8=((C_word*)t6)[1];
-f_13230(t8,t2,t4);}
-
-/* loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13230(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-loop:
-a=C_alloc(17);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_13230,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_symbolp(t3);
-t5=(C_truep(t4)?t3:(C_word)C_i_car(t3));
-if(C_truep((C_word)C_i_assq(t5,((C_word*)t0)[6]))){
-t6=(C_word)C_i_cdr(t2);
-/* expand.scm: 1686 loop */
-t13=t1;
-t14=t6;
-t1=t13;
-t2=t14;
-goto loop;}
-else{
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13263,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t7=(C_word)C_i_assq(t5,((C_word*)t0)[4]);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13278,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13281,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t8,a[5]=t5,a[6]=t6,a[7]=t7,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(t7)){
-t10=(C_word)C_i_cdr(t7);
-t11=t9;
-f_13281(t11,(C_word)C_i_symbolp(t10));}
-else{
-t10=t9;
-f_13281(t10,C_SCHEME_FALSE);}}}}
-
-/* k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13281(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13281,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t3=((C_word*)t0)[6];
-f_13263(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2));}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13331,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1693 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k13329 in k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13331,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[7],t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13293,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t2)){
-t4=(C_word)C_i_cdr(t2);
-t5=t3;
-f_13293(t5,(C_word)C_i_symbolp(t4));}
-else{
-t4=t3;
-f_13293(t4,C_SCHEME_FALSE);}}
-
-/* k13291 in k13329 in k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13293(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13293,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
-t4=((C_word*)t0)[7];
-f_13263(t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3));}
-else{
-if(C_truep(((C_word*)t0)[5])){
-/* expand.scm: 1706 ##sys#module-rename */
-t2=*((C_word*)lf[65]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[6],((C_word*)t0)[3]);}
-else{
-t2=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13309,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13313,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13317,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1702 symbol->string */
-t6=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[3]);}}}
-
-/* k13315 in k13291 in k13329 in k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1700 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[290],t1,lf[291]);}
-
-/* k13311 in k13291 in k13329 in k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1699 ##sys#warn */
-t2=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k13307 in k13291 in k13329 in k13279 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13309(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13309,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_13263(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_FALSE));}
-
-/* k13276 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13278,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_13263(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k13261 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13263(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13263,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13267,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 1707 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_13230(t4,t2,t3);}
-
-/* k13265 in k13261 in loop in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13267,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12963,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12966,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13119,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1728 module-undefined-list */
-t4=*((C_word*)lf[245]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[7]);}
-
-/* k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13119(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13119,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13121,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li210),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_13121(t5,((C_word*)t0)[2],t1);}
-
-/* loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13121(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13121,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13129,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li209),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13213,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g36883689 */
-t6=t3;
-f_13129(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13211 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13213(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13121(t3,((C_word*)t0)[2],t2);}
-
-/* g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13129(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13129,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_memq(t2,((C_word*)t0)[3]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13140,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1712 ##sys#warn */
-t5=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,lf[289],t2);}}
-
-/* k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13140,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13143,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1713 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[288]);}
-
-/* k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13143,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_length(t1);
-t3=(C_word)C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13159,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13163,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13167,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1717 cadar */
-t7=*((C_word*)lf[81]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t1);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13174,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13178,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13180,a[2]=t7,a[3]=((C_word)li208),tmp=(C_word)a,a+=4,tmp));
-t9=((C_word*)t7)[1];
-f_13180(t9,t5,t1);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* loop in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13180(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13180,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[285]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13194,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13206,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1726 cadar */
-t5=*((C_word*)lf[81]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k13204 in loop in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13206(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1726 symbol->string */
-t2=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13192 in loop in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13194(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13194,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13198,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 1727 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_13180(t4,t2,t3);}
-
-/* k13196 in k13192 in loop in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1725 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[286],((C_word*)t0)[2],lf[287],t1);}
-
-/* k13176 in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1720 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[284],t1);}
-
-/* k13172 in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1719 ##sys#warn */
-t2=*((C_word*)lf[183]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13165 in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1717 symbol->string */
-t2=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13161 in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13163(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1716 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[282],t1,lf[283]);}
-
-/* k13157 in k13141 in k13138 in g3688 in loop3681 in k13117 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1715 ##sys#warn */
-t2=*((C_word*)lf[183]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12966,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12969,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-/* expand.scm: 1730 ##sys#error */
-t3=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[281],((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_12969(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12969,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12972,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13044,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1736 module-indirect-exports */
-f_11460(t7,((C_word*)t0)[5]);}
-
-/* k13042 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13044(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13044,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13046,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li207),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_13046(t5,((C_word*)t0)[2],t1);}
-
-/* loop3710 in k13042 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13046(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13046,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13056,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13108,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-t6=(C_word)C_i_cdr(t5);
-if(C_truep((C_word)C_i_symbolp(t6))){
-t7=t3;
-f_13056(t7,(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST));}
-else{
-t7=(C_word)C_i_car(t5);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13101,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1734 ##sys#macro-environment */
-t9=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13099 in loop3710 in k13042 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13101,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[5],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-f_13056(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
-else{
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-/* expand.scm: 1735 ##sys#error */
-t4=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],lf[280],t3);}}
-
-/* k13106 in loop3710 in k13042 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13108(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13108,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_13056(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
-
-/* k13054 in loop3710 in k13042 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13056(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop37103723 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_13046(t5,((C_word*)t0)[3],t4);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop37103723 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_13046(t5,((C_word*)t0)[3],t4);}}
-
-/* k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12972,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12975,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13036,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1738 ##sys#macro-environment */
-t4=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k13034 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13036(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13036,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13040,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1739 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k13038 in k13034 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13040,2,t0,t1);}
-/* expand.scm: 1737 merge-se */
-f_11746(((C_word*)t0)[4],(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],t1,((C_word*)t0)[2]));}
-
-/* k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12975,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12978,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1741 ##sys#mark-imported-symbols */
-t3=*((C_word*)lf[197]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12978(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12978,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12981,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12992,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li206),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_12992(t6,t2,((C_word*)t0)[2]);}
-
-/* loop3746 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12992(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12992,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13000,a[2]=((C_word*)t0)[3],a[3]=((C_word)li205),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13021,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g37533754 */
-t6=t3;
-f_13000(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13019 in loop3746 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12992(t3,((C_word*)t0)[2],t2);}
-
-/* g3753 in loop3746 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_13000(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13000,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13004,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cadr(t2);
-/* expand.scm: 1744 merge-se */
-f_11746(t3,(C_word)C_a_i_list(&a,2,t4,((C_word*)t0)[2]));}
-
-/* k13002 in g3753 in loop3746 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_13004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_car(t3,t1));}
-
-/* k12979 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12981(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12981,2,t0,t1);}
-t2=*((C_word*)lf[9]+1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12987,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[2];
-t6=(C_word)C_i_check_structure(t4,lf[68]);
-/* ##sys#block-set! */
-t7=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t3,t4,C_fix(10),t5);}
-
-/* k12985 in k12979 in k12976 in k12973 in k12970 in k12967 in k12964 in k12961 in k12958 in k12955 in ##sys#finalize-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[2];
-t5=(C_word)C_i_check_structure(t3,lf[68]);
-/* ##sys#block-set! */
-t6=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t2,t3,C_fix(11),t4);}
-
-/* ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12856(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_12856,5,t0,t1,t2,t3,t4);}
-t5=t3;
-t6=(C_word)C_i_check_structure(t5,lf[68]);
-t7=(C_word)C_i_block_ref(t5,C_fix(2));
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12867,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t9=(C_word)C_eqp(C_SCHEME_TRUE,t7);
-if(C_truep(t9)){
-/* expand.scm: 1654 module-exists-list */
-t10=*((C_word*)lf[278]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t8,t3);}
-else{
-t10=t8;
-f_12867(2,t10,t7);}}
-
-/* k12865 in ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12867,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12869,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li203),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_12869(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k12865 in ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12869(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(7);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12869,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_eqp(((C_word*)t0)[4],t3);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t5=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12918,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1658 caar */
-t7=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}
-else{
-t6=(C_word)C_i_cdr(t2);
-/* expand.scm: 1661 loop */
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}}}}
-
-/* k12916 in loop in k12865 in ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12918,2,t0,t1);}
-t2=(C_word)C_eqp(((C_word*)t0)[6],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12897,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12914,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1659 cdar */
-t5=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[4]);}
-else{
-t4=t3;
-f_12897(t4,C_SCHEME_FALSE);}}}
-
-/* k12912 in k12916 in loop in k12865 in ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-f_12897(t2,(C_word)C_i_memq(((C_word*)t0)[2],t1));}
-
-/* k12895 in k12916 in loop in k12865 in ##sys#find-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12897(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 1660 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12869(t3,((C_word*)t0)[4],t2);}}
-
-/* ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12707(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_12707r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_12707r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_12707r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12711,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-t6=t5;
-f_12711(2,t6,C_SCHEME_END_OF_LIST);}
-else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=t5;
-f_12711(2,t7,(C_word)C_i_car(t4));}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12711,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12714,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1635 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12714,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12729,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12787,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li201),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_12787(t10,t6,((C_word*)t0)[2]);}
-
-/* loop3530 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12787(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12787,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12797,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-if(C_truep((C_word)C_i_symbolp(t4))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12828,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1640 ##sys#primitive-alias */
-t6=*((C_word*)lf[274]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-else{
-t5=t3;
-f_12797(t5,(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST));}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12826 in loop3530 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12828,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_12797(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
-
-/* k12795 in loop3530 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12797(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35303543 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12787(t5,((C_word*)t0)[3],t4);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35303543 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12787(t5,((C_word*)t0)[3],t4);}}
-
-/* k12727 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12729(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12729,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12733,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12735,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[3],a[7]=((C_word)li200),tmp=(C_word)a,a+=8,tmp));
-t10=((C_word*)t8)[1];
-f_12735(t10,t6,((C_word*)t0)[2]);}
-
-/* loop3554 in k12727 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12735(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12735,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12762,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li199),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12781,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g35703571 */
-t6=t3;
-f_12762(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12779 in loop3554 in k12727 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12781,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35543567 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12735(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35543567 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12735(t6,((C_word*)t0)[3],t5);}}
-
-/* g3570 in loop3554 in k12727 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12762(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12762,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(C_word)C_i_assq(t2,((C_word*)t0)[3]);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-/* expand.scm: 1646 ##sys#error */
-t4=*((C_word*)lf[18]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,lf[277],t2,((C_word*)t0)[2]);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12731 in k12727 in k12712 in k12709 in ##sys#register-primitive-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12733(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12733,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-t4=(C_word)C_a_i_record(&a,12,lf[68],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t3,t1);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,*((C_word*)lf[248]+1));
-t7=C_mutate((C_word*)lf[248]+1 /* (set! module-table ...) */,t6);
-t8=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t4);}
-
-/* ##sys#primitive-alias in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12690(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12690,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12694,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12701,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(C_word)C_slot(t2,C_fix(1));
-/* expand.scm: 1630 ##sys#string-append */
-t6=*((C_word*)lf[170]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[275],t5);}
-
-/* k12699 in ##sys#primitive-alias in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1629 ##sys#string->symbol */
-t2=*((C_word*)lf[66]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k12692 in ##sys#primitive-alias in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12694(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12694,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12697,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1631 ##sys#put! */
-t3=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,t1,lf[71],((C_word*)t0)[2]);}
-
-/* k12695 in k12692 in ##sys#primitive-alias in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12311(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,...){
-C_word tmp;
-C_word t6;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t5,c2,6);
-if(c<6) C_bad_min_argc_2(c,6,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr6r,(void*)f_12311r,6,t0,t1,t2,t3,t4,t5);}
-else{
-a=C_alloc((c-6)*3);
-t6=C_restore_rest(a,C_rest_count(0));
-f_12311r(t0,t1,t2,t3,t4,t5,t6);}}
-
-static void C_ccall f_12311r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(7);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12315,a[2]=t5,a[3]=t3,a[4]=t1,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_i_nullp(t6))){
-t8=t7;
-f_12315(2,t8,C_SCHEME_END_OF_LIST);}
-else{
-t8=(C_word)C_i_cdr(t6);
-if(C_truep((C_word)C_i_nullp(t8))){
-t9=t7;
-f_12315(2,t9,(C_word)C_i_car(t6));}
-else{
-/* ##sys#error */
-t9=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,lf[0],t6);}}}
-
-/* k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12315(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12315,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12344,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12610,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li196),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_12610(t10,t6,((C_word*)t0)[2]);}
-
-/* loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12610(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12610,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12620,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12665,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-if(C_truep((C_word)C_i_symbolp(t5))){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12341,a[2]=t4,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1583 ##sys#macro-environment */
-t7=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t6=(C_word)C_i_car(t5);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12658,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-t8=(C_word)C_i_cdr(t5);
-/* expand.scm: 1593 ##sys#er-transformer */
-t9=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12656 in loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12658,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],C_SCHEME_FALSE,t1);
-t3=((C_word*)t0)[2];
-f_12620(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
-
-/* k12339 in loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12341,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12327,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t2)){
-t4=(C_word)C_i_cdr(t2);
-t5=t3;
-f_12327(t5,(C_word)C_i_pairp(t4));}
-else{
-t4=t3;
-f_12327(t4,C_SCHEME_FALSE);}}
-
-/* k12325 in k12339 in loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12327(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12327,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-f_12620(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST));}
-else{
-/* expand.scm: 1586 ##sys#error */
-t2=*((C_word*)lf[18]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[250],lf[273],((C_word*)t0)[2]);}}
-
-/* k12663 in loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12665(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12665,2,t0,t1);}
-t2=((C_word*)t0)[2];
-f_12620(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
-
-/* k12618 in loop3382 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12620(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33823395 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12610(t5,((C_word*)t0)[3],t4);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33823395 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12610(t5,((C_word*)t0)[3],t4);}}
-
-/* k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12344,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12347,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12544,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li195),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_12544(t10,t6,((C_word*)t0)[2]);}
-
-/* loop3407 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12544(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12544,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12554,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_pairp(t5))){
-t6=(C_word)C_i_car(t4);
-t7=(C_word)C_i_cadr(t4);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12593,a[2]=t3,a[3]=t7,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-t9=(C_word)C_i_caddr(t4);
-/* expand.scm: 1598 ##sys#er-transformer */
-t10=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t8,t9);}
-else{
-t6=t3;
-f_12554(t6,(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST));}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12591 in loop3407 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12593,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-f_12554(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
-
-/* k12552 in loop3407 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12554(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop34073420 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12544(t5,((C_word*)t0)[3],t4);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop34073420 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12544(t5,((C_word*)t0)[3],t4);}}
-
-/* k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12347,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12350,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12492,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li194),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_12492(t10,t6,((C_word*)t0)[2]);}
-
-/* loop3432 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12492(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12492,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12531,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-t6=(C_word)C_i_cdr(t3);
-/* expand.scm: 1603 ##sys#er-transformer */
-t7=*((C_word*)lf[166]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12529 in loop3432 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12531,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[7],C_SCHEME_FALSE,t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t4=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop34323445 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_12492(t7,((C_word*)t0)[3],t6);}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop34323445 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_12492(t7,((C_word*)t0)[3],t6);}}
-
-/* k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12350,2,t0,t1);}
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-t5=(C_word)C_a_i_record(&a,12,lf[68],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t3,t4);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12356,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t5,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12486,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1607 ##sys#macro-environment */
-t8=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-
-/* k12484 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1608 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k12488 in k12484 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12490,2,t0,t1);}
-/* expand.scm: 1606 merge-se */
-f_11746(((C_word*)t0)[7],(C_word)C_a_i_list(&a,6,((C_word*)t0)[6],t1,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12356,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 1610 ##sys#mark-imported-symbols */
-t3=*((C_word*)lf[197]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12362,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12452,a[2]=t4,a[3]=((C_word*)t0)[5],a[4]=((C_word)li193),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_12452(t6,t2,((C_word*)t0)[2]);}
-
-/* loop3458 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12452(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12452,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12460,a[2]=((C_word*)t0)[3],a[3]=((C_word)li192),tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_12460(t3,t4);
-t6=(C_word)C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g3465 in loop3458 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_12460(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_i_set_car(t2,((C_word*)t0)[2]));}
-
-/* k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12362,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12365,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12410,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word)li191),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_12410(t6,t2,((C_word*)t0)[2]);}
-
-/* loop3472 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12410(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12410,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12418,a[2]=((C_word*)t0)[3],a[3]=((C_word)li190),tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_12418(t3,t4);
-t6=(C_word)C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g3479 in loop3472 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_12418(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_cdr(t1);
-return((C_word)C_i_set_car(t3,((C_word*)t0)[2]));}
-else{
-t3=C_SCHEME_UNDEFINED;
-return(t3);}}
-
-/* k12363 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12365,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12368,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12378,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li189),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_12378(t6,t2,((C_word*)t0)[2]);}
-
-/* loop3488 in k12363 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12378(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12378,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12386,a[2]=((C_word*)t0)[3],a[3]=((C_word)li188),tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_12386(t3,t4);
-t6=(C_word)C_slot(t2,C_fix(1));
-t9=t1;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g3495 in loop3488 in k12363 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_12386(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_i_set_car(t2,((C_word*)t0)[2]));}
-
-/* k12366 in k12363 in k12360 in k12357 in k12354 in k12348 in k12345 in k12342 in k12313 in ##sys#register-compiled-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12368,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[248]+1));
-t4=C_mutate((C_word*)lf[248]+1 /* (set! module-table ...) */,t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,((C_word*)t0)[3]);}
-
-/* ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11806(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[13],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11806,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(3));
-t6=t2;
-t7=(C_word)C_i_check_structure(t6,lf[68]);
-t8=(C_word)C_i_block_ref(t6,C_fix(1));
-t9=t2;
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-t11=(C_word)C_i_block_ref(t9,C_fix(7));
-t12=t2;
-t13=(C_word)C_i_check_structure(t12,lf[68]);
-t14=(C_word)C_i_block_ref(t12,C_fix(11));
-t15=t2;
-t16=(C_word)C_i_check_structure(t15,lf[68]);
-t17=(C_word)C_i_block_ref(t15,C_fix(8));
-t18=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11829,a[2]=t17,a[3]=t5,a[4]=t14,a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_i_pairp(t11))){
-t19=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12305,a[2]=t18,tmp=(C_word)a,a+=3,tmp);
-t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12309,a[2]=t19,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1547 ##sys#strip-syntax */
-t21=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t21+1)))(3,t21,t20,t11);}
-else{
-t19=t18;
-f_11829(t19,C_SCHEME_END_OF_LIST);}}
-
-/* k12307 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12309(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k12303 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12305(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12305,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[250],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[82],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,lf[272],t5);
-t7=((C_word*)t0)[2];
-f_11829(t7,(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST));}
-
-/* k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11829(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11829,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11833,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11837,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12271,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12275,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1548 ##sys#strip-syntax */
-t6=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_11837(t4,C_SCHEME_END_OF_LIST);}}
-
-/* k12273 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k12269 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12271,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[250],t1);
-t3=((C_word*)t0)[2];
-f_11837(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
-
-/* k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11837(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11837,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11841,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11845,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12218,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t9=((C_word*)t0)[4];
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-t11=(C_word)C_i_block_ref(t9,C_fix(9));
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12224,a[2]=t5,a[3]=t13,a[4]=t7,a[5]=((C_word)li186),tmp=(C_word)a,a+=6,tmp));
-t15=((C_word*)t13)[1];
-f_12224(t15,t8,t11);}
-
-/* loop3246 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12224(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12224,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[14]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12253,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g32623263 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12251 in loop3246 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12253,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32463259 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12224(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32463259 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12224(t6,((C_word*)t0)[3],t5);}}
-
-/* k12216 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1549 reverse */
-t2=*((C_word*)lf[79]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11845(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11845,2,t0,t1);}
-t2=((C_word*)t0)[5];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(1));
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,lf[82],t5);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12093,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12097,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12101,a[2]=t12,a[3]=t9,a[4]=t11,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1557 module-indirect-exports */
-f_11460(t13,((C_word*)t0)[5]);}
-
-/* k12099 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12101,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12103,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li185),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_12103(t5,((C_word*)t0)[2],t1);}
-
-/* loop3269 in k12099 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12103(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[31],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12103,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12202,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_symbolp(t5))){
-t6=(C_word)C_i_car(t4);
-t7=(C_word)C_i_cdr(t4);
-t8=(C_word)C_a_i_cons(&a,2,t6,t7);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=t3;
-f_12202(t10,(C_word)C_a_i_cons(&a,2,lf[82],t9));}
-else{
-t6=(C_word)C_i_car(t4);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,lf[82],t7);
-t9=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,lf[82],t9);
-t11=(C_word)C_i_cdr(t4);
-t12=(C_word)C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=(C_word)C_a_i_cons(&a,2,t10,t12);
-t14=(C_word)C_a_i_cons(&a,2,t8,t13);
-t15=t3;
-f_12202(t15,(C_word)C_a_i_cons(&a,2,lf[152],t14));}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12200 in loop3269 in k12099 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12202(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12202,NULL,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32693282 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12103(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32693282 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12103(t6,((C_word*)t0)[3],t5);}}
-
-/* k12095 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[34],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12093,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
-t3=((C_word*)t0)[7];
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(10));
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[82],t6);
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11987,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=t7,tmp=(C_word)a,a+=9,tmp);
-t9=C_SCHEME_END_OF_LIST;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_FALSE;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11991,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11993,a[2]=t10,a[3]=t15,a[4]=t12,a[5]=((C_word*)t0)[2],a[6]=((C_word)li184),tmp=(C_word)a,a+=7,tmp));
-t17=((C_word*)t15)[1];
-f_11993(t17,t13,((C_word*)t0)[3]);}
-
-/* loop3301 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11993(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11993,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12020,a[2]=((C_word*)t0)[5],a[3]=((C_word)li183),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12077,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g33173318 */
-t6=t3;
-f_12020(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12075 in loop3301 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12077,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33013314 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11993(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33013314 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11993(t6,((C_word*)t0)[3],t5);}}
-
-/* g3317 in loop3301 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_12020(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12020,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_assq(t3,((C_word*)t0)[2]);
-if(C_truep((C_word)C_i_pairp(t4))){
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[82],t6);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12052,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-t9=(C_word)C_i_cdr(t4);
-/* expand.scm: 1564 ##sys#strip-syntax */
-t10=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t8,t9);}
-else{
-t5=*((C_word*)lf[9]+1);
-t6=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,lf[82],t6));}}
-
-/* k12050 in g3317 in loop3301 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_12052(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12052,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[271],t3));}
-
-/* k11989 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11987,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11897,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11901,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[3]))){
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
-else{
-t5=((C_word*)t0)[2];
-t6=(C_word)C_i_check_structure(t5,lf[68]);
-t7=(C_word)C_i_block_ref(t5,C_fix(5));
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11913,a[2]=t9,a[3]=((C_word*)t0)[3],a[4]=((C_word)li182),tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_11913(t11,t4,t7);}}
-
-/* loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11913(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11913,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11983,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1574 caar */
-t4=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}
-
-/* k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11983,2,t0,t1);}
-if(C_truep((C_word)C_i_assq(t1,((C_word*)t0)[5]))){
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1574 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11913(t3,((C_word*)t0)[2],t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11936,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1576 caar */
-t3=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}}
-
-/* k11934 in k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11936(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11936,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11979,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1577 caar */
-t3=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k11977 in k11934 in k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11979(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11979,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[82],t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11967,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11971,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 1577 cdar */
-t6=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[3]);}
-
-/* k11969 in k11977 in k11934 in k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1577 ##sys#strip-syntax */
-t2=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k11965 in k11977 in k11934 in k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11967,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,lf[271],t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11947,a[2]=t4,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 1578 loop */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_11913(t7,t5,t6);}
-
-/* k11945 in k11965 in k11977 in k11934 in k11981 in loop in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11947(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11947,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k11899 in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k11895 in k11985 in k12091 in k11843 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11897(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11897,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=(C_word)C_a_i_cons(&a,2,lf[270],t7);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t10=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,((C_word*)t0)[3],((C_word*)t0)[2],t9);}
-
-/* k11839 in k11835 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11841(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11831 in k11827 in ##sys#compiled-module-registration in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11746(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11746,NULL,2,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11750,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_apply(4,0,t3,*((C_word*)lf[58]+1),t2);}
-
-/* k11748 in merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11750,2,t0,t1);}
-t2=*((C_word*)lf[9]+1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11756,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11761,a[2]=t5,a[3]=((C_word)li180),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_11761(t7,t3,t1);}
-
-/* loop in k11748 in merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11761(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11761,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11800,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1536 caar */
-t4=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}
-
-/* k11798 in loop in k11748 in merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11800(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11800,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-if(C_truep((C_word)C_i_assq(t1,t2))){
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1536 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11761(t4,((C_word*)t0)[2],t3);}
-else{
-t3=(C_word)C_i_car(((C_word*)t0)[4]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11792,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1537 loop */
-t6=((C_word*)((C_word*)t0)[3])[1];
-f_11761(t6,t4,t5);}}
-
-/* k11790 in k11798 in loop in k11748 in merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11792,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k11754 in k11748 in merge-se in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11756(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11460(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11460,NULL,2,t1,t2);}
-t3=t2;
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(2));
-t6=t2;
-t7=(C_word)C_i_check_structure(t6,lf[68]);
-t8=(C_word)C_i_block_ref(t6,C_fix(1));
-t9=t2;
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-t11=(C_word)C_i_block_ref(t9,C_fix(3));
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11518,a[2]=t8,a[3]=((C_word)li174),tmp=(C_word)a,a+=4,tmp);
-t13=(C_word)C_eqp(C_SCHEME_TRUE,t5);
-if(C_truep(t13)){
-t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_SCHEME_END_OF_LIST);}
-else{
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11541,a[2]=t8,a[3]=t11,a[4]=t12,a[5]=t15,a[6]=((C_word)li178),tmp=(C_word)a,a+=7,tmp));
-t17=((C_word*)t15)[1];
-f_11541(t17,t1,t5);}}
-
-/* loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11541(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_11541,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_symbolp(t3))){
-t4=(C_word)C_i_cdr(t2);
-/* expand.scm: 1505 loop */
-t7=t1;
-t8=t4;
-t1=t7;
-t2=t8;
-goto loop;}
-else{
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11568,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 1507 cdar */
-t5=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}}
-
-/* k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11568,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11570,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li177),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_11570(t5,((C_word*)t0)[2],t1);}
-
-/* loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11570(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11570,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* expand.scm: 1508 loop */
-t4=((C_word*)((C_word*)t0)[6])[1];
-f_11541(t4,t1,t3);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11740,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 1509 ##sys#macro-environment */
-t5=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11740,2,t0,t1);}
-if(C_truep((C_word)C_i_assq(((C_word*)t0)[8],t1))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11593,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[7]);
-/* expand.scm: 1510 warn */
-t4=((C_word*)t0)[4];
-f_11518(t4,t2,lf[265],t3);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-t3=(C_word)C_i_assq(t2,((C_word*)t0)[3]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11611,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li175),tmp=(C_word)a,a+=6,tmp);
-/* g31843185 */
-t5=t4;
-f_11611(t5,((C_word*)t0)[5],t3);}
-else{
-t4=(C_word)C_i_car(((C_word*)t0)[7]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11728,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1519 ##sys#current-environment */
-t6=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}}
-
-/* k11726 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11728,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[6],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11655,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li176),tmp=(C_word)a,a+=6,tmp);
-/* g31933194 */
-t4=t3;
-f_11655(t4,((C_word*)t0)[2],t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11709,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_car(((C_word*)t0)[5]);
-/* expand.scm: 1527 warn */
-t5=((C_word*)t0)[3];
-f_11518(t5,t3,lf[267],t4);}}
-
-/* k11707 in k11726 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11709(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1528 loop2 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11570(t3,((C_word*)t0)[2],t2);}
-
-/* g3193 in k11726 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11655(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11655,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_symbolp(t3))){
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
-t5=(C_word)C_i_cdr(t2);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11673,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t8=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1522 loop2 */
-t9=((C_word*)((C_word*)t0)[3])[1];
-f_11570(t9,t7,t8);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11688,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
-/* expand.scm: 1524 warn */
-t6=((C_word*)t0)[2];
-f_11518(t6,t4,lf[266],t5);}}
-
-/* k11686 in g3193 in k11726 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1525 loop2 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11570(t3,((C_word*)t0)[2],t2);}
-
-/* k11671 in g3193 in k11726 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11673,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* g3184 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11611(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11611,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11619,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11638,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t5)){
-t7=t3;
-f_11619(t7,(C_word)C_a_i_cons(&a,2,t4,t5));}
-else{
-t7=(C_word)C_i_car(((C_word*)t0)[4]);
-/* expand.scm: 1517 ##sys#module-rename */
-t8=*((C_word*)lf[65]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t7,((C_word*)t0)[2]);}}
-
-/* k11636 in g3184 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11638,2,t0,t1);}
-t2=((C_word*)t0)[3];
-f_11619(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k11617 in g3184 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11619(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11619,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11623,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 1518 loop2 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_11570(t4,t2,t3);}
-
-/* k11621 in k11617 in g3184 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11623,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k11591 in k11738 in loop2 in k11566 in loop in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11593(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 1511 loop2 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11570(t3,((C_word*)t0)[2],t2);}
-
-/* warn in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11518(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11518,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11526,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11530,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1499 symbol->string */
-t6=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k11528 in warn in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11530(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1499 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[263],t1,lf[264]);}
-
-/* k11524 in warn in module-indirect-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1498 ##sys#warn */
-t2=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* ##sys#mark-imported-symbols in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11391(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11391,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11397,a[2]=t4,a[3]=((C_word)li172),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_11397(t6,t1,t2);}
-
-/* loop3125 in ##sys#mark-imported-symbols in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11397(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11397,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11447,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11412,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_symbolp(t6))){
-t7=(C_word)C_i_car(t4);
-t8=(C_word)C_i_cdr(t4);
-t9=(C_word)C_eqp(t7,t8);
-t10=t5;
-f_11412(t10,(C_word)C_i_not(t9));}
-else{
-t7=t5;
-f_11412(t7,C_SCHEME_FALSE);}}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11410 in loop3125 in ##sys#mark-imported-symbols in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11412(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[6]);
-/* expand.scm: 1484 ##sys#put! */
-t4=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[5],t3,lf[72],C_SCHEME_TRUE);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11397(t3,((C_word*)t0)[2],t2);}}
-
-/* k11445 in loop3125 in ##sys#mark-imported-symbols in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11397(t3,((C_word*)t0)[2],t2);}
-
-/* ##sys#register-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11323(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+31)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11323r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11323r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11323r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(31);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11325,a[2]=t3,a[3]=t2,a[4]=((C_word)li169),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11338,a[2]=t5,a[3]=((C_word)li170),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11343,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-vexports31033116 */
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,f_11343(C_a_i(&a,19),t7));}
-else{
-t8=(C_word)C_i_car(t4);
-t9=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t9))){
-/* def-sexports31043114 */
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,f_11338(C_a_i(&a,19),t6,t8));}
-else{
-t10=(C_word)C_i_car(t9);
-t11=(C_word)C_i_cdr(t9);
-if(C_truep((C_word)C_i_nullp(t11))){
-/* body31013109 */
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,f_11325(C_a_i(&a,19),t5,t8,t10));}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-vexports3103 in ##sys#register-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_11343(C_word *a,C_word t0){
-C_word tmp;
-C_word t1;
-C_stack_check;
-return(f_11338(C_a_i(&a,19),((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
-
-/* def-sexports3104 in ##sys#register-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_11338(C_word *a,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_stack_check;
-return(f_11325(C_a_i(&a,19),((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST));}
-
-/* body3101 in ##sys#register-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_11325(C_word *a,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_stack_check;
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[2];
-t5=(C_word)C_a_i_record(&a,12,lf[68],t3,t4,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t1,t2);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,*((C_word*)lf[248]+1));
-t8=C_mutate((C_word*)lf[248]+1 /* (set! module-table ...) */,t7);
-return(t5);}
-
-/* ##sys#register-undefined in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11301(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11301,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11308,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1470 module-undefined-list */
-t5=*((C_word*)lf[245]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k11306 in ##sys#register-undefined in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11308(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11308,2,t0,t1);}
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],t1))){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* expand.scm: 1472 set-module-undefined-list! */
-t3=*((C_word*)lf[244]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}}
-
-/* ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11220(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_11220,5,t0,t1,t2,t3,t4);}
-if(C_truep(t3)){
-t5=t3;
-t6=(C_word)C_i_check_structure(t5,lf[68]);
-t7=(C_word)C_i_block_ref(t5,C_fix(2));
-t8=(C_word)C_eqp(C_SCHEME_TRUE,t7);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11230,a[2]=t1,a[3]=t4,a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t8)){
-t10=t9;
-f_11230(2,t10,t8);}
-else{
-/* expand.scm: 1452 ##sys#find-export */
-t10=*((C_word*)lf[258]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t9,t2,t3,C_SCHEME_TRUE);}}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11230(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11230,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11233,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 1453 module-undefined-list */
-t3=*((C_word*)lf[245]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11233(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11233,2,t0,t1);}
-t2=((C_word*)t0)[6];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11239,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[5],t1))){
-/* expand.scm: 1456 ##sys#warn */
-t6=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,lf[260],((C_word*)t0)[5]);}
-else{
-t6=t5;
-f_11239(2,t6,C_SCHEME_UNDEFINED);}}
-
-/* k11237 in k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11239,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11242,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11282,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1457 ##sys#current-environment */
-t4=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k11280 in k11237 in k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11282,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11286,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1457 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k11284 in k11280 in k11237 in k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1457 check-for-redef */
-f_11110(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11240 in k11237 in k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11242(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11242,2,t0,t1);}
-t2=*((C_word*)lf[9]+1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11248,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t5=((C_word*)t0)[4];
-t6=(C_word)C_i_check_structure(t5,lf[68]);
-t7=(C_word)C_i_block_ref(t5,C_fix(3));
-t8=(C_word)C_a_i_cons(&a,2,t4,t7);
-t9=((C_word*)t0)[4];
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-/* ##sys#block-set! */
-t11=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t3,t9,C_fix(3),t8);}
-else{
-t4=t3;
-f_11248(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k11246 in k11240 in k11237 in k11231 in k11228 in ##sys#register-syntax-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11248(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11248,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(5));
-t6=(C_word)C_a_i_cons(&a,2,t2,t5);
-t7=((C_word*)t0)[2];
-t8=((C_word*)t0)[3];
-t9=(C_word)C_i_check_structure(t8,lf[68]);
-/* ##sys#block-set! */
-t10=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t7,t8,C_fix(5),t6);}
-
-/* ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11131(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11131,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-t4=t3;
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(2));
-t7=(C_word)C_eqp(C_SCHEME_TRUE,t6);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11141,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t7)){
-t9=t8;
-f_11141(2,t9,t7);}
-else{
-/* expand.scm: 1433 ##sys#find-export */
-t9=*((C_word*)lf[258]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,t2,t3,C_SCHEME_TRUE);}}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11141(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11141,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11144,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 1434 module-undefined-list */
-t3=*((C_word*)lf[245]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11144(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11144,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11147,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11207,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=((C_word*)t0)[3];
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(1));
-/* expand.scm: 1436 ##sys#module-rename */
-t7=*((C_word*)lf[65]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t3,((C_word*)t0)[4],t6);}
-
-/* k11205 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1435 ##sys#toplevel-definition-hook */
-t2=*((C_word*)lf[252]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11147(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11147,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11150,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[5],((C_word*)t0)[2]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11203,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1439 ##sys#delq */
-t4=*((C_word*)lf[185]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[5],((C_word*)t0)[2]);}
-else{
-t3=t2;
-f_11150(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k11201 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11203(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1439 set-module-undefined-list! */
-t2=*((C_word*)lf[244]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11148 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11150(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11150,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11153,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11189,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1440 ##sys#current-environment */
-t4=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k11187 in k11148 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11189,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11193,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 1440 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k11191 in k11187 in k11148 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1440 check-for-redef */
-f_11110(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11151 in k11148 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11153,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11156,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[3];
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(4));
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=((C_word*)t0)[3];
-t8=(C_word)C_i_check_structure(t7,lf[68]);
-/* ##sys#block-set! */
-t9=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t2,t7,C_fix(4),t6);}
-
-/* k11154 in k11151 in k11148 in k11145 in k11142 in k11139 in ##sys#register-export in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11156(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11156,2,t0,t1);}
-if(C_truep(((C_word*)t0)[5])){
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_FALSE);
-t4=((C_word*)t0)[3];
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(3));
-t7=(C_word)C_a_i_cons(&a,2,t3,t6);
-t8=((C_word*)t0)[2];
-t9=((C_word*)t0)[3];
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-/* ##sys#block-set! */
-t11=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t8,t9,C_fix(3),t7);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* check-for-redef in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_11110(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11110,NULL,4,t1,t2,t3,t4);}
-t5=(C_word)C_i_assq(t2,t3);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11117,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t5)){
-/* expand.scm: 1426 ##sys#warn */
-t7=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,lf[256],t2);}
-else{
-t7=t6;
-f_11117(2,t7,C_SCHEME_FALSE);}}
-
-/* k11115 in check-for-redef in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11117(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep((C_word)C_i_assq(((C_word*)t0)[4],((C_word*)t0)[3]))){
-/* expand.scm: 1428 ##sys#warn */
-t2=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[255],((C_word*)t0)[4]);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* ##sys#register-meta-expression in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11090(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11090,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11094,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1421 ##sys#current-module */
-t4=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k11092 in ##sys#register-meta-expression in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11094,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(9));
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-t7=t1;
-t8=(C_word)C_i_check_structure(t7,lf[68]);
-/* ##sys#block-set! */
-t9=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t6,t7,C_fix(9),t5);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* ##sys#toplevel-definition-hook in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word *a;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_11087,6,t0,t1,t2,t3,t4,t5);}
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
-
-/* ##sys#find-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11047(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_11047r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_11047r(t0,t1,t2,t3);}}
-
-static void C_ccall f_11047r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11051,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_11051(2,t5,C_SCHEME_TRUE);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_11051(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k11049 in ##sys#find-module in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11051(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_assq(((C_word*)t0)[3],*((C_word*)lf[248]+1));
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr(t2));}
-else{
-if(C_truep(t1)){
-/* expand.scm: 1415 error */
-t3=*((C_word*)lf[249]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[2],lf[250],lf[251],((C_word*)t0)[3]);}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}}
-
-/* ##sys#module-exports in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_11023(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11023,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_i_check_structure(t3,lf[68]);
-t5=(C_word)C_i_block_ref(t3,C_fix(2));
-t6=t2;
-t7=(C_word)C_i_check_structure(t6,lf[68]);
-t8=(C_word)C_i_block_ref(t6,C_fix(10));
-t9=t2;
-t10=(C_word)C_i_check_structure(t9,lf[68]);
-t11=(C_word)C_i_block_ref(t9,C_fix(11));
-/* expand.scm: 1405 values */
-C_values(5,0,t1,t5,t8,t11);}
-
-/* module-undefined-list in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10923(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10923,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(6)));}
-
-/* set-module-undefined-list! in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10914,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t5=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,C_fix(6),t3);}
-
-/* module-name in k10817 in k10813 in k10809 in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10833(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10833,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
-
-/* ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10715(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_10715r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_10715r(t0,t1,t2,t3);}}
-
-static void C_ccall f_10715r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10719,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_10719(2,t5,C_SCHEME_FALSE);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_10719(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10719,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10722,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-/* expand.scm: 1352 ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-else{
-t3=t2;
-f_10722(2,t3,((C_word*)t0)[2]);}}
-
-/* k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10725,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10727,a[2]=t4,a[3]=t1,a[4]=((C_word)li156),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_10727(t6,t2,((C_word*)t0)[2]);}
-
-/* loop2860 in k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_10727(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10727,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10735,a[2]=((C_word*)t0)[3],a[3]=((C_word)li155),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10774,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g28672868 */
-t6=t3;
-f_10735(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10772 in loop2860 in k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10774(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10727(t3,((C_word*)t0)[2],t2);}
-
-/* g2867 in loop2860 in k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_10735(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10735,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10753,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_i_cadr(t2);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=((C_word*)t0)[2];
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_i_set_car(t4,t7));}
-else{
-t7=(C_word)C_i_cadr(t2);
-/* expand.scm: 1360 ##sys#append */
-t8=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,t7,((C_word*)t0)[2]);}}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k10751 in g2867 in loop2860 in k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_set_car(((C_word*)t0)[2],t1));}
-
-/* k10723 in k10720 in k10717 in ##sys#fixup-macro-environment in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10650(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_10650r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_10650r(t0,t1,t2,t3);}}
-
-static void C_ccall f_10650r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10654,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_10654(2,t5,C_SCHEME_FALSE);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_10654(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k10652 in ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10654,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10657,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10664,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 1345 ##sys#macro-environment */
-t4=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k10662 in k10652 in ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10664,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10666,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li153),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_10666(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k10662 in k10652 in ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_10666(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_10666,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_nullp(t2);
-t4=(C_truep(t3)?t3:(C_word)C_eqp(t2,((C_word*)t0)[3]));
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}
-else{
-t5=(C_word)C_i_car(t2);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10687,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t7=(C_word)C_i_cdr(t2);
-/* expand.scm: 1348 loop */
-t9=t6;
-t10=t7;
-t1=t9;
-t2=t10;
-goto loop;}}
-
-/* k10685 in loop in k10662 in k10652 in ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10687(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10687,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k10655 in k10652 in ##sys#macro-subset in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 1349 ##sys#fixup-macro-environment */
-t2=*((C_word*)lf[241]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word ab[155],*a=ab;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_8974,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_SCHEME_UNDEFINED;
-t22=(*a=C_VECTOR_TYPE|1,a[1]=t21,tmp=(C_word)a,a+=2,tmp);
-t23=C_SCHEME_UNDEFINED;
-t24=(*a=C_VECTOR_TYPE|1,a[1]=t23,tmp=(C_word)a,a+=2,tmp);
-t25=C_SCHEME_UNDEFINED;
-t26=(*a=C_VECTOR_TYPE|1,a[1]=t25,tmp=(C_word)a,a+=2,tmp);
-t27=C_SCHEME_UNDEFINED;
-t28=(*a=C_VECTOR_TYPE|1,a[1]=t27,tmp=(C_word)a,a+=2,tmp);
-t29=C_SCHEME_UNDEFINED;
-t30=(*a=C_VECTOR_TYPE|1,a[1]=t29,tmp=(C_word)a,a+=2,tmp);
-t31=C_SCHEME_UNDEFINED;
-t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
-t33=C_SCHEME_UNDEFINED;
-t34=(*a=C_VECTOR_TYPE|1,a[1]=t33,tmp=(C_word)a,a+=2,tmp);
-t35=C_SCHEME_UNDEFINED;
-t36=(*a=C_VECTOR_TYPE|1,a[1]=t35,tmp=(C_word)a,a+=2,tmp);
-t37=C_SCHEME_UNDEFINED;
-t38=(*a=C_VECTOR_TYPE|1,a[1]=t37,tmp=(C_word)a,a+=2,tmp);
-t39=C_SCHEME_UNDEFINED;
-t40=(*a=C_VECTOR_TYPE|1,a[1]=t39,tmp=(C_word)a,a+=2,tmp);
-t41=C_SCHEME_UNDEFINED;
-t42=(*a=C_VECTOR_TYPE|1,a[1]=t41,tmp=(C_word)a,a+=2,tmp);
-t43=C_SCHEME_UNDEFINED;
-t44=(*a=C_VECTOR_TYPE|1,a[1]=t43,tmp=(C_word)a,a+=2,tmp);
-t45=C_SCHEME_UNDEFINED;
-t46=(*a=C_VECTOR_TYPE|1,a[1]=t45,tmp=(C_word)a,a+=2,tmp);
-t47=C_SCHEME_UNDEFINED;
-t48=(*a=C_VECTOR_TYPE|1,a[1]=t47,tmp=(C_word)a,a+=2,tmp);
-t49=C_SCHEME_UNDEFINED;
-t50=(*a=C_VECTOR_TYPE|1,a[1]=t49,tmp=(C_word)a,a+=2,tmp);
-t51=C_SCHEME_UNDEFINED;
-t52=(*a=C_VECTOR_TYPE|1,a[1]=t51,tmp=(C_word)a,a+=2,tmp);
-t53=C_SCHEME_UNDEFINED;
-t54=(*a=C_VECTOR_TYPE|1,a[1]=t53,tmp=(C_word)a,a+=2,tmp);
-t55=C_SCHEME_UNDEFINED;
-t56=(*a=C_VECTOR_TYPE|1,a[1]=t55,tmp=(C_word)a,a+=2,tmp);
-t57=C_SCHEME_UNDEFINED;
-t58=(*a=C_VECTOR_TYPE|1,a[1]=t57,tmp=(C_word)a,a+=2,tmp);
-t59=C_SCHEME_UNDEFINED;
-t60=(*a=C_VECTOR_TYPE|1,a[1]=t59,tmp=(C_word)a,a+=2,tmp);
-t61=C_SCHEME_UNDEFINED;
-t62=(*a=C_VECTOR_TYPE|1,a[1]=t61,tmp=(C_word)a,a+=2,tmp);
-t63=C_SCHEME_UNDEFINED;
-t64=(*a=C_VECTOR_TYPE|1,a[1]=t63,tmp=(C_word)a,a+=2,tmp);
-t65=C_SCHEME_UNDEFINED;
-t66=(*a=C_VECTOR_TYPE|1,a[1]=t65,tmp=(C_word)a,a+=2,tmp);
-t67=C_SCHEME_UNDEFINED;
-t68=(*a=C_VECTOR_TYPE|1,a[1]=t67,tmp=(C_word)a,a+=2,tmp);
-t69=C_SCHEME_UNDEFINED;
-t70=(*a=C_VECTOR_TYPE|1,a[1]=t69,tmp=(C_word)a,a+=2,tmp);
-t71=C_SCHEME_UNDEFINED;
-t72=(*a=C_VECTOR_TYPE|1,a[1]=t71,tmp=(C_word)a,a+=2,tmp);
-t73=C_SCHEME_UNDEFINED;
-t74=(*a=C_VECTOR_TYPE|1,a[1]=t73,tmp=(C_word)a,a+=2,tmp);
-t75=C_SCHEME_UNDEFINED;
-t76=(*a=C_VECTOR_TYPE|1,a[1]=t75,tmp=(C_word)a,a+=2,tmp);
-t77=C_SCHEME_UNDEFINED;
-t78=(*a=C_VECTOR_TYPE|1,a[1]=t77,tmp=(C_word)a,a+=2,tmp);
-t79=C_SCHEME_UNDEFINED;
-t80=(*a=C_VECTOR_TYPE|1,a[1]=t79,tmp=(C_word)a,a+=2,tmp);
-t81=C_SCHEME_UNDEFINED;
-t82=(*a=C_VECTOR_TYPE|1,a[1]=t81,tmp=(C_word)a,a+=2,tmp);
-t83=C_SCHEME_UNDEFINED;
-t84=(*a=C_VECTOR_TYPE|1,a[1]=t83,tmp=(C_word)a,a+=2,tmp);
-t85=C_SCHEME_UNDEFINED;
-t86=(*a=C_VECTOR_TYPE|1,a[1]=t85,tmp=(C_word)a,a+=2,tmp);
-t87=C_SCHEME_UNDEFINED;
-t88=(*a=C_VECTOR_TYPE|1,a[1]=t87,tmp=(C_word)a,a+=2,tmp);
-t89=C_SCHEME_UNDEFINED;
-t90=(*a=C_VECTOR_TYPE|1,a[1]=t89,tmp=(C_word)a,a+=2,tmp);
-t91=C_SCHEME_UNDEFINED;
-t92=(*a=C_VECTOR_TYPE|1,a[1]=t91,tmp=(C_word)a,a+=2,tmp);
-t93=C_SCHEME_UNDEFINED;
-t94=(*a=C_VECTOR_TYPE|1,a[1]=t93,tmp=(C_word)a,a+=2,tmp);
-t95=C_SCHEME_UNDEFINED;
-t96=(*a=C_VECTOR_TYPE|1,a[1]=t95,tmp=(C_word)a,a+=2,tmp);
-t97=C_SCHEME_UNDEFINED;
-t98=(*a=C_VECTOR_TYPE|1,a[1]=t97,tmp=(C_word)a,a+=2,tmp);
-t99=C_SCHEME_UNDEFINED;
-t100=(*a=C_VECTOR_TYPE|1,a[1]=t99,tmp=(C_word)a,a+=2,tmp);
-t101=C_SCHEME_UNDEFINED;
-t102=(*a=C_VECTOR_TYPE|1,a[1]=t101,tmp=(C_word)a,a+=2,tmp);
-t103=C_SCHEME_UNDEFINED;
-t104=(*a=C_VECTOR_TYPE|1,a[1]=t103,tmp=(C_word)a,a+=2,tmp);
-t105=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8981,a[2]=t2,a[3]=t5,a[4]=t3,a[5]=t1,a[6]=t100,a[7]=t102,a[8]=t96,a[9]=t104,a[10]=t98,a[11]=t88,a[12]=t86,a[13]=t4,a[14]=t84,a[15]=t90,a[16]=t94,a[17]=t92,a[18]=t82,a[19]=t80,a[20]=t6,a[21]=t78,a[22]=t76,a[23]=t74,a[24]=t72,a[25]=t70,a[26]=t68,a[27]=t66,a[28]=t64,a[29]=t62,a[30]=t60,a[31]=t58,a[32]=t56,a[33]=t54,a[34]=t52,a[35]=t50,a[36]=t48,a[37]=t46,a[38]=t44,a[39]=t42,a[40]=t40,a[41]=t38,a[42]=t36,a[43]=t34,a[44]=t32,a[45]=t30,a[46]=t28,a[47]=t26,a[48]=t24,a[49]=t22,a[50]=t20,a[51]=t18,a[52]=t16,a[53]=t14,a[54]=t12,a[55]=t10,a[56]=t8,tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t106=t5;
-((C_proc3)(void*)(*((C_word*)t106+1)))(3,t106,t105,lf[239]);}
-
-/* k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8981(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8981,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[205]);
-t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[206]);
-t5=C_mutate(((C_word *)((C_word*)t0)[53])+1,lf[207]);
-t6=C_mutate(((C_word *)((C_word*)t0)[52])+1,lf[208]);
-t7=C_mutate(((C_word *)((C_word*)t0)[51])+1,lf[209]);
-t8=C_mutate(((C_word *)((C_word*)t0)[50])+1,lf[210]);
-t9=C_mutate(((C_word *)((C_word*)t0)[49])+1,lf[211]);
-t10=C_mutate(((C_word *)((C_word*)t0)[48])+1,lf[212]);
-t11=C_mutate(((C_word *)((C_word*)t0)[47])+1,lf[213]);
-t12=C_mutate(((C_word *)((C_word*)t0)[46])+1,lf[214]);
-t13=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8995,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[49],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[50],a[12]=((C_word*)t0)[47],a[13]=((C_word*)t0)[52],a[14]=((C_word*)t0)[51],a[15]=((C_word*)t0)[46],a[16]=((C_word*)t0)[48],a[17]=((C_word*)t0)[53],a[18]=((C_word*)t0)[10],a[19]=((C_word*)t0)[11],a[20]=((C_word*)t0)[55],a[21]=((C_word*)t0)[12],a[22]=((C_word*)t0)[13],a[23]=((C_word*)t0)[14],a[24]=((C_word*)t0)[15],a[25]=((C_word*)t0)[16],a[26]=((C_word*)t0)[17],a[27]=((C_word*)t0)[56],a[28]=((C_word*)t0)[18],a[29]=((C_word*)t0)[54],a[30]=((C_word*)t0)[19],a[31]=((C_word*)t0)[20],a[32]=((C_word*)t0)[21],a[33]=((C_word*)t0)[22],a[34]=((C_word*)t0)[23],a[35]=((C_word*)t0)[24],a[36]=((C_word*)t0)[25],a[37]=((C_word*)t0)[26],a[38]=((C_word*)t0)[27],a[39]=((C_word*)t0)[28],a[40]=((C_word*)t0)[29],a[41]=((C_word*)t0)[30],a[42]=((C_word*)t0)[31],a[43]=((C_word*)t0)[32],a[44]=((C_word*)t0)[33],a[45]=((C_word*)t0)[34],a[46]=((C_word*)t0)[35],a[47]=((C_word*)t0)[36],a[48]=((C_word*)t0)[37],a[49]=((C_word*)t0)[38],a[50]=((C_word*)t0)[39],a[51]=((C_word*)t0)[40],a[52]=((C_word*)t0)[41],a[53]=((C_word*)t0)[42],a[54]=((C_word*)t0)[43],a[55]=((C_word*)t0)[44],a[56]=((C_word*)t0)[45],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t14=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t14+1)))(3,t14,t13,lf[238]);}
-
-/* k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8995,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[56],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],a[36]=((C_word*)t0)[35],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[237]);}
-
-/* k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8999(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8999,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9003,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[56],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],a[36]=((C_word*)t0)[35],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[236]);}
-
-/* k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9003,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[215]);
-t4=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[55],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[56],a[32]=((C_word*)t0)[30],a[33]=((C_word*)t0)[31],a[34]=((C_word*)t0)[32],a[35]=((C_word*)t0)[33],a[36]=((C_word*)t0)[34],a[37]=((C_word*)t0)[35],a[38]=((C_word*)t0)[36],a[39]=((C_word*)t0)[37],a[40]=((C_word*)t0)[38],a[41]=((C_word*)t0)[39],a[42]=((C_word*)t0)[40],a[43]=((C_word*)t0)[41],a[44]=((C_word*)t0)[42],a[45]=((C_word*)t0)[43],a[46]=((C_word*)t0)[44],a[47]=((C_word*)t0)[45],a[48]=((C_word*)t0)[46],a[49]=((C_word*)t0)[47],a[50]=((C_word*)t0)[48],a[51]=((C_word*)t0)[49],a[52]=((C_word*)t0)[50],a[53]=((C_word*)t0)[51],a[54]=((C_word*)t0)[52],a[55]=((C_word*)t0)[53],a[56]=((C_word*)t0)[54],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[235]);}
-
-/* k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9008,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[216]);
-t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[217]);
-t5=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9014,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[54],a[22]=((C_word*)t0)[55],a[23]=((C_word*)t0)[21],a[24]=((C_word*)t0)[22],a[25]=((C_word*)t0)[23],a[26]=((C_word*)t0)[24],a[27]=((C_word*)t0)[25],a[28]=((C_word*)t0)[26],a[29]=((C_word*)t0)[27],a[30]=((C_word*)t0)[28],a[31]=((C_word*)t0)[29],a[32]=((C_word*)t0)[30],a[33]=((C_word*)t0)[56],a[34]=((C_word*)t0)[31],a[35]=((C_word*)t0)[32],a[36]=((C_word*)t0)[33],a[37]=((C_word*)t0)[34],a[38]=((C_word*)t0)[35],a[39]=((C_word*)t0)[36],a[40]=((C_word*)t0)[37],a[41]=((C_word*)t0)[38],a[42]=((C_word*)t0)[39],a[43]=((C_word*)t0)[40],a[44]=((C_word*)t0)[41],a[45]=((C_word*)t0)[42],a[46]=((C_word*)t0)[43],a[47]=((C_word*)t0)[44],a[48]=((C_word*)t0)[45],a[49]=((C_word*)t0)[46],a[50]=((C_word*)t0)[47],a[51]=((C_word*)t0)[48],a[52]=((C_word*)t0)[49],a[53]=((C_word*)t0)[50],a[54]=((C_word*)t0)[51],a[55]=((C_word*)t0)[52],a[56]=((C_word*)t0)[53],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[234]);}
-
-/* k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9014(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9014,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9018,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[56],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[233]);}
-
-/* k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9018,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9022,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[56],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],a[36]=((C_word*)t0)[35],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[111]);}
-
-/* k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9022,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9026,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[56],a[36]=((C_word*)t0)[35],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[47]);}
-
-/* k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9026,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9030,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[56],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[100]);}
-
-/* k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9030(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9030,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[218]);
-t4=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9035,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[55],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[56],a[34]=((C_word*)t0)[32],a[35]=((C_word*)t0)[33],a[36]=((C_word*)t0)[34],a[37]=((C_word*)t0)[35],a[38]=((C_word*)t0)[36],a[39]=((C_word*)t0)[37],a[40]=((C_word*)t0)[38],a[41]=((C_word*)t0)[39],a[42]=((C_word*)t0)[40],a[43]=((C_word*)t0)[41],a[44]=((C_word*)t0)[42],a[45]=((C_word*)t0)[43],a[46]=((C_word*)t0)[44],a[47]=((C_word*)t0)[45],a[48]=((C_word*)t0)[46],a[49]=((C_word*)t0)[47],a[50]=((C_word*)t0)[48],a[51]=((C_word*)t0)[49],a[52]=((C_word*)t0)[50],a[53]=((C_word*)t0)[51],a[54]=((C_word*)t0)[52],a[55]=((C_word*)t0)[53],a[56]=((C_word*)t0)[54],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[152]);}
-
-/* k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9035,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],a[38]=((C_word*)t0)[38],a[39]=((C_word*)t0)[39],a[40]=((C_word*)t0)[40],a[41]=((C_word*)t0)[41],a[42]=((C_word*)t0)[42],a[43]=((C_word*)t0)[43],a[44]=((C_word*)t0)[44],a[45]=((C_word*)t0)[45],a[46]=((C_word*)t0)[46],a[47]=((C_word*)t0)[47],a[48]=((C_word*)t0)[48],a[49]=((C_word*)t0)[49],a[50]=((C_word*)t0)[50],a[51]=((C_word*)t0)[51],a[52]=((C_word*)t0)[52],a[53]=((C_word*)t0)[53],a[54]=((C_word*)t0)[54],a[55]=((C_word*)t0)[55],a[56]=((C_word*)t0)[56],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[232]);}
-
-/* k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9039(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9039,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[219]);
-t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[220]);
-t5=C_mutate(((C_word *)((C_word*)t0)[53])+1,lf[221]);
-t6=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[54],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[55],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=((C_word*)t0)[16],a[19]=((C_word*)t0)[17],a[20]=((C_word*)t0)[18],a[21]=((C_word*)t0)[19],a[22]=((C_word*)t0)[56],a[23]=((C_word*)t0)[53],a[24]=((C_word*)t0)[20],a[25]=((C_word*)t0)[21],a[26]=((C_word*)t0)[22],a[27]=((C_word*)t0)[23],a[28]=((C_word*)t0)[24],a[29]=((C_word*)t0)[25],a[30]=((C_word*)t0)[26],a[31]=((C_word*)t0)[27],a[32]=((C_word*)t0)[28],a[33]=((C_word*)t0)[29],a[34]=((C_word*)t0)[30],a[35]=((C_word*)t0)[31],a[36]=((C_word*)t0)[32],a[37]=((C_word*)t0)[33],a[38]=((C_word*)t0)[34],a[39]=((C_word*)t0)[35],a[40]=((C_word*)t0)[36],a[41]=((C_word*)t0)[37],a[42]=((C_word*)t0)[38],a[43]=((C_word*)t0)[39],a[44]=((C_word*)t0)[40],a[45]=((C_word*)t0)[41],a[46]=((C_word*)t0)[42],a[47]=((C_word*)t0)[43],a[48]=((C_word*)t0)[44],a[49]=((C_word*)t0)[45],a[50]=((C_word*)t0)[46],a[51]=((C_word*)t0)[47],a[52]=((C_word*)t0)[48],a[53]=((C_word*)t0)[49],a[54]=((C_word*)t0)[50],a[55]=((C_word*)t0)[51],a[56]=((C_word*)t0)[52],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t7=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[231]);}
-
-/* k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9046(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9046,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[55])+1,lf[222]);
-t4=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9051,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[56],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[55],a[33]=((C_word*)t0)[31],a[34]=((C_word*)t0)[32],a[35]=((C_word*)t0)[33],a[36]=((C_word*)t0)[34],a[37]=((C_word*)t0)[35],a[38]=((C_word*)t0)[36],a[39]=((C_word*)t0)[37],a[40]=((C_word*)t0)[38],a[41]=((C_word*)t0)[39],a[42]=((C_word*)t0)[40],a[43]=((C_word*)t0)[41],a[44]=((C_word*)t0)[42],a[45]=((C_word*)t0)[43],a[46]=((C_word*)t0)[44],a[47]=((C_word*)t0)[45],a[48]=((C_word*)t0)[46],a[49]=((C_word*)t0)[47],a[50]=((C_word*)t0)[48],a[51]=((C_word*)t0)[49],a[52]=((C_word*)t0)[50],a[53]=((C_word*)t0)[51],a[54]=((C_word*)t0)[52],a[55]=((C_word*)t0)[53],a[56]=((C_word*)t0)[54],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[82]);}
-
-/* k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9051(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9051,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9055,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[56],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],a[36]=((C_word*)t0)[35],a[37]=((C_word*)t0)[36],a[38]=((C_word*)t0)[37],a[39]=((C_word*)t0)[38],a[40]=((C_word*)t0)[39],a[41]=((C_word*)t0)[40],a[42]=((C_word*)t0)[41],a[43]=((C_word*)t0)[42],a[44]=((C_word*)t0)[43],a[45]=((C_word*)t0)[44],a[46]=((C_word*)t0)[45],a[47]=((C_word*)t0)[46],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[201]);}
-
-/* k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9055,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9059,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],a[38]=((C_word*)t0)[38],a[39]=((C_word*)t0)[39],a[40]=((C_word*)t0)[40],a[41]=((C_word*)t0)[41],a[42]=((C_word*)t0)[42],a[43]=((C_word*)t0)[43],a[44]=((C_word*)t0)[44],a[45]=((C_word*)t0)[45],a[46]=((C_word*)t0)[46],a[47]=((C_word*)t0)[47],a[48]=((C_word*)t0)[48],a[49]=((C_word*)t0)[56],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[230]);}
-
-/* k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9059(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[57],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9059,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_9063,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],a[38]=((C_word*)t0)[38],a[39]=((C_word*)t0)[39],a[40]=((C_word*)t0)[40],a[41]=((C_word*)t0)[41],a[42]=((C_word*)t0)[42],a[43]=((C_word*)t0)[43],a[44]=((C_word*)t0)[44],a[45]=((C_word*)t0)[45],a[46]=((C_word*)t0)[46],a[47]=((C_word*)t0)[56],a[48]=((C_word*)t0)[47],a[49]=((C_word*)t0)[48],a[50]=((C_word*)t0)[49],a[51]=((C_word*)t0)[50],a[52]=((C_word*)t0)[51],a[53]=((C_word*)t0)[52],a[54]=((C_word*)t0)[53],a[55]=((C_word*)t0)[54],a[56]=((C_word*)t0)[55],tmp=(C_word)a,a+=57,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[229]);}
-
-/* k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[55],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9063,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[56])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|54,a[1]=(C_word)f_9068,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],a[17]=((C_word*)t0)[19],a[18]=((C_word*)t0)[20],a[19]=((C_word*)t0)[21],a[20]=((C_word*)t0)[22],a[21]=((C_word*)t0)[23],a[22]=((C_word*)t0)[24],a[23]=((C_word*)t0)[25],a[24]=((C_word*)t0)[26],a[25]=((C_word*)t0)[27],a[26]=((C_word*)t0)[28],a[27]=((C_word*)t0)[29],a[28]=((C_word*)t0)[30],a[29]=((C_word*)t0)[31],a[30]=((C_word*)t0)[32],a[31]=((C_word*)t0)[33],a[32]=((C_word*)t0)[56],a[33]=((C_word*)t0)[34],a[34]=((C_word*)t0)[35],a[35]=((C_word*)t0)[36],a[36]=((C_word*)t0)[37],a[37]=((C_word*)t0)[38],a[38]=((C_word*)t0)[39],a[39]=((C_word*)t0)[40],a[40]=((C_word*)t0)[41],a[41]=((C_word*)t0)[42],a[42]=((C_word*)t0)[43],a[43]=((C_word*)t0)[44],a[44]=((C_word*)t0)[45],a[45]=((C_word*)t0)[46],a[46]=((C_word*)t0)[47],a[47]=((C_word*)t0)[48],a[48]=((C_word*)t0)[49],a[49]=((C_word*)t0)[50],a[50]=((C_word*)t0)[51],a[51]=((C_word*)t0)[52],a[52]=((C_word*)t0)[53],a[53]=((C_word*)t0)[54],a[54]=((C_word*)t0)[55],tmp=(C_word)a,a+=55,tmp);
-/* r2420 */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9068(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[133],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9068,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[54])+1,t1);
-t3=C_mutate(((C_word *)((C_word*)t0)[53])+1,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9070,a[2]=((C_word*)t0)[54],a[3]=((C_word*)t0)[52],a[4]=((C_word)li131),tmp=(C_word)a,a+=5,tmp));
-t4=C_mutate(((C_word *)((C_word*)t0)[51])+1,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9076,a[2]=((C_word*)t0)[41],a[3]=((C_word*)t0)[42],a[4]=((C_word*)t0)[43],a[5]=((C_word*)t0)[44],a[6]=((C_word*)t0)[45],a[7]=((C_word*)t0)[46],a[8]=((C_word*)t0)[47],a[9]=((C_word*)t0)[48],a[10]=((C_word*)t0)[49],a[11]=((C_word*)t0)[50],a[12]=((C_word)li133),tmp=(C_word)a,a+=13,tmp));
-t5=C_mutate(((C_word *)((C_word*)t0)[41])+1,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9201,a[2]=((C_word*)t0)[35],a[3]=((C_word*)t0)[46],a[4]=((C_word*)t0)[36],a[5]=((C_word*)t0)[37],a[6]=((C_word*)t0)[38],a[7]=((C_word*)t0)[39],a[8]=((C_word*)t0)[40],a[9]=((C_word)li135),tmp=(C_word)a,a+=10,tmp));
-t6=C_mutate(((C_word *)((C_word*)t0)[35])+1,(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_9285,a[2]=((C_word*)t0)[26],a[3]=((C_word*)t0)[27],a[4]=((C_word*)t0)[28],a[5]=((C_word*)t0)[29],a[6]=((C_word*)t0)[30],a[7]=((C_word*)t0)[35],a[8]=((C_word*)t0)[47],a[9]=((C_word*)t0)[44],a[10]=((C_word*)t0)[40],a[11]=((C_word*)t0)[31],a[12]=((C_word*)t0)[32],a[13]=((C_word*)t0)[33],a[14]=((C_word*)t0)[50],a[15]=((C_word*)t0)[49],a[16]=((C_word*)t0)[34],a[17]=((C_word)li136),tmp=(C_word)a,a+=18,tmp));
-t7=C_mutate(((C_word *)((C_word*)t0)[33])+1,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9506,a[2]=((C_word*)t0)[35],a[3]=((C_word*)t0)[30],a[4]=((C_word*)t0)[47],a[5]=((C_word*)t0)[44],a[6]=((C_word*)t0)[21],a[7]=((C_word*)t0)[22],a[8]=((C_word*)t0)[40],a[9]=((C_word*)t0)[31],a[10]=((C_word*)t0)[23],a[11]=((C_word*)t0)[24],a[12]=((C_word*)t0)[25],a[13]=((C_word)li137),tmp=(C_word)a,a+=14,tmp));
-t8=C_mutate(((C_word *)((C_word*)t0)[29])+1,(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_9628,a[2]=((C_word*)t0)[53],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[35],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[17],a[8]=((C_word*)t0)[21],a[9]=((C_word*)t0)[22],a[10]=((C_word*)t0)[18],a[11]=((C_word*)t0)[19],a[12]=((C_word*)t0)[44],a[13]=((C_word*)t0)[40],a[14]=((C_word*)t0)[20],a[15]=((C_word*)t0)[32],a[16]=((C_word)li139),tmp=(C_word)a,a+=17,tmp));
-t9=C_mutate(((C_word *)((C_word*)t0)[36])+1,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9916,a[2]=((C_word*)t0)[26],a[3]=((C_word*)t0)[53],a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[30],a[7]=((C_word*)t0)[47],a[8]=((C_word*)t0)[36],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[43],a[11]=((C_word*)t0)[32],a[12]=((C_word*)t0)[34],a[13]=((C_word)li142),tmp=(C_word)a,a+=14,tmp));
-t10=C_mutate(((C_word *)((C_word*)t0)[38])+1,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10123,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[43],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[38],a[12]=((C_word*)t0)[49],a[13]=((C_word)li144),tmp=(C_word)a,a+=14,tmp));
-t11=C_mutate(((C_word *)((C_word*)t0)[37])+1,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10377,a[2]=((C_word*)t0)[26],a[3]=((C_word*)t0)[37],a[4]=((C_word*)t0)[34],a[5]=((C_word)li145),tmp=(C_word)a,a+=6,tmp));
-t12=C_mutate(((C_word *)((C_word*)t0)[9])+1,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10450,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[9],a[4]=((C_word)li146),tmp=(C_word)a,a+=5,tmp));
-t13=C_mutate(((C_word *)((C_word*)t0)[26])+1,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10543,a[2]=((C_word*)t0)[4],a[3]=((C_word)li147),tmp=(C_word)a,a+=4,tmp));
-t14=C_mutate(((C_word *)((C_word*)t0)[4])+1,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10565,a[2]=((C_word*)t0)[53],a[3]=((C_word)li148),tmp=(C_word)a,a+=4,tmp));
-t15=C_mutate(((C_word *)((C_word*)t0)[8])+1,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10591,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[8],a[4]=((C_word)li149),tmp=(C_word)a,a+=5,tmp));
-t16=C_mutate(((C_word *)((C_word*)t0)[11])+1,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10611,a[2]=((C_word*)t0)[53],a[3]=((C_word)li151),tmp=(C_word)a,a+=4,tmp));
-/* make-transformer2462 */
-t17=((C_word*)((C_word*)t0)[51])[1];
-((C_proc3)(void*)(*((C_word*)t17+1)))(3,t17,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* f_10611 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10611(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10611,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(t2);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10621,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word)li150),tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_10621(t7,t1,t3);}
-
-/* loop */
-static void C_fcall f_10621(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10621,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10628,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-/* ellipsis?2461 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-else{
-t4=t3;
-f_10628(2,t4,C_SCHEME_FALSE);}}
-
-/* k10626 in loop */
-static void C_ccall f_10628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* loop2761 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10621(t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* f_10591 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10591(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10591,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10598,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* segment-template?2472 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k10596 */
-static void C_ccall f_10598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10598,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10605,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* segment-depth2473 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}}
-
-/* k10603 in k10596 */
-static void C_ccall f_10605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fixnum_plus(C_fix(1),t1));}
-
-/* f_10565 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10565(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10565,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(C_word)C_i_cadr(t2);
-/* ellipsis?2461 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* f_10543 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10543(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10543,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10550,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* segment-template?2472 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k10548 */
-static void C_ccall f_10550(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_cddr(((C_word*)t0)[3]);
-t3=(C_word)C_i_nullp(t2);
-if(C_truep(t3)){
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-/* ##sys#syntax-error-hook */
-t4=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],lf[228],((C_word*)t0)[3]);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* f_10450 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10450(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_10450,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-if(C_truep((C_word)C_i_memq(t2,t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=(C_word)C_i_assq(t2,t4);
-if(C_truep(t6)){
-t7=(C_word)C_i_cdr(t6);
-t8=t3;
-t9=(C_word)C_fixnum_greater_or_equal_p(t7,t8);
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_truep(t9)?(C_word)C_a_i_cons(&a,2,t2,t5):t5));}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t5);}}}
-else{
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10492,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* segment-template?2472 */
-t7=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}}
-
-/* k10490 */
-static void C_ccall f_10492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10492,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10503,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_i_cddr(((C_word*)t0)[7]);
-/* free-meta-variables2470 */
-t5=((C_word*)((C_word*)t0)[6])[1];
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[7]))){
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10524,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* free-meta-variables2470 */
-t5=((C_word*)((C_word*)t0)[6])[1];
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[7]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10541,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* vector->list */
-t3=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}}}
-
-/* k10539 in k10490 */
-static void C_ccall f_10541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* free-meta-variables2470 */
-t2=((C_word*)((C_word*)t0)[6])[1];
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10522 in k10490 */
-static void C_ccall f_10524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* free-meta-variables2470 */
-t2=((C_word*)((C_word*)t0)[6])[1];
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10501 in k10490 */
-static void C_ccall f_10503(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* free-meta-variables2470 */
-t2=((C_word*)((C_word*)t0)[6])[1];
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* f_10377 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10377(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10377,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-if(C_truep((C_word)C_i_memq(t2,((C_word*)t0)[4]))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t5=(C_word)C_a_i_cons(&a,2,t2,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,t5,t4));}}
-else{
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10403,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* segment-pattern?2471 */
-t6=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
-
-/* k10401 */
-static void C_ccall f_10403(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10403,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-/* meta-variables2469 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[3],t2,t3,((C_word*)t0)[2]);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[6]))){
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10431,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[6]);
-/* meta-variables2469 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,t4,((C_word*)t0)[5],((C_word*)t0)[2]);}
-else{
-if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[6]))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* vector->list */
-t3=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}}}
-
-/* k10446 in k10401 */
-static void C_ccall f_10448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* meta-variables2469 */
-t2=((C_word*)((C_word*)t0)[5])[1];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10429 in k10401 */
-static void C_ccall f_10431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* meta-variables2469 */
-t2=((C_word*)((C_word*)t0)[5])[1];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* f_10123 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_10123(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[15],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10123,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-t5=(C_word)C_i_assq(t2,t4);
-if(C_truep(t5)){
-t6=(C_word)C_i_cdr(t5);
-t7=t3;
-if(C_truep((C_word)C_fixnum_less_or_equal_p(t6,t7))){
-t8=t2;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}
-else{
-/* ##sys#syntax-error-hook */
-t8=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t1,lf[225],t2);}}
-else{
-t6=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[224],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[12])[1],t8));}}
-else{
-t5=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_10170,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t4,a[11]=((C_word*)t0)[11],a[12]=t2,a[13]=t1,a[14]=t3,tmp=(C_word)a,a+=15,tmp);
-/* segment-template?2472 */
-t6=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
-
-/* k10168 */
-static void C_ccall f_10170(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10170,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10173,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
-/* segment-depth2473 */
-t3=((C_word*)((C_word*)t0)[5])[1];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[12]);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[12]))){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10331,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[12]);
-/* process-template2468 */
-t4=((C_word*)((C_word*)t0)[11])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,((C_word*)t0)[14],((C_word*)t0)[10]);}
-else{
-if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[12]))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10364,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[13],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10368,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[14],a[4]=t2,a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-/* vector->list */
-t4=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[12]);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t2));}}}}
-
-/* k10366 in k10168 */
-static void C_ccall f_10368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* process-template2468 */
-t2=((C_word*)((C_word*)t0)[5])[1];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10362 in k10168 */
-static void C_ccall f_10364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10364,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t2));}
-
-/* k10329 in k10168 */
-static void C_ccall f_10331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10331,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10339,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* process-template2468 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10337 in k10329 in k10168 */
-static void C_ccall f_10339(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10339,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t3));}
-
-/* k10171 in k10168 */
-static void C_ccall f_10173(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10173,2,t0,t1);}
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[10],t1);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10179,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
-t4=(C_word)C_i_car(((C_word*)t0)[8]);
-/* free-meta-variables2470 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t3,t4,t2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}
-
-/* k10177 in k10171 in k10168 */
-static void C_ccall f_10179(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10179,2,t0,t1);}
-if(C_truep((C_word)C_i_nullp(t1))){
-/* ##sys#syntax-error-hook */
-t2=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[11],lf[226],((C_word*)t0)[10]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10191,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[10]);
-/* process-template2468 */
-t4=((C_word*)((C_word*)t0)[9])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,((C_word*)t0)[2],((C_word*)t0)[7]);}}
-
-/* k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10191,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10194,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10257,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
-t4=(C_word)C_i_cdr(((C_word*)t0)[4]);
-if(C_truep((C_word)C_i_nullp(t4))){
-if(C_truep((C_word)C_i_symbolp(t1))){
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
-t6=t3;
-f_10257(t6,(C_word)C_eqp(t1,t5));}
-else{
-t5=t3;
-f_10257(t5,C_SCHEME_FALSE);}}
-else{
-t5=t3;
-f_10257(t5,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_10257(t4,C_SCHEME_FALSE);}}
-
-/* k10255 in k10189 in k10177 in k10171 in k10168 */
-static void C_fcall f_10257(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10257,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-f_10194(t2,((C_word*)t0)[5]);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10272,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t6=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
-
-/* k10270 in k10255 in k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10272(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10272,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-f_10194(t3,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t2));}
-
-/* k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_fcall f_10194(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10194,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10197,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10228,a[2]=t4,a[3]=((C_word)li143),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_10228(t6,t2,((C_word*)t0)[2],t1);}
-
-/* doloop2695 in k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_fcall f_10228(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-loop:
-a=C_alloc(9);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_10228,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=(C_word)C_eqp(t4,C_fix(1));
-if(C_truep(t5)){
-t6=t3;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t6=(C_word)C_fixnum_difference(t2,C_fix(1));
-t7=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,lf[52],t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[227],t8);
-t12=t1;
-t13=t6;
-t14=t9;
-t1=t12;
-t2=t13;
-t3=t14;
-goto loop;}}
-
-/* k10195 in k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10197(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10197,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10226,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* segment-tail2474 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k10224 in k10195 in k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10226(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10226,2,t0,t1);}
-if(C_truep((C_word)C_i_nullp(t1))){
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[7]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10218,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10222,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* segment-tail2474 */
-t4=((C_word*)((C_word*)t0)[3])[1];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}}
-
-/* k10220 in k10224 in k10195 in k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* process-template2468 */
-t2=((C_word*)((C_word*)t0)[5])[1];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10216 in k10224 in k10195 in k10192 in k10189 in k10177 in k10171 in k10168 */
-static void C_ccall f_10218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10218,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[52],t3));}
-
-/* f_9916 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9916(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9916,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-if(C_truep((C_word)C_i_memq(t2,((C_word*)t0)[12]))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9940,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* mapit2621 */
-t6=t4;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_9946,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t4,a[12]=t3,a[13]=((C_word*)t0)[11],a[14]=t2,tmp=(C_word)a,a+=15,tmp);
-/* segment-pattern?2471 */
-t6=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
-
-/* k9944 */
-static void C_ccall f_9946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9946,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[14]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9955,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word)li140),tmp=(C_word)a,a+=8,tmp);
-/* process-pattern2467 */
-t4=((C_word*)((C_word*)t0)[8])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[7],t2,((C_word*)((C_word*)t0)[13])[1],t3);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[14]))){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10006,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[14]);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t4);
-/* process-pattern2467 */
-t6=((C_word*)((C_word*)t0)[8])[1];
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t2,t3,t5,((C_word*)t0)[11]);}
-else{
-if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[14]))){
-t2=(C_word)C_i_vector_length(((C_word*)t0)[14]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10046,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,C_fix(2)))){
-t4=(C_word)C_fixnum_difference(t2,C_fix(1));
-t5=(C_word)C_i_vector_ref(((C_word*)t0)[14],t4);
-/* ellipsis?2461 */
-t6=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t3,t5);}
-else{
-t4=t3;
-f_10046(2,t4,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}}}}
-
-/* k10044 in k9944 */
-static void C_ccall f_10046(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10046,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10056,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-/* vector->list */
-t3=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10069,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=((C_word*)t0)[3],a[9]=((C_word)li141),tmp=(C_word)a,a+=10,tmp));
-t5=((C_word*)t3)[1];
-f_10069(t5,((C_word*)t0)[6],C_fix(0));}}
-
-/* lp in k10044 in k9944 */
-static void C_fcall f_10069(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10069,NULL,3,t0,t1,t2);}
-t3=t2;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[8]))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10083,a[2]=((C_word*)t0)[7],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_i_vector_ref(((C_word*)t0)[6],t2);
-t6=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t7);
-/* process-pattern2467 */
-t9=((C_word*)((C_word*)t0)[3])[1];
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t4,t5,t8,((C_word*)t0)[2]);}}
-
-/* k10081 in lp in k10044 in k9944 */
-static void C_ccall f_10083(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10083,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10087,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* lp2650 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_10069(t4,t2,t3);}
-
-/* k10085 in k10081 in lp in k10044 in k9944 */
-static void C_ccall f_10087(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10054 in k10044 in k9944 */
-static void C_ccall f_10056(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10056,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t2);
-/* process-pattern2467 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[3],t1,t3,((C_word*)t0)[2]);}
-
-/* k10004 in k9944 */
-static void C_ccall f_10006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10006,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10010,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t4);
-/* process-pattern2467 */
-t6=((C_word*)((C_word*)t0)[3])[1];
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t2,t3,t5,((C_word*)t0)[2]);}
-
-/* k10008 in k10004 in k9944 */
-static void C_ccall f_10010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a9954 in k9944 */
-static void C_ccall f_9955(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[21],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9955,3,t0,t1,t2);}
-t3=(C_word)C_eqp(((C_word*)((C_word*)t0)[6])[1],t2);
-if(C_truep(t3)){
-t4=((C_word*)t0)[5];
-/* mapit2621 */
-t5=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
-else{
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[6])[1],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t7,t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t9);
-/* mapit2621 */
-t11=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t1,t10);}}
-
-/* k9938 */
-static void C_ccall f_9940(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9940,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_list(&a,1,t2));}
-
-/* f_9628 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9628(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9628,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_vector_length(t3);
-t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_9635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t4,a[13]=t1,a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=t2,tmp=(C_word)a,a+=19,tmp);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
-t6=(C_word)C_fixnum_difference(t4,C_fix(1));
-t7=(C_word)C_i_vector_ref(t3,t6);
-/* ellipsis?2461 */
-t8=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t5,t7);}
-else{
-t6=t5;
-f_9635(2,t6,C_SCHEME_FALSE);}}
-
-/* k9633 */
-static void C_ccall f_9635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[48],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9635,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[18],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[17])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[17])[1],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[16])[1],t5);
-t7=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_9674,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[17],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=t4,a[16]=((C_word*)t0)[15],a[17]=t6,tmp=(C_word)a,a+=18,tmp);
-if(C_truep(t1)){
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[17])[1],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t8);
-t10=(C_word)C_fixnum_difference(((C_word*)t0)[12],C_fix(2));
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,t9,t11);
-t13=t7;
-f_9674(t13,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[10])[1],t12));}
-else{
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[17])[1],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,t9,t10);
-t12=t7;
-f_9674(t12,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t11));}}
-
-/* k9672 in k9633 */
-static void C_fcall f_9674(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9674,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9678,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[17],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9682,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_9684,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[16],a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],a[14]=((C_word*)t0)[11],a[15]=((C_word*)t0)[12],a[16]=((C_word)li138),tmp=(C_word)a,a+=17,tmp));
-t7=((C_word*)t5)[1];
-f_9684(t7,t3,C_fix(0));}
-
-/* lp in k9672 in k9633 */
-static void C_fcall f_9684(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word ab[42],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9684,NULL,3,t0,t1,t2);}
-t3=t2;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[15]))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=(C_word)C_fixnum_difference(((C_word*)t0)[15],C_fix(2));
-t5=t2;
-t6=(C_word)C_eqp(t5,t4);
-t7=(C_truep(t6)?((C_word*)t0)[14]:C_SCHEME_FALSE);
-if(C_truep(t7)){
-t8=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[13])[1],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[15],C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[13])[1],t11);
-t13=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[12])[1],t12);
-t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9744,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t10,a[6]=((C_word*)t0)[10],a[7]=t13,a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9748,a[2]=t14,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[13],tmp=(C_word)a,a+=6,tmp);
-t16=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[13])[1],C_SCHEME_END_OF_LIST);
-t17=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[6])[1],t16);
-t18=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t17);
-t19=(C_word)C_fixnum_difference(((C_word*)t0)[15],C_fix(2));
-t20=(C_word)C_i_vector_ref(((C_word*)t0)[4],t19);
-/* process-match2464 */
-t21=((C_word*)((C_word*)t0)[3])[1];
-((C_proc4)(void*)(*((C_word*)t21+1)))(4,t21,t15,t18,t20);}
-else{
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9815,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t9=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[6])[1],t9);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t10);
-t12=(C_word)C_i_vector_ref(((C_word*)t0)[4],t2);
-/* process-match2464 */
-t13=((C_word*)((C_word*)t0)[3])[1];
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t8,t11,t12);}}}
-
-/* k9813 in lp in k9672 in k9633 */
-static void C_ccall f_9815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9815,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9819,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* lp2596 */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_9684(t4,t2,t3);}
-
-/* k9817 in k9813 in lp in k9672 in k9633 */
-static void C_ccall f_9819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k9746 in lp in k9672 in k9633 */
-static void C_ccall f_9748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9748,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t8=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,((C_word*)t0)[2],t1,t7);}
-
-/* k9742 in lp in k9672 in k9633 */
-static void C_ccall f_9744(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9744,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[8])[1],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[6])[1],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t8);
-t10=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST));}
-
-/* k9680 in k9672 in k9633 */
-static void C_ccall f_9682(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9676 in k9672 in k9633 */
-static void C_ccall f_9678(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9678,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t6);
-t8=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST));}
-
-/* f_9506 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9506,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9510,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=t1,a[11]=((C_word*)t0)[12],a[12]=t2,tmp=(C_word)a,a+=13,tmp);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t5);
-/* process-match2464 */
-t7=((C_word*)((C_word*)t0)[2])[1];
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t4,t6,t3);}
-
-/* k9508 */
-static void C_ccall f_9510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[46],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9510,2,t0,t1);}
-if(C_truep((C_word)C_i_nullp(t1))){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],t2);
-t4=((C_word*)t0)[10];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST));}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[8])[1],t5);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[7])[1],t7);
-t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9582,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=t6,a[8]=((C_word*)t0)[6],a[9]=t8,tmp=(C_word)a,a+=10,tmp);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t10);
-t12=(C_word)C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
-t13=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t12);
-t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t15=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t9,t1,t14);}}
-
-/* k9580 in k9508 */
-static void C_ccall f_9582(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9582,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[8])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[6])[1],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t9);
-t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST));}
-
-/* f_9285 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9285(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[24],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9285,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_symbolp(t3))){
-if(C_truep((C_word)C_i_memq(t3,((C_word*)t0)[16]))){
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[224],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[15])[1],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t2,t8);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[14])[1],t9);
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}}
-else{
-t4=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_9335,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t2,a[13]=t1,a[14]=((C_word*)t0)[13],a[15]=t3,tmp=(C_word)a,a+=16,tmp);
-/* segment-pattern?2471 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}}
-
-/* k9333 */
-static void C_ccall f_9335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[35],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9335,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[15]);
-/* process-segment-match2465 */
-t3=((C_word*)((C_word*)t0)[14])[1];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[13],((C_word*)t0)[12],t2);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[15]))){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[10])[1],t5);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9383,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[8],a[4]=t4,a[5]=((C_word*)t0)[9],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9387,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=t7,tmp=(C_word)a,a+=7,tmp);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t9);
-t11=(C_word)C_i_car(((C_word*)t0)[15]);
-/* process-match2464 */
-t12=((C_word*)((C_word*)t0)[6])[1];
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t8,t10,t11);}
-else{
-if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[15]))){
-/* process-vector-match2466 */
-t2=((C_word*)((C_word*)t0)[4])[1];
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[15]);}
-else{
-t2=(C_word)C_i_nullp(((C_word*)t0)[15]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9449,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_9449(t4,t2);}
-else{
-t4=(C_word)C_booleanp(((C_word*)t0)[15]);
-t5=t3;
-f_9449(t5,(C_truep(t4)?t4:(C_word)C_charp(((C_word*)t0)[15])));}}}}}
-
-/* k9447 in k9333 */
-static void C_fcall f_9449(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9449,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[82],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST));}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[82],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t5);
-t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST));}}
-
-/* k9385 in k9333 */
-static void C_ccall f_9387(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9387,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9391,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9395,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t4);
-t6=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* process-match2464 */
-t7=((C_word*)((C_word*)t0)[2])[1];
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t3,t5,t6);}
-
-/* k9393 in k9385 in k9333 */
-static void C_ccall f_9395(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9389 in k9385 in k9333 */
-static void C_ccall f_9391(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k9381 in k9333 */
-static void C_ccall f_9383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9383,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t5);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST));}
-
-/* f_9201 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9201(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9201,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=t2,tmp=(C_word)a,a+=11,tmp);
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t4))){
-t5=(C_word)C_i_cddr(t2);
-t6=t3;
-f_9208(t6,(C_word)C_i_nullp(t5));}
-else{
-t5=t3;
-f_9208(t5,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_9208(t4,C_SCHEME_FALSE);}}
-
-/* k9206 */
-static void C_fcall f_9208(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9208,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9211,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* cdar */
-t3=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[10]);}
-else{
-/* ##sys#syntax-error-hook */
-t2=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[7],lf[223],((C_word*)t0)[10]);}}
-
-/* k9209 in k9206 */
-static void C_ccall f_9211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9211,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[10]);
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9256,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9260,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* process-match2464 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)((C_word*)t0)[3])[1],t1);}
-
-/* k9258 in k9209 in k9206 */
-static void C_ccall f_9260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k9254 in k9209 in k9206 */
-static void C_ccall f_9256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9256,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[10])[1],t1);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9237,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t2,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9251,a[2]=((C_word)li134),tmp=(C_word)a,a+=3,tmp);
-/* process-pattern2467 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1],t4);}
-
-/* a9250 in k9254 in k9209 in k9206 */
-static void C_ccall f_9251(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9251,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k9235 in k9254 in k9209 in k9206 */
-static void C_ccall f_9237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9237,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9245,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9249,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* meta-variables2469 */
-t4=((C_word*)((C_word*)t0)[3])[1];
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],C_fix(0),C_SCHEME_END_OF_LIST);}
-
-/* k9247 in k9235 in k9254 in k9209 in k9206 */
-static void C_ccall f_9249(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* process-template2468 */
-t2=((C_word*)((C_word*)t0)[4])[1];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t1);}
-
-/* k9243 in k9235 in k9254 in k9209 in k9206 */
-static void C_ccall f_9245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9245,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* f_9076 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9076(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[50],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9076,3,t0,t1,t2);}
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[11])[1],C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[10])[1],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[9])[1],C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[8])[1],t6);
-t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[7])[1],t8);
-t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9116,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t5,a[5]=((C_word*)t0)[5],a[6]=t10,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t12=C_SCHEME_END_OF_LIST;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_FALSE;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9120,a[2]=t11,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9142,a[2]=t13,a[3]=t18,a[4]=t15,a[5]=((C_word*)t0)[2],a[6]=((C_word)li132),tmp=(C_word)a,a+=7,tmp));
-t20=((C_word*)t18)[1];
-f_9142(t20,t16,t2);}
-
-/* loop2483 */
-static void C_fcall f_9142(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9142,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=((C_word*)((C_word*)t0)[5])[1];
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9171,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g24992500 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k9169 in loop2483 */
-static void C_ccall f_9171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9171,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop24832496 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9142(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop24832496 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_9142(t6,((C_word*)t0)[3],t5);}}
-
-/* k9118 */
-static void C_ccall f_9120(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9120,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[42],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t7=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t1,t6);}
-
-/* k9114 */
-static void C_ccall f_9116(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9116,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[7])[1],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
-t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t7));}
-
-/* f_9070 in k9066 in k9061 in k9057 in k9053 in k9049 in k9044 in k9037 in k9033 in k9028 in k9024 in k9020 in k9016 in k9012 in k9006 in k9001 in k8997 in k8993 in k8979 in ##sys#process-syntax-rules in k8970 in k8967 in k8964 in k8961 in k8958 in k8955 in k8952 in k8949 in k8946 in k8943 in k8940 in k8937 in k8934 in k8931 in k8928 in k8925 in k8922 in k8919 in k8915 in k8912 in k8909 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_9070(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9070,3,t0,t1,t2);}
-/* c2421 */
-t3=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* ##sys#mark-primitive in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8868(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8868,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8874,a[2]=t4,a[3]=((C_word)li129),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8874(t6,t1,t2);}
-
-/* loop1769 in ##sys#mark-primitive in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8874(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8874,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8897,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=(C_word)C_i_cdr(t4);
-t6=(C_word)C_i_car(t4);
-/* expand.scm: 946 ##sys#put! */
-t7=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t3,t5,lf[71],t6);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8895 in loop1769 in ##sys#mark-primitive in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8897(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8874(t3,((C_word*)t0)[2],t2);}
-
-/* ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7682(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9){
-C_word tmp;
-C_word t10;
-C_word t11;
-C_word ab[11],*a=ab;
-if(c!=10) C_bad_argc_2(c,10,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr10,(void*)f_7682,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7686,a[2]=t3,a[3]=t7,a[4]=t8,a[5]=t5,a[6]=t6,a[7]=t2,a[8]=t1,a[9]=t4,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 785 r */
-t11=t3;
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t10,lf[202]);}
-
-/* k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7686(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7686,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7689,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 786 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[201]);}
-
-/* k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7689,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7692,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* expand.scm: 787 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[200]);}
-
-/* k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7692(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7692,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7695,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
-/* expand.scm: 788 r */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[199]);}
-
-/* k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7695(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[42],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7695,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7697,a[2]=((C_word)li100),tmp=(C_word)a,a+=3,tmp));
-t11=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7706,a[2]=((C_word*)t0)[12],a[3]=((C_word)li101),tmp=(C_word)a,a+=4,tmp));
-t12=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7749,a[2]=((C_word*)t0)[12],a[3]=((C_word)li104),tmp=(C_word)a,a+=4,tmp));
-t13=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7836,a[2]=t9,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=t1,a[7]=((C_word*)t0)[11],a[8]=t5,a[9]=t3,a[10]=((C_word*)t0)[12],a[11]=t7,a[12]=((C_word)li119),tmp=(C_word)a,a+=13,tmp));
-t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8476,a[2]=((C_word*)t0)[2],a[3]=t9,a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 885 ##sys#check-syntax */
-t15=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t15+1)))(5,t15,t14,((C_word*)t0)[12],((C_word*)t0)[6],lf[198]);}
-
-/* k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8476,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8479,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 886 ##sys#current-module */
-t3=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8479(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8479,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8482,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t1)){
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8843,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t1;
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(8));
-t7=(C_word)C_i_cdr(((C_word*)t0)[8]);
-/* expand.scm: 892 append */
-t8=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t3,t6,t7);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8858,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t1;
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(7));
-t7=(C_word)C_i_cdr(((C_word*)t0)[8]);
-/* expand.scm: 895 append */
-t8=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t3,t6,t7);}}
-else{
-t3=t2;
-f_8482(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k8856 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t4=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(7),t1);}
-
-/* k8841 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8843(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t4=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(8),t1);}
-
-/* k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8482(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8482,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8485,a[2]=((C_word*)t0)[9],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8491,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word)li127),tmp=(C_word)a,a+=10,tmp));
-t7=((C_word*)t5)[1];
-f_8491(t7,t2,t3);}
-
-/* loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8491(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8491,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8499,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word)li126),tmp=(C_word)a,a+=9,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8822,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g16341635 */
-t6=t3;
-f_8499(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8820 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8491(t3,((C_word*)t0)[2],t2);}
-
-/* g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8499(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8499,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8503,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 898 import-spec */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_7836(t4,t3,t2);}
-
-/* k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8503(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8503,2,t0,t1);}
-t2=(C_word)C_i_car(t1);
-t3=(C_word)C_i_cdr(t1);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=*((C_word*)lf[9]+1);
-t7=*((C_word*)lf[9]+1);
-t8=*((C_word*)lf[9]+1);
-t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8521,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=t3,a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 905 ##sys#mark-imported-symbols */
-t10=*((C_word*)lf[197]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}
-
-/* k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8521,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8524,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8753,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[7],a[5]=((C_word)li125),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_8753(t6,t2,((C_word*)t0)[6]);}
-
-/* loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8753(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8753,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8761,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li124),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8808,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g16541655 */
-t6=t3;
-f_8761(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8806 in loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8753(t3,((C_word*)t0)[2],t2);}
-
-/* g1654 in loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8761(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8761,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8771,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t4,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 910 ##sys#get */
-t6=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,lf[71]);}
-
-/* k8769 in g1654 in loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8771(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8771,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8774,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=t2;
-f_8774(t5,t4);}
-else{
-t3=t2;
-f_8774(t3,C_SCHEME_UNDEFINED);}}
-
-/* k8772 in k8769 in g1654 in loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8774(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8774,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8801,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 913 import-env */
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k8799 in k8772 in k8769 in g1654 in loop1647 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(C_word)C_i_cdr(t2);
-t4=(C_word)C_eqp(((C_word*)t0)[3],t3);
-if(C_truep(t4)){
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}
-else{
-/* expand.scm: 915 ##sys#warn */
-t5=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],lf[196],((C_word*)t0)[4]);}}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8524(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8524,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8527,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8689,a[2]=t4,a[3]=((C_word*)t0)[10],a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_8689(t6,t2,((C_word*)t0)[8]);}
-
-/* loop1672 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8689(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8689,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8697,a[2]=((C_word*)t0)[3],a[3]=((C_word)li122),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8740,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g16791680 */
-t6=t3;
-f_8697(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8738 in loop1672 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8689(t3,((C_word*)t0)[2],t2);}
-
-/* g1679 in loop1672 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8697(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8697,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8737,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 919 macro-env */
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k8735 in g1679 in loop1672 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8737(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t4=(C_word)C_i_cdr(t2);
-t5=(C_word)C_eqp(t3,t4);
-if(C_truep(t5)){
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
-else{
-t6=(C_word)C_i_car(((C_word*)t0)[3]);
-/* expand.scm: 921 ##sys#warn */
-t7=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],lf[195],t6);}}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8527(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8527,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8530,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)t0)[5])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8555,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t4=t3;
-f_8555(2,t4,C_SCHEME_UNDEFINED);}
-else{
-/* expand.scm: 925 syntax-error */
-t4=*((C_word*)lf[129]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],lf[194]);}}
-else{
-t3=t2;
-f_8530(t3,C_SCHEME_UNDEFINED);}}
-
-/* k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[26],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8555,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8558,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8602,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[4];
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(2));
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8610,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8651,a[2]=t8,a[3]=t13,a[4]=t10,a[5]=((C_word)li121),tmp=(C_word)a,a+=6,tmp));
-t15=((C_word*)t13)[1];
-f_8651(t15,t11,((C_word*)t0)[2]);}
-
-/* loop1694 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8651(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8651,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[193]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8680,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g17101711 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8678 in loop1694 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8680,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop16941707 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8651(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop16941707 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8651(t6,((C_word*)t0)[3],t5);}}
-
-/* k8608 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8610,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8614,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8616,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li120),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_8616(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1717 in k8608 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8616(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8616,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[193]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8645,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g17331734 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8643 in loop1717 in k8608 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8645,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17171730 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8616(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17171730 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8616(t6,((C_word*)t0)[3],t5);}}
-
-/* k8612 in k8608 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 928 append */
-t2=*((C_word*)lf[58]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8600 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t4=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(2),t1);}
-
-/* k8556 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8558(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8558,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8561,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)((C_word*)t0)[3])[1]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8574,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t4=((C_word*)t0)[2];
-t5=(C_word)C_i_check_structure(t4,lf[68]);
-t6=(C_word)C_i_block_ref(t4,C_fix(9));
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,lf[82],t7);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,lf[192],t9);
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-/* expand.scm: 935 append */
-t12=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t3,t6,t11);}
-else{
-t3=((C_word*)t0)[4];
-f_8530(t3,*((C_word*)lf[9]+1));}}
-
-/* k8572 in k8556 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8574(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-/* ##sys#block-set! */
-t4=*((C_word*)lf[191]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(9),t1);}
-
-/* k8559 in k8556 in k8553 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8561(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_8530(t2,*((C_word*)lf[9]+1));}
-
-/* k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8530(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8530,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8533,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8548,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8552,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 939 import-env */
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k8550 in k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 939 append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8546 in k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 939 import-env */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8531 in k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8533,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8540,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8544,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 940 macro-env */
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k8542 in k8531 in k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 940 append */
-t2=*((C_word*)lf[58]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8538 in k8531 in k8528 in k8525 in k8522 in k8519 in k8501 in g1634 in loop1627 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 940 macro-env */
-t2=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8483 in k8480 in k8477 in k8474 in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8485(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[190]);}
-
-/* import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7836(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7836,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-/* expand.scm: 818 import-name */
-t3=((C_word*)((C_word*)t0)[11])[1];
-f_7749(t3,t1,t2);}
-else{
-t3=(C_word)C_i_listp(t2);
-t4=(C_word)C_i_not(t3);
-t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7855,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=t1,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_7855(t6,t4);}
-else{
-t6=(C_word)C_i_length(t2);
-t7=t5;
-f_7855(t7,(C_word)C_fixnum_lessp(t6,C_fix(2)));}}}
-
-/* k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7855(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7855,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* expand.scm: 820 syntax-error */
-t2=*((C_word*)lf[129]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[12],((C_word*)t0)[11],lf[180],((C_word*)t0)[10]);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[10]);
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7864,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-t4=(C_word)C_i_cadr(((C_word*)t0)[10]);
-/* expand.scm: 823 import-spec */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_7836(t5,t3,t4);}}
-
-/* k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7864,2,t0,t1);}
-t2=(C_word)C_i_car(t1);
-t3=(C_word)C_i_cdr(t1);
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7876,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t3,a[12]=t2,tmp=(C_word)a,a+=13,tmp);
-t5=(C_word)C_i_car(((C_word*)t0)[10]);
-/* expand.scm: 826 c */
-t6=((C_word*)t0)[6];
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,((C_word*)t0)[2],t5);}
-
-/* k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7876,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7879,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 827 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[7],((C_word*)t0)[9],lf[181]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_8001,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[9]);
-/* expand.scm: 838 c */
-t4=((C_word*)t0)[5];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-
-/* k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8001(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8001,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8004,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 839 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[6],((C_word*)t0)[8],lf[182]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8143,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[8]);
-/* expand.scm: 849 c */
-t4=((C_word*)t0)[4];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-
-/* k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8143,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8146,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 850 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[5],((C_word*)t0)[9],lf[187]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8322,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[9]);
-/* expand.scm: 875 c */
-t4=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-
-/* k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8322(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8322,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8325,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 876 ##sys#check-syntax */
-t3=*((C_word*)lf[54]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4],lf[188]);}
-else{
-/* expand.scm: 884 syntax-error */
-t2=*((C_word*)lf[129]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[2],lf[189],((C_word*)t0)[4]);}}
-
-/* k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8325(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8325,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8328,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_caddr(((C_word*)t0)[3]);
-/* expand.scm: 877 tostr */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_7706(t4,t2,t3);}
-
-/* k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8328(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8328,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8330,a[2]=t1,a[3]=((C_word)li116),tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8361,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8402,a[2]=t2,a[3]=t4,a[4]=t9,a[5]=t6,a[6]=((C_word)li118),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_8402(t11,t7,((C_word*)t0)[2]);}
-
-/* loop1576 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8402(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8402,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8431,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g15921593 */
-t5=((C_word*)t0)[2];
-f_8330(t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8429 in loop1576 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8431,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15761589 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8402(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15761589 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8402(t6,((C_word*)t0)[3],t5);}}
-
-/* k8359 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8361,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8365,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8367,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t8,a[5]=t5,a[6]=((C_word)li117),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_8367(t10,t6,((C_word*)t0)[2]);}
-
-/* loop1599 in k8359 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8367(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8367,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8396,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g16151616 */
-t5=((C_word*)t0)[2];
-f_8330(t5,t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8394 in loop1599 in k8359 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8396,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15991612 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8367(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15991612 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8367(t6,((C_word*)t0)[3],t5);}}
-
-/* k8363 in k8359 in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8365(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8365,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ren in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8330(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8330,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8338,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8346,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8350,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_i_car(t2);
-/* expand.scm: 881 ##sys#symbol->string */
-t7=*((C_word*)lf[172]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-
-/* k8348 in ren in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8350(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 881 ##sys#string-append */
-t2=*((C_word*)lf[170]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8344 in ren in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 880 ##sys#string->symbol */
-t2=*((C_word*)lf[66]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k8336 in ren in k8326 in k8323 in k8320 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8338,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,t1,t2));}
-
-/* k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8146(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8146,2,t0,t1);}
-t2=(C_word)C_i_cddr(((C_word*)t0)[5]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8155,a[2]=t4,a[3]=((C_word)li115),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8155(t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t2);}
-
-/* loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8155(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8155,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-if(C_truep((C_word)C_i_nullp(t2))){
-if(C_truep((C_word)C_i_nullp(t3))){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8171,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8176,a[2]=t9,a[3]=((C_word)li112),tmp=(C_word)a,a+=4,tmp));
-t11=((C_word*)t9)[1];
-f_8176(t11,t7,t6);}
-else{
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8259,a[2]=t1,a[3]=t4,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=t5,a[7]=t3,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 859 caar */
-t8=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}}
-else{
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8316,a[2]=t1,a[3]=t5,a[4]=t3,a[5]=((C_word*)t0)[2],a[6]=t4,a[7]=t2,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 866 caar */
-t8=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t2);}}
-
-/* k8314 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8316(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8316,2,t0,t1);}
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[8]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8266,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li114),tmp=(C_word)a,a+=9,tmp);
-/* g15661567 */
-t4=t3;
-f_8266(t4,((C_word*)t0)[2],t2);}
-else{
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t4=(C_word)C_i_car(((C_word*)t0)[7]);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
-/* expand.scm: 872 loop */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_8155(t6,((C_word*)t0)[2],t3,((C_word*)t0)[4],t5,((C_word*)t0)[3],((C_word*)t0)[8]);}}
-
-/* g1566 in k8314 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8266(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8266,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t4=(C_word)C_i_cadr(t2);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8294,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t1,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t4,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 869 cdar */
-t6=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[7]);}
-
-/* k8292 in g1566 in k8314 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8294(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8294,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[9]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8282,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 871 ##sys#delq */
-t5=*((C_word*)lf[185]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8280 in k8292 in g1566 in k8314 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8282(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 868 loop */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_8155(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k8257 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8259,2,t0,t1);}
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[8]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8209,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li113),tmp=(C_word)a,a+=9,tmp);
-/* g15621563 */
-t4=t3;
-f_8209(t4,((C_word*)t0)[2],t2);}
-else{
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t4=(C_word)C_i_car(((C_word*)t0)[7]);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
-/* expand.scm: 865 loop */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_8155(t6,((C_word*)t0)[2],((C_word*)t0)[4],t3,((C_word*)t0)[3],t5,((C_word*)t0)[8]);}}
-
-/* g1562 in k8257 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8209(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8209,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t4=(C_word)C_i_cadr(t2);
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8237,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=t1,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t4,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 863 cdar */
-t6=*((C_word*)lf[186]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[7]);}
-
-/* k8235 in g1562 in k8257 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8237,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[9]);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8225,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 864 ##sys#delq */
-t5=*((C_word*)lf[185]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8223 in k8235 in g1562 in k8257 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 861 loop */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_8155(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop1548 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8176(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8176,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8191,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* expand.scm: 856 ##sys#warn */
-t5=*((C_word*)lf[183]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[184],t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8189 in loop1548 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8176(t3,((C_word*)t0)[2],t2);}
-
-/* k8169 in loop in k8144 in k8141 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8171,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8004,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8007,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t7=(C_word)C_i_cddr(((C_word*)t0)[3]);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8104,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t9,a[5]=t5,a[6]=((C_word)li111),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_8104(t11,t6,t7);}
-
-/* loop1484 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8104(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8104,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8133,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g15001501 */
-f_7697(t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k8131 in loop1484 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8133,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14841497 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8104(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14841497 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_8104(t6,((C_word*)t0)[3],t5);}}
-
-/* k8005 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8007(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8007,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8012,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_8012(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* loop in k8005 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8012(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8012,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8024,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_8024(t7,t1,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8098,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 847 caar */
-t5=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k8096 in loop in k8005 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8098,2,t0,t1);}
-if(C_truep((C_word)C_i_memq(t1,((C_word*)t0)[6]))){
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* expand.scm: 847 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8012(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_car(((C_word*)t0)[5]);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[2]);
-/* expand.scm: 848 loop */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_8012(t5,((C_word*)t0)[3],t2,t4);}}
-
-/* loop in loop in k8005 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_8024(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8024,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3));}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8066,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 845 caar */
-t5=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k8064 in loop in loop in k8005 in k8002 in k7999 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_8066(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8066,2,t0,t1);}
-if(C_truep((C_word)C_i_memq(t1,((C_word*)t0)[6]))){
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* expand.scm: 845 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8024(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_car(((C_word*)t0)[5]);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[2]);
-/* expand.scm: 846 loop */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_8024(t5,((C_word*)t0)[3],t2,t4);}}
-
-/* k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7879,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7882,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t7=(C_word)C_i_cddr(((C_word*)t0)[3]);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7962,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t9,a[5]=t5,a[6]=((C_word)li108),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_7962(t11,t6,t7);}
-
-/* loop1439 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7962(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7962,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7991,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g14551456 */
-f_7697(t3,t4);}
-else{
-t3=((C_word*)((C_word*)t0)[3])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k7989 in loop1439 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7991,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14391452 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7962(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14391452 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_7962(t6,((C_word*)t0)[3],t5);}}
-
-/* k7880 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7882,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7887,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li107),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_7887(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
-
-/* loop in k7880 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7887(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(7);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7887,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,t3,t4));}
-else{
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_i_assq(t5,((C_word*)t0)[4]);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7904,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=((C_word)li105),tmp=(C_word)a,a+=7,tmp);
-/* g14721473 */
-t8=t7;
-f_7904(t8,t1,t6);}
-else{
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_assq(t7,((C_word*)t0)[2]);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7926,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=t2,a[6]=((C_word)li106),tmp=(C_word)a,a+=7,tmp);
-/* g14761477 */
-t10=t9;
-f_7926(t10,t1,t8);}
-else{
-t9=(C_word)C_i_cdr(t2);
-/* expand.scm: 837 loop */
-t13=t1;
-t14=t9;
-t15=t3;
-t16=t4;
-t1=t13;
-t2=t14;
-t3=t15;
-t4=t16;
-goto loop;}}}}
-
-/* g1476 in loop in k7880 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7926(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7926,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t4=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-/* expand.scm: 836 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_7887(t5,t1,t3,((C_word*)t0)[2],t4);}
-
-/* g1472 in loop in k7880 in k7877 in k7874 in k7862 in k7853 in import-spec in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7904(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7904,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t4=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-/* expand.scm: 833 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_7887(t5,t1,t3,t4,((C_word*)t0)[2]);}
-
-/* import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7749(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7749,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7753,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 798 ##sys#strip-syntax */
-t4=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7753,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7756,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 799 ##sys#find-module */
-t3=*((C_word*)lf[174]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,C_SCHEME_FALSE);}
-
-/* k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7756(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7756,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7759,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t3)[1])){
-t5=t4;
-f_7759(2,t5,C_SCHEME_UNDEFINED);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7771,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7830,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7834,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 802 symbol->string */
-t8=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[3]);}}
-
-/* k7832 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7834(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 802 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[179]);}
-
-/* k7828 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7830(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 801 ##sys#find-extension */
-t2=*((C_word*)lf[178]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7771(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7771,2,t0,t1);}
-if(C_truep(t1)){
-t2=*((C_word*)lf[70]+1);
-t3=*((C_word*)lf[3]+1);
-t4=*((C_word*)lf[4]+1);
-t5=*((C_word*)lf[20]+1);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7777,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t3,a[8]=t4,a[9]=t5,a[10]=t9,a[11]=t7,tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 806 ##sys#current-meta-environment */
-t11=*((C_word*)lf[4]+1);
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,t10);}
-else{
-/* expand.scm: 811 syntax-error */
-t2=*((C_word*)lf[129]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[177],((C_word*)t0)[3]);}}
-
-/* k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7777,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7780,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t3,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* expand.scm: 807 ##sys#meta-macro-environment */
-t5=*((C_word*)lf[176]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7780(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7780,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7781,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t3,a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word)li102),tmp=(C_word)a,a+=11,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7813,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7819,a[2]=((C_word*)t0)[2],a[3]=((C_word)li103),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#dynamic-wind */
-t7=*((C_word*)lf[43]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,t4,t6,t4);}
-
-/* a7818 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7819,2,t0,t1);}
-/* expand.scm: 808 ##sys#load */
-t2=*((C_word*)lf[175]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE);}
-
-/* k7811 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7813,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7817,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 809 ##sys#find-module */
-t3=*((C_word*)lf[174]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k7815 in k7811 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_7759(2,t3,t2);}
-
-/* swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7781,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7785,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* g137313741389 */
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7785,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7788,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* g137313741389 */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[10])[1]);}
-
-/* k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7788(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7788,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[10])+1,((C_word*)t0)[9]);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7792,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* g137513761390 */
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7792,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7795,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* g137513761390 */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
-
-/* k7793 in k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7795,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7799,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* g137713781391 */
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k7797 in k7793 in k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7799(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7799,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7802,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* g137713781391 */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k7800 in k7797 in k7793 in k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7802,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7806,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g137913801392 */
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k7804 in k7800 in k7797 in k7793 in k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7806,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7809,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g137913801392 */
-t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k7807 in k7804 in k7800 in k7797 in k7793 in k7790 in k7786 in k7783 in swap1370 in k7778 in k7775 in k7769 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k7757 in k7754 in k7751 in import-name in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7759,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(10));
-t5=((C_word*)((C_word*)t0)[3])[1];
-t6=(C_word)C_i_check_structure(t5,lf[68]);
-t7=(C_word)C_i_block_ref(t5,C_fix(11));
-t8=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,t4,t7));}
-
-/* tostr in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7706(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7706,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_stringp(t2))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7719,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 793 keyword? */
-t4=*((C_word*)lf[133]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}
-
-/* k7717 in tostr in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7719,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7726,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 793 ##sys#symbol->string */
-t3=*((C_word*)lf[172]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-else{
-if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[3]))){
-/* expand.scm: 794 ##sys#symbol->string */
-t2=*((C_word*)lf[172]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-if(C_truep((C_word)C_i_numberp(((C_word*)t0)[3]))){
-/* expand.scm: 795 number->string */
-C_number_to_string(3,0,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-/* expand.scm: 796 syntax-error */
-t2=*((C_word*)lf[129]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[173]);}}}}
-
-/* k7724 in k7717 in tostr in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7726(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 793 ##sys#string-append */
-t2=*((C_word*)lf[170]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[171]);}
-
-/* resolve in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7697(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7697,NULL,2,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7701,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 790 lookup */
-f_3900(t3,t2,C_SCHEME_END_OF_LIST);}
-
-/* k7699 in resolve in k7693 in k7690 in k7687 in k7684 in ##sys#expand-import in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##sys#er-transformer in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7319(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7319,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7321,a[2]=t2,a[3]=((C_word)li98),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_7321 in ##sys#er-transformer in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[17],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7321,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7324,a[2]=t3,a[3]=t6,a[4]=t8,a[5]=((C_word)li93),tmp=(C_word)a,a+=6,tmp));
-t12=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7444,a[2]=t4,a[3]=t10,a[4]=((C_word)li97),tmp=(C_word)a,a+=5,tmp));
-/* expand.scm: 779 handler */
-t13=((C_word*)t0)[2];
-((C_proc5)(void*)(*((C_word*)t13+1)))(5,t13,t1,t2,((C_word*)t8)[1],((C_word*)t10)[1]);}
-
-/* compare */
-static void C_ccall f_7444(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word *a;
-loop:
-a=C_alloc(13);
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7444,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7448,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_pairp(t2))){
-if(C_truep((C_word)C_i_pairp(t3))){
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7466,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t6=(C_word)C_i_car(t2);
-t7=(C_word)C_i_car(t3);
-/* expand.scm: 740 compare */
-t23=t5;
-t24=t6;
-t25=t7;
-t1=t23;
-t2=t24;
-t3=t25;
-c=4;
-goto loop;}
-else{
-t5=*((C_word*)lf[9]+1);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-else{
-if(C_truep((C_word)C_i_vectorp(t2))){
-if(C_truep((C_word)C_i_vectorp(t3))){
-t5=(C_word)C_i_vector_length(t2);
-t6=(C_word)C_i_vector_length(t3);
-t7=(C_word)C_eqp(t5,t6);
-if(C_truep(t7)){
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7511,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t2,a[5]=t9,a[6]=t5,a[7]=((C_word)li94),tmp=(C_word)a,a+=8,tmp));
-t11=((C_word*)t9)[1];
-f_7511(t11,t4,C_fix(0),C_SCHEME_TRUE);}
-else{
-t8=*((C_word*)lf[9]+1);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_SCHEME_FALSE);}}
-else{
-t5=*((C_word*)lf[9]+1);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-else{
-t5=(C_word)C_i_symbolp(t2);
-t6=(C_truep(t5)?(C_word)C_i_symbolp(t3):C_SCHEME_FALSE);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7556,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 750 ##sys#get */
-t8=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t2,lf[7]);}
-else{
-t7=(C_word)C_eqp(t2,t3);
-t8=*((C_word*)lf[9]+1);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t7);}}}}
-
-/* k7554 in compare */
-static void C_ccall f_7556(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7556,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7559,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_7559(t3,t1);}
-else{
-t3=((C_word*)t0)[2];
-t4=((C_word*)t0)[3];
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f18259,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 772 lookup */
-f_3900(t5,t3,t4);}}
-
-/* f18259 in k7554 in compare */
-static void C_ccall f18259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-if(C_truep(t1)){
-t3=((C_word*)t0)[3];
-f_7559(t3,t1);}
-else{
-t3=((C_word*)t0)[2];
-t4=((C_word*)t0)[3];
-f_7559(t4,t3);}}
-
-/* k7557 in k7554 in compare */
-static void C_fcall f_7559(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7559,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7562,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 753 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],lf[7]);}
-
-/* k7560 in k7557 in k7554 in compare */
-static void C_ccall f_7562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7562,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7565,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_7565(t3,t1);}
-else{
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[2];
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f18252,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 772 lookup */
-f_3900(t5,t3,t4);}}
-
-/* f18252 in k7560 in k7557 in k7554 in compare */
-static void C_ccall f18252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-if(C_truep(t1)){
-t3=((C_word*)t0)[3];
-f_7565(t3,t1);}
-else{
-t3=((C_word*)t0)[2];
-t4=((C_word*)t0)[3];
-f_7565(t4,t3);}}
-
-/* k7563 in k7560 in k7557 in k7554 in compare */
-static void C_fcall f_7565(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7565,NULL,2,t0,t1);}
-if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[3]))){
-if(C_truep((C_word)C_i_symbolp(t1))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7584,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 758 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],lf[71]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7616,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 760 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-else{
-if(C_truep((C_word)C_i_symbolp(t1))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7644,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 764 ##sys#macro-environment */
-t3=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(C_word)C_eqp(((C_word*)t0)[3],t1);
-t3=*((C_word*)lf[9]+1);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}}
-
-/* k7642 in k7563 in k7560 in k7557 in k7554 in compare */
-static void C_ccall f_7644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7644,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7629,a[2]=((C_word*)t0)[3],a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp);
-t4=f_7629(t3,t2);
-t5=*((C_word*)lf[9]+1);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t4);}
-else{
-t3=*((C_word*)lf[9]+1);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* g1313 in k7642 in k7563 in k7560 in k7557 in k7554 in compare */
-static C_word C_fcall f_7629(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_eqp(((C_word*)t0)[2],t2));}
-
-/* k7614 in k7563 in k7560 in k7557 in k7554 in compare */
-static void C_ccall f_7616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7616,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7601,a[2]=((C_word*)t0)[3],a[3]=((C_word)li95),tmp=(C_word)a,a+=4,tmp);
-t4=f_7601(t3,t2);
-t5=*((C_word*)lf[9]+1);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t4);}
-else{
-t3=*((C_word*)lf[9]+1);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* g1302 in k7614 in k7563 in k7560 in k7557 in k7554 in compare */
-static C_word C_fcall f_7601(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_eqp(t2,((C_word*)t0)[2]));}
-
-/* k7582 in k7563 in k7560 in k7557 in k7554 in compare */
-static void C_ccall f_7584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7584,2,t0,t1);}
-t2=(C_truep(t1)?t1:((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7591,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 759 ##sys#get */
-t4=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],lf[71]);}
-
-/* k7589 in k7582 in k7563 in k7560 in k7557 in k7554 in compare */
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=(C_word)C_eqp(((C_word*)t0)[4],t2);
-t4=*((C_word*)lf[9]+1);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-else{
-t2=((C_word*)t0)[2];
-t3=(C_word)C_eqp(((C_word*)t0)[4],t2);
-t4=*((C_word*)lf[9]+1);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}}
-
-/* doloop1242 in compare */
-static void C_fcall f_7511(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7511,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]);
-t5=(C_truep(t4)?t4:(C_word)C_i_not(t3));
-if(C_truep(t5)){
-t6=t3;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t6=(C_word)C_fixnum_plus(t2,C_fix(1));
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7532,a[2]=t6,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t8=(C_word)C_i_vector_ref(((C_word*)t0)[4],t2);
-t9=(C_word)C_i_vector_ref(((C_word*)t0)[3],t2);
-/* expand.scm: 747 compare */
-t10=((C_word*)((C_word*)t0)[2])[1];
-f_7444(4,t10,t7,t8,t9);}}
-
-/* k7530 in doloop1242 in compare */
-static void C_ccall f_7532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_7511(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k7464 in compare */
-static void C_ccall f_7466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* expand.scm: 741 compare */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_7444(4,t4,((C_word*)t0)[3],t2,t3);}
-else{
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k7446 in compare */
-static void C_ccall f_7448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* rename */
-static void C_ccall f_7324(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a;
-loop:
-a=C_alloc(7);
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7324,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7338,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_i_car(t2);
-/* expand.scm: 713 rename */
-t13=t3;
-t14=t4;
-t1=t13;
-t2=t14;
-c=3;
-goto loop;}
-else{
-if(C_truep((C_word)C_i_vectorp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7363,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7367,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 715 vector->list */
-t5=*((C_word*)lf[168]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-else{
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(C_word)C_i_assq(t2,((C_word*)((C_word*)t0)[3])[1]);
-if(C_truep(t3)){
-t4=t1;
-t5=*((C_word*)lf[9]+1);
-t6=t4;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_cdr(t3));}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7393,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 721 lookup */
-f_3900(t4,t2,((C_word*)t0)[2]);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}}}
-
-/* k7391 in rename */
-static void C_ccall f_7393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7393,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7397,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li92),tmp=(C_word)a,a+=6,tmp);
-/* g12051206 */
-t3=t2;
-f_7397(t3,((C_word*)t0)[2],t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7427,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 732 macro-alias */
-f_3918(t2,((C_word*)t0)[5],((C_word*)t0)[3]);}}
-
-/* k7425 in k7391 in rename */
-static void C_ccall f_7427(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7427,2,t0,t1);}
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)((C_word*)t0)[3])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[3])+1,t4);
-t6=t1;
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-
-/* g1205 in k7391 in rename */
-static void C_fcall f_7397(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7397,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=*((C_word*)lf[9]+1);
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7410,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 727 macro-alias */
-f_3918(t3,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* k7408 in g1205 in k7391 in rename */
-static void C_ccall f_7410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7410,2,t0,t1);}
-t2=*((C_word*)lf[9]+1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)((C_word*)t0)[3])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[3])+1,t4);
-t6=t1;
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-
-/* k7365 in rename */
-static void C_ccall f_7367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 715 rename */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_7324(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7361 in rename */
-static void C_ccall f_7363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 715 list->vector */
-t2=*((C_word*)lf[167]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k7336 in rename */
-static void C_ccall f_7338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7338,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7342,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 713 rename */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_7324(3,t4,t2,t3);}
-
-/* k7340 in k7336 in rename */
-static void C_ccall f_7342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7342,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* er-macro-transformer in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7316(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7316,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6844(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+18)){
-C_save_and_reclaim((void*)tr5r,(void*)f_6844r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_6844r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_6844r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a=C_alloc(18);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6846,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t3,a[9]=((C_word)li87),tmp=(C_word)a,a+=10,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7259,a[2]=t6,a[3]=((C_word)li88),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7268,a[2]=t7,a[3]=((C_word)li89),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t5))){
-/* def-culprit10591175 */
-t9=t8;
-f_7268(t9,t1);}
-else{
-t9=(C_word)C_i_car(t5);
-t10=(C_word)C_i_cdr(t5);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* def-se10601173 */
-t11=t7;
-f_7259(t11,t1,t9);}
-else{
-t11=(C_word)C_i_car(t10);
-t12=(C_word)C_i_cdr(t10);
-if(C_truep((C_word)C_i_nullp(t12))){
-/* body10571065 */
-t13=t6;
-f_6846(t13,t1,t9,t11);}
-else{
-/* ##sys#error */
-t13=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t1,lf[0],t12);}}}}
-
-/* def-culprit1059 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7268(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7268,NULL,2,t0,t1);}
-/* def-se10601173 */
-t2=((C_word*)t0)[2];
-f_7259(t2,t1,C_SCHEME_FALSE);}
-
-/* def-se1060 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7259(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7259,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7267,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 626 ##sys#current-environment */
-t4=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k7265 in def-se1060 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* body10571065 */
-t2=((C_word*)t0)[4];
-f_6846(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6846(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[37],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6846,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6849,a[2]=t7,a[3]=((C_word)li78),tmp=(C_word)a,a+=4,tmp));
-t13=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6861,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word)li79),tmp=(C_word)a,a+=8,tmp));
-t14=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6892,a[2]=((C_word*)t0)[3],a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp));
-t15=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6958,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
-t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6987,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=t1,a[5]=t3,a[6]=t9,a[7]=t11,a[8]=t5,a[9]=t7,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t2)){
-t17=C_mutate((C_word*)lf[126]+1 /* (set! syntax-error-culprit ...) */,t2);
-t18=t16;
-f_6987(t18,t17);}
-else{
-t17=t16;
-f_6987(t17,C_SCHEME_UNDEFINED);}}
-
-/* k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6987(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6987,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6992,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t3,a[7]=((C_word*)t0)[9],a[8]=((C_word)li86),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_6992(t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6992(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6992,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_vectorp(t3))){
-t4=(C_word)C_i_vector_ref(t3,C_fix(0));
-t5=(C_word)C_block_size(t3);
-t6=(C_word)C_fixnum_greaterp(t5,C_fix(1));
-t7=(C_truep(t6)?(C_word)C_i_vector_ref(t3,C_fix(1)):C_fix(0));
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7011,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t7,tmp=(C_word)a,a+=8,tmp);
-t9=(C_word)C_eqp(t5,C_fix(1));
-if(C_truep(t9)){
-t10=t8;
-f_7011(t10,C_fix(1));}
-else{
-t10=(C_word)C_fixnum_greaterp(t5,C_fix(2));
-t11=t8;
-f_7011(t11,(C_truep(t10)?(C_word)C_i_vector_ref(t3,C_fix(2)):C_fix(99999)));}}
-else{
-if(C_truep((C_word)C_immp(t3))){
-t4=(C_word)C_eqp(t3,t2);
-if(C_truep(t4)){
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-/* expand.scm: 679 err */
-t5=((C_word*)((C_word*)t0)[7])[1];
-f_6861(t5,t1,lf[142]);}}
-else{
-if(C_truep((C_word)C_i_symbolp(t3))){
-t4=t3;
-t5=(C_word)C_eqp(t4,lf[143]);
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_TRUE);}
-else{
-t6=(C_word)C_eqp(t4,lf[144]);
-if(C_truep(t6)){
-/* expand.scm: 683 test */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t7,t1,t2,*((C_word*)lf[145]+1),lf[146]);}
-else{
-t7=(C_word)C_eqp(t4,lf[147]);
-if(C_truep(t7)){
-/* expand.scm: 684 test */
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t8,t1,t2,*((C_word*)lf[148]+1),lf[149]);}
-else{
-t8=(C_word)C_eqp(t4,lf[150]);
-if(C_truep(t8)){
-/* expand.scm: 685 test */
-t9=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t9,t1,t2,*((C_word*)lf[148]+1),lf[151]);}
-else{
-t9=(C_word)C_eqp(t4,lf[152]);
-if(C_truep(t9)){
-/* expand.scm: 686 test */
-t10=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t10,t1,t2,((C_word*)((C_word*)t0)[4])[1],lf[153]);}
-else{
-t10=(C_word)C_eqp(t4,lf[154]);
-if(C_truep(t10)){
-/* expand.scm: 687 test */
-t11=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t11,t1,t2,*((C_word*)lf[155]+1),lf[156]);}
-else{
-t11=(C_word)C_eqp(t4,lf[157]);
-if(C_truep(t11)){
-/* expand.scm: 688 test */
-t12=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t12,t1,t2,*((C_word*)lf[158]+1),lf[159]);}
-else{
-t12=(C_word)C_eqp(t4,lf[160]);
-if(C_truep(t12)){
-/* expand.scm: 689 test */
-t13=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t13,t1,t2,((C_word*)((C_word*)t0)[3])[1],lf[161]);}
-else{
-t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7189,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li85),tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 691 test */
-t14=((C_word*)((C_word*)t0)[5])[1];
-f_6849(t14,t1,t2,t13,lf[162]);}}}}}}}}}
-else{
-if(C_truep((C_word)C_i_pairp(t3))){
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7230,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_i_car(t3);
-/* expand.scm: 701 walk */
-t27=t4;
-t28=t5;
-t29=t6;
-t1=t27;
-t2=t28;
-t3=t29;
-goto loop;}
-else{
-/* expand.scm: 699 err */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_6861(t4,t1,lf[163]);}}
-else{
-/* expand.scm: 698 err */
-t4=((C_word*)((C_word*)t0)[7])[1];
-f_6861(t4,t1,lf[164]);}}}}}
-
-/* k7228 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7230(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 702 walk */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_6992(t4,((C_word*)t0)[2],t2,t3);}
-
-/* a7188 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7189(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7189,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7193,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_symbolp(t2))){
-/* expand.scm: 694 lookup */
-f_3900(t3,t2,((C_word*)t0)[2]);}
-else{
-t4=t3;
-f_7193(2,t4,C_SCHEME_FALSE);}}
-
-/* k7191 in a7188 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7193(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep((C_word)C_i_symbolp(t1))){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,((C_word*)t0)[3]));}
-else{
-t2=((C_word*)t0)[2];
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,((C_word*)t0)[3]));}}
-
-/* k7009 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7011(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7011,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7016,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li84),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_7016(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
-
-/* doloop1143 in k7009 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_7016(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7016,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-if(C_truep((C_word)C_fixnum_lessp(t3,((C_word*)t0)[7]))){
-/* expand.scm: 672 err */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_6861(t5,t1,lf[139]);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7035,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[4]))){
-/* expand.scm: 674 err */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_6861(t6,t5,lf[140]);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t6=(C_word)C_i_car(t2);
-/* expand.scm: 677 walk */
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_6992(t7,t5,t6,((C_word*)t0)[2]);}
-else{
-/* expand.scm: 676 err */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_6861(t6,t5,lf[141]);}}}}
-
-/* k7033 in doloop1143 in k7009 in walk in k6985 in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_7035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_7016(t4,((C_word*)t0)[2],t2,t3);}
-
-/* proper-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6958(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6958,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6964,a[2]=((C_word)li82),tmp=(C_word)a,a+=3,tmp);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_6964(t2));}
-
-/* loop in proper-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_6964(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-loop:
-C_stack_check;
-t2=(C_word)C_eqp(t1,C_SCHEME_END_OF_LIST);
-if(C_truep(t2)){
-return(t2);}
-else{
-if(C_truep((C_word)C_i_pairp(t1))){
-t3=(C_word)C_i_cdr(t1);
-t5=t3;
-t1=t5;
-goto loop;}
-else{
-return(C_SCHEME_FALSE);}}}
-
-/* lambda-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6892(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6892,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6896,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 641 ##sys#extended-lambda-list? */
-t4=*((C_word*)lf[75]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k6894 in lambda-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6896,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6904,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li80),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_6904(t5,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* loop in k6894 in lambda-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6904(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6904,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_nullp(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-if(C_truep((C_word)C_i_symbolp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6924,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 644 keyword? */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_symbolp(t4))){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6956,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 647 keyword? */
-t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}}}
-
-/* k6954 in loop in k6894 in lambda-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 648 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_6904(t3,((C_word*)t0)[4],t2);}}
-
-/* k6922 in loop in k6894 in lambda-list? in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_not(t1));}
-
-/* err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6861(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6861,NULL,3,t0,t1,t2);}
-t3=*((C_word*)lf[126]+1);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6865,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 633 get-line-number */
-t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k6863 in err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6865(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6865,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6872,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6879,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 636 symbol->string */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6890,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 637 symbol->string */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}}
-
-/* k6888 in k6863 in err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 637 string-append */
-t2=((C_word*)t0)[4];
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[137],t1,lf[138],((C_word*)t0)[2]);}
-
-/* k6877 in k6863 in err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6879,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6883,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 636 number->string */
-C_number_to_string(3,0,t2,((C_word*)t0)[2]);}
-
-/* k6881 in k6877 in k6863 in err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 636 string-append */
-t2=((C_word*)t0)[5];
-((C_proc8)(void*)(*((C_word*)t2+1)))(8,t2,((C_word*)t0)[4],lf[134],((C_word*)t0)[3],lf[135],t1,lf[136],((C_word*)t0)[2]);}
-
-/* k6870 in k6863 in err in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6872(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 634 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* test in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6849(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6849,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6856,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 629 pred */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-
-/* k6854 in test in body1057 in ##sys#check-syntax in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6856(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* expand.scm: 629 err */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_6861(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-
-/* get-line-number in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6803(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6803,3,t0,t1,t2);}
-if(C_truep(*((C_word*)lf[125]+1))){
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_symbolp(t3))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6825,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 613 ##sys#hash-table-ref */
-t5=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,*((C_word*)lf[125]+1),t3);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k6823 in get-line-number in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6825,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6829,a[2]=((C_word*)t0)[3],a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp);
-/* g10321033 */
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_6829(t2,t1));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* g1032 in k6823 in get-line-number in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_6829(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_assq(((C_word*)t0)[2],t1);
-return((C_truep(t2)?(C_word)C_i_cdr(t2):C_SCHEME_FALSE));}
-
-/* ##sys#syntax-rules-mismatch in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6797(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6797,3,t0,t1,t2);}
-/* expand.scm: 606 ##sys#syntax-error-hook */
-t3=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[130],t2);}
-
-/* ##sys#syntax-error-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6786(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6786r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6786r(t0,t1,t2);}}
-
-static void C_ccall f_6786r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6794,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 601 ##sys#strip-syntax */
-t4=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k6792 in ##sys#syntax-error-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6794(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(5,0,((C_word*)t0)[2],*((C_word*)lf[127]+1),lf[128],t1);}
-
-/* ##sys#expand-curried-define in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6716(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6716,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6719,a[2]=t8,a[3]=t6,a[4]=((C_word)li72),tmp=(C_word)a,a+=5,tmp));
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6779,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 590 loop */
-t11=((C_word*)t8)[1];
-f_6719(t11,t10,t2,t3);}
-
-/* k6777 in ##sys#expand-curried-define in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6779,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)((C_word*)t0)[2])[1],t1));}
-
-/* loop in ##sys#expand-curried-define in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6719(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6719,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_symbolp(t4))){
-t5=(C_word)C_i_car(t2);
-t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t5);
-t7=(C_word)C_i_cdr(t2);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6745,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t9=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,t3,C_SCHEME_END_OF_LIST);}
-else{
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_i_cdr(t2);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6772,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t8=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t3,C_SCHEME_END_OF_LIST);}}
-
-/* k6770 in loop in ##sys#expand-curried-define in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6772(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6772,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[84],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* expand.scm: 589 loop */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_6719(t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* k6743 in loop in ##sys#expand-curried-define in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6745,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[84],t2));}
-
-/* match-expression in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6628(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6628,NULL,4,t1,t2,t3,t4);}
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6631,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=((C_word)li70),tmp=(C_word)a,a+=6,tmp));
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6714,a[2]=t1,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 577 mwalk */
-t11=((C_word*)t8)[1];
-f_6631(t11,t10,t2,t3);}
-
-/* k6712 in match-expression in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* mwalk in match-expression in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6631(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(6);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6631,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_pairp(t3))){
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6685,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_i_car(t3);
-/* expand.scm: 574 mwalk */
-t13=t4;
-t14=t5;
-t15=t6;
-t1=t13;
-t2=t14;
-t3=t15;
-goto loop;}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=(C_word)C_i_assq(t3,((C_word*)((C_word*)t0)[3])[1]);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6645,a[2]=t2,a[3]=((C_word)li69),tmp=(C_word)a,a+=4,tmp);
-/* g985986 */
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_6645(t5,t4));}
-else{
-if(C_truep((C_word)C_i_memq(t3,((C_word*)t0)[2]))){
-t5=(C_word)C_a_i_cons(&a,2,t3,t2);
-t6=(C_word)C_a_i_cons(&a,2,t5,((C_word*)((C_word*)t0)[3])[1]);
-t7=C_mutate(((C_word *)((C_word*)t0)[3])+1,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_TRUE);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_eqp(t2,t3));}}}}
-
-/* g985 in mwalk in match-expression in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_6645(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_i_equalp(((C_word*)t0)[2],t2));}
-
-/* k6683 in mwalk in match-expression in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* expand.scm: 575 mwalk */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_6631(t4,((C_word*)t0)[2],t2,t3);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5785(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+14)){
-C_save_and_reclaim((void*)tr3r,(void*)f_5785r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_5785r(t0,t1,t2,t3);}}
-
-static void C_ccall f_5785r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(14);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5787,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li65),tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6571,a[2]=t4,a[3]=((C_word)li66),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6576,a[2]=t5,a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-/* def-se740957 */
-t7=t6;
-f_6576(t7,t1);}
-else{
-t7=(C_word)C_i_car(t3);
-t8=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t8))){
-/* def-cs?741955 */
-t9=t5;
-f_6571(t9,t1,t7);}
-else{
-t9=(C_word)C_i_car(t8);
-t10=(C_word)C_i_cdr(t8);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* body738746 */
-t11=t4;
-f_5787(t11,t1,t7,t9);}
-else{
-/* ##sys#error */
-t11=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t1,lf[0],t10);}}}}
-
-/* def-se740 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6576(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6576,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6584,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 447 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k6582 in def-se740 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* def-cs?741955 */
-t2=((C_word*)t0)[3];
-f_6571(t2,((C_word*)t0)[2],t1);}
-
-/* def-cs?741 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6571(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6571,NULL,3,t0,t1,t2);}
-/* body738746 */
-t3=((C_word*)t0)[2];
-f_5787(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5787(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5787,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5790,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=t9,a[6]=((C_word)li59),tmp=(C_word)a,a+=7,tmp));
-t11=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6103,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t5,a[6]=((C_word)li61),tmp=(C_word)a,a+=7,tmp));
-t12=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6284,a[2]=t3,a[3]=t5,a[4]=t7,a[5]=t2,a[6]=((C_word)li64),tmp=(C_word)a,a+=7,tmp));
-/* expand.scm: 558 expand */
-t13=((C_word*)t9)[1];
-f_6284(t13,t1,((C_word*)t0)[2]);}
-
-/* expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6284(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6284,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6290,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word)li63),tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_6290(t6,t1,t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
-
-/* loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6290(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6290,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_cdr(t2);
-t9=(C_word)C_i_pairp(t7);
-t10=(C_truep(t9)?(C_word)C_i_car(t7):C_SCHEME_FALSE);
-t11=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6312,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t7,a[7]=t1,a[8]=t6,a[9]=t5,a[10]=t8,a[11]=((C_word*)t0)[5],a[12]=t4,a[13]=t3,a[14]=((C_word*)t0)[6],tmp=(C_word)a,a+=15,tmp);
-if(C_truep(t10)){
-if(C_truep((C_word)C_i_symbolp(t10))){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6554,a[2]=t10,a[3]=t11,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 516 lookup */
-f_3900(t12,t10,((C_word*)t0)[6]);}
-else{
-t12=t11;
-f_6312(t12,C_SCHEME_FALSE);}}
-else{
-t12=t11;
-f_6312(t12,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 510 fini */
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_5790(t7,t1,t3,t4,t5,t6,t2);}}
-
-/* k6552 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6554(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-f_6312(t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-
-/* k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6312(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6312,NULL,2,t0,t1);}
-if(C_truep((C_word)C_i_symbolp(t1))){
-t2=(C_word)C_eqp(lf[105],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6330,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 519 ##sys#check-syntax */
-t4=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[105],((C_word*)t0)[6],lf[119],C_SCHEME_FALSE,((C_word*)t0)[14]);}
-else{
-t3=(C_word)C_eqp(lf[113],t1);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6456,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 543 ##sys#check-syntax */
-t5=*((C_word*)lf[54]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t4,lf[113],((C_word*)t0)[6],lf[120],((C_word*)t0)[14]);}
-else{
-t4=(C_word)C_eqp(lf[104],t1);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6468,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[6],tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 546 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t6+1)))(7,t6,t5,lf[104],((C_word*)t0)[6],lf[121],C_SCHEME_FALSE,((C_word*)t0)[14]);}
-else{
-t5=(C_word)C_eqp(lf[122],t1);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6496,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 549 ##sys#check-syntax */
-t7=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t7+1)))(7,t7,t6,lf[122],((C_word*)t0)[6],lf[123],C_SCHEME_FALSE,((C_word*)t0)[14]);}
-else{
-t6=(C_word)C_i_memq(t1,((C_word*)t0)[13]);
-t7=(C_truep(t6)?t6:(C_word)C_i_memq(t1,((C_word*)t0)[9]));
-if(C_truep(t7)){
-/* expand.scm: 552 fini */
-t8=((C_word*)((C_word*)t0)[3])[1];
-f_5790(t8,((C_word*)t0)[7],((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[4]);}
-else{
-t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6522,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[3],a[11]=((C_word*)t0)[6],tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 554 ##sys#expand-0 */
-t9=*((C_word*)lf[29]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,((C_word*)t0)[6],((C_word*)t0)[14],((C_word*)t0)[2]);}}}}}}
-else{
-/* expand.scm: 517 fini */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_5790(t2,((C_word*)t0)[7],((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[4]);}}
-
-/* k6520 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6522,2,t0,t1);}
-t2=(C_word)C_eqp(((C_word*)t0)[11],t1);
-if(C_truep(t2)){
-/* expand.scm: 556 fini */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_5790(t3,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t3=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
-/* expand.scm: 557 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_6290(t4,((C_word*)t0)[9],t3,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);}}
-
-/* k6494 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6496,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6503,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 550 ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,((C_word*)t0)[2]);}
-
-/* k6501 in k6494 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6503(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 550 loop */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_6290(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6466 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6468,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[9]);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[8]);
-t4=(C_word)C_i_caddr(((C_word*)t0)[9]);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
-/* expand.scm: 547 loop */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_6290(t6,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t3,t5);}
-
-/* k6454 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6456(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 544 fini/syntax */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_6103(t2,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6330(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6330,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6335,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t3,a[10]=((C_word)li62),tmp=(C_word)a,a+=11,tmp));
-t5=((C_word*)t3)[1];
-f_6335(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6335(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6335,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cadr(t2);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(C_word)C_i_car(t3);
-if(C_truep((C_word)C_i_pairp(t4))){
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6382,a[2]=((C_word*)t0)[8],a[3]=t3,a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 531 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t6+1)))(7,t6,t5,lf[105],t2,lf[115],C_SCHEME_FALSE,((C_word*)t0)[8]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6404,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 535 ##sys#check-syntax */
-t6=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t6+1)))(7,t6,t5,lf[105],t2,lf[116],C_SCHEME_FALSE,((C_word*)t0)[8]);}}
-else{
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6348,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 523 ##sys#check-syntax */
-t5=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t5+1)))(7,t5,t4,lf[105],t2,lf[118],C_SCHEME_FALSE,((C_word*)t0)[8]);}}
-
-/* k6346 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6348,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],((C_word*)t0)[9]);
-t3=(C_word)C_i_cddr(((C_word*)t0)[8]);
-if(C_truep((C_word)C_i_pairp(t3))){
-t4=(C_word)C_i_caddr(((C_word*)t0)[8]);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
-/* expand.scm: 524 loop */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_6290(t6,((C_word*)t0)[5],((C_word*)t0)[4],t2,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t4=(C_word)C_a_i_cons(&a,2,lf[117],((C_word*)t0)[7]);
-/* expand.scm: 524 loop */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_6290(t5,((C_word*)t0)[5],((C_word*)t0)[4],t2,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k6402 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6404(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6404,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[10]);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[9]);
-t4=(C_word)C_i_cdr(((C_word*)t0)[10]);
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6431,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t4,tmp=(C_word)a,a+=10,tmp);
-t6=(C_word)C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t7=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
-
-/* k6429 in k6402 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6431,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[84],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[8]);
-/* expand.scm: 538 loop */
-t5=((C_word*)((C_word*)t0)[7])[1];
-f_6290(t5,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k6380 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6382(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6382,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6393,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 532 macro-alias */
-f_3918(t2,lf[105],((C_word*)t0)[2]);}
-
-/* k6391 in k6380 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6393,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6397,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_cddr(((C_word*)t0)[4]);
-/* expand.scm: 533 ##sys#expand-curried-define */
-t4=*((C_word*)lf[114]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,((C_word*)t0)[3],t3,((C_word*)t0)[2]);}
-
-/* k6395 in k6391 in k6380 in loop2 in k6328 in k6310 in loop in expand in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6397(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6397,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* expand.scm: 532 loop2 */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6335(t3,((C_word*)t0)[2],t2);}
-
-/* fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6103(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6103,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6111,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6113,a[2]=t9,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word)li60),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_6113(t11,t7,t6,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-
-/* loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6113(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6113,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6128,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 489 macro-alias */
-f_3918(t5,lf[109],((C_word*)t0)[3]);}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6159,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t6=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_listp(t6))){
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_length(t7);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(C_fix(3),t8))){
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6266,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 494 caar */
-t10=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}
-else{
-t9=t5;
-f_6159(t9,C_SCHEME_FALSE);}}
-else{
-t7=t5;
-f_6159(t7,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 491 loop */
-t12=t1;
-t13=t2;
-t14=t3;
-t15=C_SCHEME_TRUE;
-t1=t12;
-t2=t13;
-t3=t14;
-t4=t15;
-goto loop;}}}
-
-/* k6264 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6266,2,t0,t1);}
-if(C_truep((C_word)C_i_symbolp(t1))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6252,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6262,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 495 caar */
-t4=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-else{
-t2=((C_word*)t0)[4];
-f_6159(t2,C_SCHEME_FALSE);}}
-
-/* k6260 in k6264 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 495 lookup */
-f_3900(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k6250 in k6264 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6252,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6255,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t1)){
-t3=t1;
-t4=((C_word*)t0)[3];
-f_6159(t4,(C_word)C_eqp(lf[113],t3));}
-else{
-/* expand.scm: 495 caar */
-t3=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
-
-/* k6253 in k6250 in k6264 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_6159(t2,(C_word)C_eqp(lf[113],t1));}
-
-/* k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6159(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6159,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t4=(C_word)C_i_cadr(t2);
-if(C_truep((C_word)C_i_pairp(t4))){
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6187,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-/* expand.scm: 500 macro-alias */
-f_3918(t5,lf[113],((C_word*)t0)[2]);}
-else{
-t5=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[5]);
-/* expand.scm: 497 loop */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_6113(t6,((C_word*)t0)[3],t3,t5,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 506 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_6113(t2,((C_word*)t0)[3],((C_word*)t0)[6],((C_word*)t0)[5],C_SCHEME_TRUE);}}
-
-/* k6185 in k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6187,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6195,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 501 caadr */
-t3=*((C_word*)lf[112]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k6193 in k6185 in k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6195(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6195,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6207,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 502 macro-alias */
-f_3918(t2,lf[111],((C_word*)t0)[2]);}
-
-/* k6205 in k6193 in k6185 in k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6207,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6215,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 502 cdadr */
-t3=*((C_word*)lf[110]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6213 in k6205 in k6193 in k6185 in k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6215(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6215,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6219,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t3=(C_word)C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k6217 in k6213 in k6205 in k6193 in k6185 in k6157 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6219,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,((C_word*)t0)[5]);
-/* expand.scm: 497 loop */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_6113(t8,((C_word*)t0)[3],((C_word*)t0)[2],t7,C_SCHEME_FALSE);}
-
-/* k6126 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6128(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6128,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6136,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6144,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 490 reverse */
-t4=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k6142 in k6126 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6144(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 490 map */
-t2=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],*((C_word*)lf[108]+1),t1);}
-
-/* k6134 in k6126 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6136(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6136,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6140,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k6138 in k6134 in k6126 in loop in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6140,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST));}
-
-/* k6109 in fini/syntax in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 486 fini */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5790(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5790(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5790,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(C_word)C_i_nullp(t2);
-t8=(C_truep(t7)?(C_word)C_i_nullp(t4):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5802,a[2]=t6,a[3]=((C_word*)t0)[3],a[4]=t10,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word)li53),tmp=(C_word)a,a+=8,tmp));
-t12=((C_word*)t10)[1];
-f_5802(t12,t1,t6,C_SCHEME_END_OF_LIST);}
-else{
-t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5893,a[2]=t3,a[3]=t4,a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[2],a[7]=t6,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 465 reverse */
-t10=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}}
-
-/* k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5893,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5907,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6051,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-C_apply(5,0,t7,*((C_word*)lf[52]+1),t1,((C_word*)t0)[3]);}
-
-/* k6049 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6051(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6051,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6053,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li58),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_6053(t5,((C_word*)t0)[2],t1);}
-
-/* loop793 in k6049 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_6053(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6053,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_a_i_list(&a,1,lf[107]);
-t5=(C_word)C_a_i_list(&a,2,t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop793806 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop793806 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5907(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5907,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5911,a[2]=((C_word*)t0)[9],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5915,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6031,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6047,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 470 reverse */
-t6=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k6045 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6047(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 470 map */
-t2=((C_word*)t0)[5];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a6030 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6031(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6031,4,t0,t1,t2,t3);}
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[63],t5));}
-
-/* k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5915,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5919,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5923,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5929,a[2]=((C_word*)t0)[5],a[3]=((C_word)li56),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6025,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 480 reverse */
-t6=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k6023 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6025,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6029,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 481 reverse */
-t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k6027 in k6023 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 471 map */
-t2=((C_word*)t0)[5];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5929(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[18],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_5929,4,t0,t1,t2,t3);}
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5933,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5988,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li55),tmp=(C_word)a,a+=6,tmp));
-t12=((C_word*)t10)[1];
-f_5988(t12,t8,t2);}
-
-/* loop826 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5988(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5988,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[12]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6017,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g842843 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k6015 in loop826 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_6017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6017,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop826839 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5988(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop826839 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5988(t6,((C_word*)t0)[3],t5);}}
-
-/* k5931 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5933,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
-t4=(C_word)C_a_i_cons(&a,2,lf[84],t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5960,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5964,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5966,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 477 map */
-t8=((C_word*)t0)[3];
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t6,t7,((C_word*)t0)[2],t1);}
-
-/* a5965 in k5931 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5966(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_5966,4,t0,t1,t2,t3);}
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[63],t5));}
-
-/* k5962 in k5931 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5964(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k5958 in k5931 in a5928 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5960,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[84],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[106],t5));}
-
-/* k5921 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5923,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5927,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k5925 in k5921 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k5917 in k5913 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k5909 in k5905 in k5891 in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5911,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[48],t2);
-t4=*((C_word*)lf[9]+1);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-
-/* loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5802(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5802,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5821,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-if(C_truep((C_word)C_i_pairp(t4))){
-t6=(C_word)C_i_car(t4);
-if(C_truep((C_word)C_i_symbolp(t6))){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5866,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5883,a[2]=t6,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 459 lookup */
-f_3900(t8,t6,((C_word*)t0)[3]);}
-else{
-t7=t5;
-f_5821(t7,C_SCHEME_FALSE);}}
-else{
-t6=t5;
-f_5821(t6,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[103],((C_word*)t0)[2]));}}
-
-/* k5881 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_5866(t3,(C_word)C_eqp(t2,lf[105]));}
-else{
-t2=((C_word*)t0)[3];
-f_5866(t2,(C_word)C_eqp(((C_word*)t0)[2],lf[105]));}}
-
-/* k5864 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5866(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5866,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_5821(t2,t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5876,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 460 lookup */
-f_3900(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k5874 in k5864 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[3];
-f_5821(t3,(C_word)C_eqp(t2,lf[104]));}
-else{
-t2=((C_word*)t0)[3];
-f_5821(t2,(C_word)C_eqp(((C_word*)t0)[2],lf[104]));}}
-
-/* k5819 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5821(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5821,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5828,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5832,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 463 reverse */
-t4=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[4]);
-/* expand.scm: 464 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5802(t4,((C_word*)t0)[8],t2,t3);}}
-
-/* k5830 in k5819 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5832(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5832,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5840,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 463 expand */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_6284(t3,t2,((C_word*)t0)[2]);}
-
-/* k5838 in k5830 in k5819 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5840,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
-/* expand.scm: 463 ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k5826 in k5819 in loop in fini in body738 in ##sys#canonicalize-body in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5828,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
-
-/* ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5157(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[19],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_5157,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5160,a[2]=t2,a[3]=t4,a[4]=((C_word)li48),tmp=(C_word)a,a+=5,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5177,a[2]=t2,a[3]=t1,a[4]=t5,a[5]=t6,a[6]=t3,a[7]=((C_word*)t0)[2],a[8]=t10,a[9]=t8,tmp=(C_word)a,a+=10,tmp);
-/* expand.scm: 354 macro-alias */
-f_3918(t11,lf[100],t5);}
-
-/* k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5177(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5177,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 356 macro-alias */
-f_3918(t2,lf[99],((C_word*)t0)[4]);}
-
-/* k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5180,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5183,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* expand.scm: 357 macro-alias */
-f_3918(t2,lf[98],((C_word*)t0)[4]);}
-
-/* k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5183,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5186,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-/* expand.scm: 358 macro-alias */
-f_3918(t2,lf[97],((C_word*)t0)[4]);}
-
-/* k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5186,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5189,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
-/* expand.scm: 359 macro-alias */
-f_3918(t2,lf[47],((C_word*)t0)[4]);}
-
-/* k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5189,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5194,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word)li51),tmp=(C_word)a,a+=15,tmp));
-t5=((C_word*)t3)[1];
-f_5194(t5,((C_word*)t0)[3],C_fix(0),C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,((C_word*)t0)[2]);}
-
-/* loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5194(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word *a;
-loop:
-a=C_alloc(18);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_5194,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5208,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=t5,a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=t1,a[13]=t4,tmp=(C_word)a,a+=14,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[13])[1])){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5495,a[2]=((C_word*)t0)[13],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 367 reverse */
-t9=((C_word*)t0)[8];
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t3);}
-else{
-/* expand.scm: 367 reverse */
-t8=((C_word*)t0)[8];
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}}
-else{
-if(C_truep((C_word)C_i_symbolp(t6))){
-if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(2)))){
-/* expand.scm: 395 err */
-t7=((C_word*)t0)[4];
-f_5160(t7,t1,lf[86]);}
-else{
-if(C_truep(((C_word*)((C_word*)t0)[13])[1])){
-t7=C_mutate(((C_word *)((C_word*)t0)[10])+1,t6);
-/* expand.scm: 399 loop */
-t16=t1;
-t17=C_fix(4);
-t18=t3;
-t19=t4;
-t20=C_SCHEME_END_OF_LIST;
-t21=C_SCHEME_END_OF_LIST;
-t1=t16;
-t2=t17;
-t3=t18;
-t4=t19;
-t5=t20;
-t6=t21;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[13])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[10])+1,t6);
-/* expand.scm: 399 loop */
-t16=t1;
-t17=C_fix(4);
-t18=t3;
-t19=t4;
-t20=C_SCHEME_END_OF_LIST;
-t21=C_SCHEME_END_OF_LIST;
-t1=t16;
-t2=t17;
-t3=t18;
-t4=t19;
-t5=t20;
-t6=t21;
-goto loop;}}}
-else{
-if(C_truep((C_word)C_i_pairp(t6))){
-t7=(C_word)C_i_car(t6);
-t8=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5536,a[2]=t5,a[3]=t4,a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[4],a[8]=t3,a[9]=t1,a[10]=((C_word*)t0)[3],a[11]=t2,a[12]=t6,a[13]=t7,tmp=(C_word)a,a+=14,tmp);
-if(C_truep((C_word)C_i_symbolp(t7))){
-t9=(C_word)C_eqp(C_fix(3),t2);
-if(C_truep(t9)){
-t10=t8;
-f_5536(2,t10,C_SCHEME_FALSE);}
-else{
-/* expand.scm: 404 lookup */
-f_3900(t8,t7,((C_word*)t0)[2]);}}
-else{
-t9=t8;
-f_5536(2,t9,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 401 err */
-t7=((C_word*)t0)[4];
-f_5160(t7,t1,lf[96]);}}}}
-
-/* k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5536(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5536,2,t0,t1);}
-t2=(C_truep(t1)?t1:((C_word*)t0)[13]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[12]);
-t4=(C_word)C_eqp(t2,lf[77]);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5551,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t6=t5;
-f_5551(t6,C_SCHEME_UNDEFINED);}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5567,a[2]=t5,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 408 macro-alias */
-f_3918(t6,lf[88],((C_word*)t0)[5]);}}
-else{
-t5=(C_word)C_eqp(t2,lf[76]);
-if(C_truep(t5)){
-if(C_truep((C_word)C_fixnum_less_or_equal_p(((C_word*)t0)[11],C_fix(1)))){
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5585,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[4],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
-if(C_truep((C_word)C_i_pairp(t3))){
-t7=(C_word)C_i_car(t3);
-t8=t6;
-f_5585(t8,(C_word)C_i_symbolp(t7));}
-else{
-t7=t6;
-f_5585(t7,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 420 err */
-t6=((C_word*)t0)[7];
-f_5160(t6,((C_word*)t0)[9],lf[90]);}}
-else{
-t6=(C_word)C_eqp(t2,lf[78]);
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5631,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-t8=((C_word*)((C_word*)t0)[6])[1];
-if(C_truep(t8)){
-t9=t7;
-f_5631(t9,C_SCHEME_UNDEFINED);}
-else{
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5650,a[2]=t7,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 422 macro-alias */
-f_3918(t9,lf[88],((C_word*)t0)[5]);}}
-else{
-if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[13]))){
-t7=((C_word*)t0)[11];
-switch(t7){
-case C_fix(0):
-t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],((C_word*)t0)[8]);
-/* expand.scm: 429 loop */
-t9=((C_word*)((C_word*)t0)[10])[1];
-f_5194(t9,((C_word*)t0)[9],C_fix(0),t8,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t3);
-case C_fix(1):
-t8=(C_word)C_a_i_list(&a,2,((C_word*)t0)[13],C_SCHEME_FALSE);
-t9=(C_word)C_a_i_cons(&a,2,t8,((C_word*)t0)[3]);
-/* expand.scm: 430 loop */
-t10=((C_word*)((C_word*)t0)[10])[1];
-f_5194(t10,((C_word*)t0)[9],C_fix(1),((C_word*)t0)[8],t9,C_SCHEME_END_OF_LIST,t3);
-case C_fix(2):
-/* expand.scm: 431 err */
-t8=((C_word*)t0)[7];
-f_5160(t8,((C_word*)t0)[9],lf[92]);
-default:
-t8=(C_word)C_a_i_list(&a,1,((C_word*)t0)[13]);
-t9=(C_word)C_a_i_cons(&a,2,t8,((C_word*)t0)[2]);
-/* expand.scm: 432 loop */
-t10=((C_word*)((C_word*)t0)[10])[1];
-f_5194(t10,((C_word*)t0)[9],C_fix(3),((C_word*)t0)[8],((C_word*)t0)[3],t9,t3);}}
-else{
-t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5712,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-if(C_truep((C_word)C_i_listp(((C_word*)t0)[13]))){
-t8=(C_word)C_i_length(((C_word*)t0)[13]);
-t9=t7;
-f_5712(t9,(C_word)C_eqp(C_fix(2),t8));}
-else{
-t8=t7;
-f_5712(t8,C_SCHEME_FALSE);}}}}}}
-
-/* k5710 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5712(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5712,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[10];
-switch(t2){
-case C_fix(0):
-/* expand.scm: 435 err */
-t3=((C_word*)t0)[9];
-f_5160(t3,((C_word*)t0)[8],lf[93]);
-case C_fix(1):
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
-/* expand.scm: 436 loop */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_5194(t4,((C_word*)t0)[8],C_fix(1),((C_word*)t0)[4],t3,C_SCHEME_END_OF_LIST,((C_word*)t0)[3]);
-case C_fix(2):
-/* expand.scm: 437 err */
-t3=((C_word*)t0)[9];
-f_5160(t3,((C_word*)t0)[8],lf[94]);
-default:
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)t0)[2]);
-/* expand.scm: 438 loop */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_5194(t4,((C_word*)t0)[8],C_fix(3),((C_word*)t0)[4],((C_word*)t0)[6],t3,((C_word*)t0)[3]);}}
-else{
-/* expand.scm: 439 err */
-t2=((C_word*)t0)[9];
-f_5160(t2,((C_word*)t0)[8],lf[95]);}}
-
-/* k5648 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_5631(t3,t2);}
-
-/* k5629 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5631(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep((C_word)C_fixnum_less_or_equal_p(((C_word*)t0)[8],C_fix(3)))){
-/* expand.scm: 424 loop */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_5194(t2,((C_word*)t0)[6],C_fix(3),((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,((C_word*)t0)[3]);}
-else{
-/* expand.scm: 425 err */
-t2=((C_word*)t0)[2];
-f_5160(t2,((C_word*)t0)[6],lf[91]);}}
-
-/* k5583 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5585(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5585,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5588,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)((C_word*)t0)[3])[1];
-if(C_truep(t3)){
-t4=t2;
-f_5588(t4,C_SCHEME_UNDEFINED);}
-else{
-t4=(C_word)C_i_car(((C_word*)t0)[9]);
-t5=C_mutate(((C_word *)((C_word*)t0)[3])+1,t4);
-t6=t2;
-f_5588(t6,t5);}}
-else{
-/* expand.scm: 419 err */
-t2=((C_word*)t0)[2];
-f_5160(t2,((C_word*)t0)[6],lf[89]);}}
-
-/* k5586 in k5583 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5588(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t4=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* expand.scm: 418 loop */
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_5194(t5,((C_word*)t0)[4],C_fix(2),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t4);}
-
-/* k5565 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_5551(t3,t2);}
-
-/* k5549 in k5534 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5551(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_eqp(((C_word*)t0)[7],C_fix(0));
-if(C_truep(t2)){
-/* expand.scm: 410 loop */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_5194(t3,((C_word*)t0)[5],C_fix(1),((C_word*)t0)[4],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,((C_word*)t0)[3]);}
-else{
-/* expand.scm: 411 err */
-t3=((C_word*)t0)[2];
-f_5160(t3,((C_word*)t0)[5],lf[87]);}}
-
-/* k5493 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5495(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 367 ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5208,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5212,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=t1,a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[7]))){
-t3=t2;
-f_5212(t3,((C_word*)t0)[3]);}
-else{
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5375,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5383,a[2]=t7,a[3]=t4,a[4]=t6,a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 379 reverse */
-t9=((C_word*)t0)[5];
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,((C_word*)t0)[7]);}}
-
-/* k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5383,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5385,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li50),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_5385(t5,((C_word*)t0)[2],t1);}
-
-/* loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5385(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5385,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5412,a[2]=((C_word*)t0)[5],a[3]=((C_word)li49),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5484,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g628629 */
-t6=t3;
-f_5412(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k5482 in loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5484(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5484,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop612625 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5385(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop612625 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_5385(t6,((C_word*)t0)[3],t5);}}
-
-/* g628 in loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5412(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5412,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5481,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_slot(t3,C_fix(1));
-/* expand.scm: 351 string->keyword */
-t6=*((C_word*)lf[85]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* k5479 in g628 in loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5481(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5481,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,lf[82],t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5443,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_i_cdr(((C_word*)t0)[2]);
-if(C_truep((C_word)C_i_pairp(t5))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5465,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t7=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* ##sys#append */
-t8=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t7,C_SCHEME_END_OF_LIST);}
-else{
-/* ##sys#append */
-t6=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-
-/* k5463 in k5479 in g628 in loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5465(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5465,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[84],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
-
-/* k5441 in k5479 in g628 in loop612 in k5381 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5443,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=(C_word)C_a_i_cons(&a,2,lf[83],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-
-/* k5373 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5375(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5375,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5379,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k5377 in k5373 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5379,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
-t4=((C_word*)t0)[2];
-f_5212(t4,(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST));}
-
-/* k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5212(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5212,NULL,2,t0,t1);}
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[12]))){
-t2=t1;
-/* expand.scm: 366 values */
-C_values(4,0,((C_word*)t0)[11],((C_word*)t0)[10],t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5224,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[12],a[8]=t1,a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[8],a[13]=((C_word*)t0)[9],tmp=(C_word)a,a+=14,tmp);
-t3=((C_word*)((C_word*)t0)[6])[1];
-if(C_truep(t3)){
-t4=t2;
-f_5224(t4,C_SCHEME_FALSE);}
-else{
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[5]))){
-t4=(C_word)C_i_cdr(((C_word*)t0)[12]);
-t5=t2;
-f_5224(t5,(C_word)C_i_nullp(t4));}
-else{
-t4=t2;
-f_5224(t4,C_SCHEME_FALSE);}}}}
-
-/* k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5224(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5224,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5251,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 384 caar */
-t3=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}
-else{
-t2=((C_word*)((C_word*)t0)[6])[1];
-t3=(C_truep(t2)?C_SCHEME_FALSE:(C_word)C_i_nullp(((C_word*)t0)[5]));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5296,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 388 reverse */
-t5=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[7]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5319,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5327,a[2]=((C_word*)t0)[13],a[3]=t4,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 391 reverse */
-t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[7]);}}}
-
-/* k5325 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5327(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5327,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[4])[1];
-if(C_truep(t2)){
-t3=(C_word)C_a_i_list(&a,1,t2);
-/* expand.scm: 391 ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[3],t1,t3);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=(C_word)C_a_i_list(&a,1,t3);
-/* expand.scm: 391 ##sys#append */
-t5=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],t1,t4);}}
-
-/* k5317 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5319,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5323,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k5321 in k5317 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5323(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5323,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-/* expand.scm: 366 values */
-C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
-
-/* k5294 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5296(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5296,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5300,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* ##sys#append */
-t3=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k5298 in k5294 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5300,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-/* expand.scm: 366 values */
-C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
-
-/* k5249 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5251,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5271,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* expand.scm: 384 cadar */
-t3=*((C_word*)lf[81]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k5269 in k5249 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5271,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[8])[1],t2);
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5243,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-/* ##sys#append */
-t9=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k5241 in k5269 in k5249 in k5222 in k5210 in k5206 in loop in k5187 in k5184 in k5181 in k5178 in k5175 in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5243,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-/* expand.scm: 366 values */
-C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* err in ##sys#expand-extended-lambda-list in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5160(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5160,NULL,3,t0,t1,t2);}
-/* expand.scm: 350 errh */
-t3=((C_word*)t0)[3];
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,((C_word*)t0)[2]);}
-
-/* ##sys#extended-lambda-list? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5114(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5114,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5120,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_5120(t2));}
-
-/* loop in ##sys#extended-lambda-list? in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_5120(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_i_pairp(t1))){
-t2=(C_word)C_slot(t1,C_fix(0));
-t3=(C_word)C_eqp(t2,lf[76]);
-if(C_truep(t3)){
-if(C_truep(t3)){
-return(C_SCHEME_TRUE);}
-else{
-t4=(C_word)C_i_cdr(t1);
-t10=t4;
-t1=t10;
-goto loop;}}
-else{
-t4=(C_word)C_eqp(t2,lf[77]);
-if(C_truep(t4)){
-if(C_truep(t4)){
-return(C_SCHEME_TRUE);}
-else{
-t5=(C_word)C_i_cdr(t1);
-t10=t5;
-t1=t10;
-goto loop;}}
-else{
-t5=(C_word)C_eqp(t2,lf[78]);
-if(C_truep(t5)){
-return(C_SCHEME_TRUE);}
-else{
-t6=(C_word)C_i_cdr(t1);
-t10=t6;
-t1=t10;
-goto loop;}}}}
-else{
-return(C_SCHEME_FALSE);}}
-
-/* ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5028(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+12)){
-C_save_and_reclaim((void*)tr3r,(void*)f_5028r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_5028r(t0,t1,t2,t3);}}
-
-static void C_ccall f_5028r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(12);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5030,a[2]=t2,a[3]=((C_word)li42),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5056,a[2]=t4,a[3]=((C_word)li43),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5061,a[2]=t5,a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-/* def-se524548 */
-t7=t6;
-f_5061(t7,t1);}
-else{
-t7=(C_word)C_i_car(t3);
-t8=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t8))){
-/* def-cs?525546 */
-t9=t5;
-f_5056(t9,t1,t7);}
-else{
-t9=(C_word)C_i_car(t8);
-t10=(C_word)C_i_cdr(t8);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* body522530 */
-t11=t4;
-f_5030(t11,t1,t7,t9);}
-else{
-/* ##sys#error */
-t11=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t1,lf[0],t10);}}}}
-
-/* def-se524 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5061(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5061,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5069,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 317 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k5067 in def-se524 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5069(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* def-cs?525546 */
-t2=((C_word*)t0)[3];
-f_5056(t2,((C_word*)t0)[2],t1);}
-
-/* def-cs?525 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5056(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5056,NULL,3,t0,t1,t2);}
-/* body522530 */
-t3=((C_word*)t0)[2];
-f_5030(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body522 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5030(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5030,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5036,a[2]=t5,a[3]=t3,a[4]=t2,a[5]=((C_word)li41),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_5036(t7,t1,((C_word*)t0)[2]);}
-
-/* loop in body522 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_5036(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5036,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5042,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word)li39),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5048,a[2]=((C_word*)t0)[2],a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a5047 in loop in body522 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5048(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_5048,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-/* expand.scm: 321 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_5036(t4,t1,t2);}
-else{
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* a5041 in loop in body522 in ##sys#expand in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5042(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5042,2,t0,t1);}
-/* expand.scm: 319 ##sys#expand-0 */
-t2=*((C_word*)lf[29]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4927,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4930,a[2]=t3,a[3]=((C_word)li36),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4964,a[2]=t4,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 297 ##sys#qualified-symbol? */
-t6=*((C_word*)lf[13]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-
-/* k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4964(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4964,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4967,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 298 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[71]);}}
-
-/* k4965 in k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4967,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=t1;
-t4=*((C_word*)lf[9]+1);
-t5=t2;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4984,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 302 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],lf[72]);}}
-
-/* k4982 in k4965 in k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4984(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4984,2,t0,t1);}
-if(C_truep(t1)){
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[4];
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5026,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 305 ##sys#current-environment */
-t3=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k5024 in k4982 in k4965 in k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5026,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4994,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word)li37),tmp=(C_word)a,a+=5,tmp);
-/* g496497 */
-t4=t3;
-f_4994(t4,((C_word*)t0)[2],t2);}
-else{
-/* expand.scm: 312 mrename */
-t3=((C_word*)t0)[3];
-f_4930(t3,((C_word*)t0)[2],((C_word*)t0)[4]);}}
-
-/* g496 in k5024 in k4982 in k4965 in k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4994(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4994,NULL,3,t0,t1,t2);}
-t3=*((C_word*)lf[9]+1);
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t4))){
-/* expand.scm: 310 mrename */
-t5=((C_word*)t0)[3];
-f_4930(t5,t1,((C_word*)t0)[2]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5013,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 311 ##sys#get */
-t6=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,lf[71]);}}
-
-/* k5011 in g496 in k5024 in k4982 in k4965 in k4962 in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_5013(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-
-/* mrename in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4930(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4930,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4934,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 291 ##sys#current-module */
-t4=*((C_word*)lf[70]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k4932 in mrename in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4934,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4938,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li35),tmp=(C_word)a,a+=5,tmp);
-/* g479480 */
-t3=t2;
-f_4938(t3,((C_word*)t0)[2],t1);}
-else{
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* g479 in k4932 in mrename in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4938(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4938,NULL,3,t0,t1,t2);}
-t3=*((C_word*)lf[9]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4945,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t5=t4;
-f_4945(2,t5,C_SCHEME_UNDEFINED);}
-else{
-/* expand.scm: 294 ##sys#register-undefined */
-t5=*((C_word*)lf[69]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[3],t2);}}
-
-/* k4943 in g479 in k4932 in mrename in ##sys#alias-global-hook in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=((C_word*)t0)[4];
-t3=(C_word)C_i_check_structure(t2,lf[68]);
-t4=(C_word)C_i_block_ref(t2,C_fix(1));
-/* expand.scm: 295 ##sys#module-rename */
-t5=*((C_word*)lf[65]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-
-/* ##sys#module-rename in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4909,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4917,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(C_word)C_slot(t3,C_fix(1));
-t6=(C_word)C_slot(t2,C_fix(1));
-/* expand.scm: 284 string-append */
-t7=*((C_word*)lf[33]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t4,t5,lf[67],t6);}
-
-/* k4915 in ##sys#module-rename in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4917(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 283 ##sys#string->symbol */
-t2=*((C_word*)lf[66]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4334(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[22],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4334,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4337,a[2]=t3,a[3]=((C_word)li27),tmp=(C_word)a,a+=4,tmp));
-t10=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4539,a[2]=t6,a[3]=((C_word)li28),tmp=(C_word)a,a+=4,tmp));
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4585,a[2]=t4,a[3]=t6,a[4]=t12,a[5]=t8,a[6]=t3,a[7]=((C_word)li32),tmp=(C_word)a,a+=8,tmp));
-t14=((C_word*)t12)[1];
-f_4585(t14,t1,t2);}
-
-/* loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4585(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4585,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_symbolp(t3))){
-t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t1,a[9]=t4,a[10]=t3,tmp=(C_word)a,a+=11,tmp);
-/* expand.scm: 240 lookup */
-f_3900(t5,t3,((C_word*)t0)[6]);}
-else{
-/* expand.scm: 276 values */
-C_values(4,0,t1,t2,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 277 values */
-C_values(4,0,t1,t2,C_SCHEME_FALSE);}}
-
-/* k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4607,2,t0,t1);}
-t2=(C_truep(t1)?t1:((C_word*)t0)[10]);
-t3=t2;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4613,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-if(C_truep((C_word)C_i_pairp(((C_word*)t4)[1]))){
-t6=t5;
-f_4613(t6,C_SCHEME_UNDEFINED);}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4892,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4899,a[2]=t4,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 242 ##sys#macro-environment */
-t8=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}}
-
-/* k4897 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 242 lookup */
-f_3900(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
-
-/* k4890 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-f_4613(t4,t3);}
-else{
-t2=((C_word*)((C_word*)t0)[3])[1];
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-f_4613(t4,t3);}}
-
-/* k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4613(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4613,NULL,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[11])[1];
-if(C_truep((C_truep((C_word)C_eqp(t2,lf[47]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t2,lf[48]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4622,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 244 ##sys#check-syntax */
-t4=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[47],((C_word*)t0)[10],lf[56],C_SCHEME_FALSE,((C_word*)t0)[8]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4784,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t4=((C_word*)((C_word*)t0)[11])[1];
-if(C_truep((C_truep((C_word)C_eqp(t4,lf[59]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[63]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[10]))){
-t5=(C_word)C_i_car(((C_word*)t0)[10]);
-t6=t3;
-f_4784(t6,(C_word)C_i_pairp(t5));}
-else{
-t5=t3;
-f_4784(t5,C_SCHEME_FALSE);}}
-else{
-t5=t3;
-f_4784(t5,C_SCHEME_FALSE);}}}
-
-/* k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4784(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4784,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4790,a[2]=((C_word*)t0)[11],a[3]=t2,a[4]=((C_word*)t0)[10],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 261 ##sys#check-syntax */
-t4=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[59],((C_word*)t0)[11],lf[60],C_SCHEME_FALSE,((C_word*)t0)[9]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4820,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)t0)[2])){
-if(C_truep((C_word)C_i_symbolp(((C_word*)((C_word*)t0)[5])[1]))){
-/* expand.scm: 267 ##sys#get */
-t3=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[5])[1],lf[62]);}
-else{
-t3=t2;
-f_4820(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=t2;
-f_4820(2,t3,C_SCHEME_FALSE);}}}
-
-/* k4818 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4820(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4820,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4824,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word)li31),tmp=(C_word)a,a+=9,tmp);
-/* g439440 */
-t3=t2;
-f_4824(t3,((C_word*)t0)[2],t1);}
-else{
-/* expand.scm: 275 expand */
-t2=((C_word*)((C_word*)t0)[7])[1];
-f_4539(t2,((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)((C_word*)t0)[5])[1]);}}
-
-/* g439 in k4818 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4824(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4824,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4828,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t4=(C_word)C_i_car(t2);
-t5=(C_word)C_i_cdr(t2);
-/* expand.scm: 269 call-handler */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_4337(t6,t3,((C_word*)t0)[5],t4,((C_word*)t0)[7],t5,C_SCHEME_TRUE);}
-
-/* k4826 in g439 in k4818 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4828,2,t0,t1);}
-t2=(C_word)C_eqp(t1,((C_word*)t0)[7]);
-if(C_truep(t2)){
-/* expand.scm: 270 expand */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_4539(t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[7],((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4840,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(*((C_word*)lf[61]+1))){
-/* expand.scm: 273 ##sys#compiler-syntax-hook */
-t4=*((C_word*)lf[61]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],t1);}
-else{
-/* expand.scm: 274 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_4585(t4,((C_word*)t0)[5],t1);}}}
-
-/* k4838 in k4826 in g439 in k4818 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 274 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_4585(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k4788 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4790,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4797,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-t4=(C_word)C_a_i_list(&a,2,lf[57],t3);
-t5=(C_word)C_a_i_list(&a,1,t4);
-t6=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t7=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* expand.scm: 263 append */
-t8=*((C_word*)lf[58]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t2,t5,t6,t7);}
-
-/* k4795 in k4788 in k4782 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 262 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4622,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4634,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 247 ##sys#check-syntax */
-t4=*((C_word*)lf[54]+1);
-((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[47],((C_word*)t0)[5],lf[55],C_SCHEME_FALSE,((C_word*)t0)[3]);}
-else{
-/* expand.scm: 256 values */
-C_values(4,0,((C_word*)t0)[4],((C_word*)t0)[2],C_SCHEME_FALSE);}}
-
-/* k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4634,2,t0,t1);}
-t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4727,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4737,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li30),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_4737(t11,t7,t2);}
-
-/* loop381 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4737(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_4737,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop381394 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop381394 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4727(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4727,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4731,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=(C_word)C_i_cddr(((C_word*)t0)[2]);
-/* ##sys#append */
-t4=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-
-/* k4729 in k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[43],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4731,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[49],t2);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
-t8=(C_word)C_a_i_cons(&a,2,t6,t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[50],t8);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4656,a[2]=((C_word*)t0)[3],a[3]=t9,tmp=(C_word)a,a+=4,tmp);
-t11=C_SCHEME_END_OF_LIST;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_FALSE;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4660,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4662,a[2]=t12,a[3]=t17,a[4]=t14,a[5]=((C_word)li29),tmp=(C_word)a,a+=6,tmp));
-t19=((C_word*)t17)[1];
-f_4662(t19,t15,((C_word*)t0)[2]);}
-
-/* loop405 in k4729 in k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4662(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4662,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[53]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4691,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g421422 */
-t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k4689 in loop405 in k4729 in k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4691(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4691,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop405418 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4662(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop405418 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_4662(t6,((C_word*)t0)[3],t5);}}
-
-/* k4658 in k4729 in k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4660(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* ##sys#append */
-t2=*((C_word*)lf[52]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* k4654 in k4729 in k4725 in k4632 in k4620 in k4611 in k4605 in loop in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4656(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4656,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=(C_word)C_a_i_cons(&a,2,lf[51],t2);
-/* expand.scm: 249 values */
-C_values(4,0,((C_word*)t0)[2],t3,C_SCHEME_TRUE);}
-
-/* expand in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4539(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4539,NULL,5,t0,t1,t2,t3,t4);}
-t5=*((C_word*)lf[9]+1);
-if(C_truep((C_word)C_i_listp(t3))){
-if(C_truep((C_word)C_i_pairp(t4))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4565,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t7=(C_word)C_i_cadr(t4);
-t8=(C_word)C_i_car(t4);
-/* expand.scm: 232 call-handler */
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_4337(t9,t6,t2,t7,t3,t8,C_SCHEME_FALSE);}
-else{
-/* expand.scm: 234 values */
-C_values(4,0,t1,t3,C_SCHEME_FALSE);}}
-else{
-/* expand.scm: 228 ##sys#syntax-error-hook */
-t6=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,lf[46],t3);}}
-
-/* k4563 in expand in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 230 values */
-C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4337(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4337,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=*((C_word*)lf[9]+1);
-t8=*((C_word*)lf[9]+1);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4347,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4352,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t3,a[5]=t4,a[6]=t6,a[7]=t2,a[8]=((C_word)li26),tmp=(C_word)a,a+=9,tmp);
-/* call-with-current-continuation */
-t11=*((C_word*)lf[45]+1);
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
-
-/* a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4352(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4352,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4358,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word)li17),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4465,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word)li25),tmp=(C_word)a,a+=10,tmp);
-/* with-exception-handler */
-t5=*((C_word*)lf[44]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,t3,t4);}
-
-/* a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4465(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4465,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4471,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word)li22),tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4527,a[2]=((C_word*)t0)[2],a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a4526 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4527(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_4527r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_4527r(t0,t1,t2);}}
-
-static void C_ccall f_4527r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4533,a[2]=t2,a[3]=((C_word)li23),tmp=(C_word)a,a+=4,tmp);
-/* k290295 */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-
-/* a4532 in a4526 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4533,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4471(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[31],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4471,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4475,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[7])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4502,a[2]=((C_word*)t0)[6],a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4508,a[2]=t4,a[3]=t6,a[4]=((C_word)li19),tmp=(C_word)a,a+=5,tmp);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4513,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word)li20),tmp=(C_word)a,a+=7,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4519,a[2]=t6,a[3]=t4,a[4]=((C_word)li21),tmp=(C_word)a,a+=5,tmp);
-/* ##sys#dynamic-wind */
-t10=*((C_word*)lf[43]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t2,t7,t8,t9);}
-else{
-/* expand.scm: 208 handler */
-t3=((C_word*)t0)[4];
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[6],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* a4518 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4519,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[42]+1));
-t3=C_mutate((C_word*)lf[42]+1 /* (set! syntax-rules-mismatch ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* a4512 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4513,2,t0,t1);}
-/* expand.scm: 207 handler */
-t2=((C_word*)t0)[5];
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a4507 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4508,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[42]+1));
-t3=C_mutate((C_word*)lf[42]+1 /* (set! syntax-rules-mismatch ...) */,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* f_4502 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4502(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4502,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* k4473 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4475(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4475,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4478,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[4];
-t4=(C_truep(t3)?C_SCHEME_FALSE:(C_word)C_eqp(((C_word*)t0)[3],t1));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4491,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4495,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 212 symbol->string */
-t7=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[2]);}
-else{
-t5=*((C_word*)lf[9]+1);
-t6=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}}
-
-/* k4493 in k4473 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4495(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 211 string-append */
-t2=*((C_word*)lf[33]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[39],t1,lf[40]);}
-
-/* k4489 in k4473 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 210 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[38]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k4476 in k4473 in a4470 in a4464 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4478(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4358(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4358,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4364,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li16),tmp=(C_word)a,a+=5,tmp);
-/* k290295 */
-t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-
-/* a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4364(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4364,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4375,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[30]))){
-t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-t4=t2;
-f_4375(t4,(C_word)C_i_memq(lf[37],t3));}
-else{
-t3=t2;
-f_4375(t3,C_SCHEME_FALSE);}}
-
-/* k4373 in a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4375(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4375,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4386,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(2));
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4392,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word)li15),tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_4392(t8,t3,t4);}
-else{
-t2=((C_word*)t0)[4];
-/* expand.scm: 180 ##sys#abort */
-t3=*((C_word*)lf[31]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[3],t2);}}
-
-/* copy in k4373 in a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4392(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4392,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4411,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_equalp(lf[36],t3))){
-if(C_truep((C_word)C_i_pairp(t4))){
-t6=(C_word)C_i_car(t4);
-t7=t5;
-f_4411(t7,(C_word)C_i_stringp(t6));}
-else{
-t6=t5;
-f_4411(t6,C_SCHEME_FALSE);}}
-else{
-t6=t5;
-f_4411(t6,C_SCHEME_FALSE);}}}
-
-/* k4409 in copy in k4373 in a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4411(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4411,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4422,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-t4=(C_word)C_i_car(((C_word*)t0)[5]);
-/* expand.scm: 196 string-append */
-t5=*((C_word*)lf[33]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t2,lf[34],t3,lf[35],t4);}
-else{
-/* expand.scm: 202 copy */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_4392(t2,((C_word*)t0)[4],((C_word*)t0)[5]);}}
-
-/* k4420 in k4409 in copy in k4373 in a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4422,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t3=(C_word)C_a_i_cons(&a,2,t1,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[32],t3));}
-
-/* k4384 in k4373 in a4363 in a4357 in a4351 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4386,2,t0,t1);}
-t2=(C_word)C_a_i_record(&a,3,lf[30],((C_word*)t0)[3],t1);
-/* expand.scm: 180 ##sys#abort */
-t3=*((C_word*)lf[31]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-
-/* k4345 in call-handler in ##sys#expand-0 in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4347(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g293294 */
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#undefine-macro! in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4328(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4328,3,t0,t1,t2);}
-/* expand.scm: 168 ##sys#unregister-macro */
-t3=*((C_word*)lf[26]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-
-/* ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4277(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4277,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4285,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4289,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 162 ##sys#macro-environment */
-t5=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k4287 in ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4289,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4291,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li12),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_4291(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k4287 in ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_fcall f_4291(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4291,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4326,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 164 caar */
-t4=*((C_word*)lf[27]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}
-
-/* k4324 in loop in k4287 in ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4326(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4326,2,t0,t1);}
-t2=(C_word)C_eqp(((C_word*)t0)[5],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr(((C_word*)t0)[3]));}
-else{
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4318,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t5=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 165 loop */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_4291(t6,t4,t5);}}
-
-/* k4316 in k4324 in loop in k4287 in ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4318(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4318,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k4283 in ##sys#unregister-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4285(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 160 ##sys#macro-environment */
-t2=*((C_word*)lf[20]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* ##sys#macro? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4227(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_4227r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_4227r(t0,t1,t2,t3);}}
-
-static void C_ccall f_4227r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4231,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-/* expand.scm: 153 ##sys#current-environment */
-t5=*((C_word*)lf[3]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_4231(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k4229 in ##sys#macro? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4231,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4234,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 154 lookup */
-f_3900(t2,((C_word*)t0)[2],t1);}
-
-/* k4232 in k4229 in ##sys#macro? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4234(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4234,2,t0,t1);}
-t2=(C_word)C_i_pairp(t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4243,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4253,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 156 ##sys#macro-environment */
-t5=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k4251 in k4232 in k4229 in ##sys#macro? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 156 lookup */
-f_3900(((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k4241 in k4232 in k4229 in ##sys#macro? in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?(C_word)C_i_pairp(t1):C_SCHEME_FALSE));}
-
-/* ##sys#copy-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_4214,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4218,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4225,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 150 ##sys#macro-environment */
-t6=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* k4223 in ##sys#copy-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* expand.scm: 150 lookup */
-f_3900(((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k4216 in ##sys#copy-macro in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(5,0,((C_word*)t0)[3],*((C_word*)lf[23]+1),((C_word*)t0)[2],t1);}
-
-/* ##sys#extend-macro-environment in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4176(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_4176,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4180,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 139 ##sys#macro-environment */
-t6=*((C_word*)lf[20]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* k4178 in ##sys#extend-macro-environment in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4180,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4183,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 140 lookup */
-f_3900(t2,((C_word*)t0)[2],t1);}
-
-/* k4181 in k4178 in ##sys#extend-macro-environment in k4170 in k3896 in k3892 in k3864 */
-static void C_ccall f_4183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4183,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4187,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li8),tmp=(C_word)a,a+=5,tmp);
-/* g231232 */
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_4187(t2,t1));}
-else{
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[2]);
-/* expand.scm: 145 ##sys#macro-environment */
-t4=*((C_word*)lf[20]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[4],t3);}}
-
-/* g231 in k4181 in k4178 in ##sys#extend-macro-environment in k4170 in k3896 in k3892 in k3864 */
-static C_word C_fcall f_4187(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t2=(C_word)C_i_set_car(t1,((C_word*)t0)[3]);
-t3=(C_word)C_i_cdr(t1);
-return((C_word)C_i_set_car(t3,((C_word*)t0)[2]));}
-
-/* ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_3963(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+12)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3963r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3963r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3963r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(12);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3965,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4116,a[2]=t4,a[3]=((C_word)li5),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4121,a[2]=t5,a[3]=((C_word)li6),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-/* def-se160212 */
-t7=t6;
-f_4121(t7,t1);}
-else{
-t7=(C_word)C_i_car(t3);
-t8=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t8))){
-/* def-alias161210 */
-t9=t5;
-f_4116(t9,t1,t7);}
-else{
-t9=(C_word)C_i_car(t8);
-t10=(C_word)C_i_cdr(t8);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* body158166 */
-t11=t4;
-f_3965(t11,t1,t7,t9);}
-else{
-/* ##sys#error */
-t11=*((C_word*)lf[18]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t1,lf[0],t10);}}}}
-
-/* def-se160 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_fcall f_4121(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4121,NULL,2,t0,t1);}
-/* def-alias161210 */
-t2=((C_word*)t0)[2];
-f_4116(t2,t1,C_SCHEME_FALSE);}
-
-/* def-alias161 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_fcall f_4116(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4116,NULL,3,t0,t1,t2);}
-/* body158166 */
-t3=((C_word*)t0)[2];
-f_3965(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_fcall f_3965(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3965,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3971,a[2]=t7,a[3]=t2,a[4]=t3,a[5]=t5,a[6]=((C_word)li3),tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_3971(t9,t1,((C_word*)t0)[2]);}
-
-/* walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_fcall f_3971(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(15);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3971,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(t2,((C_word*)((C_word*)t0)[5])[1]);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
-else{
-if(C_truep((C_word)C_i_symbolp(t2))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3990,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[3])){
-/* expand.scm: 106 lookup */
-f_3900(t4,t2,((C_word*)t0)[3]);}
-else{
-/* expand.scm: 107 get */
-t5=*((C_word*)lf[16]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[7]);}}
-else{
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_FALSE);
-t5=(C_word)C_a_i_cons(&a,2,t2,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,((C_word*)((C_word*)t0)[5])[1]);
-t7=C_mutate(((C_word *)((C_word*)t0)[5])+1,t6);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4061,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-t9=(C_word)C_i_car(t2);
-/* expand.scm: 117 walk */
-t14=t8;
-t15=t9;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-if(C_truep((C_word)C_i_vectorp(t2))){
-t4=(C_word)C_block_size(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4081,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* expand.scm: 122 make-vector */
-t6=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}}}}
-
-/* k4079 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_4081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4081,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[4])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[4])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4090,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word)li2),tmp=(C_word)a,a+=6,tmp);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_4090(t5,C_fix(0)));}
-
-/* doloop201 in k4079 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static C_word C_fcall f_4090(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-t2=((C_word*)t0)[3];
-return(t2);}
-else{
-t2=(C_word)C_slot(((C_word*)t0)[2],t1);
-t3=(C_word)C_i_setslot(((C_word*)t0)[3],t1,t2);
-t4=(C_word)C_fixnum_plus(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}}
-
-/* k4059 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_4061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4061,2,t0,t1);}
-t2=(C_word)C_i_set_car(((C_word*)t0)[5],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4053,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* expand.scm: 118 walk */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3971(t5,t3,t4);}
-
-/* k4051 in k4059 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_4053(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_set_cdr(((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}
-
-/* k3988 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_3990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3990,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3993,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* expand.scm: 108 get */
-t3=*((C_word*)lf[16]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[11]);}
-
-/* k3991 in k3988 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_ccall f_3993(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3993,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4002,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=(C_word)C_i_assq(((C_word*)t0)[5],((C_word*)t0)[2]);
-t4=t2;
-f_4002(t4,(C_word)C_i_not(t3));}
-else{
-t3=t2;
-f_4002(t3,C_SCHEME_FALSE);}}}
-
-/* k4000 in k3991 in k3988 in walk in body158 in ##sys#strip-syntax in k3896 in k3892 in k3864 */
-static void C_fcall f_4002(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-/* expand.scm: 110 ##sys#alias-global-hook */
-t2=*((C_word*)lf[15]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE);}
-else{
-t2=((C_word*)t0)[2];
-if(C_truep(t2)){
-t3=(C_word)C_i_pairp(((C_word*)t0)[2]);
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?((C_word*)t0)[3]:((C_word*)t0)[2]));}
-else{
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}}
-
-/* macro-alias in k3896 in k3892 in k3864 */
-static void C_fcall f_3918(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3918,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3925,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 77 ##sys#qualified-symbol? */
-t5=*((C_word*)lf[13]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_ccall f_3925(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3925,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3928,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_3928(t3,t1);}
-else{
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t4=(C_word)C_block_size(t3);
-t5=(C_word)C_fixnum_greaterp(t4,C_fix(0));
-t6=t2;
-f_3928(t6,(C_truep(t5)?(C_word)C_eqp(C_make_character(35),(C_word)C_subchar(t3,C_fix(0))):C_SCHEME_FALSE));}}
-
-/* k3926 in k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_fcall f_3928(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3928,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3931,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 83 gensym */
-t3=*((C_word*)lf[12]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}}
-
-/* k3929 in k3926 in k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_ccall f_3931(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3931,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3934,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 84 lookup */
-f_3900(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* k3932 in k3929 in k3926 in k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_ccall f_3934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3934,2,t0,t1);}
-t2=(C_truep(t1)?t1:((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3940,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* expand.scm: 85 ##sys#put! */
-t4=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],lf[7],t2);}
-
-/* k3938 in k3932 in k3929 in k3926 in k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_ccall f_3940(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3940,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3943,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* expand.scm: 86 ##sys#put! */
-t3=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[4],lf[11],((C_word*)t0)[2]);}
-
-/* k3941 in k3938 in k3932 in k3929 in k3926 in k3923 in macro-alias in k3896 in k3892 in k3864 */
-static void C_ccall f_3943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=*((C_word*)lf[9]+1);
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* lookup in k3896 in k3892 in k3864 */
-static void C_fcall f_3900(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3900,NULL,3,t1,t2,t3);}
-t4=(C_word)C_i_assq(t2,t3);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cdr(t4));}
-else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3913,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* expand.scm: 73 ##sys#get */
-t6=*((C_word*)lf[6]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,lf[7]);}}
-
-/* k3911 in lookup in k3896 in k3892 in k3864 */
-static void C_ccall f_3913(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:C_SCHEME_FALSE));}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[952] = {
-{"toplevel:expand_scm",(void*)C_expand_toplevel},
-{"f_3866:expand_scm",(void*)f_3866},
-{"f_3894:expand_scm",(void*)f_3894},
-{"f_3898:expand_scm",(void*)f_3898},
-{"f_4172:expand_scm",(void*)f_4172},
-{"f_15804:expand_scm",(void*)f_15804},
-{"f_15802:expand_scm",(void*)f_15802},
-{"f_8911:expand_scm",(void*)f_8911},
-{"f_15794:expand_scm",(void*)f_15794},
-{"f_15792:expand_scm",(void*)f_15792},
-{"f_8914:expand_scm",(void*)f_8914},
-{"f_15784:expand_scm",(void*)f_15784},
-{"f_15782:expand_scm",(void*)f_15782},
-{"f_8917:expand_scm",(void*)f_8917},
-{"f_8921:expand_scm",(void*)f_8921},
-{"f_15657:expand_scm",(void*)f_15657},
-{"f_15667:expand_scm",(void*)f_15667},
-{"f_15683:expand_scm",(void*)f_15683},
-{"f_15686:expand_scm",(void*)f_15686},
-{"f_15714:expand_scm",(void*)f_15714},
-{"f_15689:expand_scm",(void*)f_15689},
-{"f_15736:expand_scm",(void*)f_15736},
-{"f_15739:expand_scm",(void*)f_15739},
-{"f_15758:expand_scm",(void*)f_15758},
-{"f_15770:expand_scm",(void*)f_15770},
-{"f_15723:expand_scm",(void*)f_15723},
-{"f_15726:expand_scm",(void*)f_15726},
-{"f_15733:expand_scm",(void*)f_15733},
-{"f_15655:expand_scm",(void*)f_15655},
-{"f_8924:expand_scm",(void*)f_8924},
-{"f_15565:expand_scm",(void*)f_15565},
-{"f_15581:expand_scm",(void*)f_15581},
-{"f_15584:expand_scm",(void*)f_15584},
-{"f_15606:expand_scm",(void*)f_15606},
-{"f_15587:expand_scm",(void*)f_15587},
-{"f_15609:expand_scm",(void*)f_15609},
-{"f_15612:expand_scm",(void*)f_15612},
-{"f_15635:expand_scm",(void*)f_15635},
-{"f_15647:expand_scm",(void*)f_15647},
-{"f_15563:expand_scm",(void*)f_15563},
-{"f_8927:expand_scm",(void*)f_8927},
-{"f_15506:expand_scm",(void*)f_15506},
-{"f_15535:expand_scm",(void*)f_15535},
-{"f_15555:expand_scm",(void*)f_15555},
-{"f_15559:expand_scm",(void*)f_15559},
-{"f_15504:expand_scm",(void*)f_15504},
-{"f_8930:expand_scm",(void*)f_8930},
-{"f_15416:expand_scm",(void*)f_15416},
-{"f_15441:expand_scm",(void*)f_15441},
-{"f_15448:expand_scm",(void*)f_15448},
-{"f_15468:expand_scm",(void*)f_15468},
-{"f_15488:expand_scm",(void*)f_15488},
-{"f_15492:expand_scm",(void*)f_15492},
-{"f_15414:expand_scm",(void*)f_15414},
-{"f_8933:expand_scm",(void*)f_8933},
-{"f_15086:expand_scm",(void*)f_15086},
-{"f_15093:expand_scm",(void*)f_15093},
-{"f_15096:expand_scm",(void*)f_15096},
-{"f_15099:expand_scm",(void*)f_15099},
-{"f_15102:expand_scm",(void*)f_15102},
-{"f_15105:expand_scm",(void*)f_15105},
-{"f_15108:expand_scm",(void*)f_15108},
-{"f_15113:expand_scm",(void*)f_15113},
-{"f_15129:expand_scm",(void*)f_15129},
-{"f_15135:expand_scm",(void*)f_15135},
-{"f_15177:expand_scm",(void*)f_15177},
-{"f_15245:expand_scm",(void*)f_15245},
-{"f_15370:expand_scm",(void*)f_15370},
-{"f_15366:expand_scm",(void*)f_15366},
-{"f_15248:expand_scm",(void*)f_15248},
-{"f_15303:expand_scm",(void*)f_15303},
-{"f_15180:expand_scm",(void*)f_15180},
-{"f_15219:expand_scm",(void*)f_15219},
-{"f_15171:expand_scm",(void*)f_15171},
-{"f_15142:expand_scm",(void*)f_15142},
-{"f_15084:expand_scm",(void*)f_15084},
-{"f_8936:expand_scm",(void*)f_8936},
-{"f_14885:expand_scm",(void*)f_14885},
-{"f_14889:expand_scm",(void*)f_14889},
-{"f_14898:expand_scm",(void*)f_14898},
-{"f_14901:expand_scm",(void*)f_14901},
-{"f_14904:expand_scm",(void*)f_14904},
-{"f_14907:expand_scm",(void*)f_14907},
-{"f_14928:expand_scm",(void*)f_14928},
-{"f_14944:expand_scm",(void*)f_14944},
-{"f_14950:expand_scm",(void*)f_14950},
-{"f_15010:expand_scm",(void*)f_15010},
-{"f_15037:expand_scm",(void*)f_15037},
-{"f_15004:expand_scm",(void*)f_15004},
-{"f_15000:expand_scm",(void*)f_15000},
-{"f_14992:expand_scm",(void*)f_14992},
-{"f_14988:expand_scm",(void*)f_14988},
-{"f_14957:expand_scm",(void*)f_14957},
-{"f_14926:expand_scm",(void*)f_14926},
-{"f_14883:expand_scm",(void*)f_14883},
-{"f_8939:expand_scm",(void*)f_8939},
-{"f_14816:expand_scm",(void*)f_14816},
-{"f_14820:expand_scm",(void*)f_14820},
-{"f_14829:expand_scm",(void*)f_14829},
-{"f_14834:expand_scm",(void*)f_14834},
-{"f_14871:expand_scm",(void*)f_14871},
-{"f_14852:expand_scm",(void*)f_14852},
-{"f_14814:expand_scm",(void*)f_14814},
-{"f_8942:expand_scm",(void*)f_8942},
-{"f_14569:expand_scm",(void*)f_14569},
-{"f_14573:expand_scm",(void*)f_14573},
-{"f_14585:expand_scm",(void*)f_14585},
-{"f_14588:expand_scm",(void*)f_14588},
-{"f_14591:expand_scm",(void*)f_14591},
-{"f_14760:expand_scm",(void*)f_14760},
-{"f_14606:expand_scm",(void*)f_14606},
-{"f_14758:expand_scm",(void*)f_14758},
-{"f_14633:expand_scm",(void*)f_14633},
-{"f_14748:expand_scm",(void*)f_14748},
-{"f_14649:expand_scm",(void*)f_14649},
-{"f_14671:expand_scm",(void*)f_14671},
-{"f_14730:expand_scm",(void*)f_14730},
-{"f_14669:expand_scm",(void*)f_14669},
-{"f_14665:expand_scm",(void*)f_14665},
-{"f_14567:expand_scm",(void*)f_14567},
-{"f_8945:expand_scm",(void*)f_8945},
-{"f_14151:expand_scm",(void*)f_14151},
-{"f_14155:expand_scm",(void*)f_14155},
-{"f_14158:expand_scm",(void*)f_14158},
-{"f_14161:expand_scm",(void*)f_14161},
-{"f_14164:expand_scm",(void*)f_14164},
-{"f_14556:expand_scm",(void*)f_14556},
-{"f_14453:expand_scm",(void*)f_14453},
-{"f_14457:expand_scm",(void*)f_14457},
-{"f_14487:expand_scm",(void*)f_14487},
-{"f_14538:expand_scm",(void*)f_14538},
-{"f_14491:expand_scm",(void*)f_14491},
-{"f_14520:expand_scm",(void*)f_14520},
-{"f_14461:expand_scm",(void*)f_14461},
-{"f_14176:expand_scm",(void*)f_14176},
-{"f_14223:expand_scm",(void*)f_14223},
-{"f_14270:expand_scm",(void*)f_14270},
-{"f_14439:expand_scm",(void*)f_14439},
-{"f_14447:expand_scm",(void*)f_14447},
-{"f_14425:expand_scm",(void*)f_14425},
-{"f_14414:expand_scm",(void*)f_14414},
-{"f_14422:expand_scm",(void*)f_14422},
-{"f_14395:expand_scm",(void*)f_14395},
-{"f_14379:expand_scm",(void*)f_14379},
-{"f_14360:expand_scm",(void*)f_14360},
-{"f_14318:expand_scm",(void*)f_14318},
-{"f_14295:expand_scm",(void*)f_14295},
-{"f_14249:expand_scm",(void*)f_14249},
-{"f_14198:expand_scm",(void*)f_14198},
-{"f_14194:expand_scm",(void*)f_14194},
-{"f_14166:expand_scm",(void*)f_14166},
-{"f_14174:expand_scm",(void*)f_14174},
-{"f_14149:expand_scm",(void*)f_14149},
-{"f_8948:expand_scm",(void*)f_8948},
-{"f_14118:expand_scm",(void*)f_14118},
-{"f_14122:expand_scm",(void*)f_14122},
-{"f_14116:expand_scm",(void*)f_14116},
-{"f_8951:expand_scm",(void*)f_8951},
-{"f_13799:expand_scm",(void*)f_13799},
-{"f_13806:expand_scm",(void*)f_13806},
-{"f_13809:expand_scm",(void*)f_13809},
-{"f_13812:expand_scm",(void*)f_13812},
-{"f_13815:expand_scm",(void*)f_13815},
-{"f_13981:expand_scm",(void*)f_13981},
-{"f_14068:expand_scm",(void*)f_14068},
-{"f_14090:expand_scm",(void*)f_14090},
-{"f_14097:expand_scm",(void*)f_14097},
-{"f_14084:expand_scm",(void*)f_14084},
-{"f_13997:expand_scm",(void*)f_13997},
-{"f_13995:expand_scm",(void*)f_13995},
-{"f_13827:expand_scm",(void*)f_13827},
-{"f_13862:expand_scm",(void*)f_13862},
-{"f_13908:expand_scm",(void*)f_13908},
-{"f_13958:expand_scm",(void*)f_13958},
-{"f_13965:expand_scm",(void*)f_13965},
-{"f_13923:expand_scm",(void*)f_13923},
-{"f_13937:expand_scm",(void*)f_13937},
-{"f_13880:expand_scm",(void*)f_13880},
-{"f_13891:expand_scm",(void*)f_13891},
-{"f_13841:expand_scm",(void*)f_13841},
-{"f_13817:expand_scm",(void*)f_13817},
-{"f_13797:expand_scm",(void*)f_13797},
-{"f_8954:expand_scm",(void*)f_8954},
-{"f_13778:expand_scm",(void*)f_13778},
-{"f_13776:expand_scm",(void*)f_13776},
-{"f_8957:expand_scm",(void*)f_8957},
-{"f_13757:expand_scm",(void*)f_13757},
-{"f_13755:expand_scm",(void*)f_13755},
-{"f_8960:expand_scm",(void*)f_8960},
-{"f_13706:expand_scm",(void*)f_13706},
-{"f_13710:expand_scm",(void*)f_13710},
-{"f_13747:expand_scm",(void*)f_13747},
-{"f_13733:expand_scm",(void*)f_13733},
-{"f_13704:expand_scm",(void*)f_13704},
-{"f_8963:expand_scm",(void*)f_8963},
-{"f_13662:expand_scm",(void*)f_13662},
-{"f_13666:expand_scm",(void*)f_13666},
-{"f_13696:expand_scm",(void*)f_13696},
-{"f_13669:expand_scm",(void*)f_13669},
-{"f_13684:expand_scm",(void*)f_13684},
-{"f_13660:expand_scm",(void*)f_13660},
-{"f_8966:expand_scm",(void*)f_8966},
-{"f_13502:expand_scm",(void*)f_13502},
-{"f_13509:expand_scm",(void*)f_13509},
-{"f_13512:expand_scm",(void*)f_13512},
-{"f_13567:expand_scm",(void*)f_13567},
-{"f_13642:expand_scm",(void*)f_13642},
-{"f_13575:expand_scm",(void*)f_13575},
-{"f_13597:expand_scm",(void*)f_13597},
-{"f_13582:expand_scm",(void*)f_13582},
-{"f_13515:expand_scm",(void*)f_13515},
-{"f_13532:expand_scm",(void*)f_13532},
-{"f_13561:expand_scm",(void*)f_13561},
-{"f_13530:expand_scm",(void*)f_13530},
-{"f_13522:expand_scm",(void*)f_13522},
-{"f_13518:expand_scm",(void*)f_13518},
-{"f_13500:expand_scm",(void*)f_13500},
-{"f_8969:expand_scm",(void*)f_8969},
-{"f_13465:expand_scm",(void*)f_13465},
-{"f_13469:expand_scm",(void*)f_13469},
-{"f_13487:expand_scm",(void*)f_13487},
-{"f_13463:expand_scm",(void*)f_13463},
-{"f_8972:expand_scm",(void*)f_8972},
-{"f_13459:expand_scm",(void*)f_13459},
-{"f_10811:expand_scm",(void*)f_10811},
-{"f_13455:expand_scm",(void*)f_13455},
-{"f_10815:expand_scm",(void*)f_10815},
-{"f_10819:expand_scm",(void*)f_10819},
-{"f_12941:expand_scm",(void*)f_12941},
-{"f_13404:expand_scm",(void*)f_13404},
-{"f_13443:expand_scm",(void*)f_13443},
-{"f_12957:expand_scm",(void*)f_12957},
-{"f_13357:expand_scm",(void*)f_13357},
-{"f_13359:expand_scm",(void*)f_13359},
-{"f_13398:expand_scm",(void*)f_13398},
-{"f_13372:expand_scm",(void*)f_13372},
-{"f_13383:expand_scm",(void*)f_13383},
-{"f_12960:expand_scm",(void*)f_12960},
-{"f_13230:expand_scm",(void*)f_13230},
-{"f_13281:expand_scm",(void*)f_13281},
-{"f_13331:expand_scm",(void*)f_13331},
-{"f_13293:expand_scm",(void*)f_13293},
-{"f_13317:expand_scm",(void*)f_13317},
-{"f_13313:expand_scm",(void*)f_13313},
-{"f_13309:expand_scm",(void*)f_13309},
-{"f_13278:expand_scm",(void*)f_13278},
-{"f_13263:expand_scm",(void*)f_13263},
-{"f_13267:expand_scm",(void*)f_13267},
-{"f_12963:expand_scm",(void*)f_12963},
-{"f_13119:expand_scm",(void*)f_13119},
-{"f_13121:expand_scm",(void*)f_13121},
-{"f_13213:expand_scm",(void*)f_13213},
-{"f_13129:expand_scm",(void*)f_13129},
-{"f_13140:expand_scm",(void*)f_13140},
-{"f_13143:expand_scm",(void*)f_13143},
-{"f_13180:expand_scm",(void*)f_13180},
-{"f_13206:expand_scm",(void*)f_13206},
-{"f_13194:expand_scm",(void*)f_13194},
-{"f_13198:expand_scm",(void*)f_13198},
-{"f_13178:expand_scm",(void*)f_13178},
-{"f_13174:expand_scm",(void*)f_13174},
-{"f_13167:expand_scm",(void*)f_13167},
-{"f_13163:expand_scm",(void*)f_13163},
-{"f_13159:expand_scm",(void*)f_13159},
-{"f_12966:expand_scm",(void*)f_12966},
-{"f_12969:expand_scm",(void*)f_12969},
-{"f_13044:expand_scm",(void*)f_13044},
-{"f_13046:expand_scm",(void*)f_13046},
-{"f_13101:expand_scm",(void*)f_13101},
-{"f_13108:expand_scm",(void*)f_13108},
-{"f_13056:expand_scm",(void*)f_13056},
-{"f_12972:expand_scm",(void*)f_12972},
-{"f_13036:expand_scm",(void*)f_13036},
-{"f_13040:expand_scm",(void*)f_13040},
-{"f_12975:expand_scm",(void*)f_12975},
-{"f_12978:expand_scm",(void*)f_12978},
-{"f_12992:expand_scm",(void*)f_12992},
-{"f_13021:expand_scm",(void*)f_13021},
-{"f_13000:expand_scm",(void*)f_13000},
-{"f_13004:expand_scm",(void*)f_13004},
-{"f_12981:expand_scm",(void*)f_12981},
-{"f_12987:expand_scm",(void*)f_12987},
-{"f_12856:expand_scm",(void*)f_12856},
-{"f_12867:expand_scm",(void*)f_12867},
-{"f_12869:expand_scm",(void*)f_12869},
-{"f_12918:expand_scm",(void*)f_12918},
-{"f_12914:expand_scm",(void*)f_12914},
-{"f_12897:expand_scm",(void*)f_12897},
-{"f_12707:expand_scm",(void*)f_12707},
-{"f_12711:expand_scm",(void*)f_12711},
-{"f_12714:expand_scm",(void*)f_12714},
-{"f_12787:expand_scm",(void*)f_12787},
-{"f_12828:expand_scm",(void*)f_12828},
-{"f_12797:expand_scm",(void*)f_12797},
-{"f_12729:expand_scm",(void*)f_12729},
-{"f_12735:expand_scm",(void*)f_12735},
-{"f_12781:expand_scm",(void*)f_12781},
-{"f_12762:expand_scm",(void*)f_12762},
-{"f_12733:expand_scm",(void*)f_12733},
-{"f_12690:expand_scm",(void*)f_12690},
-{"f_12701:expand_scm",(void*)f_12701},
-{"f_12694:expand_scm",(void*)f_12694},
-{"f_12697:expand_scm",(void*)f_12697},
-{"f_12311:expand_scm",(void*)f_12311},
-{"f_12315:expand_scm",(void*)f_12315},
-{"f_12610:expand_scm",(void*)f_12610},
-{"f_12658:expand_scm",(void*)f_12658},
-{"f_12341:expand_scm",(void*)f_12341},
-{"f_12327:expand_scm",(void*)f_12327},
-{"f_12665:expand_scm",(void*)f_12665},
-{"f_12620:expand_scm",(void*)f_12620},
-{"f_12344:expand_scm",(void*)f_12344},
-{"f_12544:expand_scm",(void*)f_12544},
-{"f_12593:expand_scm",(void*)f_12593},
-{"f_12554:expand_scm",(void*)f_12554},
-{"f_12347:expand_scm",(void*)f_12347},
-{"f_12492:expand_scm",(void*)f_12492},
-{"f_12531:expand_scm",(void*)f_12531},
-{"f_12350:expand_scm",(void*)f_12350},
-{"f_12486:expand_scm",(void*)f_12486},
-{"f_12490:expand_scm",(void*)f_12490},
-{"f_12356:expand_scm",(void*)f_12356},
-{"f_12359:expand_scm",(void*)f_12359},
-{"f_12452:expand_scm",(void*)f_12452},
-{"f_12460:expand_scm",(void*)f_12460},
-{"f_12362:expand_scm",(void*)f_12362},
-{"f_12410:expand_scm",(void*)f_12410},
-{"f_12418:expand_scm",(void*)f_12418},
-{"f_12365:expand_scm",(void*)f_12365},
-{"f_12378:expand_scm",(void*)f_12378},
-{"f_12386:expand_scm",(void*)f_12386},
-{"f_12368:expand_scm",(void*)f_12368},
-{"f_11806:expand_scm",(void*)f_11806},
-{"f_12309:expand_scm",(void*)f_12309},
-{"f_12305:expand_scm",(void*)f_12305},
-{"f_11829:expand_scm",(void*)f_11829},
-{"f_12275:expand_scm",(void*)f_12275},
-{"f_12271:expand_scm",(void*)f_12271},
-{"f_11837:expand_scm",(void*)f_11837},
-{"f_12224:expand_scm",(void*)f_12224},
-{"f_12253:expand_scm",(void*)f_12253},
-{"f_12218:expand_scm",(void*)f_12218},
-{"f_11845:expand_scm",(void*)f_11845},
-{"f_12101:expand_scm",(void*)f_12101},
-{"f_12103:expand_scm",(void*)f_12103},
-{"f_12202:expand_scm",(void*)f_12202},
-{"f_12097:expand_scm",(void*)f_12097},
-{"f_12093:expand_scm",(void*)f_12093},
-{"f_11993:expand_scm",(void*)f_11993},
-{"f_12077:expand_scm",(void*)f_12077},
-{"f_12020:expand_scm",(void*)f_12020},
-{"f_12052:expand_scm",(void*)f_12052},
-{"f_11991:expand_scm",(void*)f_11991},
-{"f_11987:expand_scm",(void*)f_11987},
-{"f_11913:expand_scm",(void*)f_11913},
-{"f_11983:expand_scm",(void*)f_11983},
-{"f_11936:expand_scm",(void*)f_11936},
-{"f_11979:expand_scm",(void*)f_11979},
-{"f_11971:expand_scm",(void*)f_11971},
-{"f_11967:expand_scm",(void*)f_11967},
-{"f_11947:expand_scm",(void*)f_11947},
-{"f_11901:expand_scm",(void*)f_11901},
-{"f_11897:expand_scm",(void*)f_11897},
-{"f_11841:expand_scm",(void*)f_11841},
-{"f_11833:expand_scm",(void*)f_11833},
-{"f_11746:expand_scm",(void*)f_11746},
-{"f_11750:expand_scm",(void*)f_11750},
-{"f_11761:expand_scm",(void*)f_11761},
-{"f_11800:expand_scm",(void*)f_11800},
-{"f_11792:expand_scm",(void*)f_11792},
-{"f_11756:expand_scm",(void*)f_11756},
-{"f_11460:expand_scm",(void*)f_11460},
-{"f_11541:expand_scm",(void*)f_11541},
-{"f_11568:expand_scm",(void*)f_11568},
-{"f_11570:expand_scm",(void*)f_11570},
-{"f_11740:expand_scm",(void*)f_11740},
-{"f_11728:expand_scm",(void*)f_11728},
-{"f_11709:expand_scm",(void*)f_11709},
-{"f_11655:expand_scm",(void*)f_11655},
-{"f_11688:expand_scm",(void*)f_11688},
-{"f_11673:expand_scm",(void*)f_11673},
-{"f_11611:expand_scm",(void*)f_11611},
-{"f_11638:expand_scm",(void*)f_11638},
-{"f_11619:expand_scm",(void*)f_11619},
-{"f_11623:expand_scm",(void*)f_11623},
-{"f_11593:expand_scm",(void*)f_11593},
-{"f_11518:expand_scm",(void*)f_11518},
-{"f_11530:expand_scm",(void*)f_11530},
-{"f_11526:expand_scm",(void*)f_11526},
-{"f_11391:expand_scm",(void*)f_11391},
-{"f_11397:expand_scm",(void*)f_11397},
-{"f_11412:expand_scm",(void*)f_11412},
-{"f_11447:expand_scm",(void*)f_11447},
-{"f_11323:expand_scm",(void*)f_11323},
-{"f_11343:expand_scm",(void*)f_11343},
-{"f_11338:expand_scm",(void*)f_11338},
-{"f_11325:expand_scm",(void*)f_11325},
-{"f_11301:expand_scm",(void*)f_11301},
-{"f_11308:expand_scm",(void*)f_11308},
-{"f_11220:expand_scm",(void*)f_11220},
-{"f_11230:expand_scm",(void*)f_11230},
-{"f_11233:expand_scm",(void*)f_11233},
-{"f_11239:expand_scm",(void*)f_11239},
-{"f_11282:expand_scm",(void*)f_11282},
-{"f_11286:expand_scm",(void*)f_11286},
-{"f_11242:expand_scm",(void*)f_11242},
-{"f_11248:expand_scm",(void*)f_11248},
-{"f_11131:expand_scm",(void*)f_11131},
-{"f_11141:expand_scm",(void*)f_11141},
-{"f_11144:expand_scm",(void*)f_11144},
-{"f_11207:expand_scm",(void*)f_11207},
-{"f_11147:expand_scm",(void*)f_11147},
-{"f_11203:expand_scm",(void*)f_11203},
-{"f_11150:expand_scm",(void*)f_11150},
-{"f_11189:expand_scm",(void*)f_11189},
-{"f_11193:expand_scm",(void*)f_11193},
-{"f_11153:expand_scm",(void*)f_11153},
-{"f_11156:expand_scm",(void*)f_11156},
-{"f_11110:expand_scm",(void*)f_11110},
-{"f_11117:expand_scm",(void*)f_11117},
-{"f_11090:expand_scm",(void*)f_11090},
-{"f_11094:expand_scm",(void*)f_11094},
-{"f_11087:expand_scm",(void*)f_11087},
-{"f_11047:expand_scm",(void*)f_11047},
-{"f_11051:expand_scm",(void*)f_11051},
-{"f_11023:expand_scm",(void*)f_11023},
-{"f_10923:expand_scm",(void*)f_10923},
-{"f_10914:expand_scm",(void*)f_10914},
-{"f_10833:expand_scm",(void*)f_10833},
-{"f_10715:expand_scm",(void*)f_10715},
-{"f_10719:expand_scm",(void*)f_10719},
-{"f_10722:expand_scm",(void*)f_10722},
-{"f_10727:expand_scm",(void*)f_10727},
-{"f_10774:expand_scm",(void*)f_10774},
-{"f_10735:expand_scm",(void*)f_10735},
-{"f_10753:expand_scm",(void*)f_10753},
-{"f_10725:expand_scm",(void*)f_10725},
-{"f_10650:expand_scm",(void*)f_10650},
-{"f_10654:expand_scm",(void*)f_10654},
-{"f_10664:expand_scm",(void*)f_10664},
-{"f_10666:expand_scm",(void*)f_10666},
-{"f_10687:expand_scm",(void*)f_10687},
-{"f_10657:expand_scm",(void*)f_10657},
-{"f_8974:expand_scm",(void*)f_8974},
-{"f_8981:expand_scm",(void*)f_8981},
-{"f_8995:expand_scm",(void*)f_8995},
-{"f_8999:expand_scm",(void*)f_8999},
-{"f_9003:expand_scm",(void*)f_9003},
-{"f_9008:expand_scm",(void*)f_9008},
-{"f_9014:expand_scm",(void*)f_9014},
-{"f_9018:expand_scm",(void*)f_9018},
-{"f_9022:expand_scm",(void*)f_9022},
-{"f_9026:expand_scm",(void*)f_9026},
-{"f_9030:expand_scm",(void*)f_9030},
-{"f_9035:expand_scm",(void*)f_9035},
-{"f_9039:expand_scm",(void*)f_9039},
-{"f_9046:expand_scm",(void*)f_9046},
-{"f_9051:expand_scm",(void*)f_9051},
-{"f_9055:expand_scm",(void*)f_9055},
-{"f_9059:expand_scm",(void*)f_9059},
-{"f_9063:expand_scm",(void*)f_9063},
-{"f_9068:expand_scm",(void*)f_9068},
-{"f_10611:expand_scm",(void*)f_10611},
-{"f_10621:expand_scm",(void*)f_10621},
-{"f_10628:expand_scm",(void*)f_10628},
-{"f_10591:expand_scm",(void*)f_10591},
-{"f_10598:expand_scm",(void*)f_10598},
-{"f_10605:expand_scm",(void*)f_10605},
-{"f_10565:expand_scm",(void*)f_10565},
-{"f_10543:expand_scm",(void*)f_10543},
-{"f_10550:expand_scm",(void*)f_10550},
-{"f_10450:expand_scm",(void*)f_10450},
-{"f_10492:expand_scm",(void*)f_10492},
-{"f_10541:expand_scm",(void*)f_10541},
-{"f_10524:expand_scm",(void*)f_10524},
-{"f_10503:expand_scm",(void*)f_10503},
-{"f_10377:expand_scm",(void*)f_10377},
-{"f_10403:expand_scm",(void*)f_10403},
-{"f_10448:expand_scm",(void*)f_10448},
-{"f_10431:expand_scm",(void*)f_10431},
-{"f_10123:expand_scm",(void*)f_10123},
-{"f_10170:expand_scm",(void*)f_10170},
-{"f_10368:expand_scm",(void*)f_10368},
-{"f_10364:expand_scm",(void*)f_10364},
-{"f_10331:expand_scm",(void*)f_10331},
-{"f_10339:expand_scm",(void*)f_10339},
-{"f_10173:expand_scm",(void*)f_10173},
-{"f_10179:expand_scm",(void*)f_10179},
-{"f_10191:expand_scm",(void*)f_10191},
-{"f_10257:expand_scm",(void*)f_10257},
-{"f_10272:expand_scm",(void*)f_10272},
-{"f_10194:expand_scm",(void*)f_10194},
-{"f_10228:expand_scm",(void*)f_10228},
-{"f_10197:expand_scm",(void*)f_10197},
-{"f_10226:expand_scm",(void*)f_10226},
-{"f_10222:expand_scm",(void*)f_10222},
-{"f_10218:expand_scm",(void*)f_10218},
-{"f_9916:expand_scm",(void*)f_9916},
-{"f_9946:expand_scm",(void*)f_9946},
-{"f_10046:expand_scm",(void*)f_10046},
-{"f_10069:expand_scm",(void*)f_10069},
-{"f_10083:expand_scm",(void*)f_10083},
-{"f_10087:expand_scm",(void*)f_10087},
-{"f_10056:expand_scm",(void*)f_10056},
-{"f_10006:expand_scm",(void*)f_10006},
-{"f_10010:expand_scm",(void*)f_10010},
-{"f_9955:expand_scm",(void*)f_9955},
-{"f_9940:expand_scm",(void*)f_9940},
-{"f_9628:expand_scm",(void*)f_9628},
-{"f_9635:expand_scm",(void*)f_9635},
-{"f_9674:expand_scm",(void*)f_9674},
-{"f_9684:expand_scm",(void*)f_9684},
-{"f_9815:expand_scm",(void*)f_9815},
-{"f_9819:expand_scm",(void*)f_9819},
-{"f_9748:expand_scm",(void*)f_9748},
-{"f_9744:expand_scm",(void*)f_9744},
-{"f_9682:expand_scm",(void*)f_9682},
-{"f_9678:expand_scm",(void*)f_9678},
-{"f_9506:expand_scm",(void*)f_9506},
-{"f_9510:expand_scm",(void*)f_9510},
-{"f_9582:expand_scm",(void*)f_9582},
-{"f_9285:expand_scm",(void*)f_9285},
-{"f_9335:expand_scm",(void*)f_9335},
-{"f_9449:expand_scm",(void*)f_9449},
-{"f_9387:expand_scm",(void*)f_9387},
-{"f_9395:expand_scm",(void*)f_9395},
-{"f_9391:expand_scm",(void*)f_9391},
-{"f_9383:expand_scm",(void*)f_9383},
-{"f_9201:expand_scm",(void*)f_9201},
-{"f_9208:expand_scm",(void*)f_9208},
-{"f_9211:expand_scm",(void*)f_9211},
-{"f_9260:expand_scm",(void*)f_9260},
-{"f_9256:expand_scm",(void*)f_9256},
-{"f_9251:expand_scm",(void*)f_9251},
-{"f_9237:expand_scm",(void*)f_9237},
-{"f_9249:expand_scm",(void*)f_9249},
-{"f_9245:expand_scm",(void*)f_9245},
-{"f_9076:expand_scm",(void*)f_9076},
-{"f_9142:expand_scm",(void*)f_9142},
-{"f_9171:expand_scm",(void*)f_9171},
-{"f_9120:expand_scm",(void*)f_9120},
-{"f_9116:expand_scm",(void*)f_9116},
-{"f_9070:expand_scm",(void*)f_9070},
-{"f_8868:expand_scm",(void*)f_8868},
-{"f_8874:expand_scm",(void*)f_8874},
-{"f_8897:expand_scm",(void*)f_8897},
-{"f_7682:expand_scm",(void*)f_7682},
-{"f_7686:expand_scm",(void*)f_7686},
-{"f_7689:expand_scm",(void*)f_7689},
-{"f_7692:expand_scm",(void*)f_7692},
-{"f_7695:expand_scm",(void*)f_7695},
-{"f_8476:expand_scm",(void*)f_8476},
-{"f_8479:expand_scm",(void*)f_8479},
-{"f_8858:expand_scm",(void*)f_8858},
-{"f_8843:expand_scm",(void*)f_8843},
-{"f_8482:expand_scm",(void*)f_8482},
-{"f_8491:expand_scm",(void*)f_8491},
-{"f_8822:expand_scm",(void*)f_8822},
-{"f_8499:expand_scm",(void*)f_8499},
-{"f_8503:expand_scm",(void*)f_8503},
-{"f_8521:expand_scm",(void*)f_8521},
-{"f_8753:expand_scm",(void*)f_8753},
-{"f_8808:expand_scm",(void*)f_8808},
-{"f_8761:expand_scm",(void*)f_8761},
-{"f_8771:expand_scm",(void*)f_8771},
-{"f_8774:expand_scm",(void*)f_8774},
-{"f_8801:expand_scm",(void*)f_8801},
-{"f_8524:expand_scm",(void*)f_8524},
-{"f_8689:expand_scm",(void*)f_8689},
-{"f_8740:expand_scm",(void*)f_8740},
-{"f_8697:expand_scm",(void*)f_8697},
-{"f_8737:expand_scm",(void*)f_8737},
-{"f_8527:expand_scm",(void*)f_8527},
-{"f_8555:expand_scm",(void*)f_8555},
-{"f_8651:expand_scm",(void*)f_8651},
-{"f_8680:expand_scm",(void*)f_8680},
-{"f_8610:expand_scm",(void*)f_8610},
-{"f_8616:expand_scm",(void*)f_8616},
-{"f_8645:expand_scm",(void*)f_8645},
-{"f_8614:expand_scm",(void*)f_8614},
-{"f_8602:expand_scm",(void*)f_8602},
-{"f_8558:expand_scm",(void*)f_8558},
-{"f_8574:expand_scm",(void*)f_8574},
-{"f_8561:expand_scm",(void*)f_8561},
-{"f_8530:expand_scm",(void*)f_8530},
-{"f_8552:expand_scm",(void*)f_8552},
-{"f_8548:expand_scm",(void*)f_8548},
-{"f_8533:expand_scm",(void*)f_8533},
-{"f_8544:expand_scm",(void*)f_8544},
-{"f_8540:expand_scm",(void*)f_8540},
-{"f_8485:expand_scm",(void*)f_8485},
-{"f_7836:expand_scm",(void*)f_7836},
-{"f_7855:expand_scm",(void*)f_7855},
-{"f_7864:expand_scm",(void*)f_7864},
-{"f_7876:expand_scm",(void*)f_7876},
-{"f_8001:expand_scm",(void*)f_8001},
-{"f_8143:expand_scm",(void*)f_8143},
-{"f_8322:expand_scm",(void*)f_8322},
-{"f_8325:expand_scm",(void*)f_8325},
-{"f_8328:expand_scm",(void*)f_8328},
-{"f_8402:expand_scm",(void*)f_8402},
-{"f_8431:expand_scm",(void*)f_8431},
-{"f_8361:expand_scm",(void*)f_8361},
-{"f_8367:expand_scm",(void*)f_8367},
-{"f_8396:expand_scm",(void*)f_8396},
-{"f_8365:expand_scm",(void*)f_8365},
-{"f_8330:expand_scm",(void*)f_8330},
-{"f_8350:expand_scm",(void*)f_8350},
-{"f_8346:expand_scm",(void*)f_8346},
-{"f_8338:expand_scm",(void*)f_8338},
-{"f_8146:expand_scm",(void*)f_8146},
-{"f_8155:expand_scm",(void*)f_8155},
-{"f_8316:expand_scm",(void*)f_8316},
-{"f_8266:expand_scm",(void*)f_8266},
-{"f_8294:expand_scm",(void*)f_8294},
-{"f_8282:expand_scm",(void*)f_8282},
-{"f_8259:expand_scm",(void*)f_8259},
-{"f_8209:expand_scm",(void*)f_8209},
-{"f_8237:expand_scm",(void*)f_8237},
-{"f_8225:expand_scm",(void*)f_8225},
-{"f_8176:expand_scm",(void*)f_8176},
-{"f_8191:expand_scm",(void*)f_8191},
-{"f_8171:expand_scm",(void*)f_8171},
-{"f_8004:expand_scm",(void*)f_8004},
-{"f_8104:expand_scm",(void*)f_8104},
-{"f_8133:expand_scm",(void*)f_8133},
-{"f_8007:expand_scm",(void*)f_8007},
-{"f_8012:expand_scm",(void*)f_8012},
-{"f_8098:expand_scm",(void*)f_8098},
-{"f_8024:expand_scm",(void*)f_8024},
-{"f_8066:expand_scm",(void*)f_8066},
-{"f_7879:expand_scm",(void*)f_7879},
-{"f_7962:expand_scm",(void*)f_7962},
-{"f_7991:expand_scm",(void*)f_7991},
-{"f_7882:expand_scm",(void*)f_7882},
-{"f_7887:expand_scm",(void*)f_7887},
-{"f_7926:expand_scm",(void*)f_7926},
-{"f_7904:expand_scm",(void*)f_7904},
-{"f_7749:expand_scm",(void*)f_7749},
-{"f_7753:expand_scm",(void*)f_7753},
-{"f_7756:expand_scm",(void*)f_7756},
-{"f_7834:expand_scm",(void*)f_7834},
-{"f_7830:expand_scm",(void*)f_7830},
-{"f_7771:expand_scm",(void*)f_7771},
-{"f_7777:expand_scm",(void*)f_7777},
-{"f_7780:expand_scm",(void*)f_7780},
-{"f_7819:expand_scm",(void*)f_7819},
-{"f_7813:expand_scm",(void*)f_7813},
-{"f_7817:expand_scm",(void*)f_7817},
-{"f_7781:expand_scm",(void*)f_7781},
-{"f_7785:expand_scm",(void*)f_7785},
-{"f_7788:expand_scm",(void*)f_7788},
-{"f_7792:expand_scm",(void*)f_7792},
-{"f_7795:expand_scm",(void*)f_7795},
-{"f_7799:expand_scm",(void*)f_7799},
-{"f_7802:expand_scm",(void*)f_7802},
-{"f_7806:expand_scm",(void*)f_7806},
-{"f_7809:expand_scm",(void*)f_7809},
-{"f_7759:expand_scm",(void*)f_7759},
-{"f_7706:expand_scm",(void*)f_7706},
-{"f_7719:expand_scm",(void*)f_7719},
-{"f_7726:expand_scm",(void*)f_7726},
-{"f_7697:expand_scm",(void*)f_7697},
-{"f_7701:expand_scm",(void*)f_7701},
-{"f_7319:expand_scm",(void*)f_7319},
-{"f_7321:expand_scm",(void*)f_7321},
-{"f_7444:expand_scm",(void*)f_7444},
-{"f_7556:expand_scm",(void*)f_7556},
-{"f18259:expand_scm",(void*)f18259},
-{"f_7559:expand_scm",(void*)f_7559},
-{"f_7562:expand_scm",(void*)f_7562},
-{"f18252:expand_scm",(void*)f18252},
-{"f_7565:expand_scm",(void*)f_7565},
-{"f_7644:expand_scm",(void*)f_7644},
-{"f_7629:expand_scm",(void*)f_7629},
-{"f_7616:expand_scm",(void*)f_7616},
-{"f_7601:expand_scm",(void*)f_7601},
-{"f_7584:expand_scm",(void*)f_7584},
-{"f_7591:expand_scm",(void*)f_7591},
-{"f_7511:expand_scm",(void*)f_7511},
-{"f_7532:expand_scm",(void*)f_7532},
-{"f_7466:expand_scm",(void*)f_7466},
-{"f_7448:expand_scm",(void*)f_7448},
-{"f_7324:expand_scm",(void*)f_7324},
-{"f_7393:expand_scm",(void*)f_7393},
-{"f_7427:expand_scm",(void*)f_7427},
-{"f_7397:expand_scm",(void*)f_7397},
-{"f_7410:expand_scm",(void*)f_7410},
-{"f_7367:expand_scm",(void*)f_7367},
-{"f_7363:expand_scm",(void*)f_7363},
-{"f_7338:expand_scm",(void*)f_7338},
-{"f_7342:expand_scm",(void*)f_7342},
-{"f_7316:expand_scm",(void*)f_7316},
-{"f_6844:expand_scm",(void*)f_6844},
-{"f_7268:expand_scm",(void*)f_7268},
-{"f_7259:expand_scm",(void*)f_7259},
-{"f_7267:expand_scm",(void*)f_7267},
-{"f_6846:expand_scm",(void*)f_6846},
-{"f_6987:expand_scm",(void*)f_6987},
-{"f_6992:expand_scm",(void*)f_6992},
-{"f_7230:expand_scm",(void*)f_7230},
-{"f_7189:expand_scm",(void*)f_7189},
-{"f_7193:expand_scm",(void*)f_7193},
-{"f_7011:expand_scm",(void*)f_7011},
-{"f_7016:expand_scm",(void*)f_7016},
-{"f_7035:expand_scm",(void*)f_7035},
-{"f_6958:expand_scm",(void*)f_6958},
-{"f_6964:expand_scm",(void*)f_6964},
-{"f_6892:expand_scm",(void*)f_6892},
-{"f_6896:expand_scm",(void*)f_6896},
-{"f_6904:expand_scm",(void*)f_6904},
-{"f_6956:expand_scm",(void*)f_6956},
-{"f_6924:expand_scm",(void*)f_6924},
-{"f_6861:expand_scm",(void*)f_6861},
-{"f_6865:expand_scm",(void*)f_6865},
-{"f_6890:expand_scm",(void*)f_6890},
-{"f_6879:expand_scm",(void*)f_6879},
-{"f_6883:expand_scm",(void*)f_6883},
-{"f_6872:expand_scm",(void*)f_6872},
-{"f_6849:expand_scm",(void*)f_6849},
-{"f_6856:expand_scm",(void*)f_6856},
-{"f_6803:expand_scm",(void*)f_6803},
-{"f_6825:expand_scm",(void*)f_6825},
-{"f_6829:expand_scm",(void*)f_6829},
-{"f_6797:expand_scm",(void*)f_6797},
-{"f_6786:expand_scm",(void*)f_6786},
-{"f_6794:expand_scm",(void*)f_6794},
-{"f_6716:expand_scm",(void*)f_6716},
-{"f_6779:expand_scm",(void*)f_6779},
-{"f_6719:expand_scm",(void*)f_6719},
-{"f_6772:expand_scm",(void*)f_6772},
-{"f_6745:expand_scm",(void*)f_6745},
-{"f_6628:expand_scm",(void*)f_6628},
-{"f_6714:expand_scm",(void*)f_6714},
-{"f_6631:expand_scm",(void*)f_6631},
-{"f_6645:expand_scm",(void*)f_6645},
-{"f_6685:expand_scm",(void*)f_6685},
-{"f_5785:expand_scm",(void*)f_5785},
-{"f_6576:expand_scm",(void*)f_6576},
-{"f_6584:expand_scm",(void*)f_6584},
-{"f_6571:expand_scm",(void*)f_6571},
-{"f_5787:expand_scm",(void*)f_5787},
-{"f_6284:expand_scm",(void*)f_6284},
-{"f_6290:expand_scm",(void*)f_6290},
-{"f_6554:expand_scm",(void*)f_6554},
-{"f_6312:expand_scm",(void*)f_6312},
-{"f_6522:expand_scm",(void*)f_6522},
-{"f_6496:expand_scm",(void*)f_6496},
-{"f_6503:expand_scm",(void*)f_6503},
-{"f_6468:expand_scm",(void*)f_6468},
-{"f_6456:expand_scm",(void*)f_6456},
-{"f_6330:expand_scm",(void*)f_6330},
-{"f_6335:expand_scm",(void*)f_6335},
-{"f_6348:expand_scm",(void*)f_6348},
-{"f_6404:expand_scm",(void*)f_6404},
-{"f_6431:expand_scm",(void*)f_6431},
-{"f_6382:expand_scm",(void*)f_6382},
-{"f_6393:expand_scm",(void*)f_6393},
-{"f_6397:expand_scm",(void*)f_6397},
-{"f_6103:expand_scm",(void*)f_6103},
-{"f_6113:expand_scm",(void*)f_6113},
-{"f_6266:expand_scm",(void*)f_6266},
-{"f_6262:expand_scm",(void*)f_6262},
-{"f_6252:expand_scm",(void*)f_6252},
-{"f_6255:expand_scm",(void*)f_6255},
-{"f_6159:expand_scm",(void*)f_6159},
-{"f_6187:expand_scm",(void*)f_6187},
-{"f_6195:expand_scm",(void*)f_6195},
-{"f_6207:expand_scm",(void*)f_6207},
-{"f_6215:expand_scm",(void*)f_6215},
-{"f_6219:expand_scm",(void*)f_6219},
-{"f_6128:expand_scm",(void*)f_6128},
-{"f_6144:expand_scm",(void*)f_6144},
-{"f_6136:expand_scm",(void*)f_6136},
-{"f_6140:expand_scm",(void*)f_6140},
-{"f_6111:expand_scm",(void*)f_6111},
-{"f_5790:expand_scm",(void*)f_5790},
-{"f_5893:expand_scm",(void*)f_5893},
-{"f_6051:expand_scm",(void*)f_6051},
-{"f_6053:expand_scm",(void*)f_6053},
-{"f_5907:expand_scm",(void*)f_5907},
-{"f_6047:expand_scm",(void*)f_6047},
-{"f_6031:expand_scm",(void*)f_6031},
-{"f_5915:expand_scm",(void*)f_5915},
-{"f_6025:expand_scm",(void*)f_6025},
-{"f_6029:expand_scm",(void*)f_6029},
-{"f_5929:expand_scm",(void*)f_5929},
-{"f_5988:expand_scm",(void*)f_5988},
-{"f_6017:expand_scm",(void*)f_6017},
-{"f_5933:expand_scm",(void*)f_5933},
-{"f_5966:expand_scm",(void*)f_5966},
-{"f_5964:expand_scm",(void*)f_5964},
-{"f_5960:expand_scm",(void*)f_5960},
-{"f_5923:expand_scm",(void*)f_5923},
-{"f_5927:expand_scm",(void*)f_5927},
-{"f_5919:expand_scm",(void*)f_5919},
-{"f_5911:expand_scm",(void*)f_5911},
-{"f_5802:expand_scm",(void*)f_5802},
-{"f_5883:expand_scm",(void*)f_5883},
-{"f_5866:expand_scm",(void*)f_5866},
-{"f_5876:expand_scm",(void*)f_5876},
-{"f_5821:expand_scm",(void*)f_5821},
-{"f_5832:expand_scm",(void*)f_5832},
-{"f_5840:expand_scm",(void*)f_5840},
-{"f_5828:expand_scm",(void*)f_5828},
-{"f_5157:expand_scm",(void*)f_5157},
-{"f_5177:expand_scm",(void*)f_5177},
-{"f_5180:expand_scm",(void*)f_5180},
-{"f_5183:expand_scm",(void*)f_5183},
-{"f_5186:expand_scm",(void*)f_5186},
-{"f_5189:expand_scm",(void*)f_5189},
-{"f_5194:expand_scm",(void*)f_5194},
-{"f_5536:expand_scm",(void*)f_5536},
-{"f_5712:expand_scm",(void*)f_5712},
-{"f_5650:expand_scm",(void*)f_5650},
-{"f_5631:expand_scm",(void*)f_5631},
-{"f_5585:expand_scm",(void*)f_5585},
-{"f_5588:expand_scm",(void*)f_5588},
-{"f_5567:expand_scm",(void*)f_5567},
-{"f_5551:expand_scm",(void*)f_5551},
-{"f_5495:expand_scm",(void*)f_5495},
-{"f_5208:expand_scm",(void*)f_5208},
-{"f_5383:expand_scm",(void*)f_5383},
-{"f_5385:expand_scm",(void*)f_5385},
-{"f_5484:expand_scm",(void*)f_5484},
-{"f_5412:expand_scm",(void*)f_5412},
-{"f_5481:expand_scm",(void*)f_5481},
-{"f_5465:expand_scm",(void*)f_5465},
-{"f_5443:expand_scm",(void*)f_5443},
-{"f_5375:expand_scm",(void*)f_5375},
-{"f_5379:expand_scm",(void*)f_5379},
-{"f_5212:expand_scm",(void*)f_5212},
-{"f_5224:expand_scm",(void*)f_5224},
-{"f_5327:expand_scm",(void*)f_5327},
-{"f_5319:expand_scm",(void*)f_5319},
-{"f_5323:expand_scm",(void*)f_5323},
-{"f_5296:expand_scm",(void*)f_5296},
-{"f_5300:expand_scm",(void*)f_5300},
-{"f_5251:expand_scm",(void*)f_5251},
-{"f_5271:expand_scm",(void*)f_5271},
-{"f_5243:expand_scm",(void*)f_5243},
-{"f_5160:expand_scm",(void*)f_5160},
-{"f_5114:expand_scm",(void*)f_5114},
-{"f_5120:expand_scm",(void*)f_5120},
-{"f_5028:expand_scm",(void*)f_5028},
-{"f_5061:expand_scm",(void*)f_5061},
-{"f_5069:expand_scm",(void*)f_5069},
-{"f_5056:expand_scm",(void*)f_5056},
-{"f_5030:expand_scm",(void*)f_5030},
-{"f_5036:expand_scm",(void*)f_5036},
-{"f_5048:expand_scm",(void*)f_5048},
-{"f_5042:expand_scm",(void*)f_5042},
-{"f_4927:expand_scm",(void*)f_4927},
-{"f_4964:expand_scm",(void*)f_4964},
-{"f_4967:expand_scm",(void*)f_4967},
-{"f_4984:expand_scm",(void*)f_4984},
-{"f_5026:expand_scm",(void*)f_5026},
-{"f_4994:expand_scm",(void*)f_4994},
-{"f_5013:expand_scm",(void*)f_5013},
-{"f_4930:expand_scm",(void*)f_4930},
-{"f_4934:expand_scm",(void*)f_4934},
-{"f_4938:expand_scm",(void*)f_4938},
-{"f_4945:expand_scm",(void*)f_4945},
-{"f_4909:expand_scm",(void*)f_4909},
-{"f_4917:expand_scm",(void*)f_4917},
-{"f_4334:expand_scm",(void*)f_4334},
-{"f_4585:expand_scm",(void*)f_4585},
-{"f_4607:expand_scm",(void*)f_4607},
-{"f_4899:expand_scm",(void*)f_4899},
-{"f_4892:expand_scm",(void*)f_4892},
-{"f_4613:expand_scm",(void*)f_4613},
-{"f_4784:expand_scm",(void*)f_4784},
-{"f_4820:expand_scm",(void*)f_4820},
-{"f_4824:expand_scm",(void*)f_4824},
-{"f_4828:expand_scm",(void*)f_4828},
-{"f_4840:expand_scm",(void*)f_4840},
-{"f_4790:expand_scm",(void*)f_4790},
-{"f_4797:expand_scm",(void*)f_4797},
-{"f_4622:expand_scm",(void*)f_4622},
-{"f_4634:expand_scm",(void*)f_4634},
-{"f_4737:expand_scm",(void*)f_4737},
-{"f_4727:expand_scm",(void*)f_4727},
-{"f_4731:expand_scm",(void*)f_4731},
-{"f_4662:expand_scm",(void*)f_4662},
-{"f_4691:expand_scm",(void*)f_4691},
-{"f_4660:expand_scm",(void*)f_4660},
-{"f_4656:expand_scm",(void*)f_4656},
-{"f_4539:expand_scm",(void*)f_4539},
-{"f_4565:expand_scm",(void*)f_4565},
-{"f_4337:expand_scm",(void*)f_4337},
-{"f_4352:expand_scm",(void*)f_4352},
-{"f_4465:expand_scm",(void*)f_4465},
-{"f_4527:expand_scm",(void*)f_4527},
-{"f_4533:expand_scm",(void*)f_4533},
-{"f_4471:expand_scm",(void*)f_4471},
-{"f_4519:expand_scm",(void*)f_4519},
-{"f_4513:expand_scm",(void*)f_4513},
-{"f_4508:expand_scm",(void*)f_4508},
-{"f_4502:expand_scm",(void*)f_4502},
-{"f_4475:expand_scm",(void*)f_4475},
-{"f_4495:expand_scm",(void*)f_4495},
-{"f_4491:expand_scm",(void*)f_4491},
-{"f_4478:expand_scm",(void*)f_4478},
-{"f_4358:expand_scm",(void*)f_4358},
-{"f_4364:expand_scm",(void*)f_4364},
-{"f_4375:expand_scm",(void*)f_4375},
-{"f_4392:expand_scm",(void*)f_4392},
-{"f_4411:expand_scm",(void*)f_4411},
-{"f_4422:expand_scm",(void*)f_4422},
-{"f_4386:expand_scm",(void*)f_4386},
-{"f_4347:expand_scm",(void*)f_4347},
-{"f_4328:expand_scm",(void*)f_4328},
-{"f_4277:expand_scm",(void*)f_4277},
-{"f_4289:expand_scm",(void*)f_4289},
-{"f_4291:expand_scm",(void*)f_4291},
-{"f_4326:expand_scm",(void*)f_4326},
-{"f_4318:expand_scm",(void*)f_4318},
-{"f_4285:expand_scm",(void*)f_4285},
-{"f_4227:expand_scm",(void*)f_4227},
-{"f_4231:expand_scm",(void*)f_4231},
-{"f_4234:expand_scm",(void*)f_4234},
-{"f_4253:expand_scm",(void*)f_4253},
-{"f_4243:expand_scm",(void*)f_4243},
-{"f_4214:expand_scm",(void*)f_4214},
-{"f_4225:expand_scm",(void*)f_4225},
-{"f_4218:expand_scm",(void*)f_4218},
-{"f_4176:expand_scm",(void*)f_4176},
-{"f_4180:expand_scm",(void*)f_4180},
-{"f_4183:expand_scm",(void*)f_4183},
-{"f_4187:expand_scm",(void*)f_4187},
-{"f_3963:expand_scm",(void*)f_3963},
-{"f_4121:expand_scm",(void*)f_4121},
-{"f_4116:expand_scm",(void*)f_4116},
-{"f_3965:expand_scm",(void*)f_3965},
-{"f_3971:expand_scm",(void*)f_3971},
-{"f_4081:expand_scm",(void*)f_4081},
-{"f_4090:expand_scm",(void*)f_4090},
-{"f_4061:expand_scm",(void*)f_4061},
-{"f_4053:expand_scm",(void*)f_4053},
-{"f_3990:expand_scm",(void*)f_3990},
-{"f_3993:expand_scm",(void*)f_3993},
-{"f_4002:expand_scm",(void*)f_4002},
-{"f_3918:expand_scm",(void*)f_3918},
-{"f_3925:expand_scm",(void*)f_3925},
-{"f_3928:expand_scm",(void*)f_3928},
-{"f_3931:expand_scm",(void*)f_3931},
-{"f_3934:expand_scm",(void*)f_3934},
-{"f_3940:expand_scm",(void*)f_3940},
-{"f_3943:expand_scm",(void*)f_3943},
-{"f_3900:expand_scm",(void*)f_3900},
-{"f_3913:expand_scm",(void*)f_3913},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/extras.c b/bootstrap/extras.c
deleted file mode 100644
index 3ddfd835..00000000
--- a/bootstrap/extras.c
+++ /dev/null
@@ -1,6213 +0,0 @@
-/* Generated from extras.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:33
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: extras.scm -optimize-level 2 -include-path . -include-path ./ -inline -explicit-use -no-trace -output-file extras.c -extend ./private-namespace.scm
- unit: extras
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_data_structures_toplevel)
-C_externimport void C_ccall C_data_structures_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_ports_toplevel)
-C_externimport void C_ccall C_ports_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[133];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,23),40,100,111,108,111,111,112,53,54,32,120,54,48,32,105,54,49,32,120,115,54,50,41,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,14),40,115,108,117,114,112,32,112,111,114,116,53,53,41,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,52,49,32,112,111,114,116,53,49,32,114,101,97,100,101,114,53,50,32,109,97,120,53,51,41,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,33),40,100,101,102,45,109,97,120,52,53,32,37,112,111,114,116,51,56,55,51,32,37,114,101,97,100,101,114,51,57,55,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,24),40,100,101,102,45,114,101,97,100,101,114,52,52,32,37,112,111,114,116,51,56,55,54,41};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,12),40,100,101,102,45,112,111,114,116,52,51,41,0,0,0,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,21),40,114,101,97,100,45,102,105,108,101,32,46,32,116,109,112,51,51,51,52,41,0,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,19),40,114,97,110,100,111,109,45,115,101,101,100,32,46,32,110,57,48,41,0,0,0,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,17),40,114,97,110,100,111,109,105,122,101,32,46,32,110,57,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,12),40,114,97,110,100,111,109,32,110,57,56,41,0,0,0,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,12),40,103,49,50,51,32,114,108,49,50,53,41,0,0,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,49,51,48,41,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,21),40,114,101,97,100,45,108,105,110,101,32,46,32,97,114,103,115,49,48,54,41,0,0,0};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,108,110,115,49,54,50,32,110,49,54,51,41,0,0,0,0,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,16),40,100,111,114,101,97,100,32,112,111,114,116,49,54,48,41};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,30),40,114,101,97,100,45,108,105,110,101,115,32,46,32,112,111,114,116,45,97,110,100,45,109,97,120,49,53,50,41,0,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,32,115,116,97,114,116,49,56,57,32,110,49,57,48,32,109,49,57,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,32,115,116,97,114,116,50,48,57,32,110,50,49,48,32,109,50,49,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,114,101,97,100,45,115,116,114,105,110,103,33,32,110,49,55,52,32,100,101,115,116,49,55,53,32,112,111,114,116,49,55,54,32,115,116,97,114,116,49,55,55,41,0,0,0,0,0,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,26),40,98,111,100,121,50,52,53,32,112,111,114,116,50,53,52,32,115,116,97,114,116,50,53,53,41,0,0,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,26),40,100,101,102,45,115,116,97,114,116,50,52,56,32,37,112,111,114,116,50,52,51,50,54,54,41,0,0,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,112,111,114,116,50,52,55,41,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,39),40,114,101,97,100,45,115,116,114,105,110,103,33,32,110,50,51,55,32,100,101,115,116,50,51,56,32,46,32,116,109,112,50,51,54,50,51,57,41,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,114,101,97,100,45,115,116,114,105,110,103,47,112,111,114,116,32,110,50,55,52,32,112,50,55,53,41,0,0,0,0,0,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,25),40,114,101,97,100,45,115,116,114,105,110,103,32,46,32,116,109,112,51,48,53,51,48,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,30),40,114,101,97,100,45,116,111,107,101,110,32,112,114,101,100,51,51,50,32,46,32,112,111,114,116,51,51,51,41,0,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,22),40,98,111,100,121,51,53,53,32,110,51,54,52,32,112,111,114,116,51,54,53,41,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,22),40,100,101,102,45,112,111,114,116,51,53,56,32,37,110,51,53,51,51,55,51,41,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,10),40,100,101,102,45,110,51,53,55,41,0,0,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,29),40,119,114,105,116,101,45,115,116,114,105,110,103,32,115,51,52,56,32,46,32,109,111,114,101,51,52,57,41,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,29),40,119,114,105,116,101,45,108,105,110,101,32,115,116,114,51,56,50,32,46,32,112,111,114,116,51,56,51,41,0,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,23),40,114,101,97,100,45,98,121,116,101,32,46,32,116,109,112,51,57,52,51,57,53,41,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,32),40,119,114,105,116,101,45,98,121,116,101,32,98,121,116,101,52,49,48,32,46,32,116,109,112,52,48,57,52,49,49,41};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,18),40,114,101,97,100,45,109,97,99,114,111,63,32,108,52,51,49,41,0,0,0,0,0,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,19),40,114,101,97,100,45,109,97,99,114,111,45,112,114,101,102,105,120,41,0,0,0,0,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,19),40,111,117,116,32,115,116,114,52,54,56,32,99,111,108,52,54,57,41,0,0,0,0,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,24),40,119,114,45,101,120,112,114,32,101,120,112,114,52,56,52,32,99,111,108,52,56,53,41};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,108,52,56,57,32,99,111,108,52,57,48,41,0,0,0,0,0,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,20),40,119,114,45,108,115,116,32,108,52,56,54,32,99,111,108,52,56,55,41,0,0,0,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,105,53,48,51,32,106,53,48,52,32,99,111,108,53,48,53,41,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,12),40,103,53,50,52,32,99,110,53,50,54,41,0,0,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,18),40,119,114,32,111,98,106,52,55,52,32,99,111,108,52,55,53,41,0,0,0,0,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,20),40,115,112,97,99,101,115,32,110,53,54,49,32,99,111,108,53,54,50,41,0,0,0,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,21),40,105,110,100,101,110,116,32,116,111,53,54,51,32,99,111,108,53,54,52,41,0,0,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,14),40,97,50,55,49,49,32,115,116,114,53,56,48,41,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,38),40,112,114,32,111,98,106,53,54,57,32,99,111,108,53,55,48,32,101,120,116,114,97,53,55,49,32,112,112,45,112,97,105,114,53,55,50,41,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,33),40,112,112,45,101,120,112,114,32,101,120,112,114,53,56,52,32,99,111,108,53,56,53,32,101,120,116,114,97,53,56,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,44),40,112,112,45,99,97,108,108,32,101,120,112,114,53,56,57,32,99,111,108,53,57,48,32,101,120,116,114,97,53,57,49,32,112,112,45,105,116,101,109,53,57,50,41,0,0,0,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,41),40,112,112,45,108,105,115,116,32,108,53,57,54,32,99,111,108,53,57,55,32,101,120,116,114,97,53,57,56,32,112,112,45,105,116,101,109,53,57,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,108,54,48,55,32,99,111,108,54,48,56,41,0,0,0,0,0,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,50),40,112,112,45,100,111,119,110,32,108,54,48,49,32,99,111,108,49,54,48,50,32,99,111,108,50,54,48,51,32,101,120,116,114,97,54,48,52,32,112,112,45,105,116,101,109,54,48,53,41,0,0,0,0,0,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,39),40,116,97,105,108,49,32,114,101,115,116,54,51,49,32,99,111,108,49,54,51,50,32,99,111,108,50,54,51,51,32,99,111,108,51,54,51,52,41,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,39),40,116,97,105,108,50,32,114,101,115,116,54,52,49,32,99,111,108,49,54,52,50,32,99,111,108,50,54,52,51,32,99,111,108,51,54,52,52,41,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,31),40,116,97,105,108,51,32,114,101,115,116,54,53,49,32,99,111,108,49,54,53,50,32,99,111,108,50,54,53,51,41,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,70),40,112,112,45,103,101,110,101,114,97,108,32,101,120,112,114,54,50,48,32,99,111,108,54,50,49,32,101,120,116,114,97,54,50,50,32,110,97,109,101,100,63,54,50,51,32,112,112,45,49,54,50,52,32,112,112,45,50,54,50,53,32,112,112,45,51,54,50,54,41,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,35),40,112,112,45,101,120,112,114,45,108,105,115,116,32,108,54,54,54,32,99,111,108,54,54,55,32,101,120,116,114,97,54,54,56,41,0,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,35),40,112,112,45,108,97,109,98,100,97,32,101,120,112,114,54,54,57,32,99,111,108,54,55,48,32,101,120,116,114,97,54,55,49,41,0,0,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,31),40,112,112,45,105,102,32,101,120,112,114,54,55,50,32,99,111,108,54,55,51,32,101,120,116,114,97,54,55,52,41,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,33),40,112,112,45,99,111,110,100,32,101,120,112,114,54,55,53,32,99,111,108,54,55,54,32,101,120,116,114,97,54,55,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,33),40,112,112,45,99,97,115,101,32,101,120,112,114,54,55,56,32,99,111,108,54,55,57,32,101,120,116,114,97,54,56,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,32),40,112,112,45,97,110,100,32,101,120,112,114,54,56,49,32,99,111,108,54,56,50,32,101,120,116,114,97,54,56,51,41};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,32),40,112,112,45,108,101,116,32,101,120,112,114,54,56,52,32,99,111,108,54,56,53,32,101,120,116,114,97,54,56,54,41};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,34),40,112,112,45,98,101,103,105,110,32,101,120,112,114,54,57,50,32,99,111,108,54,57,51,32,101,120,116,114,97,54,57,52,41,0,0,0,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,31),40,112,112,45,100,111,32,101,120,112,114,54,57,53,32,99,111,108,54,57,54,32,101,120,116,114,97,54,57,55,41,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,15),40,115,116,121,108,101,32,104,101,97,100,54,57,56,41,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,18),40,112,112,32,111,98,106,53,51,56,32,99,111,108,53,51,57,41,0,0,0,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,53),40,103,101,110,101,114,105,99,45,119,114,105,116,101,32,111,98,106,52,50,49,32,100,105,115,112,108,97,121,63,52,50,50,32,119,105,100,116,104,52,50,51,32,111,117,116,112,117,116,52,50,52,41,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,12),40,97,51,50,54,53,32,115,55,54,48,41,0,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,30),40,112,114,101,116,116,121,45,112,114,105,110,116,32,111,98,106,55,53,55,32,46,32,111,112,116,55,53,56,41,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,6),40,110,101,120,116,41,0,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,6),40,115,107,105,112,41,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,20),40,114,101,99,32,109,115,103,55,55,56,32,97,114,103,115,55,55,57,41,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,40),40,102,112,114,105,110,116,102,48,32,108,111,99,55,54,56,32,112,111,114,116,55,54,57,32,109,115,103,55,55,48,32,97,114,103,115,55,55,49,41};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,35),40,102,112,114,105,110,116,102,32,112,111,114,116,56,51,50,32,102,115,116,114,56,51,51,32,46,32,97,114,103,115,56,51,52,41,0,0,0,0,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,26),40,112,114,105,110,116,102,32,102,115,116,114,56,51,54,32,46,32,97,114,103,115,56,51,55,41,0,0,0,0,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,27),40,115,112,114,105,110,116,102,32,102,115,116,114,56,51,57,32,46,32,97,114,103,115,56,52,48,41,0,0,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,32),40,102,111,114,109,97,116,32,102,109,116,45,111,114,45,100,115,116,56,52,52,32,46,32,97,114,103,115,56,52,53,41};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-/* from k1035 */
-static C_word C_fcall stub87(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub87(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-unsigned int t0=(unsigned int )C_num_to_unsigned_int(C_a0);
-srand(t0);
-return C_r;}
-
-C_noret_decl(C_extras_toplevel)
-C_externexport void C_ccall C_extras_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_889)
-static void C_ccall f_889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_892)
-static void C_ccall f_892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_895)
-static void C_ccall f_895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3251)
-static void C_ccall f_3251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3641)
-static void C_ccall f_3641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3598)
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3598)
-static void C_ccall f_3598r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3631)
-static void C_ccall f_3631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3606)
-static void C_ccall f_3606(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3592)
-static void C_ccall f_3592(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3592)
-static void C_ccall f_3592r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3586)
-static void C_ccall f_3586(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3586)
-static void C_ccall f_3586r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3580)
-static void C_ccall f_3580(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_3580)
-static void C_ccall f_3580r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_3282)
-static void C_fcall f_3282(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3286)
-static void C_ccall f_3286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3569)
-static void C_ccall f_3569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3289)
-static void C_ccall f_3289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3320)
-static void C_fcall f_3320(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3355)
-static void C_fcall f_3355(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3533)
-static C_word C_fcall f_3533(C_word t0,C_word t1);
-C_noret_decl(f_3488)
-static void C_ccall f_3488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3491)
-static void C_ccall f_3491(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3497)
-static void C_ccall f_3497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3470)
-static void C_ccall f_3470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3466)
-static void C_ccall f_3466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3453)
-static void C_ccall f_3453(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3449)
-static void C_ccall f_3449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3436)
-static void C_ccall f_3436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3432)
-static void C_ccall f_3432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3419)
-static void C_ccall f_3419(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3406)
-static void C_ccall f_3406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3393)
-static void C_ccall f_3393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3368)
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3336)
-static void C_fcall f_3336(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3329)
-static C_word C_fcall f_3329(C_word t0);
-C_noret_decl(f_3292)
-static void C_ccall f_3292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3314)
-static void C_ccall f_3314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3253)
-static void C_ccall f_3253(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3253)
-static void C_ccall f_3253r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3257)
-static void C_ccall f_3257(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3264)
-static void C_ccall f_3264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3266)
-static void C_ccall f_3266(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3270)
-static void C_ccall f_3270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3260)
-static void C_ccall f_3260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1972)
-static void C_fcall f_1972(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_3240)
-static void C_ccall f_3240(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3244)
-static void C_ccall f_3244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2593)
-static void C_fcall f_2593(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3148)
-static void C_fcall f_3148(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3158)
-static void C_fcall f_3158(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3139)
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3133)
-static void C_ccall f_3133(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3111)
-static void C_ccall f_3111(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3105)
-static void C_ccall f_3105(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3099)
-static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3093)
-static void C_ccall f_3093(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3087)
-static void C_ccall f_3087(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3081)
-static void C_ccall f_3081(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_3075)
-static void C_ccall f_3075(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2927)
-static void C_fcall f_2927(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_3073)
-static void C_ccall f_3073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3025)
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3055)
-static void C_ccall f_3055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3040)
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3012)
-static void C_fcall f_3012(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2971)
-static void C_fcall f_2971(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2998)
-static void C_ccall f_2998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2994)
-static void C_ccall f_2994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2930)
-static void C_fcall f_2930(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2957)
-static void C_ccall f_2957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2953)
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2850)
-static void C_fcall f_2850(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_2856)
-static void C_fcall f_2856(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2925)
-static void C_ccall f_2925(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2921)
-static void C_ccall f_2921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2913)
-static void C_ccall f_2913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2909)
-static void C_ccall f_2909(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2887)
-static void C_ccall f_2887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2879)
-static void C_ccall f_2879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2841)
-static void C_fcall f_2841(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2845)
-static void C_ccall f_2845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2813)
-static void C_fcall f_2813(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2839)
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2817)
-static void C_ccall f_2817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2748)
-static void C_ccall f_2748(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2755)
-static void C_ccall f_2755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2782)
-static void C_ccall f_2782(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2808)
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2766)
-static void C_ccall f_2766(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2661)
-static void C_fcall f_2661(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_2674)
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2712)
-static void C_ccall f_2712(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2677)
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2706)
-static void C_ccall f_2706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2710)
-static void C_ccall f_2710(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2690)
-static void C_ccall f_2690(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2629)
-static void C_fcall f_2629(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2652)
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2645)
-static void C_ccall f_2645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2596)
-static void C_fcall f_2596(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2627)
-static void C_ccall f_2627(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2620)
-static void C_ccall f_2620(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2085)
-static void C_fcall f_2085(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2264)
-static void C_ccall f_2264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2535)
-static void C_ccall f_2535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2574)
-static void C_ccall f_2574(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2584)
-static void C_ccall f_2584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2577)
-static void C_ccall f_2577(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2552)
-static void C_ccall f_2552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2562)
-static void C_ccall f_2562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2555)
-static void C_ccall f_2555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2542)
-static void C_ccall f_2542(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2519)
-static void C_ccall f_2519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2522)
-static void C_ccall f_2522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2529)
-static void C_ccall f_2529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2501)
-static void C_ccall f_2501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2412)
-static void C_ccall f_2412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2415)
-static void C_ccall f_2415(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2476)
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2455)
-static void C_ccall f_2455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2462)
-static void C_ccall f_2462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2439)
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2446)
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2419)
-static void C_fcall f_2419(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2406)
-static void C_ccall f_2406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2322)
-static void C_ccall f_2322(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2324)
-static void C_fcall f_2324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2331)
-static void C_fcall f_2331(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2383)
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2379)
-static void C_ccall f_2379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2362)
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2358)
-static void C_ccall f_2358(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2354)
-static void C_ccall f_2354(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2303)
-static void C_ccall f_2303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2280)
-static void C_ccall f_2280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2283)
-static void C_ccall f_2283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2290)
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2271)
-static void C_ccall f_2271(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2241)
-static void C_ccall f_2241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2245)
-static void C_ccall f_2245(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2115)
-static void C_fcall f_2115(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2198)
-static void C_ccall f_2198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2133)
-static void C_ccall f_2133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2135)
-static void C_fcall f_2135(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2187)
-static void C_ccall f_2187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2183)
-static void C_ccall f_2183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2167)
-static void C_ccall f_2167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2159)
-static void C_ccall f_2159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2088)
-static void C_fcall f_2088(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2095)
-static void C_ccall f_2095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2106)
-static void C_ccall f_2106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2066)
-static void C_fcall f_2066(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2076)
-static void C_ccall f_2076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2033)
-static C_word C_fcall f_2033(C_word t0);
-C_noret_decl(f_1975)
-static void C_fcall f_1975(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2007)
-static void C_fcall f_2007(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1934)
-static void C_ccall f_1934(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1934)
-static void C_ccall f_1934r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1938)
-static void C_ccall f_1938(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1944)
-static void C_ccall f_1944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1894)
-static void C_ccall f_1894(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1894)
-static void C_ccall f_1894r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1898)
-static void C_ccall f_1898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1901)
-static void C_ccall f_1901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1904)
-static void C_ccall f_1904(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1873)
-static void C_ccall f_1873(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1873)
-static void C_ccall f_1873r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1880)
-static void C_ccall f_1880(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1886)
-static void C_ccall f_1886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1784)
-static void C_ccall f_1784(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1784)
-static void C_ccall f_1784r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1825)
-static void C_fcall f_1825(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1820)
-static void C_fcall f_1820(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1789)
-static void C_fcall f_1789(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1793)
-static void C_ccall f_1793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1806)
-static void C_fcall f_1806(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1803)
-static void C_ccall f_1803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1715)
-static void C_ccall f_1715(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1715)
-static void C_ccall f_1715r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1719)
-static void C_ccall f_1719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1722)
-static void C_ccall f_1722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1725)
-static void C_ccall f_1725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1730)
-static void C_fcall f_1730(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1734)
-static void C_ccall f_1734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1740)
-static void C_ccall f_1740(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1750)
-static void C_ccall f_1750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1743)
-static void C_ccall f_1743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1655)
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1655)
-static void C_ccall f_1655r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1598)
-static void C_ccall f_1598(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1602)
-static void C_ccall f_1602(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1626)
-static void C_ccall f_1626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1629)
-static void C_ccall f_1629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1634)
-static void C_fcall f_1634(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1638)
-static void C_ccall f_1638(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1650)
-static void C_ccall f_1650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1611)
-static void C_ccall f_1611(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1614)
-static void C_ccall f_1614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1501)
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_1501)
-static void C_ccall f_1501r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1550)
-static void C_fcall f_1550(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1545)
-static void C_fcall f_1545(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1503)
-static void C_fcall f_1503(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1507)
-static void C_ccall f_1507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1355)
-static void C_ccall f_1355(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_1495)
-static void C_ccall f_1495(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1365)
-static void C_fcall f_1365(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1435)
-static void C_fcall f_1435(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1439)
-static void C_ccall f_1439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1442)
-static void C_fcall f_1442(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1376)
-static void C_fcall f_1376(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1380)
-static void C_ccall f_1380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1265)
-static void C_ccall f_1265(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1265)
-static void C_ccall f_1265r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1332)
-static void C_ccall f_1332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1277)
-static void C_ccall f_1277(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1287)
-static void C_fcall f_1287(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1300)
-static void C_ccall f_1300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1116)
-static void C_ccall f_1116(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1116)
-static void C_ccall f_1116r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1126)
-static void C_fcall f_1126(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1129)
-static void C_ccall f_1129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1149)
-static void C_ccall f_1149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1154)
-static void C_fcall f_1154(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1167)
-static void C_ccall f_1167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1240)
-static void C_ccall f_1240(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1232)
-static void C_ccall f_1232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1218)
-static void C_fcall f_1218(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1200)
-static void C_ccall f_1200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1209)
-static void C_ccall f_1209(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1136)
-static void C_fcall f_1136(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1077)
-static void C_ccall f_1077(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1059)
-static void C_ccall f_1059(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1059)
-static void C_ccall f_1059r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1038)
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1038)
-static void C_ccall f_1038r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1042)
-static void C_ccall f_1042(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1045)
-static void C_ccall f_1045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_897)
-static void C_ccall f_897(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_897)
-static void C_ccall f_897r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_969)
-static void C_fcall f_969(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_964)
-static void C_fcall f_964(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_959)
-static void C_fcall f_959(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_899)
-static void C_fcall f_899(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_952)
-static void C_ccall f_952(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_902)
-static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_910)
-static void C_ccall f_910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_912)
-static void C_fcall f_912(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_932)
-static void C_ccall f_932(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_3282)
-static void C_fcall trf_3282(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3282(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_3282(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_3320)
-static void C_fcall trf_3320(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3320(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3320(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3355)
-static void C_fcall trf_3355(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3355(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3355(t0,t1);}
-
-C_noret_decl(trf_3336)
-static void C_fcall trf_3336(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3336(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3336(t0,t1);}
-
-C_noret_decl(trf_1972)
-static void C_fcall trf_1972(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1972(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_1972(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2593)
-static void C_fcall trf_2593(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2593(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2593(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3148)
-static void C_fcall trf_3148(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3148(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3148(t0,t1,t2);}
-
-C_noret_decl(trf_3158)
-static void C_fcall trf_3158(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3158(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3158(t0,t1);}
-
-C_noret_decl(trf_2927)
-static void C_fcall trf_2927(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2927(void *dummy){
-C_word t8=C_pick(0);
-C_word t7=C_pick(1);
-C_word t6=C_pick(2);
-C_word t5=C_pick(3);
-C_word t4=C_pick(4);
-C_word t3=C_pick(5);
-C_word t2=C_pick(6);
-C_word t1=C_pick(7);
-C_word t0=C_pick(8);
-C_adjust_stack(-9);
-f_2927(t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-
-C_noret_decl(trf_3012)
-static void C_fcall trf_3012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3012(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_3012(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2971)
-static void C_fcall trf_2971(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2971(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2971(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2930)
-static void C_fcall trf_2930(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2930(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2930(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2850)
-static void C_fcall trf_2850(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2850(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_2850(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_2856)
-static void C_fcall trf_2856(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2856(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2856(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2841)
-static void C_fcall trf_2841(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2841(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2841(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2813)
-static void C_fcall trf_2813(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2813(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2813(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2661)
-static void C_fcall trf_2661(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2661(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_2661(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_2629)
-static void C_fcall trf_2629(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2629(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2629(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2596)
-static void C_fcall trf_2596(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2596(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2596(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2085)
-static void C_fcall trf_2085(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2085(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2085(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2419)
-static void C_fcall trf_2419(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2419(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2419(t0,t1,t2);}
-
-C_noret_decl(trf_2324)
-static void C_fcall trf_2324(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2324(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2324(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2331)
-static void C_fcall trf_2331(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2331(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2331(t0,t1);}
-
-C_noret_decl(trf_2115)
-static void C_fcall trf_2115(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2115(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2115(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2135)
-static void C_fcall trf_2135(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2135(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2135(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2088)
-static void C_fcall trf_2088(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2088(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2088(t0,t1,t2,t3);}
-
-C_noret_decl(trf_2066)
-static void C_fcall trf_2066(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2066(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_2066(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1975)
-static void C_fcall trf_1975(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1975(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1975(t0,t1);}
-
-C_noret_decl(trf_2007)
-static void C_fcall trf_2007(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2007(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2007(t0,t1);}
-
-C_noret_decl(trf_1825)
-static void C_fcall trf_1825(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1825(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1825(t0,t1);}
-
-C_noret_decl(trf_1820)
-static void C_fcall trf_1820(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1820(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1820(t0,t1,t2);}
-
-C_noret_decl(trf_1789)
-static void C_fcall trf_1789(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1789(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1789(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1806)
-static void C_fcall trf_1806(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1806(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1806(t0,t1);}
-
-C_noret_decl(trf_1730)
-static void C_fcall trf_1730(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1730(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1730(t0,t1);}
-
-C_noret_decl(trf_1634)
-static void C_fcall trf_1634(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1634(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1634(t0,t1);}
-
-C_noret_decl(trf_1550)
-static void C_fcall trf_1550(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1550(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1550(t0,t1);}
-
-C_noret_decl(trf_1545)
-static void C_fcall trf_1545(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1545(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1545(t0,t1,t2);}
-
-C_noret_decl(trf_1503)
-static void C_fcall trf_1503(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1503(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1503(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1365)
-static void C_fcall trf_1365(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1365(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1365(t0,t1);}
-
-C_noret_decl(trf_1435)
-static void C_fcall trf_1435(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1435(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1435(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1442)
-static void C_fcall trf_1442(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1442(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1442(t0,t1);}
-
-C_noret_decl(trf_1376)
-static void C_fcall trf_1376(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1376(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1376(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1287)
-static void C_fcall trf_1287(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1287(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1287(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1126)
-static void C_fcall trf_1126(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1126(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1126(t0,t1);}
-
-C_noret_decl(trf_1154)
-static void C_fcall trf_1154(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1154(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1154(t0,t1,t2);}
-
-C_noret_decl(trf_1218)
-static void C_fcall trf_1218(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1218(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1218(t0,t1);}
-
-C_noret_decl(trf_1136)
-static void C_fcall trf_1136(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1136(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1136(t0,t1,t2);}
-
-C_noret_decl(trf_969)
-static void C_fcall trf_969(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_969(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_969(t0,t1);}
-
-C_noret_decl(trf_964)
-static void C_fcall trf_964(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_964(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_964(t0,t1,t2);}
-
-C_noret_decl(trf_959)
-static void C_fcall trf_959(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_959(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_959(t0,t1,t2,t3);}
-
-C_noret_decl(trf_899)
-static void C_fcall trf_899(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_899(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_899(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_912)
-static void C_fcall trf_912(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_912(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_912(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-C_noret_decl(tr2rv)
-static void C_fcall tr2rv(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2rv(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n+1);
-t2=C_restore_rest_vector(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr3rv)
-static void C_fcall tr3rv(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3rv(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n+1);
-t3=C_restore_rest_vector(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_extras_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_extras_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("extras_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(840)){
-C_save(t1);
-C_rereclaim2(840*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,133);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],4,"read");
-lf[3]=C_h_intern(&lf[3],7,"reverse");
-lf[4]=C_h_intern(&lf[4],20,"call-with-input-file");
-lf[5]=C_h_intern(&lf[5],9,"read-file");
-lf[6]=C_h_intern(&lf[6],5,"port\077");
-lf[7]=C_h_intern(&lf[7],18,"\003sysstandard-input");
-lf[8]=C_h_intern(&lf[8],9,"\003syserror");
-lf[9]=C_h_intern(&lf[9],11,"random-seed");
-lf[10]=C_h_intern(&lf[10],17,"\003syscheck-integer");
-lf[11]=C_h_intern(&lf[11],15,"current-seconds");
-lf[12]=C_h_intern(&lf[12],9,"randomize");
-lf[13]=C_h_intern(&lf[13],6,"random");
-lf[14]=C_h_intern(&lf[14],11,"make-string");
-lf[15]=C_h_intern(&lf[15],9,"read-line");
-lf[16]=C_h_intern(&lf[16],13,"\003syssubstring");
-lf[17]=C_h_intern(&lf[17],15,"\003sysread-char-0");
-lf[18]=C_h_intern(&lf[18],9,"peek-char");
-lf[19]=C_h_intern(&lf[19],17,"\003sysstring-append");
-lf[20]=C_h_intern(&lf[20],15,"\003sysmake-string");
-lf[21]=C_h_intern(&lf[21],14,"\003syscheck-port");
-lf[22]=C_h_intern(&lf[22],10,"read-lines");
-lf[23]=C_h_intern(&lf[23],16,"\003sysread-string!");
-lf[24]=C_h_intern(&lf[24],12,"read-string!");
-lf[25]=C_h_intern(&lf[25],18,"open-output-string");
-lf[26]=C_h_intern(&lf[26],17,"get-output-string");
-lf[27]=C_h_intern(&lf[27],20,"\003sysread-string/port");
-lf[28]=C_h_intern(&lf[28],11,"read-string");
-lf[29]=C_h_intern(&lf[29],12,"write-string");
-lf[30]=C_h_intern(&lf[30],10,"read-token");
-lf[31]=C_h_intern(&lf[31],16,"\003syswrite-char-0");
-lf[32]=C_h_intern(&lf[32],15,"\003syspeek-char-0");
-lf[33]=C_h_intern(&lf[33],7,"display");
-lf[34]=C_h_intern(&lf[34],19,"\003sysstandard-output");
-lf[35]=C_h_intern(&lf[35],7,"newline");
-lf[36]=C_h_intern(&lf[36],10,"write-line");
-lf[37]=C_h_intern(&lf[37],9,"read-byte");
-lf[38]=C_h_intern(&lf[38],10,"write-byte");
-lf[40]=C_h_intern(&lf[40],5,"quote");
-lf[41]=C_h_intern(&lf[41],10,"quasiquote");
-lf[42]=C_h_intern(&lf[42],7,"unquote");
-lf[43]=C_h_intern(&lf[43],16,"unquote-splicing");
-lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
-lf[45]=C_decode_literal(C_heaptop,"\376B\000\000\001`");
-lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
-lf[47]=C_decode_literal(C_heaptop,"\376B\000\000\002,@");
-lf[48]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[49]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[50]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[51]=C_decode_literal(C_heaptop,"\376B\000\000\003 . ");
-lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[53]=C_decode_literal(C_heaptop,"\376B\000\000\002()");
-lf[54]=C_decode_literal(C_heaptop,"\376B\000\000\005#!eof");
-lf[55]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
-lf[56]=C_h_intern(&lf[56],12,"vector->list");
-lf[57]=C_decode_literal(C_heaptop,"\376B\000\000\002#t");
-lf[58]=C_decode_literal(C_heaptop,"\376B\000\000\002#f");
-lf[59]=C_h_intern(&lf[59],18,"\003sysnumber->string");
-lf[60]=C_h_intern(&lf[60],9,"\003sysprint");
-lf[61]=C_h_intern(&lf[61],21,"\003sysprocedure->string");
-lf[62]=C_decode_literal(C_heaptop,"\376B\000\000\001\134");
-lf[63]=C_decode_literal(C_heaptop,"\376B\000\000\001\042");
-lf[64]=C_decode_literal(C_heaptop,"\376B\000\000\001\042");
-lf[65]=C_decode_literal(C_heaptop,"\376B\000\000\001x");
-lf[66]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
-lf[67]=C_decode_literal(C_heaptop,"\376B\000\000\001u");
-lf[68]=C_h_intern(&lf[68],9,"char-name");
-lf[69]=C_decode_literal(C_heaptop,"\376B\000\000\002#\134");
-lf[70]=C_decode_literal(C_heaptop,"\376B\000\000\006#<eof>");
-lf[71]=C_decode_literal(C_heaptop,"\376B\000\000\016#<unspecified>");
-lf[72]=C_h_intern(&lf[72],19,"\003syspointer->string");
-lf[73]=C_h_intern(&lf[73],28,"\003sysarbitrary-unbound-symbol");
-lf[74]=C_decode_literal(C_heaptop,"\376B\000\000\020#<unbound value>");
-lf[75]=C_h_intern(&lf[75],19,"\003sysuser-print-hook");
-lf[76]=C_h_intern(&lf[76],13,"string-append");
-lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\007#<port ");
-lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[80]=C_decode_literal(C_heaptop,"\376B\000\000\025#<static blob of size");
-lf[81]=C_decode_literal(C_heaptop,"\376B\000\000\017#<blob of size ");
-lf[82]=C_decode_literal(C_heaptop,"\376B\000\000\002#>");
-lf[83]=C_h_intern(&lf[83],23,"\003syslambda-info->string");
-lf[84]=C_decode_literal(C_heaptop,"\376B\000\000\016#<lambda info ");
-lf[85]=C_decode_literal(C_heaptop,"\376B\000\000\025#<unprintable object>");
-lf[86]=C_h_intern(&lf[86],11,"\003sysnumber\077");
-lf[87]=C_decode_literal(C_heaptop,"\376B\000\000\010 ");
-lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\010 ");
-lf[89]=C_h_intern(&lf[89],21,"reverse-string-append");
-lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
-lf[91]=C_h_intern(&lf[91],3,"max");
-lf[92]=C_h_intern(&lf[92],28,"\003syssymbol->qualified-string");
-lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[96]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
-lf[97]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[98]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[100]=C_h_intern(&lf[100],6,"lambda");
-lf[101]=C_h_intern(&lf[101],2,"if");
-lf[102]=C_h_intern(&lf[102],4,"set!");
-lf[103]=C_h_intern(&lf[103],4,"cond");
-lf[104]=C_h_intern(&lf[104],4,"case");
-lf[105]=C_h_intern(&lf[105],3,"and");
-lf[106]=C_h_intern(&lf[106],2,"or");
-lf[107]=C_h_intern(&lf[107],3,"let");
-lf[108]=C_h_intern(&lf[108],5,"begin");
-lf[109]=C_h_intern(&lf[109],2,"do");
-lf[110]=C_h_intern(&lf[110],4,"let*");
-lf[111]=C_h_intern(&lf[111],6,"letrec");
-lf[112]=C_h_intern(&lf[112],6,"define");
-lf[113]=C_h_intern(&lf[113],18,"pretty-print-width");
-lf[114]=C_h_intern(&lf[114],12,"pretty-print");
-lf[115]=C_h_intern(&lf[115],19,"current-output-port");
-lf[116]=C_h_intern(&lf[116],2,"pp");
-lf[117]=C_h_intern(&lf[117],5,"write");
-lf[119]=C_decode_literal(C_heaptop,"\376B\000\000/too few arguments to formatted output procedure");
-lf[120]=C_h_intern(&lf[120],16,"\003sysflush-output");
-lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\037illegal format-string character");
-lf[122]=C_h_intern(&lf[122],13,"\003systty-port\077");
-lf[123]=C_h_intern(&lf[123],7,"fprintf");
-lf[124]=C_h_intern(&lf[124],6,"printf");
-lf[125]=C_h_intern(&lf[125],7,"sprintf");
-lf[126]=C_h_intern(&lf[126],6,"format");
-lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\023illegal destination");
-lf[128]=C_h_intern(&lf[128],12,"output-port\077");
-lf[129]=C_h_intern(&lf[129],17,"register-feature!");
-lf[130]=C_h_intern(&lf[130],7,"srfi-28");
-lf[131]=C_h_intern(&lf[131],14,"make-parameter");
-lf[132]=C_h_intern(&lf[132],6,"extras");
-C_register_lf2(lf,133,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c84 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_889,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k887 */
-static void C_ccall f_889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_889,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_892,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_ports_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k890 in k887 */
-static void C_ccall f_892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_892,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_895,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 65 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[129]+1)))(3,*((C_word*)lf[129]+1),t2,lf[132]);}
-
-/* k893 in k890 in k887 */
-static void C_ccall f_895(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word ab[67],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_895,2,t0,t1);}
-t2=*((C_word*)lf[2]+1);
-t3=*((C_word*)lf[3]+1);
-t4=*((C_word*)lf[4]+1);
-t5=C_mutate((C_word*)lf[5]+1 /* (set! read-file ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_897,a[2]=t2,a[3]=t4,a[4]=t3,a[5]=((C_word)li6),tmp=(C_word)a,a+=6,tmp));
-t6=C_mutate((C_word*)lf[9]+1 /* (set! random-seed ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1038,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[12]+1 /* (set! randomize ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1059,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[13]+1 /* (set! random ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1077,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
-t9=*((C_word*)lf[14]+1);
-t10=C_mutate((C_word*)lf[15]+1 /* (set! read-line ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1116,a[2]=t9,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));
-t11=*((C_word*)lf[15]+1);
-t12=*((C_word*)lf[4]+1);
-t13=*((C_word*)lf[3]+1);
-t14=C_mutate((C_word*)lf[22]+1 /* (set! read-lines ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1265,a[2]=t12,a[3]=t11,a[4]=t13,a[5]=((C_word)li15),tmp=(C_word)a,a+=6,tmp));
-t15=C_mutate((C_word*)lf[23]+1 /* (set! read-string! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1355,a[2]=((C_word)li18),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[24]+1 /* (set! read-string! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1501,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
-t17=*((C_word*)lf[25]+1);
-t18=*((C_word*)lf[26]+1);
-t19=C_mutate((C_word*)lf[27]+1 /* (set! read-string/port ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1598,a[2]=t17,a[3]=t18,a[4]=((C_word)li24),tmp=(C_word)a,a+=5,tmp));
-t20=C_mutate((C_word*)lf[28]+1 /* (set! read-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1655,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
-t21=*((C_word*)lf[25]+1);
-t22=*((C_word*)lf[26]+1);
-t23=C_mutate((C_word*)lf[30]+1 /* (set! read-token ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1715,a[2]=t21,a[3]=t22,a[4]=((C_word)li27),tmp=(C_word)a,a+=5,tmp));
-t24=*((C_word*)lf[33]+1);
-t25=C_mutate((C_word*)lf[29]+1 /* (set! write-string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1784,a[2]=t24,a[3]=((C_word)li31),tmp=(C_word)a,a+=4,tmp));
-t26=*((C_word*)lf[33]+1);
-t27=*((C_word*)lf[35]+1);
-t28=C_mutate((C_word*)lf[36]+1 /* (set! write-line ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1873,a[2]=t26,a[3]=t27,a[4]=((C_word)li32),tmp=(C_word)a,a+=5,tmp));
-t29=C_mutate((C_word*)lf[37]+1 /* (set! read-byte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1894,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
-t30=C_mutate((C_word*)lf[38]+1 /* (set! write-byte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1934,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-t31=*((C_word*)lf[25]+1);
-t32=*((C_word*)lf[26]+1);
-t33=C_mutate(&lf[39] /* (set! generic-write ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1972,a[2]=t31,a[3]=t32,a[4]=((C_word)li68),tmp=(C_word)a,a+=5,tmp));
-t34=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3251,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 582 make-parameter */
-t35=*((C_word*)lf[131]+1);
-((C_proc3)(void*)(*((C_word*)t35+1)))(3,t35,t34,C_fix(79));}
-
-/* k3249 in k893 in k890 in k887 */
-static void C_ccall f_3251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[29],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3251,2,t0,t1);}
-t2=C_mutate((C_word*)lf[113]+1 /* (set! pretty-print-width ...) */,t1);
-t3=C_mutate((C_word*)lf[114]+1 /* (set! pretty-print ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3253,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[116]+1 /* (set! pp ...) */,*((C_word*)lf[114]+1));
-t5=*((C_word*)lf[117]+1);
-t6=*((C_word*)lf[35]+1);
-t7=*((C_word*)lf[33]+1);
-t8=*((C_word*)lf[25]+1);
-t9=*((C_word*)lf[26]+1);
-t10=C_mutate(&lf[118] /* (set! fprintf0 ...) */,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3282,a[2]=t8,a[3]=t6,a[4]=t7,a[5]=t5,a[6]=t9,a[7]=((C_word)li75),tmp=(C_word)a,a+=8,tmp));
-t11=C_mutate((C_word*)lf[123]+1 /* (set! fprintf ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3580,a[2]=((C_word)li76),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[124]+1 /* (set! printf ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3586,a[2]=((C_word)li77),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[125]+1 /* (set! sprintf ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3592,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp));
-t14=*((C_word*)lf[123]+1);
-t15=*((C_word*)lf[125]+1);
-t16=*((C_word*)lf[124]+1);
-t17=C_mutate((C_word*)lf[126]+1 /* (set! format ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3598,a[2]=t14,a[3]=t15,a[4]=t16,a[5]=((C_word)li79),tmp=(C_word)a,a+=6,tmp));
-t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3641,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 674 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[129]+1)))(3,*((C_word*)lf[129]+1),t18,lf[130]);}
-
-/* k3639 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* format in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3598(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3598r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3598r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3598r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(13);
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3606,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=t2;
-if(C_truep(t6)){
-if(C_truep((C_word)C_booleanp(t2))){
-C_apply(4,0,t1,((C_word*)t0)[4],((C_word*)t4)[1]);}
-else{
-if(C_truep((C_word)C_i_stringp(t2))){
-t7=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t4)[1]);
-t8=C_set_block_item(t4,0,t7);
-C_apply(4,0,t1,((C_word*)t0)[3],((C_word*)t4)[1]);}
-else{
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3631,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 669 output-port? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[128]+1)))(3,*((C_word*)lf[128]+1),t7,t2);}}}
-else{
-C_apply(4,0,t1,((C_word*)t0)[3],((C_word*)t4)[1]);}}
-
-/* k3629 in format in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3631,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-C_apply(4,0,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)((C_word*)t0)[5])[1]);}
-else{
-/* extras.scm: 671 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[2],lf[126],lf[127],((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);}}
-
-/* k3604 in format in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3606(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* sprintf in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3592(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3592r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3592r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3592r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* extras.scm: 659 fprintf0 */
-t4=lf[118];
-f_3282(t4,t1,lf[125],C_SCHEME_FALSE,t2,t3);}
-
-/* printf in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3586(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3586r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3586r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3586r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* extras.scm: 656 fprintf0 */
-t4=lf[118];
-f_3282(t4,t1,lf[124],*((C_word*)lf[34]+1),t2,t3);}
-
-/* fprintf in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3580(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr4r,(void*)f_3580r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_3580r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_3580r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-/* extras.scm: 653 fprintf0 */
-t5=lf[118];
-f_3282(t5,t1,lf[123],t2,t3,t4);}
-
-/* fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_fcall f_3282(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3282,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3286,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t2,a[9]=((C_word*)t0)[6],a[10]=t1,a[11]=t3,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t3)){
-/* extras.scm: 601 ##sys#check-port */
-t7=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t3,t2);}
-else{
-t7=t6;
-f_3286(2,t7,C_SCHEME_UNDEFINED);}}
-
-/* k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3286,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3289,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3569,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[11],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[11])){
-/* extras.scm: 602 ##sys#tty-port? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[122]+1)))(3,*((C_word*)lf[122]+1),t3,((C_word*)t0)[11]);}
-else{
-/* extras.scm: 604 open-output-string */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t2);}}
-
-/* k3567 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_3289(2,t2,((C_word*)t0)[3]);}
-else{
-/* extras.scm: 604 open-output-string */
-t2=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[4]);}}
-
-/* k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3289,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3292,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3320,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li74),tmp=(C_word)a,a+=9,tmp));
-t6=((C_word*)t4)[1];
-f_3320(t6,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_fcall f_3320(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[33],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3320,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(C_word)C_i_check_string_2(t2,((C_word*)t0)[7]);
-t6=C_fix(0);
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(C_word)C_block_size(t2);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3329,a[2]=t7,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
-t14=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3336,a[2]=((C_word*)t0)[7],a[3]=t4,a[4]=((C_word)li71),tmp=(C_word)a,a+=5,tmp));
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3355,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],a[6]=t12,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t16,a[10]=t10,a[11]=t8,a[12]=t7,a[13]=((C_word)li73),tmp=(C_word)a,a+=14,tmp));
-t18=((C_word*)t16)[1];
-f_3355(t18,t1);}
-
-/* loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_fcall f_3355(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word *a;
-loop:
-a=C_alloc(12);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_3355,NULL,2,t0,t1);}
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(((C_word*)((C_word*)t0)[12])[1],((C_word*)t0)[11]))){
-t2=C_SCHEME_UNDEFINED;
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=f_3329(((C_word*)((C_word*)t0)[10])[1]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3368,a[2]=t1,a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_eqp(t2,C_make_character(126));
-t5=(C_truep(t4)?(C_word)C_fixnum_lessp(((C_word*)((C_word*)t0)[12])[1],((C_word*)t0)[11]):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=f_3329(((C_word*)((C_word*)t0)[10])[1]);
-t7=(C_word)C_u_i_char_upcase(t6);
-switch(t7){
-case C_make_character(83):
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3393,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 625 next */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t9,t8);
-case C_make_character(65):
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3406,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 626 next */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t9,t8);
-case C_make_character(67):
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3419,a[2]=((C_word*)t0)[7],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 627 next */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t9,t8);
-case C_make_character(66):
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3432,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3436,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 628 next */
-t10=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t10,t9);
-case C_make_character(79):
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3449,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3453,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 629 next */
-t10=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t10,t9);
-case C_make_character(88):
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3466,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3470,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 630 next */
-t10=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t10,t9);
-case C_make_character(33):
-/* extras.scm: 631 ##sys#flush-output */
-t8=*((C_word*)lf[120]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t3,((C_word*)t0)[7]);
-case C_make_character(63):
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3488,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 633 next */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_3336(t9,t8);
-case C_make_character(126):
-/* extras.scm: 637 ##sys#write-char-0 */
-t8=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t3,C_make_character(126),((C_word*)t0)[7]);
-default:
-t8=(C_word)C_eqp(t7,C_make_character(37));
-t9=(C_truep(t8)?t8:(C_word)C_eqp(t7,C_make_character(78)));
-if(C_truep(t9)){
-/* extras.scm: 638 newline */
-t10=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t10))(3,t10,t3,((C_word*)t0)[7]);}
-else{
-if(C_truep((C_word)C_u_i_char_whitespacep(t6))){
-t10=f_3329(((C_word*)((C_word*)t0)[10])[1]);
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3533,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[10],a[4]=((C_word)li72),tmp=(C_word)a,a+=5,tmp);
-t12=f_3533(t11,t10);
-/* extras.scm: 647 loop */
-t25=t1;
-t1=t25;
-goto loop;}
-else{
-/* extras.scm: 645 ##sys#error */
-t10=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t3,((C_word*)t0)[4],lf[121],t6);}}}}
-else{
-/* extras.scm: 646 ##sys#write-char-0 */
-t6=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t2,((C_word*)t0)[7]);}}}
-
-/* skip in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static C_word C_fcall f_3533(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-if(C_truep((C_word)C_u_i_char_whitespacep(t1))){
-t2=f_3329(((C_word*)((C_word*)t0)[3])[1]);
-t6=t2;
-t1=t6;
-goto loop;}
-else{
-t2=(C_word)C_fixnum_difference(((C_word*)((C_word*)t0)[2])[1],C_fix(1));
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-return(t3);}}
-
-/* k3486 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3488,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3491,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 634 next */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_3336(t3,t2);}
-
-/* k3489 in k3486 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3491(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3491,2,t0,t1);}
-t2=(C_word)C_i_check_list_2(t1,((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3497,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 636 rec */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3320(t4,t3,((C_word*)t0)[2],t1);}
-
-/* k3495 in k3489 in k3486 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 647 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_3355(t2,((C_word*)t0)[2]);}
-
-/* k3468 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 630 ##sys#number->string */
-t2=*((C_word*)lf[59]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k3464 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 630 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3451 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3453(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 629 ##sys#number->string */
-t2=*((C_word*)lf[59]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(8));}
-
-/* k3447 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3449(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 629 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3434 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 628 ##sys#number->string */
-t2=*((C_word*)lf[59]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(2));}
-
-/* k3430 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 628 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3417 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3419(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 627 ##sys#write-char-0 */
-t2=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3404 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 626 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3391 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 625 write */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k3366 in loop in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3368(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 647 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_3355(t2,((C_word*)t0)[2]);}
-
-/* next in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_fcall f_3336(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3336,NULL,2,t0,t1);}
-if(C_truep((C_word)C_eqp(((C_word*)((C_word*)t0)[3])[1],C_SCHEME_END_OF_LIST))){
-/* extras.scm: 615 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,t1,((C_word*)t0)[2],lf[119]);}
-else{
-t2=(C_word)C_slot(((C_word*)((C_word*)t0)[3])[1],C_fix(0));
-t3=(C_word)C_slot(((C_word*)((C_word*)t0)[3])[1],C_fix(1));
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}}
-
-/* fetch in rec in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static C_word C_fcall f_3329(C_word t0){
-C_word tmp;
-C_word t1;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t1=(C_word)C_subchar(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
-t2=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],C_fix(1));
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-return(t1);}
-
-/* k3290 in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3292,2,t0,t1);}
-t2=((C_word*)t0)[5];
-if(C_truep(t2)){
-t3=(C_word)C_eqp(((C_word*)t0)[4],((C_word*)t0)[5]);
-if(C_truep(t3)){
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3314,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 650 get-output-string */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[4]);}}
-else{
-/* extras.scm: 648 get-output-string */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[3],((C_word*)t0)[4]);}}
-
-/* k3312 in k3290 in k3287 in k3284 in fprintf0 in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 650 ##sys#print */
-t2=*((C_word*)lf[60]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3253(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3rv,(void*)f_3253r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest_vector(a,C_rest_count(0));
-f_3253r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3253r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3257,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_notvemptyp(t3))){
-t5=t4;
-f_3257(2,t5,(C_word)C_i_vector_ref(t3,C_fix(0)));}
-else{
-/* extras.scm: 585 current-output-port */
-t5=*((C_word*)lf[115]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k3255 in pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3257(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3257,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3260,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3264,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 586 pretty-print-width */
-t4=*((C_word*)lf[113]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k3262 in k3255 in pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3264,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3266,a[2]=((C_word*)t0)[4],a[3]=((C_word)li69),tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 586 generic-write */
-t3=lf[39];
-f_1972(t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,t1,t2);}
-
-/* a3265 in k3262 in k3255 in pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3266(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3266,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3270,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 586 display */
-t4=*((C_word*)lf[33]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,((C_word*)t0)[2]);}
-
-/* k3268 in a3265 in k3262 in k3255 in pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* k3258 in k3255 in pretty-print in k3249 in k893 in k890 in k887 */
-static void C_ccall f_3260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* generic-write in k893 in k890 in k887 */
-static void C_fcall f_1972(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[45],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1972,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1975,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp));
-t17=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2033,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
-t18=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2066,a[2]=t5,a[3]=((C_word)li37),tmp=(C_word)a,a+=4,tmp));
-t19=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2085,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t7,a[6]=t11,a[7]=t9,a[8]=t13,a[9]=((C_word)li43),tmp=(C_word)a,a+=10,tmp));
-t20=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2593,a[2]=t7,a[3]=t9,a[4]=t13,a[5]=t4,a[6]=t3,a[7]=t11,a[8]=((C_word)li67),tmp=(C_word)a,a+=9,tmp));
-if(C_truep(t4)){
-t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3240,a[2]=t2,a[3]=t15,a[4]=t1,a[5]=t11,tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 576 make-string */
-t22=*((C_word*)lf[14]+1);
-((C_proc4)(void*)(*((C_word*)t22+1)))(4,t22,t21,C_fix(1),C_make_character(10));}
-else{
-/* extras.scm: 577 wr */
-t21=((C_word*)t13)[1];
-f_2085(t21,t1,t2,C_fix(0));}}
-
-/* k3238 in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3240(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3240,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3244,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 576 pp */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2593(t3,t2,((C_word*)t0)[2],C_fix(0));}
-
-/* k3242 in k3238 in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 576 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2593(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word ab[152],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2593,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_UNDEFINED;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_UNDEFINED;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_SCHEME_UNDEFINED;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_SCHEME_UNDEFINED;
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=C_SCHEME_UNDEFINED;
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_SCHEME_UNDEFINED;
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=C_SCHEME_UNDEFINED;
-t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
-t32=C_SCHEME_UNDEFINED;
-t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
-t34=C_SCHEME_UNDEFINED;
-t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
-t36=C_SCHEME_UNDEFINED;
-t37=(*a=C_VECTOR_TYPE|1,a[1]=t36,tmp=(C_word)a,a+=2,tmp);
-t38=C_SCHEME_UNDEFINED;
-t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
-t40=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2596,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word)li44),tmp=(C_word)a,a+=5,tmp));
-t41=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2629,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word)li45),tmp=(C_word)a,a+=5,tmp));
-t42=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2661,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t11,a[6]=t15,a[7]=((C_word*)t0)[7],a[8]=((C_word)li47),tmp=(C_word)a,a+=9,tmp));
-t43=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2748,a[2]=((C_word*)t0)[2],a[3]=t15,a[4]=t39,a[5]=t13,a[6]=t19,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[3],a[9]=t11,a[10]=t9,a[11]=((C_word)li48),tmp=(C_word)a,a+=12,tmp));
-t44=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2813,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[4],a[4]=t17,a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
-t45=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2841,a[2]=((C_word*)t0)[7],a[3]=t17,a[4]=((C_word)li50),tmp=(C_word)a,a+=5,tmp));
-t46=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2850,a[2]=((C_word*)t0)[7],a[3]=t7,a[4]=t9,a[5]=((C_word)li52),tmp=(C_word)a,a+=6,tmp));
-t47=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2927,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[4],a[4]=t17,a[5]=t7,a[6]=t9,a[7]=((C_word)li56),tmp=(C_word)a,a+=8,tmp));
-t48=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3075,a[2]=t11,a[3]=t15,a[4]=((C_word)li57),tmp=(C_word)a,a+=5,tmp));
-t49=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3081,a[2]=t11,a[3]=t21,a[4]=t19,a[5]=((C_word)li58),tmp=(C_word)a,a+=6,tmp));
-t50=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3087,a[2]=t11,a[3]=t19,a[4]=((C_word)li59),tmp=(C_word)a,a+=5,tmp));
-t51=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3093,a[2]=t21,a[3]=t13,a[4]=((C_word)li60),tmp=(C_word)a,a+=5,tmp));
-t52=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3099,a[2]=t21,a[3]=t11,a[4]=t19,a[5]=((C_word)li61),tmp=(C_word)a,a+=6,tmp));
-t53=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3105,a[2]=t11,a[3]=t13,a[4]=((C_word)li62),tmp=(C_word)a,a+=5,tmp));
-t54=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3111,a[2]=t11,a[3]=t21,a[4]=t19,a[5]=((C_word)li63),tmp=(C_word)a,a+=6,tmp));
-t55=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3133,a[2]=t11,a[3]=t19,a[4]=((C_word)li64),tmp=(C_word)a,a+=5,tmp));
-t56=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3139,a[2]=t11,a[3]=t21,a[4]=t19,a[5]=((C_word)li65),tmp=(C_word)a,a+=6,tmp));
-t57=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3148,a[2]=t37,a[3]=t35,a[4]=t33,a[5]=t31,a[6]=t29,a[7]=t27,a[8]=t25,a[9]=t23,a[10]=((C_word)li66),tmp=(C_word)a,a+=11,tmp));
-/* extras.scm: 573 pr */
-t58=((C_word*)t9)[1];
-f_2661(t58,t1,t2,t3,C_fix(0),((C_word*)t11)[1]);}
-
-/* style in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_3148(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3148,NULL,3,t0,t1,t2);}
-t3=(C_word)C_eqp(t2,lf[100]);
-t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3158,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=((C_word*)t0)[9],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_3158(t5,t3);}
-else{
-t5=(C_word)C_eqp(t2,lf[110]);
-if(C_truep(t5)){
-t6=t4;
-f_3158(t6,t5);}
-else{
-t6=(C_word)C_eqp(t2,lf[111]);
-t7=t4;
-f_3158(t7,(C_truep(t6)?t6:(C_word)C_eqp(t2,lf[112])));}}}
-
-/* k3156 in style in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_3158(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[10])[1]);}
-else{
-t2=(C_word)C_eqp(((C_word*)t0)[9],lf[101]);
-t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[9],lf[102]));
-if(C_truep(t3)){
-t4=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)((C_word*)t0)[8])[1]);}
-else{
-t4=(C_word)C_eqp(((C_word*)t0)[9],lf[103]);
-if(C_truep(t4)){
-t5=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,((C_word*)((C_word*)t0)[7])[1]);}
-else{
-t5=(C_word)C_eqp(((C_word*)t0)[9],lf[104]);
-if(C_truep(t5)){
-t6=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,((C_word*)((C_word*)t0)[6])[1]);}
-else{
-t6=(C_word)C_eqp(((C_word*)t0)[9],lf[105]);
-t7=(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[9],lf[106]));
-if(C_truep(t7)){
-t8=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,((C_word*)((C_word*)t0)[5])[1]);}
-else{
-t8=(C_word)C_eqp(((C_word*)t0)[9],lf[107]);
-if(C_truep(t8)){
-t9=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-t9=(C_word)C_eqp(((C_word*)t0)[9],lf[108]);
-if(C_truep(t9)){
-t10=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t10=(C_word)C_eqp(((C_word*)t0)[9],lf[109]);
-t11=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_truep(t10)?((C_word*)((C_word*)t0)[2])[1]:C_SCHEME_FALSE));}}}}}}}}
-
-/* pp-do in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3139(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3139,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 551 pp-general */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_2927(t5,t1,t2,t3,t4,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-begin in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3133(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3133,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 548 pp-general */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2927(t5,t1,t2,t3,t4,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-let in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3111(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3111,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_pairp(t5))){
-t6=(C_word)C_i_car(t5);
-t7=(C_word)C_i_symbolp(t6);
-/* extras.scm: 545 pp-general */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_2927(t8,t1,t2,t3,t4,t7,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}
-else{
-/* extras.scm: 545 pp-general */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2927(t6,t1,t2,t3,t4,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}}
-
-/* pp-and in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3105(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3105,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 540 pp-call */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2813(t5,t1,t2,t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-case in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3099,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 537 pp-general */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_2927(t5,t1,t2,t3,t4,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-cond in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3093(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3093,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 534 pp-call */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2813(t5,t1,t2,t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-if in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3087(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3087,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 531 pp-general */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2927(t5,t1,t2,t3,t4,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-lambda in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3081(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3081,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 528 pp-general */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_2927(t5,t1,t2,t3,t4,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_FALSE,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-expr-list in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3075(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_3075,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 525 pp-list */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2841(t5,t1,t2,t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2927(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
-C_word tmp;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[42],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2927,NULL,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2930,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t12,a[5]=t4,a[6]=t6,a[7]=((C_word)li53),tmp=(C_word)a,a+=8,tmp));
-t16=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t14,a[5]=t4,a[6]=t7,a[7]=((C_word)li54),tmp=(C_word)a,a+=8,tmp));
-t17=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3012,a[2]=t8,a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li55),tmp=(C_word)a,a+=6,tmp));
-t18=(C_word)C_i_car(t2);
-t19=(C_word)C_i_cdr(t2);
-t20=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3025,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t10,a[6]=t3,a[7]=t19,a[8]=t5,tmp=(C_word)a,a+=9,tmp);
-t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3073,a[2]=t18,a[3]=t20,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 516 out */
-t22=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t22,t21,lf[99],t3);}
-
-/* k3071 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 516 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3023 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3025,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[8])?(C_word)C_i_pairp(((C_word*)t0)[7]):C_SCHEME_FALSE);
-if(C_truep(t2)){
-t3=(C_word)C_i_car(((C_word*)t0)[7]);
-t4=(C_word)C_i_cdr(((C_word*)t0)[7]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3040,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3055,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 520 out */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t7,t6,lf[98],t1);}
-else{
-t3=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[6],C_fix(2));
-t4=(C_word)C_a_i_plus(&a,2,t1,C_fix(1));
-/* extras.scm: 522 tail1 */
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_2930(t5,((C_word*)t0)[4],((C_word*)t0)[7],t3,t1,t4);}}
-
-/* k3053 in k3023 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 520 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3038 in k3023 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
-t2=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[5],C_fix(2));
-t3=(C_word)C_a_i_plus(&a,2,t1,C_fix(1));
-/* extras.scm: 521 tail1 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_2930(t4,((C_word*)t0)[3],((C_word*)t0)[2],t2,t1,t3);}
-
-/* tail3 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_3012(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3012,NULL,5,t0,t1,t2,t3,t4);}
-/* extras.scm: 512 pp-down */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_2850(t5,t1,t2,t4,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* tail2 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2971(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2971,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(C_truep(((C_word*)t0)[6])?(C_word)C_i_pairp(t2):C_SCHEME_FALSE);
-if(C_truep(t6)){
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_cdr(t2);
-t9=(C_word)C_i_nullp(t8);
-t10=(C_truep(t9)?(C_word)C_a_i_plus(&a,2,((C_word*)t0)[5],C_fix(1)):C_fix(0));
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2994,a[2]=t3,a[3]=t8,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t12=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2998,a[2]=((C_word*)t0)[6],a[3]=t10,a[4]=t7,a[5]=t11,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 508 indent */
-t13=((C_word*)((C_word*)t0)[2])[1];
-f_2629(t13,t12,t5,t4);}
-else{
-/* extras.scm: 509 tail3 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_3012(t7,t1,t2,t3,t4);}}
-
-/* k2996 in tail2 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 508 pr */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2661(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2992 in tail2 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 508 tail3 */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_3012(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* tail1 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2930(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2930,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(C_truep(((C_word*)t0)[6])?(C_word)C_i_pairp(t2):C_SCHEME_FALSE);
-if(C_truep(t6)){
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_cdr(t2);
-t9=(C_word)C_i_nullp(t8);
-t10=(C_truep(t9)?(C_word)C_a_i_plus(&a,2,((C_word*)t0)[5],C_fix(1)):C_fix(0));
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2953,a[2]=t5,a[3]=t3,a[4]=t8,a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t12=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2957,a[2]=((C_word*)t0)[6],a[3]=t10,a[4]=t7,a[5]=t11,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 500 indent */
-t13=((C_word*)((C_word*)t0)[2])[1];
-f_2629(t13,t12,t5,t4);}
-else{
-/* extras.scm: 501 tail2 */
-t7=((C_word*)((C_word*)t0)[4])[1];
-f_2971(t7,t1,t2,t3,t4,t5);}}
-
-/* k2955 in tail1 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 500 pr */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2661(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2951 in tail1 in pp-general in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 500 tail2 */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2971(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2850(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2850,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2856,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t6,a[6]=((C_word*)t0)[4],a[7]=t8,a[8]=t5,a[9]=((C_word)li51),tmp=(C_word)a,a+=10,tmp));
-t10=((C_word*)t8)[1];
-f_2856(t10,t1,t2,t3);}
-
-/* loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2856(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[20],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2856,NULL,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_cdr(t2);
-t5=(C_word)C_i_nullp(t4);
-t6=(C_truep(t5)?(C_word)C_a_i_plus(&a,2,((C_word*)t0)[8],C_fix(1)):C_fix(0));
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2879,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t8=(C_word)C_i_car(t2);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2887,a[2]=((C_word*)t0)[5],a[3]=t6,a[4]=t8,a[5]=t7,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 483 indent */
-t10=((C_word*)((C_word*)t0)[4])[1];
-f_2629(t10,t9,((C_word*)t0)[3],t3);}
-else{
-if(C_truep((C_word)C_i_nullp(t2))){
-/* extras.scm: 485 out */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t4,t1,lf[95],t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2909,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2913,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t4,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2921,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2925,a[2]=t6,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 489 indent */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_2629(t8,t7,((C_word*)t0)[3],t3);}}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k2923 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2925(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 489 out */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t2,((C_word*)t0)[2],lf[97],t1);}
-
-/* k2919 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 489 indent */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2629(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2911 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2913(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2913,2,t0,t1);}
-t2=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[6],C_fix(1));
-/* extras.scm: 488 pr */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2661(t3,((C_word*)t0)[4],((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
-
-/* k2907 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2909(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 487 out */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t2,((C_word*)t0)[2],lf[96],t1);}
-
-/* k2885 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 483 pr */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2661(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2877 in loop in pp-down in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 482 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2856(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* pp-list in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2841(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2841,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2845,a[2]=t5,a[3]=t4,a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 473 out */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t7,t6,lf[94],t3);}
-
-/* k2843 in pp-list in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2845(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 474 pp-down */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2850(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* pp-call in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2813(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2813,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2817,a[2]=t5,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-t7=(C_word)C_i_car(t2);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2839,a[2]=t7,a[3]=t6,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 465 out */
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t9,t8,lf[93],t3);}
-
-/* k2837 in pp-call in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 465 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2815 in pp-call in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2817,2,t0,t1);}
-if(C_truep(((C_word*)t0)[7])){
-t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t3=(C_word)C_a_i_plus(&a,2,t1,C_fix(1));
-/* extras.scm: 467 pp-down */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_2850(t4,((C_word*)t0)[4],t2,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* pp-expr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2748(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[14],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2748,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2755,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t4,a[11]=t1,a[12]=((C_word*)t0)[10],a[13]=t2,tmp=(C_word)a,a+=14,tmp);
-/* extras.scm: 445 read-macro? */
-f_1975(t5,t2);}
-
-/* k2753 in pp-expr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2755,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[13];
-t3=(C_word)C_i_cadr(t2);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2766,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t3,a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
-t5=f_2033(((C_word*)t0)[13]);
-/* extras.scm: 447 out */
-t6=((C_word*)((C_word*)t0)[7])[1];
-f_2066(t6,t4,t5,((C_word*)t0)[6]);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[13]);
-if(C_truep((C_word)C_i_symbolp(t2))){
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2782,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-/* extras.scm: 452 style */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3148(t4,t3,t2);}
-else{
-/* extras.scm: 459 pp-list */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_2841(t3,((C_word*)t0)[11],((C_word*)t0)[13],((C_word*)t0)[6],((C_word*)t0)[10],((C_word*)((C_word*)t0)[9])[1]);}}}
-
-/* k2780 in k2753 in pp-expr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2782(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2782,2,t0,t1);}
-if(C_truep(t1)){
-/* extras.scm: 454 proc */
-t2=t1;
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2808,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-/* extras.scm: 455 ##sys#symbol->qualified-string */
-t3=*((C_word*)lf[92]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
-
-/* k2806 in k2780 in k2753 in pp-expr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_string_length(t1);
-if(C_truep((C_word)C_i_greaterp(t2,C_fix(5)))){
-/* extras.scm: 457 pp-general */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_2927(t3,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-/* extras.scm: 458 pp-call */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_2813(t3,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1]);}}
-
-/* k2764 in k2753 in pp-expr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2766(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 446 pr */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2661(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* pr in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2661(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[26],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2661,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=(C_word)C_i_pairp(t2);
-t7=(C_truep(t6)?t6:(C_word)C_i_vectorp(t2));
-if(C_truep(t7)){
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2674,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t4,a[6]=t5,a[7]=t2,a[8]=t9,a[9]=t3,a[10]=t1,a[11]=((C_word*)t0)[7],tmp=(C_word)a,a+=12,tmp);
-t11=(C_word)C_a_i_minus(&a,2,((C_word*)t0)[3],t3);
-t12=(C_word)C_a_i_minus(&a,2,t11,t4);
-t13=(C_word)C_a_i_plus(&a,2,t12,C_fix(1));
-/* extras.scm: 431 max */
-t14=*((C_word*)lf[91]+1);
-((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t10,t13,C_fix(50));}
-else{
-/* extras.scm: 442 wr */
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_2085(t8,t1,t2,t3);}}
-
-/* k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2674,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2677,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t3,tmp=(C_word)a,a+=12,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2712,a[2]=t3,a[3]=((C_word*)t0)[8],a[4]=((C_word)li46),tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 432 generic-write */
-t6=lf[39];
-f_1972(t6,t4,((C_word*)t0)[7],((C_word*)t0)[2],C_SCHEME_FALSE,t5);}
-
-/* a2711 in k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2712(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2712,3,t0,t1,t2);}
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[3])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t3);
-t5=(C_word)C_i_string_length(t2);
-t6=(C_word)C_a_i_minus(&a,2,((C_word*)((C_word*)t0)[2])[1],t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_i_greaterp(((C_word*)((C_word*)t0)[2])[1],C_fix(0)));}
-
-/* k2675 in k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2677,2,t0,t1);}
-if(C_truep((C_word)C_i_greaterp(((C_word*)((C_word*)t0)[11])[1],C_fix(0)))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2690,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 438 reverse-string-append */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[89]+1)))(3,*((C_word*)lf[89]+1),t2,((C_word*)((C_word*)t0)[7])[1]);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[6]))){
-/* extras.scm: 440 pp-pair */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[9],((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2706,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-/* extras.scm: 441 vector->list */
-t3=*((C_word*)lf[56]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}}}
-
-/* k2704 in k2675 in k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2706,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2710,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 441 out */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t3,t2,lf[90],((C_word*)t0)[2]);}
-
-/* k2708 in k2704 in k2675 in k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2710(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 441 pp-list */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_2841(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k2688 in k2675 in k2672 in pr in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2690(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 438 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* indent in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2629(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2629,NULL,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-if(C_truep((C_word)C_i_lessp(t2,t3))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2645,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2652,a[2]=t3,a[3]=t4,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 425 make-string */
-t6=*((C_word*)lf[14]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,C_fix(1),C_make_character(10));}
-else{
-t4=(C_word)C_a_i_minus(&a,2,t2,t3);
-/* extras.scm: 426 spaces */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2596(t5,t1,t4,t3);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k2650 in indent in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 425 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2643 in indent in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* extras.scm: 425 spaces */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2596(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* spaces in pp in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2596(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2596,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_greaterp(t2,C_fix(0)))){
-if(C_truep((C_word)C_i_greaterp(t2,C_fix(7)))){
-t4=(C_word)C_a_i_minus(&a,2,t2,C_fix(8));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2620,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 418 out */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t6,t5,lf[87],t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2627,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 419 ##sys#substring */
-t5=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,lf[88],C_fix(0),t2);}}
-else{
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k2625 in spaces in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2627(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 419 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2618 in spaces in pp in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2620(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 418 spaces */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2596(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2085(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[24],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2085,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2088,a[2]=((C_word*)t0)[5],a[3]=t6,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word)li38),tmp=(C_word)a,a+=8,tmp);
-t8=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2115,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[8],a[4]=((C_word)li40),tmp=(C_word)a,a+=5,tmp));
-if(C_truep((C_word)C_i_pairp(t2))){
-/* extras.scm: 351 wr-expr */
-t9=t4;
-f_2088(t9,t1,t2,t3);}
-else{
-if(C_truep((C_word)C_i_nullp(t2))){
-/* extras.scm: 352 wr-lst */
-t9=((C_word*)t6)[1];
-f_2115(t9,t1,t2,t3);}
-else{
-if(C_truep((C_word)C_eofp(t2))){
-/* extras.scm: 353 out */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t9,t1,lf[54],t3);}
-else{
-if(C_truep((C_word)C_i_vectorp(t2))){
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2241,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 354 vector->list */
-t10=*((C_word*)lf[56]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}
-else{
-if(C_truep((C_word)C_booleanp(t2))){
-if(C_truep(t2)){
-/* extras.scm: 355 out */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t9,t1,lf[57],t3);}
-else{
-/* extras.scm: 355 out */
-t9=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t9,t1,lf[58],t3);}}
-else{
-t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2264,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t3,a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-/* extras.scm: 356 ##sys#number? */
-t10=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}}}}}}
-
-/* k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2264,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2271,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 356 ##sys#number->string */
-t3=*((C_word*)lf[59]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2280,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 358 open-output-string */
-t3=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-else{
-if(C_truep((C_word)C_i_closurep(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2303,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 361 ##sys#procedure->string */
-t3=*((C_word*)lf[61]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-if(C_truep((C_word)C_i_stringp(((C_word*)t0)[5]))){
-if(C_truep(((C_word*)t0)[2])){
-/* extras.scm: 363 out */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t2,((C_word*)t0)[7],((C_word*)t0)[5],((C_word*)t0)[6]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2322,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 364 out */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t3,t2,lf[64],((C_word*)t0)[6]);}}
-else{
-if(C_truep((C_word)C_charp(((C_word*)t0)[5]))){
-if(C_truep(((C_word*)t0)[2])){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2406,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 378 make-string */
-t3=*((C_word*)lf[14]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_fix(1),((C_word*)t0)[5]);}
-else{
-t2=(C_word)C_fix((C_word)C_character_code(((C_word*)t0)[5]));
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2412,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 380 out */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t4,t3,lf[69],((C_word*)t0)[6]);}}
-else{
-if(C_truep((C_word)C_eofp(((C_word*)t0)[5]))){
-/* extras.scm: 391 out */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t2,((C_word*)t0)[7],lf[70],((C_word*)t0)[6]);}
-else{
-if(C_truep((C_word)C_undefinedp(((C_word*)t0)[5]))){
-/* extras.scm: 392 out */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t2,((C_word*)t0)[7],lf[71],((C_word*)t0)[6]);}
-else{
-if(C_truep((C_word)C_anypointerp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2501,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 393 ##sys#pointer->string */
-t3=*((C_word*)lf[72]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-t2=(C_word)C_slot(lf[73],C_fix(0));
-t3=(C_word)C_eqp(((C_word*)t0)[5],t2);
-if(C_truep(t3)){
-/* extras.scm: 395 out */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_2066(t4,((C_word*)t0)[7],lf[74],((C_word*)t0)[6]);}
-else{
-if(C_truep((C_word)C_structurep(((C_word*)t0)[5]))){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2519,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 397 open-output-string */
-t5=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2535,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 400 port? */
-t5=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}}}}}}}}}}}
-
-/* k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2535,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2542,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(3));
-/* extras.scm: 400 string-append */
-t4=*((C_word*)lf[76]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[77],t3,lf[78]);}
-else{
-if(C_truep((C_word)C_bytevectorp(((C_word*)t0)[2]))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_permanentp(((C_word*)t0)[2]))){
-/* extras.scm: 403 out */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2066(t3,t2,lf[80],((C_word*)t0)[3]);}
-else{
-/* extras.scm: 404 out */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2066(t3,t2,lf[81],((C_word*)t0)[3]);}}
-else{
-if(C_truep((C_word)C_lambdainfop(((C_word*)t0)[2]))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2574,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 408 out */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2066(t3,t2,lf[84],((C_word*)t0)[3]);}
-else{
-/* extras.scm: 411 out */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_2066(t2,((C_word*)t0)[4],lf[85],((C_word*)t0)[3]);}}}}
-
-/* k2572 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2574(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2574,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2577,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2584,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 409 ##sys#lambda-info->string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[83]+1)))(3,*((C_word*)lf[83]+1),t3,((C_word*)t0)[2]);}
-
-/* k2582 in k2572 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 409 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2575 in k2572 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2577(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 410 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],lf[82],((C_word*)t0)[2]);}
-
-/* k2550 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2552,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2555,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2562,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 405 number->string */
-C_number_to_string(3,0,t3,(C_word)C_block_size(((C_word*)t0)[2]));}
-
-/* k2560 in k2550 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 405 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2553 in k2550 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 406 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],lf[79],((C_word*)t0)[2]);}
-
-/* k2540 in k2533 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2542(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 400 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2517 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2519,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2522,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 398 ##sys#user-print-hook */
-t3=*((C_word*)lf[75]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,t1);}
-
-/* k2520 in k2517 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2522,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2529,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 399 get-output-string */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k2527 in k2520 in k2517 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 399 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2499 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 393 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2412,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2415,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 381 char-name */
-t3=*((C_word*)lf[68]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2415(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2415,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2419,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp);
-/* g524525 */
-t3=t2;
-f_2419(t3,((C_word*)t0)[4],t1);}
-else{
-if(C_truep((C_word)C_fixnum_lessp(((C_word*)t0)[3],C_fix(32)))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2439,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 385 out */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t3,t2,lf[65],((C_word*)t0)[5]);}
-else{
-if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[3],C_fix(255)))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2455,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[3],C_fix(65535)))){
-/* extras.scm: 388 out */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t3,t2,lf[66],((C_word*)t0)[5]);}
-else{
-/* extras.scm: 388 out */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_2066(t3,t2,lf[67],((C_word*)t0)[5]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2476,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 390 make-string */
-t3=*((C_word*)lf[14]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_fix(1),((C_word*)t0)[2]);}}}}
-
-/* k2474 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 390 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2453 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2455,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2462,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 389 number->string */
-C_number_to_string(4,0,t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k2460 in k2453 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2462(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 389 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2437 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2446,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 386 number->string */
-C_number_to_string(4,0,t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k2444 in k2437 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2446(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 386 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* g524 in k2413 in k2410 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2419(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2419,NULL,3,t0,t1,t2);}
-t3=(C_word)C_slot(t2,C_fix(1));
-/* extras.scm: 383 out */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t4,t1,t3,((C_word*)t0)[2]);}
-
-/* k2404 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2406(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 378 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2322(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2322,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2324,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li41),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_2324(t5,((C_word*)t0)[2],C_fix(0),C_fix(0),t1);}
-
-/* loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2324,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2331,a[2]=t2,a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=t3,a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t4)){
-t6=(C_word)C_i_string_length(((C_word*)t0)[4]);
-t7=t5;
-f_2331(t7,(C_word)C_i_lessp(t3,t6));}
-else{
-t6=t5;
-f_2331(t6,C_SCHEME_FALSE);}}
-
-/* k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2331(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[19],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2331,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_string_ref(((C_word*)t0)[8],((C_word*)t0)[7]);
-t3=(C_word)C_eqp(t2,C_make_character(92));
-t4=(C_truep(t3)?t3:(C_word)C_eqp(t2,C_make_character(34)));
-if(C_truep(t4)){
-t5=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[7],C_fix(1));
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2354,a[2]=t5,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2358,a[2]=t6,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2362,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 372 ##sys#substring */
-t9=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,((C_word*)t0)[8],((C_word*)t0)[2],((C_word*)t0)[7]);}
-else{
-t5=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[7],C_fix(1));
-/* extras.scm: 374 loop */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_2324(t6,((C_word*)t0)[5],((C_word*)t0)[2],t5,((C_word*)t0)[3]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2379,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2383,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 376 ##sys#substring */
-t4=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[8],((C_word*)t0)[2],((C_word*)t0)[7]);}}
-
-/* k2381 in k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 376 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2377 in k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 375 out */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t2,((C_word*)t0)[2],lf[63],t1);}
-
-/* k2360 in k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 372 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2356 in k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2358(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 371 out */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t2,((C_word*)t0)[2],lf[62],t1);}
-
-/* k2352 in k2329 in loop in k2320 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2354(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 369 loop */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_2324(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2301 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 361 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2278 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2280,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2283,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 359 ##sys#print */
-t3=*((C_word*)lf[60]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,t1);}
-
-/* k2281 in k2278 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 360 get-output-string */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k2288 in k2281 in k2278 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 360 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2269 in k2262 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2271(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 356 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2239 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2241,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2245,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 354 out */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t3,t2,lf[55],((C_word*)t0)[2]);}
-
-/* k2243 in k2239 in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2245(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 354 wr-lst */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2115(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2115(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2115,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2133,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-t6=(C_word)C_i_car(t2);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2198,a[2]=t6,a[3]=t5,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 343 out */
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t8,t7,lf[52],t3);}
-else{
-t6=t5;
-f_2133(2,t6,C_SCHEME_FALSE);}}
-else{
-/* extras.scm: 349 out */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t4,t1,lf[53],t3);}}
-
-/* k2196 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2198(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 343 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2133,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2135,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=((C_word)li39),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_2135(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop in k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2135(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2135,NULL,4,t0,t1,t2,t3);}
-t4=t3;
-if(C_truep(t4)){
-if(C_truep((C_word)C_i_pairp(t2))){
-t5=(C_word)C_i_cdr(t2);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2159,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t7=(C_word)C_i_car(t2);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2167,a[2]=t7,a[3]=t6,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 346 out */
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t9,t8,lf[48],t3);}
-else{
-if(C_truep((C_word)C_i_nullp(t2))){
-/* extras.scm: 347 out */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t5,t1,lf[49],t3);}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2183,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2187,a[2]=t2,a[3]=t5,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 348 out */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_2066(t7,t6,lf[51],t3);}}}
-else{
-t5=t3;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k2185 in loop in k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 348 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2181 in loop in k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 348 out */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_2066(t2,((C_word*)t0)[2],lf[50],t1);}
-
-/* k2165 in loop in k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 346 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2157 in loop in k2131 in wr-lst in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 346 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2135(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* wr-expr in wr in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2088(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2088,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2095,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* extras.scm: 336 read-macro? */
-f_1975(t4,t2);}
-
-/* k2093 in wr-expr in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2095,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[8];
-t3=(C_word)C_i_cadr(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2106,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-t5=f_2033(((C_word*)t0)[8]);
-/* extras.scm: 337 out */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_2066(t6,t4,t5,((C_word*)t0)[3]);}
-else{
-/* extras.scm: 338 wr-lst */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_2115(t2,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[3]);}}
-
-/* k2104 in k2093 in wr-expr in wr in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 337 wr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_2085(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* out in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2066(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2066,NULL,4,t0,t1,t2,t3);}
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2076,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 331 output */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k2074 in out in generic-write in k893 in k890 in k887 */
-static void C_ccall f_2076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2076,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_string_length(((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_plus(&a,2,((C_word*)t0)[2],t2));}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* read-macro-prefix in generic-write in k893 in k890 in k887 */
-static C_word C_fcall f_2033(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_stack_check;
-t2=(C_word)C_i_car(t1);
-t3=(C_word)C_i_cdr(t1);
-t4=(C_word)C_eqp(t2,lf[40]);
-if(C_truep(t4)){
-return(lf[44]);}
-else{
-t5=(C_word)C_eqp(t2,lf[41]);
-if(C_truep(t5)){
-return(lf[45]);}
-else{
-t6=(C_word)C_eqp(t2,lf[42]);
-if(C_truep(t6)){
-return(lf[46]);}
-else{
-t7=(C_word)C_eqp(t2,lf[43]);
-return((C_truep(t7)?lf[47]:C_SCHEME_UNDEFINED));}}}}
-
-/* read-macro? in generic-write in k893 in k890 in k887 */
-static void C_fcall f_1975(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1975,NULL,2,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(C_word)C_eqp(t3,lf[40]);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2007,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_2007(t7,t5);}
-else{
-t7=(C_word)C_eqp(t3,lf[41]);
-if(C_truep(t7)){
-t8=t6;
-f_2007(t8,t7);}
-else{
-t8=(C_word)C_eqp(t3,lf[42]);
-t9=t6;
-f_2007(t9,(C_truep(t8)?t8:(C_word)C_eqp(t3,lf[43])));}}}
-
-/* k2005 in read-macro? in generic-write in k893 in k890 in k887 */
-static void C_fcall f_2007(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_nullp(t3));}
-else{
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* write-byte in k893 in k890 in k887 */
-static void C_ccall f_1934(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1934r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1934r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1934r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1938,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_1938(2,t5,*((C_word*)lf[34]+1));}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_1938(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k1936 in write-byte in k893 in k890 in k887 */
-static void C_ccall f_1938(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1938,2,t0,t1);}
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[3],lf[38]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1944,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 292 ##sys#check-port */
-t4=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,lf[38]);}
-
-/* k1942 in k1936 in write-byte in k893 in k890 in k887 */
-static void C_ccall f_1944(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_make_character((C_word)C_unfix(((C_word*)t0)[4]));
-/* extras.scm: 293 ##sys#write-char-0 */
-t3=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* read-byte in k893 in k890 in k887 */
-static void C_ccall f_1894(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1894r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1894r(t0,t1,t2);}}
-
-static void C_ccall f_1894r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1898,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=t3;
-f_1898(2,t4,*((C_word*)lf[7]+1));}
-else{
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=t3;
-f_1898(2,t5,(C_word)C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k1896 in read-byte in k893 in k890 in k887 */
-static void C_ccall f_1898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1898,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1901,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 284 ##sys#check-port */
-t3=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[37]);}
-
-/* k1899 in k1896 in read-byte in k893 in k890 in k887 */
-static void C_ccall f_1901(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1901,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1904,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* extras.scm: 285 ##sys#read-char-0 */
-t3=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1902 in k1899 in k1896 in read-byte in k893 in k890 in k887 */
-static void C_ccall f_1904(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep((C_word)C_eofp(t1))){
-t2=t1;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fix((C_word)C_character_code(t1)));}}
-
-/* write-line in k893 in k890 in k887 */
-static void C_ccall f_1873(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1873r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1873r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1873r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(7);
-t4=(C_truep((C_word)C_eqp(t3,C_SCHEME_END_OF_LIST))?*((C_word*)lf[34]+1):(C_word)C_slot(t3,C_fix(0)));
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1880,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 275 ##sys#check-port */
-t6=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,lf[36]);}
-
-/* k1878 in write-line in k893 in k890 in k887 */
-static void C_ccall f_1880(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1880,2,t0,t1);}
-t2=(C_word)C_i_check_string_2(((C_word*)t0)[6],lf[36]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1886,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 277 display */
-t4=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t3,((C_word*)t0)[6],((C_word*)t0)[3]);}
-
-/* k1884 in k1878 in write-line in k893 in k890 in k887 */
-static void C_ccall f_1886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 278 newline */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* write-string in k893 in k890 in k887 */
-static void C_ccall f_1784(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1784r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1784r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1784r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(13);
-t4=(C_word)C_i_check_string_2(t2,lf[29]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1789,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li28),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1820,a[2]=t5,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1825,a[2]=t6,a[3]=((C_word)li30),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-/* def-n357374 */
-t8=t7;
-f_1825(t8,t1);}
-else{
-t8=(C_word)C_i_car(t3);
-t9=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t9))){
-/* def-port358372 */
-t10=t6;
-f_1820(t10,t1,t8);}
-else{
-t10=(C_word)C_i_car(t9);
-t11=(C_word)C_i_cdr(t9);
-if(C_truep((C_word)C_i_nullp(t11))){
-/* body355363 */
-t12=t5;
-f_1789(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-n357 in write-string in k893 in k890 in k887 */
-static void C_fcall f_1825(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1825,NULL,2,t0,t1);}
-/* def-port358372 */
-t2=((C_word*)t0)[2];
-f_1820(t2,t1,C_SCHEME_FALSE);}
-
-/* def-port358 in write-string in k893 in k890 in k887 */
-static void C_fcall f_1820(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1820,NULL,3,t0,t1,t2);}
-/* body355363 */
-t3=((C_word*)t0)[2];
-f_1789(t3,t1,t2,*((C_word*)lf[34]+1));}
-
-/* body355 in write-string in k893 in k890 in k887 */
-static void C_fcall f_1789(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1789,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1793,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 260 ##sys#check-port */
-t5=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[29]);}
-
-/* k1791 in body355 in write-string in k893 in k890 in k887 */
-static void C_ccall f_1793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1793,2,t0,t1);}
-t2=(C_truep(((C_word*)t0)[6])?(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[29]):C_SCHEME_UNDEFINED);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1803,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1806,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[2],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)t0)[6])){
-t5=(C_word)C_block_size(((C_word*)t0)[2]);
-t6=t4;
-f_1806(t6,(C_word)C_fixnum_lessp(((C_word*)t0)[6],t5));}
-else{
-t5=t4;
-f_1806(t5,C_SCHEME_FALSE);}}
-
-/* k1804 in k1791 in body355 in write-string in k893 in k890 in k887 */
-static void C_fcall f_1806(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* extras.scm: 264 ##sys#substring */
-t2=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[6],C_fix(0),((C_word*)t0)[5]);}
-else{
-t2=((C_word*)t0)[6];
-/* extras.scm: 262 display */
-t3=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t3))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}}
-
-/* k1801 in k1791 in body355 in write-string in k893 in k890 in k887 */
-static void C_ccall f_1803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 262 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* read-token in k893 in k890 in k887 */
-static void C_ccall f_1715(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1715r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1715r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1715r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1719,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
-t5=t4;
-f_1719(2,t5,*((C_word*)lf[7]+1));}
-else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=t4;
-f_1719(2,t6,(C_word)C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1719,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1722,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 245 ##sys#check-port */
-t3=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[30]);}
-
-/* k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1725,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 246 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1725,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1730,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t3,a[7]=((C_word)li26),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_1730(t5,((C_word*)t0)[2]);}
-
-/* loop in k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_fcall f_1730(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1730,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1734,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* extras.scm: 248 ##sys#peek-char-0 */
-t3=*((C_word*)lf[32]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k1732 in loop in k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1734,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1740,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_eofp(t1))){
-t3=t2;
-f_1740(2,t3,C_SCHEME_FALSE);}
-else{
-/* extras.scm: 249 pred */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}}
-
-/* k1738 in k1732 in loop in k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1740(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1740,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1743,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1750,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 251 ##sys#read-char-0 */
-t4=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-else{
-/* extras.scm: 253 get-output-string */
-t2=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}}
-
-/* k1748 in k1738 in k1732 in loop in k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 251 ##sys#write-char-0 */
-t2=*((C_word*)lf[31]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k1741 in k1738 in k1732 in loop in k1723 in k1720 in k1717 in read-token in k893 in k890 in k887 */
-static void C_ccall f_1743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 252 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_1730(t2,((C_word*)t0)[2]);}
-
-/* read-string in k893 in k890 in k887 */
-static void C_ccall f_1655(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1655r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1655r(t0,t1,t2);}}
-
-static void C_ccall f_1655r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-t4=*((C_word*)lf[7]+1);
-/* extras.scm: 238 ##sys#read-string/port */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[27]+1)))(4,*((C_word*)lf[27]+1),t3,C_SCHEME_FALSE,t4);}
-else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t4))){
-t5=t1;
-t6=*((C_word*)lf[7]+1);
-/* extras.scm: 238 ##sys#read-string/port */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[27]+1)))(4,*((C_word*)lf[27]+1),t5,t3,t6);}
-else{
-t5=(C_word)C_i_car(t4);
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
-t7=t1;
-/* extras.scm: 238 ##sys#read-string/port */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[27]+1)))(4,*((C_word*)lf[27]+1),t7,t3,t5);}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t1,lf[0],t6);}}}}
-
-/* ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1598(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1598,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1602,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 218 ##sys#check-port */
-t5=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[28]);}
-
-/* k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1602(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1602,2,t0,t1);}
-if(C_truep(((C_word*)t0)[6])){
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[28]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1611,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 220 ##sys#make-string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[20]+1)))(3,*((C_word*)lf[20]+1),t3,((C_word*)t0)[6]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1626,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 226 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}}
-
-/* k1624 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1626,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1629,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 227 make-string */
-t3=*((C_word*)lf[14]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_fix(2048));}
-
-/* k1627 in k1624 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1629,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1634,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word)li23),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_1634(t5,((C_word*)t0)[2]);}
-
-/* loop in k1627 in k1624 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_fcall f_1634(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1634,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1638,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 229 ##sys#read-string! */
-t3=*((C_word*)lf[23]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,C_fix(2048),((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
-
-/* k1636 in loop in k1627 in k1624 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1638(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1638,2,t0,t1);}
-t2=(C_word)C_eqp(t1,C_fix(0));
-if(C_truep(t2)){
-/* extras.scm: 232 get-output-string */
-t3=((C_word*)t0)[6];
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1650,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 234 write-string */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[29]+1)))(5,*((C_word*)lf[29]+1),t3,((C_word*)t0)[2],t1,((C_word*)t0)[4]);}}
-
-/* k1648 in k1636 in loop in k1627 in k1624 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 235 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_1634(t2,((C_word*)t0)[2]);}
-
-/* k1609 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1611(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1611,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1614,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 221 ##sys#read-string! */
-t3=*((C_word*)lf[23]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,((C_word*)t0)[4],t1,((C_word*)t0)[2],C_fix(0));}
-
-/* k1612 in k1609 in k1600 in ##sys#read-string/port in k893 in k890 in k887 */
-static void C_ccall f_1614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_eqp(((C_word*)t0)[4],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-else{
-/* extras.scm: 224 ##sys#substring */
-t3=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t1);}}
-
-/* read-string! in k893 in k890 in k887 */
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+15)){
-C_save_and_reclaim((void*)tr4r,(void*)f_1501r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_1501r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_1501r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a=C_alloc(15);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1503,a[2]=t5,a[3]=t3,a[4]=((C_word)li19),tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1545,a[2]=t6,a[3]=((C_word)li20),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1550,a[2]=t7,a[3]=((C_word)li21),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
-/* def-port247267 */
-t9=t8;
-f_1550(t9,t1);}
-else{
-t9=(C_word)C_i_car(t4);
-t10=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* def-start248265 */
-t11=t7;
-f_1545(t11,t1,t9);}
-else{
-t11=(C_word)C_i_car(t10);
-t12=(C_word)C_i_cdr(t10);
-if(C_truep((C_word)C_i_nullp(t12))){
-/* body245253 */
-t13=t6;
-f_1503(t13,t1,t9,t11);}
-else{
-/* ##sys#error */
-t13=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t1,lf[0],t12);}}}}
-
-/* def-port247 in read-string! in k893 in k890 in k887 */
-static void C_fcall f_1550(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1550,NULL,2,t0,t1);}
-/* def-start248265 */
-t2=((C_word*)t0)[2];
-f_1545(t2,t1,*((C_word*)lf[7]+1));}
-
-/* def-start248 in read-string! in k893 in k890 in k887 */
-static void C_fcall f_1545(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1545,NULL,3,t0,t1,t2);}
-/* body245253 */
-t3=((C_word*)t0)[2];
-f_1503(t3,t1,t2,C_fix(0));}
-
-/* body245 in read-string! in k893 in k890 in k887 */
-static void C_fcall f_1503(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1503,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1507,a[2]=t2,a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 203 ##sys#check-port */
-t5=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[24]);}
-
-/* k1505 in body245 in read-string! in k893 in k890 in k887 */
-static void C_ccall f_1507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=(C_word)C_i_check_string_2(((C_word*)t0)[6],lf[24]);
-if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t3=(C_word)C_i_check_exact_2(((C_word*)((C_word*)t0)[5])[1],lf[24]);
-t4=(C_word)C_fixnum_plus(((C_word*)t0)[4],((C_word*)((C_word*)t0)[5])[1]);
-t5=(C_word)C_block_size(((C_word*)t0)[6]);
-if(C_truep((C_word)C_fixnum_greaterp(t4,t5))){
-t6=(C_word)C_block_size(((C_word*)t0)[6]);
-t7=(C_word)C_fixnum_difference(t6,((C_word*)t0)[4]);
-t8=C_mutate(((C_word *)((C_word*)t0)[5])+1,t7);
-t9=(C_word)C_i_check_exact_2(((C_word*)t0)[4],lf[24]);
-/* extras.scm: 210 ##sys#read-string! */
-t10=*((C_word*)lf[23]+1);
-((C_proc6)(void*)(*((C_word*)t10+1)))(6,t10,((C_word*)t0)[3],((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[4]);}
-else{
-t6=(C_word)C_i_check_exact_2(((C_word*)t0)[4],lf[24]);
-/* extras.scm: 210 ##sys#read-string! */
-t7=*((C_word*)lf[23]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,((C_word*)t0)[3],((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[4]);}}
-else{
-t3=(C_word)C_i_check_exact_2(((C_word*)t0)[4],lf[24]);
-/* extras.scm: 210 ##sys#read-string! */
-t4=*((C_word*)lf[23]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[3],((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[4]);}}
-
-/* ##sys#read-string! in k893 in k890 in k887 */
-static void C_ccall f_1355(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_1355,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(C_word)C_eqp(t2,C_fix(0));
-if(C_truep(t7)){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_fix(0));}
-else{
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1365,a[2]=t2,a[3]=t6,a[4]=t1,a[5]=t3,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_slot(t4,C_fix(6)))){
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1495,a[2]=t8,a[3]=t6,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 178 ##sys#read-char-0 */
-t10=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t4);}
-else{
-t9=t8;
-f_1365(t9,C_SCHEME_UNDEFINED);}}}
-
-/* k1493 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_ccall f_1495(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=(C_word)C_setsubchar(((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],t1);
-t3=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[3])[1],C_fix(1));
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t3);
-t5=((C_word*)t0)[2];
-f_1365(t5,t4);}
-
-/* k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_fcall f_1365(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1365,NULL,2,t0,t1);}
-t2=(C_word)C_slot(((C_word*)t0)[6],C_fix(2));
-t3=(C_word)C_slot(t2,C_fix(7));
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1376,a[2]=((C_word*)t0)[5],a[3]=t3,a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=((C_word)li16),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_1376(t7,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2],C_fix(0));}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1435,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=((C_word)li17),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_1435(t7,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2],C_fix(0));}}
-
-/* loop in k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_fcall f_1435(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1435,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1439,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,a[6]=t1,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-/* extras.scm: 191 ##sys#read-char-0 */
-t6=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k1437 in loop in k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_ccall f_1439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1442,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_eofp(t1))){
-t3=t2;
-f_1442(t3,C_fix(0));}
-else{
-t3=(C_word)C_setsubchar(((C_word*)t0)[2],((C_word*)t0)[4],t1);
-t4=t2;
-f_1442(t4,C_fix(1));}}
-
-/* k1440 in k1437 in loop in k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_fcall f_1442(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-t2=(C_word)C_eqp(t1,C_fix(0));
-if(C_truep(t2)){
-t3=((C_word*)t0)[6];
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(C_word)C_i_not(((C_word*)t0)[4]);
-t4=(C_truep(t3)?t3:(C_word)C_fixnum_lessp(t1,((C_word*)t0)[4]));
-if(C_truep(t4)){
-t5=(C_word)C_fixnum_plus(((C_word*)t0)[3],t1);
-t6=(C_truep(((C_word*)t0)[4])?(C_word)C_fixnum_difference(((C_word*)t0)[4],t1):C_SCHEME_FALSE);
-t7=(C_word)C_fixnum_plus(((C_word*)t0)[6],t1);
-/* extras.scm: 199 loop */
-t8=((C_word*)((C_word*)t0)[2])[1];
-f_1435(t8,((C_word*)t0)[5],t5,t6,t7);}
-else{
-t5=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_fixnum_plus(t1,((C_word*)t0)[6]));}}}
-
-/* loop in k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_fcall f_1376(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1376,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1380,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,a[6]=t4,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-/* extras.scm: 183 rdstring */
-t6=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t6))(6,t6,t5,((C_word*)t0)[5],t3,((C_word*)t0)[2],t2);}
-
-/* k1378 in loop in k1363 in ##sys#read-string! in k893 in k890 in k887 */
-static void C_ccall f_1380(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[7],C_fix(5));
-t3=(C_word)C_fixnum_plus(t2,t1);
-t4=(C_word)C_i_set_i_slot(((C_word*)t0)[7],C_fix(5),t3);
-t5=(C_word)C_eqp(t1,C_fix(0));
-if(C_truep(t5)){
-t6=((C_word*)t0)[6];
-t7=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t6=(C_word)C_i_not(((C_word*)t0)[4]);
-t7=(C_truep(t6)?t6:(C_word)C_fixnum_lessp(t1,((C_word*)t0)[4]));
-if(C_truep(t7)){
-t8=(C_word)C_fixnum_plus(((C_word*)t0)[3],t1);
-t9=(C_truep(((C_word*)t0)[4])?(C_word)C_fixnum_difference(((C_word*)t0)[4],t1):C_SCHEME_FALSE);
-t10=(C_word)C_fixnum_plus(((C_word*)t0)[6],t1);
-/* extras.scm: 188 loop */
-t11=((C_word*)((C_word*)t0)[2])[1];
-f_1376(t11,((C_word*)t0)[5],t8,t9,t10);}
-else{
-t8=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_fixnum_plus(t1,((C_word*)t0)[6]));}}}
-
-/* read-lines in k893 in k890 in k887 */
-static void C_ccall f_1265(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1265r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1265r(t0,t1,t2);}}
-
-static void C_ccall f_1265r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(11);
-t3=(C_word)C_i_pairp(t2);
-t4=(C_truep(t3)?(C_word)C_slot(t2,C_fix(0)):*((C_word*)lf[7]+1));
-t5=(C_word)C_i_pairp(t2);
-t6=(C_truep(t5)?(C_word)C_slot(t2,C_fix(1)):C_SCHEME_FALSE);
-t7=(C_word)C_i_pairp(t6);
-t8=(C_truep(t7)?(C_word)C_slot(t6,C_fix(0)):C_SCHEME_FALSE);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1277,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t8,a[5]=((C_word)li14),tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_stringp(t4))){
-/* extras.scm: 166 call-with-input-file */
-t10=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t10))(4,t10,t1,t4,t9);}
-else{
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1332,a[2]=t4,a[3]=t1,a[4]=t9,tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 168 ##sys#check-port */
-t11=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t10,t4,lf[22]);}}
-
-/* k1330 in read-lines in k893 in k890 in k887 */
-static void C_ccall f_1332(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 169 doread */
-t2=((C_word*)t0)[4];
-f_1277(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* doread in read-lines in k893 in k890 in k887 */
-static void C_ccall f_1277(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1277,3,t0,t1,t2);}
-t3=(C_truep(((C_word*)t0)[4])?((C_word*)t0)[4]:C_fix(1000000000));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1287,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word)li13),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_1287(t7,t1,C_SCHEME_END_OF_LIST,t3);}
-
-/* loop in doread in read-lines in k893 in k890 in k887 */
-static void C_fcall f_1287(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1287,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-/* extras.scm: 160 reverse */
-t5=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t1,t2);}
-else{
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1300,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 161 read-line */
-t6=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}}
-
-/* k1298 in loop in doread in read-lines in k893 in k890 in k887 */
-static void C_ccall f_1300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1300,2,t0,t1);}
-if(C_truep((C_word)C_eofp(t1))){
-/* extras.scm: 163 reverse */
-t2=((C_word*)t0)[6];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t3=(C_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* extras.scm: 164 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_1287(t4,((C_word*)t0)[5],t2,t3);}}
-
-/* read-line in k893 in k890 in k887 */
-static void C_ccall f_1116(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1116r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1116r(t0,t1,t2);}}
-
-static void C_ccall f_1116r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(5);
-t3=(C_word)C_i_pairp(t2);
-t4=(C_truep(t3)?(C_word)C_i_car(t2):*((C_word*)lf[7]+1));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1126,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t3)){
-t6=(C_word)C_i_cdr(t2);
-t7=(C_word)C_i_pairp(t6);
-t8=t5;
-f_1126(t8,(C_truep(t7)?(C_word)C_i_cadr(t2):C_SCHEME_FALSE));}
-else{
-t6=t5;
-f_1126(t6,C_SCHEME_FALSE);}}
-
-/* k1124 in read-line in k893 in k890 in k887 */
-static void C_fcall f_1126(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1126,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1129,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 120 ##sys#check-port */
-t3=*((C_word*)lf[21]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[15]);}
-
-/* k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1129,2,t0,t1);}
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(2));
-t3=(C_word)C_slot(t2,C_fix(8));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1136,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li10),tmp=(C_word)a,a+=5,tmp);
-/* g123124 */
-t5=t4;
-f_1136(t5,((C_word*)t0)[3],t3);}
-else{
-t4=(C_truep(((C_word*)t0)[4])?((C_word*)t0)[4]:C_fix(256));
-t5=t4;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1149,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t6,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 124 ##sys#make-string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[20]+1)))(3,*((C_word*)lf[20]+1),t7,((C_word*)t6)[1]);}}
-
-/* k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1149,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1154,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word)li11),tmp=(C_word)a,a+=9,tmp));
-t7=((C_word*)t5)[1];
-f_1154(t7,((C_word*)t0)[2],C_fix(0));}
-
-/* loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_fcall f_1154(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1154,NULL,3,t0,t1,t2);}
-t3=(C_truep(((C_word*)t0)[7])?(C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[7]):C_SCHEME_FALSE);
-if(C_truep(t3)){
-/* extras.scm: 127 ##sys#substring */
-t4=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,((C_word*)((C_word*)t0)[6])[1],C_fix(0),t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1167,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* extras.scm: 128 ##sys#read-char-0 */
-t5=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}}
-
-/* k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[16],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1167,2,t0,t1);}
-if(C_truep((C_word)C_eofp(t1))){
-t2=(C_word)C_eqp(((C_word*)t0)[8],C_fix(0));
-if(C_truep(t2)){
-t3=t1;
-t4=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-/* extras.scm: 132 ##sys#substring */
-t3=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[7],((C_word*)((C_word*)t0)[6])[1],C_fix(0),((C_word*)t0)[8]);}}
-else{
-switch(t1){
-case C_make_character(10):
-/* extras.scm: 134 ##sys#substring */
-t2=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)((C_word*)t0)[6])[1],C_fix(0),((C_word*)t0)[8]);
-case C_make_character(13):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1200,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 136 peek-char */
-t3=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);
-default:
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1218,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(((C_word*)t0)[8],((C_word*)((C_word*)t0)[3])[1]))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1232,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1240,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 143 make-string */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t3=t2;
-f_1218(t3,C_SCHEME_UNDEFINED);}}}}
-
-/* k1238 in k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1240(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 143 ##sys#string-append */
-t2=*((C_word*)lf[19]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
-
-/* k1230 in k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1232(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-t3=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[3])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t3);
-t5=((C_word*)t0)[2];
-f_1218(t5,t4);}
-
-/* k1216 in k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_fcall f_1218(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_setsubchar(((C_word*)((C_word*)t0)[6])[1],((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-/* extras.scm: 146 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_1154(t4,((C_word*)t0)[2],t3);}
-
-/* k1198 in k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1200,2,t0,t1);}
-t2=(C_word)C_eqp(t1,C_make_character(10));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1209,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* extras.scm: 138 ##sys#read-char-0 */
-t4=*((C_word*)lf[17]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-else{
-/* extras.scm: 140 ##sys#substring */
-t3=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[5],((C_word*)((C_word*)t0)[4])[1],C_fix(0),((C_word*)t0)[3]);}}
-
-/* k1207 in k1198 in k1165 in loop in k1147 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_ccall f_1209(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* extras.scm: 139 ##sys#substring */
-t2=*((C_word*)lf[16]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],C_fix(0),((C_word*)t0)[2]);}
-
-/* g123 in k1127 in k1124 in read-line in k893 in k890 in k887 */
-static void C_fcall f_1136(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1136,NULL,3,t0,t1,t2);}
-/* extras.scm: 121 rl */
-t3=t2;
-((C_proc4)C_retrieve_proc(t3))(4,t3,t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* random in k893 in k890 in k887 */
-static void C_ccall f_1077(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1077,3,t0,t1,t2);}
-t3=(C_word)C_i_check_exact_2(t2,lf[13]);
-t4=(C_word)C_eqp(t2,C_fix(0));
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_fix(0));}
-else{
-t5=(C_word)C_random_fixnum(t2);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* randomize in k893 in k890 in k887 */
-static void C_ccall f_1059(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2rv,(void*)f_1059r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest_vector(a,C_rest_count(0));
-f_1059r(t0,t1,t2);}}
-
-static void C_ccall f_1059r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-t3=(C_word)C_vemptyp(t2);
-t4=(C_truep(t3)?(C_word)C_fudge(C_fix(2)):(C_word)C_i_vector_ref(t2,C_fix(0)));
-t5=(C_word)C_i_check_exact_2(t4,lf[12]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_randomize(t4));}
-
-/* random-seed in k893 in k890 in k887 */
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2rv,(void*)f_1038r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest_vector(a,C_rest_count(0));
-f_1038r(t0,t1,t2);}}
-
-static void C_ccall f_1038r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1042,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep((C_word)C_vemptyp(t2))){
-/* extras.scm: 90 current-seconds */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[11]+1)))(2,*((C_word*)lf[11]+1),t3);}
-else{
-t4=t3;
-f_1042(2,t4,(C_word)C_i_vector_ref(t2,C_fix(0)));}}
-
-/* k1040 in random-seed in k893 in k890 in k887 */
-static void C_ccall f_1042(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1042,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1045,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* extras.scm: 91 ##sys#check-integer */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[10]+1)))(4,*((C_word*)lf[10]+1),t2,t1,lf[9]);}
-
-/* k1043 in k1040 in random-seed in k893 in k890 in k887 */
-static void C_ccall f_1045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-t4=(C_word)C_i_foreign_unsigned_integer_argumentp(t3);
-t5=t2;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub87(C_SCHEME_UNDEFINED,t4));}
-
-/* read-file in k893 in k890 in k887 */
-static void C_ccall f_897(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+18)){
-C_save_and_reclaim((void*)tr2r,(void*)f_897r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_897r(t0,t1,t2);}}
-
-static void C_ccall f_897r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a=C_alloc(18);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_899,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li2),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_959,a[2]=t3,a[3]=((C_word)li3),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_964,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li4),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_969,a[2]=t5,a[3]=((C_word)li5),tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t2))){
-/* def-port4377 */
-t7=t6;
-f_969(t7,t1);}
-else{
-t7=(C_word)C_i_car(t2);
-t8=(C_word)C_i_cdr(t2);
-if(C_truep((C_word)C_i_nullp(t8))){
-/* def-reader4475 */
-t9=t5;
-f_964(t9,t1,t7);}
-else{
-t9=(C_word)C_i_car(t8);
-t10=(C_word)C_i_cdr(t8);
-if(C_truep((C_word)C_i_nullp(t10))){
-/* def-max4572 */
-t11=t4;
-f_959(t11,t1,t7,t9);}
-else{
-t11=(C_word)C_i_car(t10);
-t12=(C_word)C_i_cdr(t10);
-if(C_truep((C_word)C_i_nullp(t12))){
-/* body4150 */
-t13=t3;
-f_899(t13,t1,t7,t9,t11);}
-else{
-/* ##sys#error */
-t13=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t1,lf[0],t12);}}}}}
-
-/* def-port43 in read-file in k893 in k890 in k887 */
-static void C_fcall f_969(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_969,NULL,2,t0,t1);}
-/* def-reader4475 */
-t2=((C_word*)t0)[2];
-f_964(t2,t1,*((C_word*)lf[7]+1));}
-
-/* def-reader44 in read-file in k893 in k890 in k887 */
-static void C_fcall f_964(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_964,NULL,3,t0,t1,t2);}
-/* def-max4572 */
-t3=((C_word*)t0)[3];
-f_959(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* def-max45 in read-file in k893 in k890 in k887 */
-static void C_fcall f_959(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_959,NULL,4,t0,t1,t2,t3);}
-/* body4150 */
-t4=((C_word*)t0)[2];
-f_899(t4,t1,t2,t3,C_SCHEME_FALSE);}
-
-/* body41 in read-file in k893 in k890 in k887 */
-static void C_fcall f_899(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_899,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_902,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word)li1),tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_952,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-/* extras.scm: 80 port? */
-t7=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}
-
-/* k950 in body41 in read-file in k893 in k890 in k887 */
-static void C_ccall f_952(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* extras.scm: 81 slurp */
-t2=((C_word*)t0)[5];
-f_902(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-/* extras.scm: 82 call-with-input-file */
-t2=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[5]);}}
-
-/* slurp in body41 in read-file in k893 in k890 in k887 */
-static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_902,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_910,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 76 reader */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k908 in slurp in body41 in read-file in k893 in k890 in k887 */
-static void C_ccall f_910(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_910,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_912,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li0),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_912(t5,((C_word*)t0)[2],t1,C_fix(0),C_SCHEME_END_OF_LIST);}
-
-/* doloop56 in k908 in slurp in body41 in read-file in k893 in k890 in k887 */
-static void C_fcall f_912(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_912,NULL,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_eofp(t2);
-t6=(C_truep(t5)?t5:(C_truep(((C_word*)t0)[6])?(C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[6]):C_SCHEME_FALSE));
-if(C_truep(t6)){
-/* extras.scm: 79 reverse */
-t7=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t7))(3,t7,t1,t4);}
-else{
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_932,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=t2,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* extras.scm: 76 reader */
-t8=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t8))(3,t8,t7,((C_word*)t0)[2]);}}
-
-/* k930 in doloop56 in k908 in slurp in body41 in read-file in k893 in k890 in k887 */
-static void C_ccall f_932(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_932,2,t0,t1);}
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_912(t4,((C_word*)t0)[2],t1,t2,t3);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[236] = {
-{"toplevel:extras_scm",(void*)C_extras_toplevel},
-{"f_889:extras_scm",(void*)f_889},
-{"f_892:extras_scm",(void*)f_892},
-{"f_895:extras_scm",(void*)f_895},
-{"f_3251:extras_scm",(void*)f_3251},
-{"f_3641:extras_scm",(void*)f_3641},
-{"f_3598:extras_scm",(void*)f_3598},
-{"f_3631:extras_scm",(void*)f_3631},
-{"f_3606:extras_scm",(void*)f_3606},
-{"f_3592:extras_scm",(void*)f_3592},
-{"f_3586:extras_scm",(void*)f_3586},
-{"f_3580:extras_scm",(void*)f_3580},
-{"f_3282:extras_scm",(void*)f_3282},
-{"f_3286:extras_scm",(void*)f_3286},
-{"f_3569:extras_scm",(void*)f_3569},
-{"f_3289:extras_scm",(void*)f_3289},
-{"f_3320:extras_scm",(void*)f_3320},
-{"f_3355:extras_scm",(void*)f_3355},
-{"f_3533:extras_scm",(void*)f_3533},
-{"f_3488:extras_scm",(void*)f_3488},
-{"f_3491:extras_scm",(void*)f_3491},
-{"f_3497:extras_scm",(void*)f_3497},
-{"f_3470:extras_scm",(void*)f_3470},
-{"f_3466:extras_scm",(void*)f_3466},
-{"f_3453:extras_scm",(void*)f_3453},
-{"f_3449:extras_scm",(void*)f_3449},
-{"f_3436:extras_scm",(void*)f_3436},
-{"f_3432:extras_scm",(void*)f_3432},
-{"f_3419:extras_scm",(void*)f_3419},
-{"f_3406:extras_scm",(void*)f_3406},
-{"f_3393:extras_scm",(void*)f_3393},
-{"f_3368:extras_scm",(void*)f_3368},
-{"f_3336:extras_scm",(void*)f_3336},
-{"f_3329:extras_scm",(void*)f_3329},
-{"f_3292:extras_scm",(void*)f_3292},
-{"f_3314:extras_scm",(void*)f_3314},
-{"f_3253:extras_scm",(void*)f_3253},
-{"f_3257:extras_scm",(void*)f_3257},
-{"f_3264:extras_scm",(void*)f_3264},
-{"f_3266:extras_scm",(void*)f_3266},
-{"f_3270:extras_scm",(void*)f_3270},
-{"f_3260:extras_scm",(void*)f_3260},
-{"f_1972:extras_scm",(void*)f_1972},
-{"f_3240:extras_scm",(void*)f_3240},
-{"f_3244:extras_scm",(void*)f_3244},
-{"f_2593:extras_scm",(void*)f_2593},
-{"f_3148:extras_scm",(void*)f_3148},
-{"f_3158:extras_scm",(void*)f_3158},
-{"f_3139:extras_scm",(void*)f_3139},
-{"f_3133:extras_scm",(void*)f_3133},
-{"f_3111:extras_scm",(void*)f_3111},
-{"f_3105:extras_scm",(void*)f_3105},
-{"f_3099:extras_scm",(void*)f_3099},
-{"f_3093:extras_scm",(void*)f_3093},
-{"f_3087:extras_scm",(void*)f_3087},
-{"f_3081:extras_scm",(void*)f_3081},
-{"f_3075:extras_scm",(void*)f_3075},
-{"f_2927:extras_scm",(void*)f_2927},
-{"f_3073:extras_scm",(void*)f_3073},
-{"f_3025:extras_scm",(void*)f_3025},
-{"f_3055:extras_scm",(void*)f_3055},
-{"f_3040:extras_scm",(void*)f_3040},
-{"f_3012:extras_scm",(void*)f_3012},
-{"f_2971:extras_scm",(void*)f_2971},
-{"f_2998:extras_scm",(void*)f_2998},
-{"f_2994:extras_scm",(void*)f_2994},
-{"f_2930:extras_scm",(void*)f_2930},
-{"f_2957:extras_scm",(void*)f_2957},
-{"f_2953:extras_scm",(void*)f_2953},
-{"f_2850:extras_scm",(void*)f_2850},
-{"f_2856:extras_scm",(void*)f_2856},
-{"f_2925:extras_scm",(void*)f_2925},
-{"f_2921:extras_scm",(void*)f_2921},
-{"f_2913:extras_scm",(void*)f_2913},
-{"f_2909:extras_scm",(void*)f_2909},
-{"f_2887:extras_scm",(void*)f_2887},
-{"f_2879:extras_scm",(void*)f_2879},
-{"f_2841:extras_scm",(void*)f_2841},
-{"f_2845:extras_scm",(void*)f_2845},
-{"f_2813:extras_scm",(void*)f_2813},
-{"f_2839:extras_scm",(void*)f_2839},
-{"f_2817:extras_scm",(void*)f_2817},
-{"f_2748:extras_scm",(void*)f_2748},
-{"f_2755:extras_scm",(void*)f_2755},
-{"f_2782:extras_scm",(void*)f_2782},
-{"f_2808:extras_scm",(void*)f_2808},
-{"f_2766:extras_scm",(void*)f_2766},
-{"f_2661:extras_scm",(void*)f_2661},
-{"f_2674:extras_scm",(void*)f_2674},
-{"f_2712:extras_scm",(void*)f_2712},
-{"f_2677:extras_scm",(void*)f_2677},
-{"f_2706:extras_scm",(void*)f_2706},
-{"f_2710:extras_scm",(void*)f_2710},
-{"f_2690:extras_scm",(void*)f_2690},
-{"f_2629:extras_scm",(void*)f_2629},
-{"f_2652:extras_scm",(void*)f_2652},
-{"f_2645:extras_scm",(void*)f_2645},
-{"f_2596:extras_scm",(void*)f_2596},
-{"f_2627:extras_scm",(void*)f_2627},
-{"f_2620:extras_scm",(void*)f_2620},
-{"f_2085:extras_scm",(void*)f_2085},
-{"f_2264:extras_scm",(void*)f_2264},
-{"f_2535:extras_scm",(void*)f_2535},
-{"f_2574:extras_scm",(void*)f_2574},
-{"f_2584:extras_scm",(void*)f_2584},
-{"f_2577:extras_scm",(void*)f_2577},
-{"f_2552:extras_scm",(void*)f_2552},
-{"f_2562:extras_scm",(void*)f_2562},
-{"f_2555:extras_scm",(void*)f_2555},
-{"f_2542:extras_scm",(void*)f_2542},
-{"f_2519:extras_scm",(void*)f_2519},
-{"f_2522:extras_scm",(void*)f_2522},
-{"f_2529:extras_scm",(void*)f_2529},
-{"f_2501:extras_scm",(void*)f_2501},
-{"f_2412:extras_scm",(void*)f_2412},
-{"f_2415:extras_scm",(void*)f_2415},
-{"f_2476:extras_scm",(void*)f_2476},
-{"f_2455:extras_scm",(void*)f_2455},
-{"f_2462:extras_scm",(void*)f_2462},
-{"f_2439:extras_scm",(void*)f_2439},
-{"f_2446:extras_scm",(void*)f_2446},
-{"f_2419:extras_scm",(void*)f_2419},
-{"f_2406:extras_scm",(void*)f_2406},
-{"f_2322:extras_scm",(void*)f_2322},
-{"f_2324:extras_scm",(void*)f_2324},
-{"f_2331:extras_scm",(void*)f_2331},
-{"f_2383:extras_scm",(void*)f_2383},
-{"f_2379:extras_scm",(void*)f_2379},
-{"f_2362:extras_scm",(void*)f_2362},
-{"f_2358:extras_scm",(void*)f_2358},
-{"f_2354:extras_scm",(void*)f_2354},
-{"f_2303:extras_scm",(void*)f_2303},
-{"f_2280:extras_scm",(void*)f_2280},
-{"f_2283:extras_scm",(void*)f_2283},
-{"f_2290:extras_scm",(void*)f_2290},
-{"f_2271:extras_scm",(void*)f_2271},
-{"f_2241:extras_scm",(void*)f_2241},
-{"f_2245:extras_scm",(void*)f_2245},
-{"f_2115:extras_scm",(void*)f_2115},
-{"f_2198:extras_scm",(void*)f_2198},
-{"f_2133:extras_scm",(void*)f_2133},
-{"f_2135:extras_scm",(void*)f_2135},
-{"f_2187:extras_scm",(void*)f_2187},
-{"f_2183:extras_scm",(void*)f_2183},
-{"f_2167:extras_scm",(void*)f_2167},
-{"f_2159:extras_scm",(void*)f_2159},
-{"f_2088:extras_scm",(void*)f_2088},
-{"f_2095:extras_scm",(void*)f_2095},
-{"f_2106:extras_scm",(void*)f_2106},
-{"f_2066:extras_scm",(void*)f_2066},
-{"f_2076:extras_scm",(void*)f_2076},
-{"f_2033:extras_scm",(void*)f_2033},
-{"f_1975:extras_scm",(void*)f_1975},
-{"f_2007:extras_scm",(void*)f_2007},
-{"f_1934:extras_scm",(void*)f_1934},
-{"f_1938:extras_scm",(void*)f_1938},
-{"f_1944:extras_scm",(void*)f_1944},
-{"f_1894:extras_scm",(void*)f_1894},
-{"f_1898:extras_scm",(void*)f_1898},
-{"f_1901:extras_scm",(void*)f_1901},
-{"f_1904:extras_scm",(void*)f_1904},
-{"f_1873:extras_scm",(void*)f_1873},
-{"f_1880:extras_scm",(void*)f_1880},
-{"f_1886:extras_scm",(void*)f_1886},
-{"f_1784:extras_scm",(void*)f_1784},
-{"f_1825:extras_scm",(void*)f_1825},
-{"f_1820:extras_scm",(void*)f_1820},
-{"f_1789:extras_scm",(void*)f_1789},
-{"f_1793:extras_scm",(void*)f_1793},
-{"f_1806:extras_scm",(void*)f_1806},
-{"f_1803:extras_scm",(void*)f_1803},
-{"f_1715:extras_scm",(void*)f_1715},
-{"f_1719:extras_scm",(void*)f_1719},
-{"f_1722:extras_scm",(void*)f_1722},
-{"f_1725:extras_scm",(void*)f_1725},
-{"f_1730:extras_scm",(void*)f_1730},
-{"f_1734:extras_scm",(void*)f_1734},
-{"f_1740:extras_scm",(void*)f_1740},
-{"f_1750:extras_scm",(void*)f_1750},
-{"f_1743:extras_scm",(void*)f_1743},
-{"f_1655:extras_scm",(void*)f_1655},
-{"f_1598:extras_scm",(void*)f_1598},
-{"f_1602:extras_scm",(void*)f_1602},
-{"f_1626:extras_scm",(void*)f_1626},
-{"f_1629:extras_scm",(void*)f_1629},
-{"f_1634:extras_scm",(void*)f_1634},
-{"f_1638:extras_scm",(void*)f_1638},
-{"f_1650:extras_scm",(void*)f_1650},
-{"f_1611:extras_scm",(void*)f_1611},
-{"f_1614:extras_scm",(void*)f_1614},
-{"f_1501:extras_scm",(void*)f_1501},
-{"f_1550:extras_scm",(void*)f_1550},
-{"f_1545:extras_scm",(void*)f_1545},
-{"f_1503:extras_scm",(void*)f_1503},
-{"f_1507:extras_scm",(void*)f_1507},
-{"f_1355:extras_scm",(void*)f_1355},
-{"f_1495:extras_scm",(void*)f_1495},
-{"f_1365:extras_scm",(void*)f_1365},
-{"f_1435:extras_scm",(void*)f_1435},
-{"f_1439:extras_scm",(void*)f_1439},
-{"f_1442:extras_scm",(void*)f_1442},
-{"f_1376:extras_scm",(void*)f_1376},
-{"f_1380:extras_scm",(void*)f_1380},
-{"f_1265:extras_scm",(void*)f_1265},
-{"f_1332:extras_scm",(void*)f_1332},
-{"f_1277:extras_scm",(void*)f_1277},
-{"f_1287:extras_scm",(void*)f_1287},
-{"f_1300:extras_scm",(void*)f_1300},
-{"f_1116:extras_scm",(void*)f_1116},
-{"f_1126:extras_scm",(void*)f_1126},
-{"f_1129:extras_scm",(void*)f_1129},
-{"f_1149:extras_scm",(void*)f_1149},
-{"f_1154:extras_scm",(void*)f_1154},
-{"f_1167:extras_scm",(void*)f_1167},
-{"f_1240:extras_scm",(void*)f_1240},
-{"f_1232:extras_scm",(void*)f_1232},
-{"f_1218:extras_scm",(void*)f_1218},
-{"f_1200:extras_scm",(void*)f_1200},
-{"f_1209:extras_scm",(void*)f_1209},
-{"f_1136:extras_scm",(void*)f_1136},
-{"f_1077:extras_scm",(void*)f_1077},
-{"f_1059:extras_scm",(void*)f_1059},
-{"f_1038:extras_scm",(void*)f_1038},
-{"f_1042:extras_scm",(void*)f_1042},
-{"f_1045:extras_scm",(void*)f_1045},
-{"f_897:extras_scm",(void*)f_897},
-{"f_969:extras_scm",(void*)f_969},
-{"f_964:extras_scm",(void*)f_964},
-{"f_959:extras_scm",(void*)f_959},
-{"f_899:extras_scm",(void*)f_899},
-{"f_952:extras_scm",(void*)f_952},
-{"f_902:extras_scm",(void*)f_902},
-{"f_910:extras_scm",(void*)f_910},
-{"f_912:extras_scm",(void*)f_912},
-{"f_932:extras_scm",(void*)f_932},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/files.c b/bootstrap/files.c
deleted file mode 100644
index 5ba01885..00000000
--- a/bootstrap/files.c
+++ /dev/null
@@ -1,5297 +0,0 @@
-/* Generated from files.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:31
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: files.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file files.c -extend ./private-namespace.scm
- unit: files
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_regex_toplevel)
-C_externimport void C_ccall C_regex_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_data_structures_toplevel)
-C_externimport void C_ccall C_data_structures_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[102];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,21),40,100,101,108,101,116,101,45,102,105,108,101,42,32,102,105,108,101,50,55,41,0,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,6),40,97,57,55,50,41,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,18),40,97,57,54,54,32,101,120,118,97,114,49,51,52,49,52,55,41,0,0,0,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,7),40,97,49,48,48,55,41,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,7),40,97,49,48,49,57,41,0};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,20),40,97,49,48,49,51,32,46,32,97,114,103,115,49,52,50,49,54,48,41,0,0,0,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,7),40,97,49,48,48,49,41,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,14),40,97,57,54,48,32,107,49,52,49,49,52,54,41,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,100,49,51,48,32,108,49,51,49,41};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,7),40,97,49,48,51,55,41,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,19),40,97,49,48,51,49,32,101,120,118,97,114,49,48,51,49,49,54,41,0,0,0,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,7),40,97,49,48,54,50,41,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,7),40,97,49,48,55,52,41,0};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,20),40,97,49,48,54,56,32,46,32,97,114,103,115,49,49,49,49,50,55,41,0,0,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,7),40,97,49,48,53,54,41,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,15),40,97,49,48,50,53,32,107,49,49,48,49,49,53,41,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,49,48,57,50,41,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,17),40,97,49,48,56,54,32,101,120,118,97,114,55,55,57,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,7),40,97,49,49,49,55,41,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,7),40,97,49,49,50,57,41,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,19),40,97,49,49,50,51,32,46,32,97,114,103,115,56,53,49,48,49,41,0,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,7),40,97,49,49,49,49,41,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,13),40,97,49,48,56,48,32,107,56,52,56,57,41,0,0,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,52,53,32,99,108,111,98,98,101,114,53,52,32,98,108,111,99,107,115,105,122,101,53,53,41,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,31),40,100,101,102,45,98,108,111,99,107,115,105,122,101,52,56,32,37,99,108,111,98,98,101,114,52,51,49,55,48,41,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,99,108,111,98,98,101,114,52,55,41,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,42),40,102,105,108,101,45,99,111,112,121,32,111,114,105,103,102,105,108,101,51,55,32,110,101,119,102,105,108,101,51,56,32,46,32,116,109,112,51,54,51,57,41,0,0,0,0,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,49,51,48,56,41,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,19),40,97,49,51,48,50,32,101,120,118,97,114,50,55,57,50,57,50,41,0,0,0,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,7),40,97,49,51,51,51,41,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,7),40,97,49,51,52,53,41,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,20),40,97,49,51,51,57,32,46,32,97,114,103,115,50,56,55,51,48,51,41,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,7),40,97,49,51,50,55,41,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,15),40,97,49,50,57,54,32,107,50,56,54,50,57,49,41,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,7),40,97,49,51,56,48,41,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,19),40,97,49,51,55,52,32,101,120,118,97,114,51,48,55,51,50,48,41,0,0,0,0,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,7),40,97,49,52,49,53,41,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,7),40,97,49,52,50,55,41,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,20),40,97,49,52,50,49,32,46,32,97,114,103,115,51,49,53,51,51,51,41,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,7),40,97,49,52,48,57,41,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,15),40,97,49,51,54,56,32,107,51,49,52,51,49,57,41,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,100,50,55,55,32,108,50,55,56,41};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,7),40,97,49,52,52,53,41,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,19),40,97,49,52,51,57,32,101,120,118,97,114,50,53,48,50,54,51,41,0,0,0,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,7),40,97,49,52,55,48,41,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,7),40,97,49,52,56,50,41,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,20),40,97,49,52,55,54,32,46,32,97,114,103,115,50,53,56,50,55,52,41,0,0,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,7),40,97,49,52,54,52,41,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,15),40,97,49,52,51,51,32,107,50,53,55,50,54,50,41,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,7),40,97,49,53,48,48,41,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,19),40,97,49,52,57,52,32,101,120,118,97,114,50,50,52,50,51,55,41,0,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,7),40,97,49,53,50,53,41,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,7),40,97,49,53,51,55,41,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,20),40,97,49,53,51,49,32,46,32,97,114,103,115,50,51,50,50,52,56,41,0,0,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,7),40,97,49,53,49,57,41,0};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,15),40,97,49,52,56,56,32,107,50,51,49,50,51,54,41,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,33),40,98,111,100,121,49,57,50,32,99,108,111,98,98,101,114,50,48,49,32,98,108,111,99,107,115,105,122,101,50,48,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,33),40,100,101,102,45,98,108,111,99,107,115,105,122,101,49,57,53,32,37,99,108,111,98,98,101,114,49,57,48,51,52,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,16),40,100,101,102,45,99,108,111,98,98,101,114,49,57,52,41};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,46),40,102,105,108,101,45,109,111,118,101,32,111,114,105,103,102,105,108,101,49,56,52,32,110,101,119,102,105,108,101,49,56,53,32,46,32,116,109,112,49,56,51,49,56,54,41,0,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,26),40,97,98,115,111,108,117,116,101,45,112,97,116,104,110,97,109,101,63,32,112,110,51,54,57,41,0,0,0,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,24),40,99,104,111,112,45,112,100,115,32,115,116,114,51,55,51,32,112,100,115,51,55,52,41};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,115,116,114,115,51,57,51,41,0,0};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,26),40,99,111,110,99,45,100,105,114,115,32,100,105,114,115,51,57,48,32,112,100,115,51,57,49,41,0,0,0,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,34),40,99,97,110,111,110,105,99,97,108,105,122,101,45,100,105,114,115,32,100,105,114,115,52,48,50,32,112,100,115,52,48,51,41,0,0,0,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,52),40,95,109,97,107,101,45,112,97,116,104,110,97,109,101,32,108,111,99,52,49,53,32,100,105,114,52,49,54,32,102,105,108,101,52,49,55,32,101,120,116,52,49,56,32,112,100,115,52,49,57,41,0,0,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,23),40,98,111,100,121,52,54,48,32,101,120,116,52,54,57,32,112,100,115,52,55,48,41,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,23),40,100,101,102,45,112,100,115,52,54,51,32,37,101,120,116,52,53,56,52,55,50,41,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,12),40,100,101,102,45,101,120,116,52,54,50,41,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,43),40,109,97,107,101,45,112,97,116,104,110,97,109,101,32,100,105,114,115,52,53,50,32,102,105,108,101,52,53,51,32,46,32,116,109,112,52,53,49,52,53,52,41,0,0,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,23),40,98,111,100,121,52,57,50,32,101,120,116,53,48,49,32,112,100,115,53,48,50,41,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,23),40,100,101,102,45,112,100,115,52,57,53,32,37,101,120,116,52,57,48,53,49,48,41,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,12),40,100,101,102,45,101,120,116,52,57,52,41,0,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,52),40,109,97,107,101,45,97,98,115,111,108,117,116,101,45,112,97,116,104,110,97,109,101,32,100,105,114,115,52,56,52,32,102,105,108,101,52,56,53,32,46,32,116,109,112,52,56,51,52,56,54,41,0,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,18),40,115,116,114,105,112,45,112,100,115,32,100,105,114,53,50,55,41,0,0,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,26),40,100,101,99,111,109,112,111,115,101,45,112,97,116,104,110,97,109,101,32,112,110,53,51,48,41,0,0,0,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,7),40,97,50,49,50,53,41,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,47),40,97,50,49,51,49,32,100,105,114,53,51,56,53,51,57,53,52,52,32,102,105,108,101,53,52,48,53,52,49,53,52,53,32,101,120,116,53,52,50,53,52,51,53,52,54,41,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,26),40,112,97,116,104,110,97,109,101,45,100,105,114,101,99,116,111,114,121,32,112,110,53,51,53,41,0,0,0,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,7),40,97,50,49,52,48,41,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,47),40,97,50,49,52,54,32,100,105,114,53,53,51,53,53,52,53,53,57,32,102,105,108,101,53,53,53,53,53,54,53,54,48,32,101,120,116,53,53,55,53,53,56,53,54,49,41,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,21),40,112,97,116,104,110,97,109,101,45,102,105,108,101,32,112,110,53,53,48,41,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,7),40,97,50,49,53,53,41,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,47),40,97,50,49,54,49,32,100,105,114,53,54,56,53,54,57,53,55,52,32,102,105,108,101,53,55,48,53,55,49,53,55,53,32,101,120,116,53,55,50,53,55,51,53,55,54,41,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,26),40,112,97,116,104,110,97,109,101,45,101,120,116,101,110,115,105,111,110,32,112,110,53,54,53,41,0,0,0,0,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,7),40,97,50,49,55,48,41,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,47),40,97,50,49,55,54,32,100,105,114,53,56,51,53,56,52,53,56,57,32,102,105,108,101,53,56,53,53,56,54,53,57,48,32,101,120,116,53,56,55,53,56,56,53,57,49,41,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,32),40,112,97,116,104,110,97,109,101,45,115,116,114,105,112,45,100,105,114,101,99,116,111,114,121,32,112,110,53,56,48,41};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,7),40,97,50,49,56,56,41,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,47),40,97,50,49,57,52,32,100,105,114,53,57,56,53,57,57,54,48,52,32,102,105,108,101,54,48,48,54,48,49,54,48,53,32,101,120,116,54,48,50,54,48,51,54,48,54,41,0};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,32),40,112,97,116,104,110,97,109,101,45,115,116,114,105,112,45,101,120,116,101,110,115,105,111,110,32,112,110,53,57,53,41};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,7),40,97,50,50,48,54,41,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,45),40,97,50,50,49,50,32,95,54,49,52,54,49,53,54,50,48,32,102,105,108,101,54,49,54,54,49,55,54,50,49,32,101,120,116,54,49,56,54,49,57,54,50,50,41,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,41),40,112,97,116,104,110,97,109,101,45,114,101,112,108,97,99,101,45,100,105,114,101,99,116,111,114,121,32,112,110,54,49,48,32,100,105,114,54,49,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,7),40,97,50,50,50,52,41,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,44),40,97,50,50,51,48,32,100,105,114,54,51,48,54,51,49,54,51,54,32,95,54,51,50,54,51,51,54,51,55,32,101,120,116,54,51,52,54,51,53,54,51,56,41,0,0,0,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,37),40,112,97,116,104,110,97,109,101,45,114,101,112,108,97,99,101,45,102,105,108,101,32,112,110,54,50,54,32,102,105,108,101,54,50,55,41,0,0,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,7),40,97,50,50,52,50,41,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,45),40,97,50,50,52,56,32,100,105,114,54,52,54,54,52,55,54,53,50,32,102,105,108,101,54,52,56,54,52,57,54,53,51,32,95,54,53,48,54,53,49,54,53,52,41,0,0,0};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,41),40,112,97,116,104,110,97,109,101,45,114,101,112,108,97,99,101,45,101,120,116,101,110,115,105,111,110,32,112,110,54,52,50,32,101,120,116,54,52,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,12),40,97,50,50,57,51,32,112,54,57,49,41,0,0,0,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,32),40,99,114,101,97,116,101,45,116,101,109,112,111,114,97,114,121,45,102,105,108,101,32,46,32,101,120,116,54,54,57,41};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,18),40,97,100,100,112,97,114,116,32,112,97,114,116,115,55,48,50,41,0,0,0,0,0,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,11),40,103,55,52,57,32,112,55,53,49,41,0,0,0,0,0};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,52,50,32,103,55,52,54,55,52,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,28),40,108,111,111,112,32,105,55,50,55,32,112,114,101,118,55,50,56,32,112,97,114,116,115,55,50,57,41,0,0,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,40),40,110,111,114,109,97,108,105,122,101,45,112,97,116,104,110,97,109,101,32,112,97,116,104,55,49,53,32,46,32,116,109,112,55,49,52,55,49,54,41};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,40),40,115,112,108,105,116,45,100,105,114,101,99,116,111,114,121,32,108,111,99,55,56,57,32,100,105,114,55,57,48,32,107,101,101,112,63,55,57,49,41};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,24),40,100,105,114,101,99,116,111,114,121,45,110,117,108,108,63,32,100,105,114,55,57,52,41};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,28),40,100,101,99,111,109,112,111,115,101,45,100,105,114,101,99,116,111,114,121,32,100,105,114,56,48,54,41,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,14),40,102,95,50,55,56,51,32,112,110,51,53,49,41,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,14),40,102,95,50,55,56,57,32,114,116,51,53,50,41,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,14),40,102,95,50,55,57,56,32,114,116,51,53,53,41,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,30),40,97,98,115,111,108,117,116,101,45,112,97,116,104,110,97,109,101,45,114,111,111,116,32,112,110,51,54,49,41,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,19),40,114,111,111,116,45,111,114,105,103,105,110,32,114,116,51,54,50,41,0,0,0,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,22),40,114,111,111,116,45,100,105,114,101,99,116,111,114,121,32,114,116,51,54,51,41,0,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-C_noret_decl(C_files_toplevel)
-C_externexport void C_ccall C_files_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_858)
-static void C_ccall f_858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_861)
-static void C_ccall f_861(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_864)
-static void C_ccall f_864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2808)
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2819)
-static void C_ccall f_2819(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2816)
-static void C_ccall f_2816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2810)
-static void C_ccall f_2810(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2781)
-static void C_ccall f_2781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2798)
-static void C_ccall f_2798(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2789)
-static void C_ccall f_2789(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2783)
-static void C_ccall f_2783(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1637)
-static void C_fcall f_1637(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2026)
-static void C_ccall f_2026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2029)
-static void C_ccall f_2029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2778)
-static void C_ccall f_2778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2695)
-static void C_ccall f_2695(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2743)
-static void C_ccall f_2743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2746)
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2749)
-static void C_ccall f_2749(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2756)
-static void C_ccall f_2756(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2736)
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2653)
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2661)
-static void C_ccall f_2661(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2663)
-static C_word C_fcall f_2663(C_word t0);
-C_noret_decl(f_2644)
-static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2356)
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2356)
-static void C_ccall f_2356r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2360)
-static void C_ccall f_2360(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2374)
-static void C_fcall f_2374(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2574)
-static void C_fcall f_2574(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2578)
-static void C_ccall f_2578(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2522)
-static void C_fcall f_2522(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2558)
-static void C_ccall f_2558(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2508)
-static void C_ccall f_2508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2384)
-static void C_fcall f_2384(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2410)
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2413)
-static void C_ccall f_2413(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2416)
-static void C_ccall f_2416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2464)
-static void C_fcall f_2464(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2482)
-static void C_ccall f_2482(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2472)
-static void C_fcall f_2472(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2476)
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2419)
-static void C_ccall f_2419(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2422)
-static void C_ccall f_2422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2425)
-static void C_ccall f_2425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2428)
-static void C_ccall f_2428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2448)
-static void C_ccall f_2448(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2437)
-static void C_fcall f_2437(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2444)
-static void C_ccall f_2444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2330)
-static C_word C_fcall f_2330(C_word *a,C_word t0,C_word t1);
-C_noret_decl(f_2255)
-static void C_ccall f_2255(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_2255)
-static void C_ccall f_2255r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_2259)
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2312)
-static void C_ccall f_2312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2318)
-static void C_ccall f_2318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2262)
-static void C_ccall f_2262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2273)
-static void C_fcall f_2273(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2303)
-static void C_ccall f_2303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2299)
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2280)
-static void C_ccall f_2280(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2286)
-static void C_ccall f_2286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2294)
-static void C_ccall f_2294(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2237)
-static void C_ccall f_2237(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2249)
-static void C_ccall f_2249(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2243)
-static void C_ccall f_2243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2219)
-static void C_ccall f_2219(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2231)
-static void C_ccall f_2231(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2225)
-static void C_ccall f_2225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2201)
-static void C_ccall f_2201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2213)
-static void C_ccall f_2213(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2207)
-static void C_ccall f_2207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2183)
-static void C_ccall f_2183(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2195)
-static void C_ccall f_2195(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2189)
-static void C_ccall f_2189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2165)
-static void C_ccall f_2165(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2177)
-static void C_ccall f_2177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2171)
-static void C_ccall f_2171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2150)
-static void C_ccall f_2150(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2162)
-static void C_ccall f_2162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2156)
-static void C_ccall f_2156(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2135)
-static void C_ccall f_2135(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2147)
-static void C_ccall f_2147(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2141)
-static void C_ccall f_2141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2120)
-static void C_ccall f_2120(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2132)
-static void C_ccall f_2132(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2126)
-static void C_ccall f_2126(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2044)
-static void C_ccall f_2044(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2060)
-static void C_ccall f_2060(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2089)
-static void C_ccall f_2089(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2114)
-static void C_ccall f_2114(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2099)
-static void C_ccall f_2099(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2070)
-static void C_ccall f_2070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2030)
-static void C_fcall f_2030(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1947)
-static void C_ccall f_1947(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_1947)
-static void C_ccall f_1947r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1976)
-static void C_fcall f_1976(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1971)
-static void C_fcall f_1971(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1949)
-static void C_fcall f_1949(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1957)
-static void C_ccall f_1957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1963)
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1960)
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1883)
-static void C_ccall f_1883(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_1883)
-static void C_ccall f_1883r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1899)
-static void C_fcall f_1899(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1894)
-static void C_fcall f_1894(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1885)
-static void C_fcall f_1885(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1893)
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1797)
-static void C_fcall f_1797(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_1850)
-static void C_fcall f_1850(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1826)
-static void C_ccall f_1826(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1833)
-static void C_fcall f_1833(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1766)
-static void C_fcall f_1766(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1705)
-static void C_fcall f_1705(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1714)
-static void C_fcall f_1714(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1744)
-static void C_ccall f_1744(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1752)
-static void C_ccall f_1752(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1652)
-static void C_fcall f_1652(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1668)
-static void C_fcall f_1668(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1639)
-static void C_ccall f_1639(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1650)
-static void C_ccall f_1650(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1225)
-static void C_ccall f_1225(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_1225)
-static void C_ccall f_1225r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1585)
-static void C_fcall f_1585(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1580)
-static void C_fcall f_1580(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1227)
-static void C_fcall f_1227(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1240)
-static void C_fcall f_1240(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1573)
-static void C_ccall f_1573(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1569)
-static void C_ccall f_1569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1243)
-static void C_ccall f_1243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1246)
-static void C_ccall f_1246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1562)
-static void C_ccall f_1562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1249)
-static void C_ccall f_1249(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1545)
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1555)
-static void C_ccall f_1555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1252)
-static void C_ccall f_1252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1489)
-static void C_ccall f_1489(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1520)
-static void C_ccall f_1520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1532)
-static void C_ccall f_1532(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1532)
-static void C_ccall f_1532r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1538)
-static void C_ccall f_1538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1526)
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1495)
-static void C_ccall f_1495(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1501)
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f2976)
-static void C_ccall f2976(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1512)
-static void C_ccall f_1512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1255)
-static void C_ccall f_1255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1258)
-static void C_ccall f_1258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1434)
-static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1465)
-static void C_ccall f_1465(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1477)
-static void C_ccall f_1477(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1477)
-static void C_ccall f_1477r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1483)
-static void C_ccall f_1483(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1471)
-static void C_ccall f_1471(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1440)
-static void C_ccall f_1440(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1446)
-static void C_ccall f_1446(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f2972)
-static void C_ccall f2972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1457)
-static void C_ccall f_1457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1261)
-static void C_ccall f_1261(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1264)
-static void C_ccall f_1264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1267)
-static void C_ccall f_1267(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1274)
-static void C_ccall f_1274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1276)
-static void C_fcall f_1276(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1369)
-static void C_ccall f_1369(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1410)
-static void C_ccall f_1410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1422)
-static void C_ccall f_1422(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1422)
-static void C_ccall f_1422r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1428)
-static void C_ccall f_1428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1416)
-static void C_ccall f_1416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1375)
-static void C_ccall f_1375(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1381)
-static void C_ccall f_1381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1388)
-static void C_ccall f_1388(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1391)
-static void C_ccall f_1391(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1402)
-static void C_ccall f_1402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1398)
-static void C_ccall f_1398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1353)
-static void C_ccall f_1353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1356)
-static void C_ccall f_1356(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1363)
-static void C_ccall f_1363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1286)
-static void C_ccall f_1286(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1289)
-static void C_ccall f_1289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1297)
-static void C_ccall f_1297(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1328)
-static void C_ccall f_1328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1340)
-static void C_ccall f_1340(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1340)
-static void C_ccall f_1340r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1346)
-static void C_ccall f_1346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1334)
-static void C_ccall f_1334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1303)
-static void C_ccall f_1303(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1309)
-static void C_ccall f_1309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f2966)
-static void C_ccall f2966(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1320)
-static void C_ccall f_1320(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1292)
-static void C_ccall f_1292(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1295)
-static void C_ccall f_1295(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_878)
-static void C_ccall f_878(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_878)
-static void C_ccall f_878r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1177)
-static void C_fcall f_1177(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1172)
-static void C_fcall f_1172(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_880)
-static void C_fcall f_880(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_893)
-static void C_fcall f_893(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1165)
-static void C_ccall f_1165(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1161)
-static void C_ccall f_1161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_896)
-static void C_ccall f_896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_899)
-static void C_ccall f_899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1154)
-static void C_ccall f_1154(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_902)
-static void C_ccall f_902(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1137)
-static void C_ccall f_1137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1147)
-static void C_ccall f_1147(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_905)
-static void C_ccall f_905(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1081)
-static void C_ccall f_1081(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1112)
-static void C_ccall f_1112(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1124)
-static void C_ccall f_1124(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1124)
-static void C_ccall f_1124r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1130)
-static void C_ccall f_1130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1118)
-static void C_ccall f_1118(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1087)
-static void C_ccall f_1087(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1093)
-static void C_ccall f_1093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f2962)
-static void C_ccall f2962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1104)
-static void C_ccall f_1104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_908)
-static void C_ccall f_908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_911)
-static void C_ccall f_911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1026)
-static void C_ccall f_1026(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1057)
-static void C_ccall f_1057(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1069)
-static void C_ccall f_1069(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1069)
-static void C_ccall f_1069r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1075)
-static void C_ccall f_1075(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1063)
-static void C_ccall f_1063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1032)
-static void C_ccall f_1032(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1038)
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f2958)
-static void C_ccall f2958(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1049)
-static void C_ccall f_1049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_914)
-static void C_ccall f_914(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_917)
-static void C_ccall f_917(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_920)
-static void C_ccall f_920(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_927)
-static void C_ccall f_927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_929)
-static void C_fcall f_929(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_961)
-static void C_ccall f_961(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1002)
-static void C_ccall f_1002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1014)
-static void C_ccall f_1014(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_1014)
-static void C_ccall f_1014r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_1020)
-static void C_ccall f_1020(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1008)
-static void C_ccall f_1008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_967)
-static void C_ccall f_967(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_973)
-static void C_ccall f_973(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_980)
-static void C_ccall f_980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_983)
-static void C_ccall f_983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_994)
-static void C_ccall f_994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_990)
-static void C_ccall f_990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_945)
-static void C_ccall f_945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_948)
-static void C_ccall f_948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_955)
-static void C_ccall f_955(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_939)
-static void C_ccall f_939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_942)
-static void C_ccall f_942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_866)
-static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_873)
-static void C_ccall f_873(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_1637)
-static void C_fcall trf_1637(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1637(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1637(t0,t1);}
-
-C_noret_decl(trf_2644)
-static void C_fcall trf_2644(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2644(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2644(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2374)
-static void C_fcall trf_2374(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2374(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_2374(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_2574)
-static void C_fcall trf_2574(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2574(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2574(t0,t1);}
-
-C_noret_decl(trf_2522)
-static void C_fcall trf_2522(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2522(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2522(t0,t1);}
-
-C_noret_decl(trf_2384)
-static void C_fcall trf_2384(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2384(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2384(t0,t1);}
-
-C_noret_decl(trf_2464)
-static void C_fcall trf_2464(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2464(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2464(t0,t1,t2);}
-
-C_noret_decl(trf_2472)
-static void C_fcall trf_2472(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2472(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2472(t0,t1,t2);}
-
-C_noret_decl(trf_2437)
-static void C_fcall trf_2437(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2437(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2437(t0,t1);}
-
-C_noret_decl(trf_2273)
-static void C_fcall trf_2273(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2273(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2273(t0,t1);}
-
-C_noret_decl(trf_2030)
-static void C_fcall trf_2030(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2030(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2030(t0,t1);}
-
-C_noret_decl(trf_1976)
-static void C_fcall trf_1976(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1976(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1976(t0,t1);}
-
-C_noret_decl(trf_1971)
-static void C_fcall trf_1971(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1971(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1971(t0,t1,t2);}
-
-C_noret_decl(trf_1949)
-static void C_fcall trf_1949(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1949(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1949(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1899)
-static void C_fcall trf_1899(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1899(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1899(t0,t1);}
-
-C_noret_decl(trf_1894)
-static void C_fcall trf_1894(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1894(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1894(t0,t1,t2);}
-
-C_noret_decl(trf_1885)
-static void C_fcall trf_1885(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1885(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1885(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1797)
-static void C_fcall trf_1797(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1797(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_1797(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_1850)
-static void C_fcall trf_1850(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1850(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1850(t0,t1);}
-
-C_noret_decl(trf_1833)
-static void C_fcall trf_1833(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1833(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1833(t0,t1);}
-
-C_noret_decl(trf_1766)
-static void C_fcall trf_1766(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1766(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1766(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1705)
-static void C_fcall trf_1705(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1705(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1705(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1714)
-static void C_fcall trf_1714(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1714(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1714(t0,t1,t2);}
-
-C_noret_decl(trf_1652)
-static void C_fcall trf_1652(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1652(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1652(t0,t1,t2);}
-
-C_noret_decl(trf_1668)
-static void C_fcall trf_1668(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1668(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1668(t0,t1);}
-
-C_noret_decl(trf_1585)
-static void C_fcall trf_1585(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1585(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1585(t0,t1);}
-
-C_noret_decl(trf_1580)
-static void C_fcall trf_1580(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1580(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1580(t0,t1,t2);}
-
-C_noret_decl(trf_1227)
-static void C_fcall trf_1227(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1227(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1227(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1240)
-static void C_fcall trf_1240(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1240(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1240(t0,t1);}
-
-C_noret_decl(trf_1276)
-static void C_fcall trf_1276(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1276(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1276(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1177)
-static void C_fcall trf_1177(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1177(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1177(t0,t1);}
-
-C_noret_decl(trf_1172)
-static void C_fcall trf_1172(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1172(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1172(t0,t1,t2);}
-
-C_noret_decl(trf_880)
-static void C_fcall trf_880(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_880(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_880(t0,t1,t2,t3);}
-
-C_noret_decl(trf_893)
-static void C_fcall trf_893(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_893(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_893(t0,t1);}
-
-C_noret_decl(trf_929)
-static void C_fcall trf_929(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_929(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_929(t0,t1,t2,t3);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_files_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_files_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("files_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(561)){
-C_save(t1);
-C_rereclaim2(561*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,102);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],12,"file-exists\077");
-lf[3]=C_h_intern(&lf[3],11,"delete-file");
-lf[4]=C_h_intern(&lf[4],12,"delete-file*");
-lf[5]=C_h_intern(&lf[5],9,"file-copy");
-lf[6]=C_h_intern(&lf[6],17,"close-output-port");
-lf[7]=C_h_intern(&lf[7],16,"close-input-port");
-lf[8]=C_h_intern(&lf[8],12,"read-string!");
-lf[9]=C_h_intern(&lf[9],9,"condition");
-lf[10]=C_h_intern(&lf[10],9,"\003syserror");
-lf[11]=C_h_intern(&lf[11],13,"string-append");
-lf[12]=C_decode_literal(C_heaptop,"\376B\000\000\037error writing file starting at ");
-lf[13]=C_h_intern(&lf[13],12,"write-string");
-lf[14]=C_h_intern(&lf[14],22,"with-exception-handler");
-lf[15]=C_h_intern(&lf[15],30,"call-with-current-continuation");
-lf[16]=C_h_intern(&lf[16],11,"make-string");
-lf[17]=C_decode_literal(C_heaptop,"\376B\000\000#could not open newfile for write - ");
-lf[18]=C_h_intern(&lf[18],16,"open-output-file");
-lf[19]=C_decode_literal(C_heaptop,"\376B\000\000#could not open origfile for read - ");
-lf[20]=C_h_intern(&lf[20],15,"open-input-file");
-lf[21]=C_decode_literal(C_heaptop,"\376B\000\000&newfile exists but clobber is false - ");
-lf[22]=C_decode_literal(C_heaptop,"\376B\000\000\032origfile does not exist - ");
-lf[23]=C_decode_literal(C_heaptop,"\376B\000\0002invalid blocksize given: not a positive integer - ");
-lf[24]=C_h_intern(&lf[24],9,"file-move");
-lf[25]=C_decode_literal(C_heaptop,"\376B\000\000\034could not remove origfile - ");
-lf[26]=C_decode_literal(C_heaptop,"\376B\000\000\037error writing file starting at ");
-lf[27]=C_decode_literal(C_heaptop,"\376B\000\000#could not open newfile for write - ");
-lf[28]=C_decode_literal(C_heaptop,"\376B\000\000#could not open origfile for read - ");
-lf[29]=C_decode_literal(C_heaptop,"\376B\000\000&newfile exists but clobber is false - ");
-lf[30]=C_decode_literal(C_heaptop,"\376B\000\000\032origfile does not exist - ");
-lf[31]=C_decode_literal(C_heaptop,"\376B\000\0002invalid blocksize given: not a positive integer - ");
-lf[35]=C_h_intern(&lf[35],12,"string-match");
-lf[36]=C_h_intern(&lf[36],18,"absolute-pathname\077");
-lf[38]=C_h_intern(&lf[38],13,"\003syssubstring");
-lf[39]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000\134\376\003\000\000\002\376\377\012\000\000/\376\377\016");
-lf[40]=C_h_intern(&lf[40],13,"make-pathname");
-lf[41]=C_h_intern(&lf[41],22,"make-absolute-pathname");
-lf[42]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[43]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[45]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[47]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[48]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[49]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000\134\376\003\000\000\002\376\377\012\000\000/\376\377\016");
-lf[50]=C_h_intern(&lf[50],17,"\003sysstring-append");
-lf[51]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
-lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\001\134");
-lf[53]=C_h_intern(&lf[53],18,"decompose-pathname");
-lf[54]=C_h_intern(&lf[54],18,"pathname-directory");
-lf[55]=C_h_intern(&lf[55],13,"pathname-file");
-lf[56]=C_h_intern(&lf[56],18,"pathname-extension");
-lf[57]=C_h_intern(&lf[57],24,"pathname-strip-directory");
-lf[58]=C_h_intern(&lf[58],24,"pathname-strip-extension");
-lf[59]=C_h_intern(&lf[59],26,"pathname-replace-directory");
-lf[60]=C_h_intern(&lf[60],21,"pathname-replace-file");
-lf[61]=C_h_intern(&lf[61],26,"pathname-replace-extension");
-lf[62]=C_h_intern(&lf[62],24,"get-environment-variable");
-lf[63]=C_h_intern(&lf[63],21,"call-with-output-file");
-lf[64]=C_h_intern(&lf[64],21,"create-temporary-file");
-lf[65]=C_decode_literal(C_heaptop,"\376B\000\000\003tmp");
-lf[66]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[67]=C_decode_literal(C_heaptop,"\376B\000\000\004/tmp");
-lf[68]=C_decode_literal(C_heaptop,"\376B\000\000\003TMP");
-lf[69]=C_decode_literal(C_heaptop,"\376B\000\000\004TEMP");
-lf[70]=C_decode_literal(C_heaptop,"\376B\000\000\006TMPDIR");
-lf[71]=C_h_intern(&lf[71],18,"open-output-string");
-lf[72]=C_h_intern(&lf[72],17,"get-output-string");
-lf[73]=C_h_intern(&lf[73],7,"reverse");
-lf[74]=C_h_intern(&lf[74],7,"display");
-lf[75]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\004msvc\376\003\000\000\002\376\001\000\000\007mingw32\376\377\016");
-lf[76]=C_h_intern(&lf[76],7,"windows");
-lf[77]=C_h_intern(&lf[77],4,"unix");
-lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\002..");
-lf[80]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\002..\376\377\016");
-lf[81]=C_h_intern(&lf[81],18,"normalize-pathname");
-lf[82]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[83]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[84]=C_h_intern(&lf[84],20,"\003sysexpand-home-path");
-lf[85]=C_h_intern(&lf[85],16,"\003syswrite-char-0");
-lf[86]=C_h_intern(&lf[86],12,"string-split");
-lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\002/\134");
-lf[89]=C_h_intern(&lf[89],15,"directory-null\077");
-lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[91]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[92]=C_h_intern(&lf[92],19,"decompose-directory");
-lf[93]=C_h_intern(&lf[93],14,"build-platform");
-lf[94]=C_h_intern(&lf[94],6,"regexp");
-lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\034^(.*[\134/\134\134])\077((\134.)\077[^\134/\134\134]+)$");
-lf[96]=C_decode_literal(C_heaptop,"\376B\000\000&^(.*[\134/\134\134])\077([^\134/\134\134]+)(\134.([^\134/\134\134.]+))$");
-lf[97]=C_h_intern(&lf[97],20,"\003syswindows-platform");
-lf[98]=C_decode_literal(C_heaptop,"\376B\000\000\026([A-Za-z]:)\077([\134/\134\134]).*");
-lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\012([\134/\134\134]).*");
-lf[100]=C_h_intern(&lf[100],17,"register-feature!");
-lf[101]=C_h_intern(&lf[101],5,"files");
-C_register_lf2(lf,102,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c176 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_858,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_regex_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k856 */
-static void C_ccall f_858(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_858,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_861,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k859 in k856 */
-static void C_ccall f_861(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_861,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_864,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 62 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[100]+1)))(3,*((C_word*)lf[100]+1),t2,lf[101]);}
-
-/* k862 in k859 in k856 */
-static void C_ccall f_864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_864,2,t0,t1);}
-t2=*((C_word*)lf[2]+1);
-t3=*((C_word*)lf[3]+1);
-t4=C_mutate((C_word*)lf[4]+1 /* (set! delete-file* ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_866,a[2]=t2,a[3]=t3,a[4]=((C_word)li0),tmp=(C_word)a,a+=5,tmp));
-t5=C_mutate((C_word*)lf[5]+1 /* (set! file-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_878,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[24]+1 /* (set! file-move ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1225,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp));
-t7=lf[32] /* absolute-pathname-root */ =C_SCHEME_UNDEFINED;;
-t8=lf[33] /* root-origin */ =C_SCHEME_UNDEFINED;;
-t9=lf[34] /* root-directory */ =C_SCHEME_UNDEFINED;;
-t10=*((C_word*)lf[35]+1);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1637,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[97]+1))){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2781,a[2]=t11,a[3]=t10,tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 177 regexp */
-t13=*((C_word*)lf[94]+1);
-((C_proc3)(void*)(*((C_word*)t13+1)))(3,t13,t12,lf[98]);}
-else{
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2808,a[2]=t11,a[3]=t10,tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 181 regexp */
-t13=*((C_word*)lf[94]+1);
-((C_proc3)(void*)(*((C_word*)t13+1)))(3,t13,t12,lf[99]);}}
-
-/* k2806 in k862 in k859 in k856 */
-static void C_ccall f_2808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2808,2,t0,t1);}
-t2=C_mutate(&lf[32] /* (set! absolute-pathname-root ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2810,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li115),tmp=(C_word)a,a+=5,tmp));
-t3=C_mutate(&lf[33] /* (set! root-origin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2816,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate(&lf[34] /* (set! root-directory ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2819,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t0)[2];
-f_1637(t5,t4);}
-
-/* root-directory in k2806 in k862 in k859 in k856 */
-static void C_ccall f_2819(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2819,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_i_cadr(t2):C_SCHEME_FALSE));}
-
-/* root-origin in k2806 in k862 in k859 in k856 */
-static void C_ccall f_2816(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2816,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-
-/* absolute-pathname-root in k2806 in k862 in k859 in k856 */
-static void C_ccall f_2810(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2810,3,t0,t1,t2);}
-/* files.scm: 182 string-match */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t1,((C_word*)t0)[2],t2);}
-
-/* k2779 in k862 in k859 in k856 */
-static void C_ccall f_2781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2781,2,t0,t1);}
-t2=C_mutate(&lf[32] /* (set! absolute-pathname-root ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2783,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li112),tmp=(C_word)a,a+=5,tmp));
-t3=C_mutate(&lf[33] /* (set! root-origin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2789,a[2]=((C_word)li113),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate(&lf[34] /* (set! root-directory ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2798,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
-t5=((C_word*)t0)[2];
-f_1637(t5,t4);}
-
-/* f_2798 in k2779 in k862 in k859 in k856 */
-static void C_ccall f_2798(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2798,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_i_caddr(t2):C_SCHEME_FALSE));}
-
-/* f_2789 in k2779 in k862 in k859 in k856 */
-static void C_ccall f_2789(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2789,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_i_cadr(t2):C_SCHEME_FALSE));}
-
-/* f_2783 in k2779 in k862 in k859 in k856 */
-static void C_ccall f_2783(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2783,3,t0,t1,t2);}
-/* files.scm: 178 string-match */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t1,((C_word*)t0)[2],t2);}
-
-/* k1635 in k862 in k859 in k856 */
-static void C_fcall f_1637(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[41],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1637,NULL,2,t0,t1);}
-t2=C_mutate((C_word*)lf[36]+1 /* (set! absolute-pathname? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1639,a[2]=((C_word)li60),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate(&lf[37] /* (set! chop-pds ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1652,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp));
-t4=C_set_block_item(lf[40] /* make-pathname */,0,C_SCHEME_UNDEFINED);
-t5=C_set_block_item(lf[41] /* make-absolute-pathname */,0,C_SCHEME_UNDEFINED);
-t6=*((C_word*)lf[11]+1);
-t7=*((C_word*)lf[36]+1);
-t8=lf[42];
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1705,a[2]=t6,a[3]=t8,a[4]=((C_word)li63),tmp=(C_word)a,a+=5,tmp));
-t16=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1766,a[2]=t10,a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp));
-t17=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1797,a[2]=t6,a[3]=((C_word)li65),tmp=(C_word)a,a+=4,tmp));
-t18=C_mutate((C_word*)lf[40]+1 /* (set! make-pathname ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1883,a[2]=t12,a[3]=t14,a[4]=((C_word)li69),tmp=(C_word)a,a+=5,tmp));
-t19=C_mutate((C_word*)lf[41]+1 /* (set! make-absolute-pathname ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1947,a[2]=t12,a[3]=t7,a[4]=t8,a[5]=t14,a[6]=((C_word)li73),tmp=(C_word)a,a+=7,tmp));
-t20=*((C_word*)lf[35]+1);
-t21=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2026,a[2]=((C_word*)t0)[2],a[3]=t20,tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 267 regexp */
-t22=*((C_word*)lf[94]+1);
-((C_proc3)(void*)(*((C_word*)t22+1)))(3,t22,t21,lf[96]);}
-
-/* k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2026,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2029,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 268 regexp */
-t3=*((C_word*)lf[94]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[95]);}
-
-/* k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word ab[56],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2029,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2030,a[2]=((C_word)li74),tmp=(C_word)a,a+=3,tmp);
-t3=C_mutate((C_word*)lf[53]+1 /* (set! decompose-pathname ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2044,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word)li75),tmp=(C_word)a,a+=7,tmp));
-t4=*((C_word*)lf[53]+1);
-t5=C_mutate((C_word*)lf[54]+1 /* (set! pathname-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2120,a[2]=t4,a[3]=((C_word)li78),tmp=(C_word)a,a+=4,tmp));
-t6=C_mutate((C_word*)lf[55]+1 /* (set! pathname-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2135,a[2]=t4,a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp));
-t7=C_mutate((C_word*)lf[56]+1 /* (set! pathname-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2150,a[2]=t4,a[3]=((C_word)li84),tmp=(C_word)a,a+=4,tmp));
-t8=C_mutate((C_word*)lf[57]+1 /* (set! pathname-strip-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2165,a[2]=t4,a[3]=((C_word)li87),tmp=(C_word)a,a+=4,tmp));
-t9=C_mutate((C_word*)lf[58]+1 /* (set! pathname-strip-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2183,a[2]=t4,a[3]=((C_word)li90),tmp=(C_word)a,a+=4,tmp));
-t10=C_mutate((C_word*)lf[59]+1 /* (set! pathname-replace-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2201,a[2]=t4,a[3]=((C_word)li93),tmp=(C_word)a,a+=4,tmp));
-t11=C_mutate((C_word*)lf[60]+1 /* (set! pathname-replace-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2219,a[2]=t4,a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp));
-t12=C_mutate((C_word*)lf[61]+1 /* (set! pathname-replace-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2237,a[2]=t4,a[3]=((C_word)li99),tmp=(C_word)a,a+=4,tmp));
-t13=*((C_word*)lf[62]+1);
-t14=*((C_word*)lf[40]+1);
-t15=*((C_word*)lf[2]+1);
-t16=*((C_word*)lf[63]+1);
-t17=C_mutate((C_word*)lf[64]+1 /* (set! create-temporary-file ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2255,a[2]=t13,a[3]=t14,a[4]=t15,a[5]=t16,a[6]=((C_word)li102),tmp=(C_word)a,a+=7,tmp));
-t18=*((C_word*)lf[71]+1);
-t19=*((C_word*)lf[72]+1);
-t20=*((C_word*)lf[62]+1);
-t21=*((C_word*)lf[73]+1);
-t22=*((C_word*)lf[74]+1);
-t23=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2778,a[2]=((C_word*)t0)[2],a[3]=t18,a[4]=t21,a[5]=t22,a[6]=t19,tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 365 build-platform */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[93]+1)))(2,*((C_word*)lf[93]+1),t23);}
-
-/* k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2778,2,t0,t1);}
-t2=C_i_memq(t1,lf[75]);
-t3=(C_truep(t2)?lf[76]:lf[77]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2330,a[2]=((C_word)li103),tmp=(C_word)a,a+=3,tmp);
-t5=C_mutate((C_word*)lf[81]+1 /* (set! normalize-pathname ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2356,a[2]=t3,a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word)li107),tmp=(C_word)a,a+=9,tmp));
-t6=*((C_word*)lf[86]+1);
-t7=C_mutate(&lf[87] /* (set! split-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2644,a[2]=t6,a[3]=((C_word)li108),tmp=(C_word)a,a+=4,tmp));
-t8=C_mutate((C_word*)lf[89]+1 /* (set! directory-null? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2653,a[2]=((C_word)li110),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[92]+1 /* (set! decompose-directory ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2695,a[2]=((C_word)li111),tmp=(C_word)a,a+=3,tmp));
-t10=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-
-/* decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2695(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2695,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2743,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 456 split-directory */
-t4=lf[87];
-f_2644(t4,t3,lf[92],t2,C_SCHEME_FALSE);}
-
-/* k2741 in decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2743(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2743,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2746,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 457 absolute-pathname-root */
-((C_proc3)C_retrieve_proc(lf[32]))(3,lf[32],t2,((C_word*)t0)[2]);}
-
-/* k2744 in k2741 in decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2746,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2749,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 458 root-origin */
-((C_proc3)C_retrieve_proc(lf[33]))(3,lf[33],t2,t1);}
-
-/* k2747 in k2744 in k2741 in decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2749(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2749,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2756,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 459 root-directory */
-((C_proc3)C_retrieve_proc(lf[34]))(3,lf[34],t2,((C_word*)t0)[2]);}
-
-/* k2754 in k2747 in k2744 in k2741 in decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2756(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2756,2,t0,t1);}
-t2=C_i_nullp(((C_word*)t0)[4]);
-t3=(C_truep(t2)?C_SCHEME_FALSE:((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-if(C_truep(t4)){
-t5=C_i_car(t3);
-t6=C_block_size(t4);
-if(C_truep(C_substring_compare(t4,t5,C_fix(0),C_fix(0),t6))){
-t7=C_i_cdr(t3);
-t8=C_block_size(t5);
-t9=C_block_size(t8);
-t10=C_eqp(t6,t9);
-if(C_truep(t10)){
-/* files.scm: 459 values */
-C_values(5,0,((C_word*)t0)[2],((C_word*)t0)[3],t1,t7);}
-else{
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2736,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 455 ##sys#substring */
-t12=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t12+1)))(5,t12,t11,t5,t6,t8);}}
-else{
-/* files.scm: 459 values */
-C_values(5,0,((C_word*)t0)[2],((C_word*)t0)[3],t1,t3);}}
-else{
-/* files.scm: 459 values */
-C_values(5,0,((C_word*)t0)[2],((C_word*)t0)[3],t1,t3);}}
-
-/* k2734 in k2754 in k2747 in k2744 in k2741 in decompose-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2736,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-/* files.scm: 459 values */
-C_values(5,0,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* directory-null? in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2653(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2653,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2661,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_listp(t2))){
-t4=t3;
-f_2661(2,t4,t2);}
-else{
-/* files.scm: 430 split-directory */
-t4=lf[87];
-f_2644(t4,t3,lf[89],t2,C_SCHEME_TRUE);}}
-
-/* k2659 in directory-null? in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2661(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2661,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2663,a[2]=((C_word)li109),tmp=(C_word)a,a+=3,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_2663(t1));}
-
-/* loop in k2659 in directory-null? in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static C_word C_fcall f_2663(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-t2=C_i_nullp(t1);
-if(C_truep(t2)){
-return(t2);}
-else{
-t3=C_i_car(t1);
-if(C_truep((C_truep(C_i_equalp(t3,lf[90]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(t3,lf[91]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t4=C_i_cdr(t1);
-t6=t4;
-t1=t6;
-goto loop;}
-else{
-return(C_SCHEME_FALSE);}}}
-
-/* split-directory in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2644,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_i_check_string_2(t3,t2);
-/* files.scm: 424 string-split */
-t6=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t6))(5,t6,t1,t3,lf[88],t4);}
-
-/* normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2356(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+9)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2356r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2356r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2356r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(9);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2360,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_2360(2,t5,((C_word*)t0)[2]);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_2360(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2360(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2360,2,t0,t1);}
-t2=C_eqp(t1,lf[76]);
-t3=(C_truep(t2)?C_make_character(92):C_make_character(47));
-t4=C_i_check_string_2(((C_word*)t0)[8],lf[81]);
-t5=C_block_size(((C_word*)t0)[8]);
-t6=C_SCHEME_FALSE;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2374,a[2]=t1,a[3]=t11,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t9,a[11]=t3,a[12]=t7,a[13]=t5,a[14]=((C_word)li106),tmp=(C_word)a,a+=15,tmp));
-t13=((C_word*)t11)[1];
-f_2374(t13,((C_word*)t0)[2],C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}
-
-/* loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2374(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2374,NULL,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[13]))){
-t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2384,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t5,tmp=(C_word)a,a+=13,tmp);
-if(C_truep(C_fixnum_greaterp(t2,t3))){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2508,a[2]=t6,a[3]=t5,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 379 ##sys#substring */
-t8=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,((C_word*)t0)[4],t3,t2);}
-else{
-t7=t6;
-f_2384(t7,C_SCHEME_UNDEFINED);}}
-else{
-t6=C_i_string_ref(((C_word*)t0)[4],t2);
-if(C_truep((C_truep(C_eqp(t6,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t6,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2522,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_i_nullp(((C_word*)t5)[1]))){
-t8=C_eqp(t2,t3);
-if(C_truep(t8)){
-t9=C_set_block_item(((C_word*)t0)[12],0,C_SCHEME_TRUE);
-t10=t7;
-f_2522(t10,t9);}
-else{
-t9=t7;
-f_2522(t9,C_SCHEME_UNDEFINED);}}
-else{
-t8=t7;
-f_2522(t8,C_SCHEME_UNDEFINED);}}
-else{
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2574,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=t2,a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_i_nullp(((C_word*)t5)[1]))){
-t8=C_i_string_ref(((C_word*)t0)[4],t2);
-t9=C_eqp(t8,C_make_character(58));
-t10=t7;
-f_2574(t10,(C_truep(t9)?C_eqp(lf[76],((C_word*)t0)[2]):C_SCHEME_FALSE));}
-else{
-t8=t7;
-f_2574(t8,C_SCHEME_FALSE);}}}}
-
-/* k2572 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2574(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2574,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2578,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* files.scm: 412 ##sys#substring */
-t4=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,((C_word*)t0)[4],C_fix(0),t3);}
-else{
-t2=C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* files.scm: 414 loop */
-t3=((C_word*)((C_word*)t0)[6])[1];
-f_2374(t3,((C_word*)t0)[5],t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}}
-
-/* k2576 in k2572 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2578(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-/* files.scm: 413 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2374(t5,((C_word*)t0)[2],t3,t4,C_SCHEME_END_OF_LIST);}
-
-/* k2520 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2522(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2522,NULL,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[8],((C_word*)t0)[7]);
-if(C_truep(t2)){
-t3=C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
-t4=C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
-/* files.scm: 405 loop */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_2374(t5,((C_word*)t0)[5],t3,t4,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-t3=C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
-t4=C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2558,a[2]=t4,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-/* files.scm: 408 ##sys#substring */
-t6=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[2],((C_word*)t0)[7],((C_word*)t0)[8]);}}
-
-/* k2556 in k2520 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2558(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2558,2,t0,t1);}
-t2=f_2330(C_a_i(&a,3),t1,((C_word*)((C_word*)t0)[6])[1]);
-/* files.scm: 406 loop */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_2374(t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k2506 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2508,2,t0,t1);}
-t2=f_2330(C_a_i(&a,3),t1,((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
-t4=((C_word*)t0)[2];
-f_2384(t4,t3);}
-
-/* k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2384(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2384,NULL,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)((C_word*)t0)[12])[1]))){
-if(C_truep(((C_word*)((C_word*)t0)[11])[1])){
-t2=C_a_i_string(&a,1,((C_word*)t0)[10]);
-/* files.scm: 382 ##sys#string-append */
-t3=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[9],t2,lf[82]);}
-else{
-t2=C_a_i_string(&a,1,((C_word*)t0)[10]);
-/* files.scm: 383 ##sys#string-append */
-t3=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[9],lf[83],t2);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2410,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
-/* files.scm: 384 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}}
-
-/* k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2410,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2413,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* files.scm: 385 reverse */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2413(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2413,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2416,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-t3=C_i_car(t1);
-/* files.scm: 386 display */
-t4=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t2,t3,((C_word*)t0)[5]);}
-
-/* k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2416,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2419,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
-t3=C_i_cdr(((C_word*)t0)[3]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2464,a[2]=t5,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[2],a[6]=((C_word)li105),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_2464(t7,t2,t3);}
-
-/* loop742 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2464(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2464,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2472,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li104),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2482,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g749750 */
-t6=t3;
-f_2472(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2480 in loop742 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2482(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2464(t3,((C_word*)t0)[2],t2);}
-
-/* g749 in loop742 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2472(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2472,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2476,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 389 ##sys#write-char-0 */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[85]+1)))(4,*((C_word*)lf[85]+1),t3,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* k2474 in g749 in loop742 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 390 display */
-t2=((C_word*)t0)[5];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2419(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2419,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2422,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t3=C_eqp(((C_word*)t0)[3],((C_word*)t0)[2]);
-if(C_truep(t3)){
-/* files.scm: 392 ##sys#write-char-0 */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[85]+1)))(4,*((C_word*)lf[85]+1),t2,((C_word*)t0)[6],((C_word*)t0)[4]);}
-else{
-t4=t2;
-f_2422(2,t4,C_SCHEME_UNDEFINED);}}
-
-/* k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2422,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2425,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 393 get-output-string */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2425,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2428,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 394 ##sys#expand-home-path */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[84]+1)))(3,*((C_word*)lf[84]+1),t2,t1);}
-
-/* k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2428,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-if(C_truep(C_i_string_equal_p(((C_word*)t0)[6],((C_word*)t3)[1]))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2437,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2448,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=C_a_i_string(&a,1,((C_word*)t0)[2]);
-/* files.scm: 397 ##sys#string-append */
-t7=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,((C_word*)t3)[1]);}
-else{
-t5=t4;
-f_2437(t5,C_SCHEME_UNDEFINED);}}
-else{
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t3)[1]);}}
-
-/* k2446 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2448(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_2437(t3,t2);}
-
-/* k2435 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2437(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2437,NULL,2,t0,t1);}
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2444,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 399 ##sys#string-append */
-t3=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[3])[1]);}}
-
-/* k2442 in k2435 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2382 in loop in k2358 in normalize-pathname in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)((C_word*)t0)[3])[1]);}
-
-/* addpart in k2776 in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static C_word C_fcall f_2330(C_word *a,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_stack_check;
-if(C_truep(C_i_string_equal_p(lf[78],t1))){
-t3=t2;
-return(t3);}
-else{
-if(C_truep(C_i_string_equal_p(lf[79],t1))){
-t3=C_i_nullp(t2);
-return((C_truep(t3)?lf[80]:C_i_cdr(t2)));}
-else{
-return(C_a_i_cons(&a,2,t1,t2));}}}
-
-/* create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2255(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr2r,(void*)f_2255r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_2255r(t0,t1,t2);}}
-
-static void C_ccall f_2255r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(8);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2259,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* files.scm: 343 get-environment-variable */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[70]);}
-
-/* k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2259,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2262,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_2262(2,t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2312,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 344 get-environment-variable */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[69]);}}
-
-/* k2310 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2312(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2312,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[4];
-f_2262(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2318,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 345 get-environment-variable */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[68]);}}
-
-/* k2316 in k2310 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2318(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-f_2262(2,t2,t1);}
-else{
-/* files.scm: 346 file-exists? */
-t2=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],lf[67]);}}
-
-/* k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2262,2,t0,t1);}
-t2=C_i_pairp(((C_word*)t0)[6]);
-t3=(C_truep(t2)?C_i_car(((C_word*)t0)[6]):lf[65]);
-t4=C_i_check_string_2(t3,lf[64]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2273,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t6,a[8]=((C_word)li101),tmp=(C_word)a,a+=9,tmp));
-t8=((C_word*)t6)[1];
-f_2273(t8,((C_word*)t0)[2]);}
-
-/* loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2273(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2273,NULL,2,t0,t1);}
-t2=C_fudge(C_fix(16));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2280,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2299,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2303,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 351 number->string */
-C_number_to_string(4,0,t5,t2,C_fix(16));}
-
-/* k2301 in loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 351 ##sys#string-append */
-t2=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[66],t1);}
-
-/* k2297 in loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2299(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 351 make-pathname */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k2278 in loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2280(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2280,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2286,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 352 file-exists? */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}
-
-/* k2284 in k2278 in loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2286,2,t0,t1);}
-if(C_truep(t1)){
-/* files.scm: 353 loop */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_2273(t2,((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2294,a[2]=((C_word*)t0)[3],a[3]=((C_word)li100),tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 354 call-with-output-file */
-t3=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t3))(4,t3,((C_word*)t0)[4],((C_word*)t0)[3],t2);}}
-
-/* a2293 in k2284 in k2278 in loop in k2260 in k2257 in create-temporary-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2294(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2294,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* pathname-replace-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2237(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2237,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2243,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li97),tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2249,a[2]=t3,a[3]=((C_word)li98),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t4,t5);}
-
-/* a2248 in pathname-replace-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2249(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2249,5,t0,t1,t2,t3,t4);}
-/* files.scm: 335 make-pathname */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[40]+1)))(5,*((C_word*)lf[40]+1),t1,t2,t3,((C_word*)t0)[2]);}
-
-/* a2242 in pathname-replace-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2243,2,t0,t1);}
-/* files.scm: 334 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-replace-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2219(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2219,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2225,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li94),tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2231,a[2]=t3,a[3]=((C_word)li95),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t4,t5);}
-
-/* a2230 in pathname-replace-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2231(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2231,5,t0,t1,t2,t3,t4);}
-/* files.scm: 330 make-pathname */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[40]+1)))(5,*((C_word*)lf[40]+1),t1,t2,((C_word*)t0)[2],t4);}
-
-/* a2224 in pathname-replace-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2225,2,t0,t1);}
-/* files.scm: 329 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-replace-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2201,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2207,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li91),tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2213,a[2]=t3,a[3]=((C_word)li92),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t4,t5);}
-
-/* a2212 in pathname-replace-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2213(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2213,5,t0,t1,t2,t3,t4);}
-/* files.scm: 325 make-pathname */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[40]+1)))(5,*((C_word*)lf[40]+1),t1,((C_word*)t0)[2],t3,t4);}
-
-/* a2206 in pathname-replace-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2207,2,t0,t1);}
-/* files.scm: 324 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-strip-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2183(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2183,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2189,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li88),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2195,a[2]=((C_word)li89),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a2194 in pathname-strip-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2195(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2195,5,t0,t1,t2,t3,t4);}
-/* files.scm: 320 make-pathname */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[40]+1)))(4,*((C_word*)lf[40]+1),t1,t2,t3);}
-
-/* a2188 in pathname-strip-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2189(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2189,2,t0,t1);}
-/* files.scm: 319 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-strip-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2165(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2165,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2171,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li85),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2177,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a2176 in pathname-strip-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2177,5,t0,t1,t2,t3,t4);}
-/* files.scm: 315 make-pathname */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[40]+1)))(5,*((C_word*)lf[40]+1),t1,C_SCHEME_FALSE,t3,t4);}
-
-/* a2170 in pathname-strip-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2171,2,t0,t1);}
-/* files.scm: 314 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2150(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2150,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2156,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li82),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2162,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a2161 in pathname-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2162,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* a2155 in pathname-extension in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2156(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2156,2,t0,t1);}
-/* files.scm: 309 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2135(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2135,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2141,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2147,a[2]=((C_word)li80),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a2146 in pathname-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2147(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2147,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-
-/* a2140 in pathname-file in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2141(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2141,2,t0,t1);}
-/* files.scm: 304 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* pathname-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2120(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2120,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2126,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li76),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2132,a[2]=((C_word)li77),tmp=(C_word)a,a+=3,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t3,t4);}
-
-/* a2131 in pathname-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2132(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2132,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}
-
-/* a2125 in pathname-directory in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2126(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2126,2,t0,t1);}
-/* files.scm: 299 decompose-pathname */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2044(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2044,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[53]);
-t4=C_block_size(t2);
-t5=C_eqp(C_fix(0),t4);
-if(C_truep(t5)){
-/* files.scm: 278 values */
-C_values(5,0,t1,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-else{
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2060,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 279 string-match */
-t7=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t7))(4,t7,t6,((C_word*)t0)[2],t2);}}
-
-/* k2058 in decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2060(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2060,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2070,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(t1);
-/* files.scm: 281 strip-pds */
-f_2030(t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2089,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 282 string-match */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}}
-
-/* k2087 in k2058 in decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2089(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2089,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2099,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=C_i_cadr(t1);
-/* files.scm: 284 strip-pds */
-f_2030(t2,t3);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2114,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 285 strip-pds */
-f_2030(t2,((C_word*)t0)[2]);}}
-
-/* k2112 in k2087 in k2058 in decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2114(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 285 values */
-C_values(5,0,((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-
-/* k2097 in k2087 in k2058 in decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2099(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_caddr(((C_word*)t0)[3]);
-/* files.scm: 284 values */
-C_values(5,0,((C_word*)t0)[2],t1,t2,C_SCHEME_FALSE);}
-
-/* k2068 in k2058 in decompose-pathname in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_ccall f_2070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_caddr(((C_word*)t0)[3]);
-t3=C_i_cddddr(((C_word*)t0)[3]);
-t4=C_i_car(t3);
-/* files.scm: 281 values */
-C_values(5,0,((C_word*)t0)[2],t1,t2,t4);}
-
-/* strip-pds in k2027 in k2024 in k1635 in k862 in k859 in k856 */
-static void C_fcall f_2030(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2030,NULL,2,t1,t2);}
-if(C_truep(t2)){
-t3=t2;
-if(C_truep((C_truep(C_i_equalp(t3,lf[51]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(t3,lf[52]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-else{
-/* files.scm: 274 chop-pds */
-f_1652(t1,t2,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1947(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+17)){
-C_save_and_reclaim((void*)tr4r,(void*)f_1947r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_1947r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_1947r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(17);
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1949,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((C_word*)t0)[5],a[8]=((C_word)li70),tmp=(C_word)a,a+=9,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1971,a[2]=t5,a[3]=((C_word)li71),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1976,a[2]=t6,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-/* def-ext494511 */
-t8=t7;
-f_1976(t8,t1);}
-else{
-t8=C_i_car(t4);
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-/* def-pds495509 */
-t10=t6;
-f_1971(t10,t1,t8);}
-else{
-t10=C_i_car(t9);
-t11=C_i_cdr(t9);
-if(C_truep(C_i_nullp(t11))){
-/* body492500 */
-t12=t5;
-f_1949(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-ext494 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1976(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1976,NULL,2,t0,t1);}
-/* def-pds495509 */
-t2=((C_word*)t0)[2];
-f_1971(t2,t1,C_SCHEME_FALSE);}
-
-/* def-pds495 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1971(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1971,NULL,3,t0,t1,t2);}
-/* body492500 */
-t3=((C_word*)t0)[2];
-f_1949(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body492 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1949(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1949,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1957,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* files.scm: 257 canonicalize-dirs */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_1766(t5,t4,((C_word*)t0)[2],t3);}
-
-/* k1955 in body492 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1957,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1960,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1963,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-/* files.scm: 258 absolute-pathname? */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t1);}
-
-/* k1961 in k1955 in body492 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[9];
-/* files.scm: 255 _make-pathname */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_1797(t3,((C_word*)t0)[7],lf[41],t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}
-else{
-t2=((C_word*)t0)[4];
-if(C_truep(t2)){
-/* files.scm: 260 ##sys#string-append */
-t3=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[9]);}
-else{
-/* files.scm: 260 ##sys#string-append */
-t3=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[9]);}}}
-
-/* k1958 in k1955 in body492 in make-absolute-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 255 _make-pathname */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_1797(t2,((C_word*)t0)[5],lf[41],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* make-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1883(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+15)){
-C_save_and_reclaim((void*)tr4r,(void*)f_1883r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_1883r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_1883r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(15);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1885,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word)li66),tmp=(C_word)a,a+=7,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1894,a[2]=t5,a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1899,a[2]=t6,a[3]=((C_word)li68),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-/* def-ext462473 */
-t8=t7;
-f_1899(t8,t1);}
-else{
-t8=C_i_car(t4);
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-/* def-pds463471 */
-t10=t6;
-f_1894(t10,t1,t8);}
-else{
-t10=C_i_car(t9);
-t11=C_i_cdr(t9);
-if(C_truep(C_i_nullp(t11))){
-/* body460468 */
-t12=t5;
-f_1885(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-ext462 in make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1899(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1899,NULL,2,t0,t1);}
-/* def-pds463471 */
-t2=((C_word*)t0)[2];
-f_1894(t2,t1,C_SCHEME_FALSE);}
-
-/* def-pds463 in make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1894(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1894,NULL,3,t0,t1,t2);}
-/* body460468 */
-t3=((C_word*)t0)[2];
-f_1885(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body460 in make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1885(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1885,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1893,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 251 canonicalize-dirs */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_1766(t5,t4,((C_word*)t0)[2],t3);}
-
-/* k1891 in body460 in make-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 251 _make-pathname */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_1797(t2,((C_word*)t0)[5],lf[40],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* _make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1797(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1797,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(C_truep(t5)?t5:lf[45]);
-t8=(C_truep(t4)?t4:lf[46]);
-t9=(C_truep(t6)?C_block_size(t6):C_fix(1));
-t10=C_i_check_string_2(t3,t2);
-t11=C_i_check_string_2(t8,t2);
-t12=C_i_check_string_2(t7,t2);
-t13=(C_truep(t6)?C_i_check_string_2(t6,t2):C_SCHEME_UNDEFINED);
-t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1826,a[2]=t7,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1850,a[2]=t9,a[3]=t14,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
-t16=C_block_size(t8);
-if(C_truep(C_fixnum_greater_or_equal_p(t16,t9))){
-if(C_truep(t6)){
-t17=C_substring_compare(t6,t8,C_fix(0),C_fix(0),t9);
-t18=t15;
-f_1850(t18,t17);}
-else{
-t17=C_subchar(t8,C_fix(0));
-t18=t15;
-f_1850(t18,C_i_memq(t17,lf[49]));}}
-else{
-t17=t15;
-f_1850(t17,C_SCHEME_FALSE);}}
-
-/* k1848 in _make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1850(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_block_size(((C_word*)t0)[4]);
-/* files.scm: 241 ##sys#substring */
-t3=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[3];
-f_1826(2,t2,((C_word*)t0)[4]);}}
-
-/* k1824 in _make-pathname in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1826(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1826,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1833,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=C_block_size(((C_word*)t0)[2]);
-if(C_truep(C_fixnum_greaterp(t3,C_fix(0)))){
-t4=C_eqp(C_subchar(((C_word*)t0)[2],C_fix(0)),C_make_character(46));
-t5=t2;
-f_1833(t5,C_i_not(t4));}
-else{
-t4=t2;
-f_1833(t4,C_SCHEME_FALSE);}}
-
-/* k1831 in k1824 in _make-pathname in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1833(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* files.scm: 235 string-append */
-t2=((C_word*)t0)[6];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[47],((C_word*)t0)[2]);}
-else{
-/* files.scm: 235 string-append */
-t2=((C_word*)t0)[6];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[48],((C_word*)t0)[2]);}}
-
-/* canonicalize-dirs in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1766(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1766,NULL,4,t0,t1,t2,t3);}
-t4=C_i_not(t2);
-t5=(C_truep(t4)?t4:C_i_nullp(t2));
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[44]);}
-else{
-if(C_truep(C_i_stringp(t2))){
-t6=C_a_i_list(&a,1,t2);
-/* files.scm: 224 conc-dirs */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_1705(t7,t1,t6,t3);}
-else{
-/* files.scm: 225 conc-dirs */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1705(t6,t1,t2,t3);}}}
-
-/* conc-dirs in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1705(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1705,NULL,4,t0,t1,t2,t3);}
-t4=C_i_check_list_2(t2,lf[40]);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1714,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t6,a[6]=((C_word)li62),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_1714(t8,t1,t2);}
-
-/* loop in conc-dirs in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1714(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1714,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[43]);}
-else{
-t3=C_i_car(t2);
-t4=C_i_string_length(t3);
-t5=C_eqp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=C_i_cdr(t2);
-/* files.scm: 216 loop */
-t10=t1;
-t11=t6;
-t1=t10;
-t2=t11;
-goto loop;}
-else{
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1744,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t7=C_i_car(t2);
-/* files.scm: 218 chop-pds */
-f_1652(t6,t7,((C_word*)t0)[4]);}}}
-
-/* k1742 in loop in conc-dirs in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1744(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1744,2,t0,t1);}
-t2=((C_word*)t0)[7];
-t3=(C_truep(t2)?t2:((C_word*)t0)[6]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1752,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t5=C_i_cdr(((C_word*)t0)[3]);
-/* files.scm: 220 loop */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1714(t6,t4,t5);}
-
-/* k1750 in k1742 in loop in conc-dirs in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1752(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 217 string-append */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* chop-pds in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1652(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1652,NULL,3,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_block_size(t2);
-t5=(C_truep(t3)?C_block_size(t3):C_fix(1));
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1668,a[2]=t2,a[3]=t1,a[4]=t5,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(1)))){
-if(C_truep(t3)){
-t7=C_fixnum_difference(t4,t5);
-t8=C_substring_compare(t2,t3,t7,C_fix(0),t5);
-t9=t6;
-f_1668(t9,t8);}
-else{
-t7=C_fixnum_difference(t4,t5);
-t8=C_subchar(t2,t7);
-t9=t6;
-f_1668(t9,C_i_memq(t8,lf[39]));}}
-else{
-t7=t6;
-f_1668(t7,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k1666 in chop-pds in k1635 in k862 in k859 in k856 */
-static void C_fcall f_1668(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[4]);
-/* files.scm: 200 ##sys#substring */
-t3=*((C_word*)lf[38]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}
-
-/* absolute-pathname? in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1639(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1639,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[36]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1650,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 188 absolute-pathname-root */
-((C_proc3)C_retrieve_proc(lf[32]))(3,lf[32],t4,t2);}
-
-/* k1648 in absolute-pathname? in k1635 in k862 in k859 in k856 */
-static void C_ccall f_1650(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_pairp(t1));}
-
-/* file-move in k862 in k859 in k856 */
-static void C_ccall f_1225(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr4r,(void*)f_1225r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_1225r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_1225r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(13);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1227,a[2]=t3,a[3]=t2,a[4]=((C_word)li56),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1580,a[2]=t5,a[3]=((C_word)li57),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1585,a[2]=t6,a[3]=((C_word)li58),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-/* def-clobber194344 */
-t8=t7;
-f_1585(t8,t1);}
-else{
-t8=C_i_car(t4);
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-/* def-blocksize195342 */
-t10=t6;
-f_1580(t10,t1,t8);}
-else{
-t10=C_i_car(t9);
-t11=C_i_cdr(t9);
-if(C_truep(C_i_nullp(t11))){
-/* body192200 */
-t12=t5;
-f_1227(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-clobber194 in file-move in k862 in k859 in k856 */
-static void C_fcall f_1585(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1585,NULL,2,t0,t1);}
-/* def-blocksize195342 */
-t2=((C_word*)t0)[2];
-f_1580(t2,t1,C_SCHEME_FALSE);}
-
-/* def-blocksize195 in file-move in k862 in k859 in k856 */
-static void C_fcall f_1580(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1580,NULL,3,t0,t1,t2);}
-/* body192200 */
-t3=((C_word*)t0)[2];
-f_1227(t3,t1,t2,C_fix(1024));}
-
-/* body192 in file-move in k862 in k859 in k856 */
-static void C_fcall f_1227(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1227,NULL,4,t0,t1,t2,t3);}
-t4=C_i_check_string_2(((C_word*)t0)[3],lf[24]);
-t5=C_i_check_string_2(((C_word*)t0)[2],lf[24]);
-t6=C_i_check_number_2(t3,lf[24]);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1240,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_integerp(t3))){
-t8=t3;
-t9=t7;
-f_1240(t9,C_fixnum_greaterp(t8,C_fix(0)));}
-else{
-t8=t7;
-f_1240(t8,C_SCHEME_FALSE);}}
-
-/* k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_fcall f_1240(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1240,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1243,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_1243(2,t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1569,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1573,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 124 number->string */
-C_number_to_string(3,0,t4,((C_word*)t0)[5]);}}
-
-/* k1571 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1573(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 122 string-append */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[31],t1);}
-
-/* k1567 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 122 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1243,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1246,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 125 file-exists? */
-t3=*((C_word*)lf[2]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-
-/* k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1246,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1249,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_1249(2,t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1562,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 126 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[30],((C_word*)t0)[6]);}}
-
-/* k1560 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 126 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1249(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1249,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1252,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1545,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 127 file-exists? */
-t4=*((C_word*)lf[2]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-
-/* k1543 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1545,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-f_1252(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1555,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 129 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[29],((C_word*)t0)[2]);}}
-else{
-t2=((C_word*)t0)[3];
-f_1252(2,t2,C_SCHEME_FALSE);}}
-
-/* k1553 in k1543 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1555(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 129 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1252,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1255,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1489,a[2]=((C_word*)t0)[5],a[3]=((C_word)li55),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t4=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1489(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1489,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1495,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li50),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1520,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li54),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1519 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1520,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1526,a[2]=((C_word*)t0)[3],a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1532,a[2]=((C_word*)t0)[2],a[3]=((C_word)li53),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1531 in a1519 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1532(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1532r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1532r(t0,t1,t2);}}
-
-static void C_ccall f_1532r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1538,a[2]=t2,a[3]=((C_word)li52),tmp=(C_word)a,a+=4,tmp);
-/* k231236 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1537 in a1531 in a1519 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1538,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1525 in a1519 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1526,2,t0,t1);}
-/* files.scm: 132 open-input-file */
-t2=*((C_word*)lf[20]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a1494 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1495(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1495,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1501,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li49),tmp=(C_word)a,a+=5,tmp);
-/* k231236 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1500 in a1494 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1501,2,t0,t1);}
-if(C_truep(C_i_structurep(((C_word*)t0)[3],lf[9]))){
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1512,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 134 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[28],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f2976,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 134 string-append */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[28],((C_word*)t0)[2]);}}
-
-/* f2976 in a1500 in a1494 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f2976(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 134 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1510 in a1500 in a1494 in a1488 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 134 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1255,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1258,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* g234235 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1258,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1261,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1434,a[2]=((C_word*)t0)[2],a[3]=((C_word)li48),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t4=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1434,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1440,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li43),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1465,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li47),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1464 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1465(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1465,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1471,a[2]=((C_word*)t0)[3],a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1477,a[2]=((C_word*)t0)[2],a[3]=((C_word)li46),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1476 in a1464 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1477(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1477r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1477r(t0,t1,t2);}}
-
-static void C_ccall f_1477r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1483,a[2]=t2,a[3]=((C_word)li45),tmp=(C_word)a,a+=4,tmp);
-/* k257262 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1482 in a1476 in a1464 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1483(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1483,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1470 in a1464 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1471(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1471,2,t0,t1);}
-/* files.scm: 137 open-output-file */
-t2=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a1439 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1440(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1440,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1446,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp);
-/* k257262 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1445 in a1439 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1446(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1446,2,t0,t1);}
-if(C_truep(C_i_structurep(((C_word*)t0)[3],lf[9]))){
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1457,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 139 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[27],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f2972,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 139 string-append */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[27],((C_word*)t0)[2]);}}
-
-/* f2972 in a1445 in a1439 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f2972(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 139 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1455 in a1445 in a1439 in a1433 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 139 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1261(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1261,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1264,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* g260261 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1264(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1264,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1267,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 142 make-string */
-t3=*((C_word*)lf[16]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1267(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1267,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1274,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* files.scm: 143 read-string! */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[8]+1)))(5,*((C_word*)lf[8]+1),t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}
-
-/* k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1274,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li41),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_1276(t5,((C_word*)t0)[2],t1,C_fix(0));}
-
-/* loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_fcall f_1276(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1276,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=C_eqp(C_fix(0),t4);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1286,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 147 close-input-port */
-t7=*((C_word*)lf[7]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[5]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1353,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1369,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=((C_word)li40),tmp=(C_word)a,a+=8,tmp);
-/* call-with-current-continuation */
-t8=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}}
-
-/* a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1369(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1369,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1375,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li35),tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1410,a[2]=t2,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word)li39),tmp=(C_word)a,a+=7,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1409 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1410,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1416,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li36),tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1422,a[2]=((C_word*)t0)[2],a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1421 in a1409 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1422(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1422r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1422r(t0,t1,t2);}}
-
-static void C_ccall f_1422r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1428,a[2]=t2,a[3]=((C_word)li37),tmp=(C_word)a,a+=4,tmp);
-/* k314319 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1427 in a1421 in a1409 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1428,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1415 in a1409 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1416,2,t0,t1);}
-/* files.scm: 156 write-string */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[13]+1)))(5,*((C_word*)lf[13]+1),t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1375(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1375,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1381,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word)li34),tmp=(C_word)a,a+=7,tmp);
-/* k314319 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1380 in a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1381,2,t0,t1);}
-t2=C_i_structurep(((C_word*)t0)[5],lf[9]);
-t3=(C_truep(t2)?C_slot(((C_word*)t0)[5],C_fix(1)):C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1388,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 158 close-input-port */
-t5=*((C_word*)lf[7]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}
-
-/* k1386 in a1380 in a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1388(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1388,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1391,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 159 close-output-port */
-t3=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1389 in k1386 in a1380 in a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1391(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1391,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1398,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1402,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 162 number->string */
-C_number_to_string(3,0,t3,((C_word*)t0)[2]);}
-
-/* k1400 in k1389 in k1386 in a1380 in a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1402(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 160 string-append */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[26],t1);}
-
-/* k1396 in k1389 in k1386 in a1380 in a1374 in a1368 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 160 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1351 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1353,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1356,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* g317318 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k1354 in k1351 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1356(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1356,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1363,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 163 read-string! */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[8]+1)))(5,*((C_word*)lf[8]+1),t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k1361 in k1354 in k1351 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],((C_word*)t0)[4]);
-/* files.scm: 163 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1276(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1286(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1286,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1289,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 148 close-output-port */
-t3=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1289,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1292,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1297,a[2]=((C_word*)t0)[2],a[3]=((C_word)li33),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t4=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1297(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1297,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1303,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li28),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1328,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li32),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1327 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1328(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1328,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1334,a[2]=((C_word*)t0)[3],a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1340,a[2]=((C_word*)t0)[2],a[3]=((C_word)li31),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1339 in a1327 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1340(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1340r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1340r(t0,t1,t2);}}
-
-static void C_ccall f_1340r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1346,a[2]=t2,a[3]=((C_word)li30),tmp=(C_word)a,a+=4,tmp);
-/* k286291 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1345 in a1339 in a1327 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1346,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1333 in a1327 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1334,2,t0,t1);}
-/* files.scm: 149 delete-file */
-t2=*((C_word*)lf[3]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a1302 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1303(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1303,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1309,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li27),tmp=(C_word)a,a+=5,tmp);
-/* k286291 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1308 in a1302 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1309(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1309,2,t0,t1);}
-if(C_truep(C_i_structurep(((C_word*)t0)[3],lf[9]))){
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1320,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 151 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[25],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f2966,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 151 string-append */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[25],((C_word*)t0)[2]);}}
-
-/* f2966 in a1308 in a1302 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f2966(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 151 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1318 in a1308 in a1302 in a1296 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1320(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 151 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1290 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1292(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1292,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1295,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* g289290 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k1293 in k1290 in k1287 in k1284 in loop in k1272 in k1265 in k1262 in k1259 in k1256 in k1253 in k1250 in k1247 in k1244 in k1241 in k1238 in body192 in file-move in k862 in k859 in k856 */
-static void C_ccall f_1295(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* file-copy in k862 in k859 in k856 */
-static void C_ccall f_878(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr4r,(void*)f_878r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_878r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_878r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(13);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_880,a[2]=t3,a[3]=t2,a[4]=((C_word)li23),tmp=(C_word)a,a+=5,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1172,a[2]=t5,a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1177,a[2]=t6,a[3]=((C_word)li25),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-/* def-clobber47171 */
-t8=t7;
-f_1177(t8,t1);}
-else{
-t8=C_i_car(t4);
-t9=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t9))){
-/* def-blocksize48169 */
-t10=t6;
-f_1172(t10,t1,t8);}
-else{
-t10=C_i_car(t9);
-t11=C_i_cdr(t9);
-if(C_truep(C_i_nullp(t11))){
-/* body4553 */
-t12=t5;
-f_880(t12,t1,t8,t10);}
-else{
-/* ##sys#error */
-t12=*((C_word*)lf[10]+1);
-((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-
-/* def-clobber47 in file-copy in k862 in k859 in k856 */
-static void C_fcall f_1177(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1177,NULL,2,t0,t1);}
-/* def-blocksize48169 */
-t2=((C_word*)t0)[2];
-f_1172(t2,t1,C_SCHEME_FALSE);}
-
-/* def-blocksize48 in file-copy in k862 in k859 in k856 */
-static void C_fcall f_1172(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1172,NULL,3,t0,t1,t2);}
-/* body4553 */
-t3=((C_word*)t0)[2];
-f_880(t3,t1,t2,C_fix(1024));}
-
-/* body45 in file-copy in k862 in k859 in k856 */
-static void C_fcall f_880(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_880,NULL,4,t0,t1,t2,t3);}
-t4=C_i_check_string_2(((C_word*)t0)[3],lf[5]);
-t5=C_i_check_string_2(((C_word*)t0)[2],lf[5]);
-t6=C_i_check_number_2(t3,lf[5]);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_893,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_integerp(t3))){
-t8=t3;
-t9=t7;
-f_893(t9,C_fixnum_greaterp(t8,C_fix(0)));}
-else{
-t8=t7;
-f_893(t8,C_SCHEME_FALSE);}}
-
-/* k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_fcall f_893(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_893,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_896(2,t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1161,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1165,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 81 number->string */
-C_number_to_string(3,0,t4,((C_word*)t0)[6]);}}
-
-/* k1163 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1165(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 79 string-append */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[23],t1);}
-
-/* k1159 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 79 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_899,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 82 file-exists? */
-t3=*((C_word*)lf[2]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_899,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_902,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_902(2,t3,t1);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1154,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 83 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[22],((C_word*)t0)[3]);}}
-
-/* k1152 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1154(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 83 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_902(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_902,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_905,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1137,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 84 file-exists? */
-t4=*((C_word*)lf[2]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-
-/* k1135 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1137,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-f_905(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1147,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 86 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[21],((C_word*)t0)[2]);}}
-else{
-t2=((C_word*)t0)[3];
-f_905(2,t2,C_SCHEME_FALSE);}}
-
-/* k1145 in k1135 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1147(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 86 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_905(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_905,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_908,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1081,a[2]=((C_word*)t0)[2],a[3]=((C_word)li22),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t4=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1081(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1081,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1087,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li17),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1112,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li21),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1111 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1112(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1112,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1118,a[2]=((C_word*)t0)[3],a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1124,a[2]=((C_word*)t0)[2],a[3]=((C_word)li20),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1123 in a1111 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1124(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1124r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1124r(t0,t1,t2);}}
-
-static void C_ccall f_1124r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1130,a[2]=t2,a[3]=((C_word)li19),tmp=(C_word)a,a+=4,tmp);
-/* k8489 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1129 in a1123 in a1111 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1130,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1117 in a1111 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1118(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1118,2,t0,t1);}
-/* files.scm: 89 open-input-file */
-t2=*((C_word*)lf[20]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a1086 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1087(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1087,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1093,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li16),tmp=(C_word)a,a+=5,tmp);
-/* k8489 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1092 in a1086 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1093,2,t0,t1);}
-if(C_truep(C_i_structurep(((C_word*)t0)[3],lf[9]))){
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1104,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 91 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[19],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f2962,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 91 string-append */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[19],((C_word*)t0)[2]);}}
-
-/* f2962 in a1092 in a1086 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f2962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 91 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1102 in a1092 in a1086 in a1080 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 91 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_908(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_908,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_911,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g8788 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_911,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_914,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1026,a[2]=((C_word*)t0)[2],a[3]=((C_word)li15),tmp=(C_word)a,a+=4,tmp);
-/* call-with-current-continuation */
-t4=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1026(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1026,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1032,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li10),tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1057,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li14),tmp=(C_word)a,a+=5,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1056 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1057(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1057,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1063,a[2]=((C_word*)t0)[3],a[3]=((C_word)li11),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1069,a[2]=((C_word*)t0)[2],a[3]=((C_word)li13),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1068 in a1056 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1069(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1069r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1069r(t0,t1,t2);}}
-
-static void C_ccall f_1069r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1075,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp);
-/* k110115 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1074 in a1068 in a1056 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1075(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1075,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1062 in a1056 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1063,2,t0,t1);}
-/* files.scm: 94 open-output-file */
-t2=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* a1031 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1032(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1032,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1038,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li9),tmp=(C_word)a,a+=5,tmp);
-/* k110115 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1037 in a1031 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1038,2,t0,t1);}
-if(C_truep(C_i_structurep(((C_word*)t0)[3],lf[9]))){
-t2=C_slot(((C_word*)t0)[3],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1049,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 96 string-append */
-t4=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[17],((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f2958,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 96 string-append */
-t3=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[17],((C_word*)t0)[2]);}}
-
-/* f2958 in a1037 in a1031 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f2958(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 96 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k1047 in a1037 in a1031 in a1025 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 96 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_914(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_914,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_917,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g113114 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_917(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_917,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_920,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 99 make-string */
-t3=*((C_word*)lf[16]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_920(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_920,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_927,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* files.scm: 100 read-string! */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[8]+1)))(5,*((C_word*)lf[8]+1),t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}
-
-/* k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_927,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_929,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li8),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_929(t5,((C_word*)t0)[2],t1,C_fix(0));}
-
-/* loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_fcall f_929(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_929,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=C_eqp(C_fix(0),t4);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_939,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 104 close-input-port */
-t7=*((C_word*)lf[7]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[5]);}
-else{
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_945,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_961,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=((C_word)li7),tmp=(C_word)a,a+=8,tmp);
-/* call-with-current-continuation */
-t8=*((C_word*)lf[15]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}}
-
-/* a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_961(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_961,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_967,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li2),tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1002,a[2]=t2,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word)li6),tmp=(C_word)a,a+=7,tmp);
-/* with-exception-handler */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[14]+1)))(4,*((C_word*)lf[14]+1),t1,t3,t4);}
-
-/* a1001 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1002,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1008,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li3),tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1014,a[2]=((C_word*)t0)[2],a[3]=((C_word)li5),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t2,t3);}
-
-/* a1013 in a1001 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1014(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_1014r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_1014r(t0,t1,t2);}}
-
-static void C_ccall f_1014r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1020,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp);
-/* k141146 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a1019 in a1013 in a1001 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1020(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1020,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* a1007 in a1001 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_1008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1008,2,t0,t1);}
-/* files.scm: 108 write-string */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[13]+1)))(5,*((C_word*)lf[13]+1),t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_967(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_967,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_973,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word)li1),tmp=(C_word)a,a+=7,tmp);
-/* k141146 */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a972 in a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_973(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_973,2,t0,t1);}
-t2=C_i_structurep(((C_word*)t0)[5],lf[9]);
-t3=(C_truep(t2)?C_slot(((C_word*)t0)[5],C_fix(1)):C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_980,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 110 close-input-port */
-t5=*((C_word*)lf[7]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}
-
-/* k978 in a972 in a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_980,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_983,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 111 close-output-port */
-t3=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k981 in k978 in a972 in a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_983,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_990,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_994,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* files.scm: 114 number->string */
-C_number_to_string(3,0,t3,((C_word*)t0)[2]);}
-
-/* k992 in k981 in k978 in a972 in a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 112 string-append */
-t2=*((C_word*)lf[11]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[12],t1);}
-
-/* k988 in k981 in k978 in a972 in a966 in a960 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* files.scm: 112 ##sys#error */
-t2=*((C_word*)lf[10]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k943 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_945,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_948,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* g144145 */
-t3=t1;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k946 in k943 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_948,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_955,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* files.scm: 115 read-string! */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[8]+1)))(5,*((C_word*)lf[8]+1),t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k953 in k946 in k943 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_955(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],((C_word*)t0)[4]);
-/* files.scm: 115 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_929(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k937 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_939,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_942,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* files.scm: 105 close-output-port */
-t3=*((C_word*)lf[6]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k940 in k937 in loop in k925 in k918 in k915 in k912 in k909 in k906 in k903 in k900 in k897 in k894 in k891 in body45 in file-copy in k862 in k859 in k856 */
-static void C_ccall f_942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* delete-file* in k862 in k859 in k856 */
-static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_866,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_873,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* files.scm: 71 file-exists? */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k871 in delete-file* in k862 in k859 in k856 */
-static void C_ccall f_873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* files.scm: 71 delete-file */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[241] = {
-{"toplevel:files_scm",(void*)C_files_toplevel},
-{"f_858:files_scm",(void*)f_858},
-{"f_861:files_scm",(void*)f_861},
-{"f_864:files_scm",(void*)f_864},
-{"f_2808:files_scm",(void*)f_2808},
-{"f_2819:files_scm",(void*)f_2819},
-{"f_2816:files_scm",(void*)f_2816},
-{"f_2810:files_scm",(void*)f_2810},
-{"f_2781:files_scm",(void*)f_2781},
-{"f_2798:files_scm",(void*)f_2798},
-{"f_2789:files_scm",(void*)f_2789},
-{"f_2783:files_scm",(void*)f_2783},
-{"f_1637:files_scm",(void*)f_1637},
-{"f_2026:files_scm",(void*)f_2026},
-{"f_2029:files_scm",(void*)f_2029},
-{"f_2778:files_scm",(void*)f_2778},
-{"f_2695:files_scm",(void*)f_2695},
-{"f_2743:files_scm",(void*)f_2743},
-{"f_2746:files_scm",(void*)f_2746},
-{"f_2749:files_scm",(void*)f_2749},
-{"f_2756:files_scm",(void*)f_2756},
-{"f_2736:files_scm",(void*)f_2736},
-{"f_2653:files_scm",(void*)f_2653},
-{"f_2661:files_scm",(void*)f_2661},
-{"f_2663:files_scm",(void*)f_2663},
-{"f_2644:files_scm",(void*)f_2644},
-{"f_2356:files_scm",(void*)f_2356},
-{"f_2360:files_scm",(void*)f_2360},
-{"f_2374:files_scm",(void*)f_2374},
-{"f_2574:files_scm",(void*)f_2574},
-{"f_2578:files_scm",(void*)f_2578},
-{"f_2522:files_scm",(void*)f_2522},
-{"f_2558:files_scm",(void*)f_2558},
-{"f_2508:files_scm",(void*)f_2508},
-{"f_2384:files_scm",(void*)f_2384},
-{"f_2410:files_scm",(void*)f_2410},
-{"f_2413:files_scm",(void*)f_2413},
-{"f_2416:files_scm",(void*)f_2416},
-{"f_2464:files_scm",(void*)f_2464},
-{"f_2482:files_scm",(void*)f_2482},
-{"f_2472:files_scm",(void*)f_2472},
-{"f_2476:files_scm",(void*)f_2476},
-{"f_2419:files_scm",(void*)f_2419},
-{"f_2422:files_scm",(void*)f_2422},
-{"f_2425:files_scm",(void*)f_2425},
-{"f_2428:files_scm",(void*)f_2428},
-{"f_2448:files_scm",(void*)f_2448},
-{"f_2437:files_scm",(void*)f_2437},
-{"f_2444:files_scm",(void*)f_2444},
-{"f_2330:files_scm",(void*)f_2330},
-{"f_2255:files_scm",(void*)f_2255},
-{"f_2259:files_scm",(void*)f_2259},
-{"f_2312:files_scm",(void*)f_2312},
-{"f_2318:files_scm",(void*)f_2318},
-{"f_2262:files_scm",(void*)f_2262},
-{"f_2273:files_scm",(void*)f_2273},
-{"f_2303:files_scm",(void*)f_2303},
-{"f_2299:files_scm",(void*)f_2299},
-{"f_2280:files_scm",(void*)f_2280},
-{"f_2286:files_scm",(void*)f_2286},
-{"f_2294:files_scm",(void*)f_2294},
-{"f_2237:files_scm",(void*)f_2237},
-{"f_2249:files_scm",(void*)f_2249},
-{"f_2243:files_scm",(void*)f_2243},
-{"f_2219:files_scm",(void*)f_2219},
-{"f_2231:files_scm",(void*)f_2231},
-{"f_2225:files_scm",(void*)f_2225},
-{"f_2201:files_scm",(void*)f_2201},
-{"f_2213:files_scm",(void*)f_2213},
-{"f_2207:files_scm",(void*)f_2207},
-{"f_2183:files_scm",(void*)f_2183},
-{"f_2195:files_scm",(void*)f_2195},
-{"f_2189:files_scm",(void*)f_2189},
-{"f_2165:files_scm",(void*)f_2165},
-{"f_2177:files_scm",(void*)f_2177},
-{"f_2171:files_scm",(void*)f_2171},
-{"f_2150:files_scm",(void*)f_2150},
-{"f_2162:files_scm",(void*)f_2162},
-{"f_2156:files_scm",(void*)f_2156},
-{"f_2135:files_scm",(void*)f_2135},
-{"f_2147:files_scm",(void*)f_2147},
-{"f_2141:files_scm",(void*)f_2141},
-{"f_2120:files_scm",(void*)f_2120},
-{"f_2132:files_scm",(void*)f_2132},
-{"f_2126:files_scm",(void*)f_2126},
-{"f_2044:files_scm",(void*)f_2044},
-{"f_2060:files_scm",(void*)f_2060},
-{"f_2089:files_scm",(void*)f_2089},
-{"f_2114:files_scm",(void*)f_2114},
-{"f_2099:files_scm",(void*)f_2099},
-{"f_2070:files_scm",(void*)f_2070},
-{"f_2030:files_scm",(void*)f_2030},
-{"f_1947:files_scm",(void*)f_1947},
-{"f_1976:files_scm",(void*)f_1976},
-{"f_1971:files_scm",(void*)f_1971},
-{"f_1949:files_scm",(void*)f_1949},
-{"f_1957:files_scm",(void*)f_1957},
-{"f_1963:files_scm",(void*)f_1963},
-{"f_1960:files_scm",(void*)f_1960},
-{"f_1883:files_scm",(void*)f_1883},
-{"f_1899:files_scm",(void*)f_1899},
-{"f_1894:files_scm",(void*)f_1894},
-{"f_1885:files_scm",(void*)f_1885},
-{"f_1893:files_scm",(void*)f_1893},
-{"f_1797:files_scm",(void*)f_1797},
-{"f_1850:files_scm",(void*)f_1850},
-{"f_1826:files_scm",(void*)f_1826},
-{"f_1833:files_scm",(void*)f_1833},
-{"f_1766:files_scm",(void*)f_1766},
-{"f_1705:files_scm",(void*)f_1705},
-{"f_1714:files_scm",(void*)f_1714},
-{"f_1744:files_scm",(void*)f_1744},
-{"f_1752:files_scm",(void*)f_1752},
-{"f_1652:files_scm",(void*)f_1652},
-{"f_1668:files_scm",(void*)f_1668},
-{"f_1639:files_scm",(void*)f_1639},
-{"f_1650:files_scm",(void*)f_1650},
-{"f_1225:files_scm",(void*)f_1225},
-{"f_1585:files_scm",(void*)f_1585},
-{"f_1580:files_scm",(void*)f_1580},
-{"f_1227:files_scm",(void*)f_1227},
-{"f_1240:files_scm",(void*)f_1240},
-{"f_1573:files_scm",(void*)f_1573},
-{"f_1569:files_scm",(void*)f_1569},
-{"f_1243:files_scm",(void*)f_1243},
-{"f_1246:files_scm",(void*)f_1246},
-{"f_1562:files_scm",(void*)f_1562},
-{"f_1249:files_scm",(void*)f_1249},
-{"f_1545:files_scm",(void*)f_1545},
-{"f_1555:files_scm",(void*)f_1555},
-{"f_1252:files_scm",(void*)f_1252},
-{"f_1489:files_scm",(void*)f_1489},
-{"f_1520:files_scm",(void*)f_1520},
-{"f_1532:files_scm",(void*)f_1532},
-{"f_1538:files_scm",(void*)f_1538},
-{"f_1526:files_scm",(void*)f_1526},
-{"f_1495:files_scm",(void*)f_1495},
-{"f_1501:files_scm",(void*)f_1501},
-{"f2976:files_scm",(void*)f2976},
-{"f_1512:files_scm",(void*)f_1512},
-{"f_1255:files_scm",(void*)f_1255},
-{"f_1258:files_scm",(void*)f_1258},
-{"f_1434:files_scm",(void*)f_1434},
-{"f_1465:files_scm",(void*)f_1465},
-{"f_1477:files_scm",(void*)f_1477},
-{"f_1483:files_scm",(void*)f_1483},
-{"f_1471:files_scm",(void*)f_1471},
-{"f_1440:files_scm",(void*)f_1440},
-{"f_1446:files_scm",(void*)f_1446},
-{"f2972:files_scm",(void*)f2972},
-{"f_1457:files_scm",(void*)f_1457},
-{"f_1261:files_scm",(void*)f_1261},
-{"f_1264:files_scm",(void*)f_1264},
-{"f_1267:files_scm",(void*)f_1267},
-{"f_1274:files_scm",(void*)f_1274},
-{"f_1276:files_scm",(void*)f_1276},
-{"f_1369:files_scm",(void*)f_1369},
-{"f_1410:files_scm",(void*)f_1410},
-{"f_1422:files_scm",(void*)f_1422},
-{"f_1428:files_scm",(void*)f_1428},
-{"f_1416:files_scm",(void*)f_1416},
-{"f_1375:files_scm",(void*)f_1375},
-{"f_1381:files_scm",(void*)f_1381},
-{"f_1388:files_scm",(void*)f_1388},
-{"f_1391:files_scm",(void*)f_1391},
-{"f_1402:files_scm",(void*)f_1402},
-{"f_1398:files_scm",(void*)f_1398},
-{"f_1353:files_scm",(void*)f_1353},
-{"f_1356:files_scm",(void*)f_1356},
-{"f_1363:files_scm",(void*)f_1363},
-{"f_1286:files_scm",(void*)f_1286},
-{"f_1289:files_scm",(void*)f_1289},
-{"f_1297:files_scm",(void*)f_1297},
-{"f_1328:files_scm",(void*)f_1328},
-{"f_1340:files_scm",(void*)f_1340},
-{"f_1346:files_scm",(void*)f_1346},
-{"f_1334:files_scm",(void*)f_1334},
-{"f_1303:files_scm",(void*)f_1303},
-{"f_1309:files_scm",(void*)f_1309},
-{"f2966:files_scm",(void*)f2966},
-{"f_1320:files_scm",(void*)f_1320},
-{"f_1292:files_scm",(void*)f_1292},
-{"f_1295:files_scm",(void*)f_1295},
-{"f_878:files_scm",(void*)f_878},
-{"f_1177:files_scm",(void*)f_1177},
-{"f_1172:files_scm",(void*)f_1172},
-{"f_880:files_scm",(void*)f_880},
-{"f_893:files_scm",(void*)f_893},
-{"f_1165:files_scm",(void*)f_1165},
-{"f_1161:files_scm",(void*)f_1161},
-{"f_896:files_scm",(void*)f_896},
-{"f_899:files_scm",(void*)f_899},
-{"f_1154:files_scm",(void*)f_1154},
-{"f_902:files_scm",(void*)f_902},
-{"f_1137:files_scm",(void*)f_1137},
-{"f_1147:files_scm",(void*)f_1147},
-{"f_905:files_scm",(void*)f_905},
-{"f_1081:files_scm",(void*)f_1081},
-{"f_1112:files_scm",(void*)f_1112},
-{"f_1124:files_scm",(void*)f_1124},
-{"f_1130:files_scm",(void*)f_1130},
-{"f_1118:files_scm",(void*)f_1118},
-{"f_1087:files_scm",(void*)f_1087},
-{"f_1093:files_scm",(void*)f_1093},
-{"f2962:files_scm",(void*)f2962},
-{"f_1104:files_scm",(void*)f_1104},
-{"f_908:files_scm",(void*)f_908},
-{"f_911:files_scm",(void*)f_911},
-{"f_1026:files_scm",(void*)f_1026},
-{"f_1057:files_scm",(void*)f_1057},
-{"f_1069:files_scm",(void*)f_1069},
-{"f_1075:files_scm",(void*)f_1075},
-{"f_1063:files_scm",(void*)f_1063},
-{"f_1032:files_scm",(void*)f_1032},
-{"f_1038:files_scm",(void*)f_1038},
-{"f2958:files_scm",(void*)f2958},
-{"f_1049:files_scm",(void*)f_1049},
-{"f_914:files_scm",(void*)f_914},
-{"f_917:files_scm",(void*)f_917},
-{"f_920:files_scm",(void*)f_920},
-{"f_927:files_scm",(void*)f_927},
-{"f_929:files_scm",(void*)f_929},
-{"f_961:files_scm",(void*)f_961},
-{"f_1002:files_scm",(void*)f_1002},
-{"f_1014:files_scm",(void*)f_1014},
-{"f_1020:files_scm",(void*)f_1020},
-{"f_1008:files_scm",(void*)f_1008},
-{"f_967:files_scm",(void*)f_967},
-{"f_973:files_scm",(void*)f_973},
-{"f_980:files_scm",(void*)f_980},
-{"f_983:files_scm",(void*)f_983},
-{"f_994:files_scm",(void*)f_994},
-{"f_990:files_scm",(void*)f_990},
-{"f_945:files_scm",(void*)f_945},
-{"f_948:files_scm",(void*)f_948},
-{"f_955:files_scm",(void*)f_955},
-{"f_939:files_scm",(void*)f_939},
-{"f_942:files_scm",(void*)f_942},
-{"f_866:files_scm",(void*)f_866},
-{"f_873:files_scm",(void*)f_873},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/library.c b/bootstrap/library.c
deleted file mode 100644
index f27cd36f..00000000
--- a/bootstrap/library.c
+++ /dev/null
@@ -1,38129 +0,0 @@
-/* Generated from library.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 12:09
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: library.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file library.c
- unit: library
-*/
-
-#include "chicken.h"
-
-#include <string.h>
-#include <ctype.h>
-#include <errno.h>
-#include <time.h>
-#include <float.h>
-
-#ifdef HAVE_SYSEXITS_H
-# include <sysexits.h>
-#endif
-
-#if !defined(_MSC_VER)
-# include <unistd.h>
-#endif
-
-#ifndef EX_SOFTWARE
-# define EX_SOFTWARE 70
-#endif
-
-#ifndef C_BUILD_TAG
-# define C_BUILD_TAG ""
-#endif
-
-#ifndef C_BRANCH_NAME
-# define C_BRANCH_NAME ""
-#endif
-
-#define C_close_file(p) (C_fclose((C_FILEPTR)(C_port_file(p))), C_SCHEME_UNDEFINED)
-#define C_a_f64peek(ptr, c, b, i) C_flonum(ptr, ((double *)C_data_pointer(b))[ C_unfix(i) ])
-#define C_fetch_c_strlen(b, i) C_fix(strlen((C_char *)C_block_item(b, C_unfix(i))))
-#define C_peek_c_string(b, i, to, len) (C_memcpy(C_data_pointer(to), (C_char *)C_block_item(b, C_unfix(i)), C_unfix(len)), C_SCHEME_UNDEFINED)
-#define C_free_mptr(p, i) (C_free((void *)C_block_item(p, C_unfix(i))), C_SCHEME_UNDEFINED)
-#define C_free_sptr(p, i) (C_free((void *)(((C_char **)C_block_item(p, 0))[ C_unfix(i) ])), C_SCHEME_UNDEFINED)
-
-#define C_direct_continuation(dummy) t1
-
-#define C_a_get_current_seconds(ptr, c, dummy) C_flonum(ptr, time(NULL))
-#define C_peek_c_string_at(ptr, i) ((C_char *)(((C_char **)ptr)[ i ]))
-
-static C_word fast_read_line_from_file(C_word str, C_word port, C_word size) {
- int n = C_unfix(size);
- int i;
- int c;
- char *buf = C_c_string(str);
- C_FILEPTR fp = C_port_file(port);
-
- if ((c = C_getc(fp)) == EOF)
- return C_SCHEME_END_OF_FILE;
-
- C_ungetc(c, fp);
-
- for (i = 0; i < n; i++) {
- c = C_getc(fp);
- switch (c) {
- case '\r': if ((c = C_getc(fp)) != '\n') C_ungetc(c, fp);
- case EOF: clearerr(fp);
- case '\n': return C_fix(i);
- }
- buf[i] = c;
- }
- return C_SCHEME_FALSE;
-}
-
-static C_word
-fast_read_string_from_file (C_word dest, C_word port, C_word len, C_word pos)
-{
- int n = C_unfix (len);
- char * buf = ((char *)C_data_pointer (dest) + C_unfix (pos));
- C_FILEPTR fp = C_port_file (port);
-
- size_t m = fread (buf, sizeof (char), n, fp);
-
- if (m < n) {
- if (feof (fp)) {
- clearerr (fp);
- if (0 == m)
- return C_SCHEME_END_OF_FILE;
- } else if (ferror (fp)) {
- if (0 == m) {
- return C_SCHEME_FALSE;
- } else {
- clearerr (fp);
- }
- }
- }
-
- return C_fix (m);
-}
-
-static C_PTABLE_ENTRY *create_ptable(void);
-
-static C_TLS C_word lf[1049];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,15),40,101,120,105,116,32,46,32,99,111,100,101,49,52,41,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,7),40,114,101,115,101,116,41,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,22),40,35,35,115,121,115,35,101,114,114,111,114,32,46,32,97,114,103,115,49,57,41,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,119,97,114,110,32,109,115,103,50,49,32,46,32,97,114,103,115,50,50,41,0,0,0,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,26),40,101,110,97,98,108,101,45,119,97,114,110,105,110,103,115,32,46,32,98,111,111,108,50,54,41,0,0,0,0,0,0};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,23),40,115,101,116,45,103,99,45,114,101,112,111,114,116,33,32,102,108,97,103,50,56,41,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,4),67,95,103,99,0,0,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,115,101,116,115,108,111,116,32,120,51,48,32,105,51,49,32,121,51,50,41,0,0,0,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,115,101,116,105,115,108,111,116,32,120,51,52,32,105,51,53,32,121,51,54,41,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,17),67,95,97,108,108,111,99,97,116,101,95,118,101,99,116,111,114,0,0,0,0,0,0,0};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,10),67,95,103,101,116,95,97,114,103,118,0,0,0,0,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,11),40,97,114,103,99,43,97,114,103,118,41,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),67,95,109,97,107,101,95,115,116,114,117,99,116,117,114,101};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,21),67,95,101,110,115,117,114,101,95,104,101,97,112,95,114,101,115,101,114,118,101,0,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,102,117,100,103,101,32,102,117,100,103,101,45,102,97,99,116,111,114,51,57,41,0,0,0,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,16),67,95,114,101,116,117,114,110,95,116,111,95,104,111,115,116};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,11),67,95,102,105,108,101,95,105,110,102,111,0,0,0,0,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,23),67,95,103,101,116,95,115,121,109,98,111,108,95,116,97,98,108,101,95,105,110,102,111,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,17),67,95,103,101,116,95,109,101,109,111,114,121,95,105,110,102,111,0,0,0,0,0,0,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,22),40,99,117,114,114,101,110,116,45,109,105,108,108,105,115,101,99,111,110,100,115,41,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,25),40,99,117,114,114,101,110,116,45,103,99,45,109,105,108,108,105,115,101,99,111,110,100,115,41,0,0,0,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,10),67,95,99,112,117,95,116,105,109,101,0,0,0,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,16),67,95,100,101,99,111,100,101,95,115,101,99,111,110,100,115};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,26),67,95,103,101,116,95,101,110,118,105,114,111,110,109,101,110,116,95,118,97,114,105,97,98,108,101,0,0,0,0,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,19),40,35,35,115,121,115,35,115,116,97,114,116,45,116,105,109,101,114,41,0,0,0,0,0};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,12),67,95,115,116,111,112,95,116,105,109,101,114,0,0,0,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,22),40,35,35,115,121,115,35,105,109,109,101,100,105,97,116,101,63,32,120,52,52,41,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,21),40,35,35,115,121,115,35,109,101,115,115,97,103,101,32,115,116,114,52,54,41,0,0,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,98,121,116,101,32,120,52,56,32,105,52,57,41,0,0,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,115,101,116,98,121,116,101,32,120,53,49,32,105,53,50,32,110,53,51,41,0,0,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,12),40,35,35,115,121,115,35,118,111,105,100,41,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,12),40,35,35,115,121,115,35,104,97,108,116,41,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,19),40,35,35,115,121,115,35,102,108,111,50,102,105,120,32,110,53,55,41,0,0,0,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,8),67,95,98,101,99,111,109,101};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,98,108,111,99,107,45,114,101,102,32,120,53,57,32,105,54,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,14),67,95,97,112,112,108,121,95,118,97,108,117,101,115,0,0};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,14),67,95,99,111,112,121,95,99,108,111,115,117,114,101,0,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,98,108,111,99,107,45,115,101,116,33,32,120,54,50,32,105,54,51,32,121,54,52,41,0,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,17),40,99,117,114,114,101,110,116,45,115,101,99,111,110,100,115,41,0,0,0,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,99,104,101,99,107,45,115,116,114,117,99,116,117,114,101,32,120,56,55,32,121,56,56,32,46,32,108,111,99,56,57,41,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,99,104,101,99,107,45,98,108,111,98,32,120,57,49,32,46,32,108,111,99,57,50,41,0,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,99,104,101,99,107,45,112,97,105,114,32,120,57,52,32,46,32,108,111,99,57,53,41,0,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,99,104,101,99,107,45,108,105,115,116,32,120,57,55,32,46,32,108,111,99,57,56,41,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,101,99,107,45,115,116,114,105,110,103,32,120,49,48,48,32,46,32,108,111,99,49,48,49,41,0,0,0,0,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,101,99,107,45,110,117,109,98,101,114,32,120,49,48,51,32,46,32,108,111,99,49,48,52,41,0,0,0,0,0,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,99,104,101,99,107,45,101,120,97,99,116,32,120,49,48,54,32,46,32,108,111,99,49,48,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,99,104,101,99,107,45,105,110,101,120,97,99,116,32,120,49,48,57,32,46,32,108,111,99,49,49,48,41,0,0,0,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,101,99,107,45,115,121,109,98,111,108,32,120,49,49,50,32,46,32,108,111,99,49,49,51,41,0,0,0,0,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,101,99,107,45,118,101,99,116,111,114,32,120,49,49,53,32,46,32,108,111,99,49,49,54,41,0,0,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,99,104,101,99,107,45,99,104,97,114,32,120,49,49,56,32,46,32,108,111,99,49,49,57,41};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,99,104,101,99,107,45,105,110,116,101,103,101,114,32,120,49,50,49,32,46,32,108,111,99,49,50,50,41,0,0,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,47),40,35,35,115,121,115,35,99,104,101,99,107,45,114,97,110,103,101,32,105,49,51,48,32,102,114,111,109,49,51,49,32,116,111,49,51,50,32,46,32,108,111,99,49,51,51,41,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,99,104,101,99,107,45,115,112,101,99,105,97,108,32,112,116,114,49,52,52,32,46,32,108,111,99,49,52,53,41,0,0,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,99,104,101,99,107,45,99,108,111,115,117,114,101,32,120,49,53,51,32,46,32,108,111,99,49,53,52,41,0,0,0,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,102,111,114,99,101,32,112,114,111,109,105,115,101,49,54,49,41};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,15),40,115,121,115,116,101,109,32,99,109,100,49,54,53,41,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,7),67,95,100,108,111,97,100,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,18),67,95,115,101,116,95,100,108,111,112,101,110,95,102,108,97,103,115,0,0,0,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,100,117,110,108,111,97,100,32,110,97,109,101,49,55,54,41,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,10),40,110,111,116,32,120,49,56,51,41,0,0,0,0,0,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,15),40,98,111,111,108,101,97,110,63,32,120,49,56,53,41,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,15),40,101,113,63,32,120,49,56,55,32,121,49,56,56,41,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,16),40,101,113,118,63,32,120,49,57,48,32,121,49,57,49,41};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,18),40,101,113,117,97,108,63,32,120,49,57,51,32,121,49,57,52,41,0,0,0,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,12),40,112,97,105,114,63,32,120,49,57,54,41,0,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,16),40,99,111,110,115,32,120,49,57,56,32,121,49,57,57,41};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,55,54,32,120,50,48,49,41,0,0,0};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,55,57,32,120,50,48,51,41,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,20),40,115,101,116,45,99,97,114,33,32,120,50,48,53,32,121,50,48,54,41,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,20),40,115,101,116,45,99,100,114,33,32,120,50,48,56,32,121,50,48,57,41,0,0,0,0};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,56,56,32,120,50,49,49,41,0,0,0};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,57,49,32,120,50,49,51,41,0,0,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,13),40,99,97,100,100,100,114,32,120,50,49,53,41,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,13),40,99,100,100,100,100,114,32,120,50,49,55,41,0,0,0};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,48,48,32,120,50,49,57,41,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,49,48,32,120,50,50,49,41,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,50,48,32,120,50,50,51,41,0,0,0};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,51,48,32,120,50,50,53,41,0,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,52,52,32,120,50,50,55,41,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,53,48,32,120,50,50,57,41,0,0,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,53,55,32,120,50,51,49,41,0,0,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,55,49,32,120,50,51,51,41,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,55,55,32,120,50,51,53,41,0,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,57,49,32,120,50,51,55,41,0,0,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,13),40,99,97,97,97,97,114,32,120,50,51,57,41,0,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,13),40,99,97,97,97,100,114,32,120,50,52,49,41,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,13),40,99,97,97,100,97,114,32,120,50,52,51,41,0,0,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,13),40,99,97,97,100,100,114,32,120,50,52,53,41,0,0,0};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,13),40,99,97,100,97,97,114,32,120,50,52,55,41,0,0,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,13),40,99,97,100,97,100,114,32,120,50,52,57,41,0,0,0};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,13),40,99,97,100,100,97,114,32,120,50,53,49,41,0,0,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,13),40,99,100,97,97,97,114,32,120,50,53,51,41,0,0,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,13),40,99,100,97,97,100,114,32,120,50,53,53,41,0,0,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,13),40,99,100,97,100,97,114,32,120,50,53,55,41,0,0,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,13),40,99,100,97,100,100,114,32,120,50,53,57,41,0,0,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,13),40,99,100,100,97,97,114,32,120,50,54,49,41,0,0,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,13),40,99,100,100,97,100,114,32,120,50,54,51,41,0,0,0};
-static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,13),40,99,100,100,100,97,114,32,120,50,54,53,41,0,0,0};
-static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,12),40,110,117,108,108,63,32,120,50,54,55,41,0,0,0,0};
-static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,15),40,108,105,115,116,32,46,32,108,115,116,50,54,57,41,0};
-static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,15),40,108,101,110,103,116,104,32,108,115,116,50,55,49,41,0};
-static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,23),40,108,105,115,116,45,116,97,105,108,32,108,115,116,50,55,51,32,105,50,55,52,41,0};
-static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,22),40,108,105,115,116,45,114,101,102,32,108,115,116,50,55,54,32,105,50,55,55,41,0,0};
-static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,50,56,50,41,0,0,0};
-static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,100,101,108,113,32,120,50,55,57,32,108,115,116,50,56,48,41};
-static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,47),40,35,35,115,121,115,35,101,114,114,111,114,45,110,111,116,45,97,45,112,114,111,112,101,114,45,108,105,115,116,32,97,114,103,50,57,49,32,46,32,108,111,99,50,57,50,41,0};
-static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,14),40,99,111,112,121,32,110,111,100,101,51,48,50,41,0,0};
-static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,115,51,48,48,41,0,0};
-static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,18),40,97,112,112,101,110,100,32,46,32,108,115,116,115,50,57,56,41,0,0,0,0,0,0};
-static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,108,115,116,51,49,56,32,114,101,115,116,51,49,57,41,0,0,0};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,17),40,114,101,118,101,114,115,101,32,108,115,116,48,51,49,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,18),40,109,101,109,113,32,120,51,51,50,32,108,115,116,51,51,51,41,0,0,0,0,0,0};
-static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,18),40,109,101,109,118,32,120,51,51,53,32,108,115,116,51,51,54,41,0,0,0,0,0,0};
-static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,20),40,109,101,109,98,101,114,32,120,51,51,56,32,108,115,116,51,51,57,41,0,0,0,0};
-static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,18),40,97,115,115,113,32,120,51,52,49,32,108,115,116,51,52,50,41,0,0,0,0,0,0};
-static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,18),40,97,115,115,118,32,120,51,52,52,32,108,115,116,51,52,53,41,0,0,0,0,0,0};
-static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,19),40,97,115,115,111,99,32,120,51,52,55,32,108,115,116,51,52,56,41,0,0,0,0,0};
-static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,12),40,108,105,115,116,63,32,120,51,53,48,41,0,0,0,0};
-static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,14),40,115,116,114,105,110,103,63,32,120,51,53,50,41,0,0};
-static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,20),40,115,116,114,105,110,103,45,108,101,110,103,116,104,32,115,51,53,52,41,0,0,0,0};
-static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,18),40,102,95,55,48,56,53,32,115,51,53,54,32,105,51,53,55,41,0,0,0,0,0,0};
-static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,28),40,115,116,114,105,110,103,45,115,101,116,33,32,115,51,53,57,32,105,51,54,48,32,99,51,54,49,41,0,0,0,0};
-static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,109,97,107,101,45,115,116,114,105,110,103,32,115,105,122,101,51,55,48,32,46,32,116,109,112,51,54,57,51,55,49,41,0};
-static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,31),40,109,97,107,101,45,115,116,114,105,110,103,32,115,105,122,101,51,56,51,32,46,32,102,105,108,108,51,56,52,41,0};
-static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,52,48,50,41,0,0,0,0,0};
-static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,108,105,115,116,32,115,51,57,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,52,49,52,32,108,115,116,52,49,57,41,0,0,0,0,0,0};
-static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,108,105,115,116,45,62,115,116,114,105,110,103,32,108,115,116,48,52,48,54,41,0,0,0,0};
-static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,12),40,105,116,101,114,32,110,50,52,51,53,41,0,0,0,0};
-static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,114,101,118,101,114,115,101,45,108,105,115,116,45,62,115,116,114,105,110,103,32,108,52,50,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,24),40,115,116,114,105,110,103,45,102,105,108,108,33,32,115,52,52,56,32,99,52,52,57,41};
-static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,18),40,115,116,114,105,110,103,45,99,111,112,121,32,115,52,53,51,41,0,0,0,0,0,0};
-static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,34),40,115,117,98,115,116,114,105,110,103,32,115,52,54,48,32,115,116,97,114,116,52,54,49,32,46,32,101,110,100,52,54,50,41,0,0,0,0,0,0};
-static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,32,115,52,56,48,32,115,116,97,114,116,52,56,49,32,101,110,100,52,56,50,41,0,0};
-static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,20),40,115,116,114,105,110,103,61,63,32,120,52,56,54,32,121,52,56,55,41,0,0,0,0};
-static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,23),40,115,116,114,105,110,103,45,99,105,61,63,32,120,52,57,51,32,121,52,57,52,41,0};
-static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,33),40,99,111,109,112,97,114,101,32,115,49,52,57,54,32,115,50,52,57,55,32,108,111,99,52,57,56,32,107,52,57,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,30),40,97,55,52,49,49,32,108,101,110,49,53,48,54,32,108,101,110,50,53,48,55,32,99,109,112,53,48,56,41,0,0};
-static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,22),40,115,116,114,105,110,103,60,63,32,115,49,53,48,52,32,115,50,53,48,53,41,0,0};
-static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,30),40,97,55,52,51,53,32,108,101,110,49,53,49,56,32,108,101,110,50,53,49,57,32,99,109,112,53,50,48,41,0,0};
-static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,22),40,115,116,114,105,110,103,62,63,32,115,49,53,49,54,32,115,50,53,49,55,41,0,0};
-static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,30),40,97,55,52,53,57,32,108,101,110,49,53,51,48,32,108,101,110,50,53,51,49,32,99,109,112,53,51,50,41,0,0};
-static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,23),40,115,116,114,105,110,103,60,61,63,32,115,49,53,50,56,32,115,50,53,50,57,41,0};
-static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,30),40,97,55,52,56,48,32,108,101,110,49,53,51,53,32,108,101,110,50,53,51,54,32,99,109,112,53,51,55,41,0,0};
-static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,23),40,115,116,114,105,110,103,62,61,63,32,115,49,53,51,51,32,115,50,53,51,52,41,0};
-static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,33),40,99,111,109,112,97,114,101,32,115,49,53,52,51,32,115,50,53,52,52,32,108,111,99,53,52,53,32,107,53,52,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,30),40,97,55,53,50,49,32,108,101,110,49,53,53,51,32,108,101,110,50,53,53,52,32,99,109,112,53,53,53,41,0,0};
-static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,25),40,115,116,114,105,110,103,45,99,105,60,63,32,115,49,53,53,49,32,115,50,53,53,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,30),40,97,55,53,52,53,32,108,101,110,49,53,54,53,32,108,101,110,50,53,54,54,32,99,109,112,53,54,55,41,0,0};
-static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,25),40,115,116,114,105,110,103,45,99,105,62,63,32,115,49,53,54,51,32,115,50,53,54,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,30),40,97,55,53,54,57,32,108,101,110,49,53,55,55,32,108,101,110,50,53,55,56,32,99,109,112,53,55,57,41,0,0};
-static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,26),40,115,116,114,105,110,103,45,99,105,60,61,63,32,115,49,53,55,53,32,115,50,53,55,54,41,0,0,0,0,0,0};
-static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,30),40,97,55,53,57,48,32,108,101,110,49,53,56,50,32,108,101,110,50,53,56,51,32,99,109,112,53,56,52,41,0,0};
-static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,26),40,115,116,114,105,110,103,45,99,105,62,61,63,32,115,49,53,56,48,32,115,50,53,56,49,41,0,0,0,0,0,0};
-static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,115,116,114,105,110,103,45,97,112,112,101,110,100,32,120,53,57,48,32,121,53,57,49,41,0};
-static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,115,116,114,115,54,48,50,32,110,54,48,51,41,0,0,0,0,0};
-static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,24),40,115,116,114,105,110,103,45,97,112,112,101,110,100,32,46,32,97,108,108,53,57,57,41};
-static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,19),40,115,116,114,105,110,103,32,46,32,99,104,97,114,115,54,49,49,41,0,0,0,0,0};
-static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,112,111,115,54,49,56,41,0,0,0};
-static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,102,114,97,103,109,101,110,116,115,45,62,115,116,114,105,110,103,32,116,111,116,97,108,54,49,51,32,102,115,54,49,52,41};
-static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,14),40,102,105,120,110,117,109,63,32,120,54,51,51,41,0,0};
-static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,15),40,102,120,43,32,120,54,51,53,32,121,54,51,54,41,0};
-static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,15),40,102,120,45,32,120,54,51,56,32,121,54,51,57,41,0};
-static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,15),40,102,120,42,32,120,54,52,49,32,121,54,52,50,41,0};
-static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,15),40,102,120,61,32,120,54,52,52,32,121,54,52,53,41,0};
-static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,15),40,102,120,62,32,120,54,52,55,32,121,54,52,56,41,0};
-static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,15),40,102,120,60,32,120,54,53,48,32,121,54,53,49,41,0};
-static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,16),40,102,120,62,61,32,120,54,53,51,32,121,54,53,52,41};
-static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,16),40,102,120,60,61,32,120,54,53,54,32,121,54,53,55,41};
-static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,17),40,102,120,109,105,110,32,120,54,53,57,32,121,54,54,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,17),40,102,120,109,97,120,32,120,54,54,50,32,121,54,54,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,12),40,102,120,110,101,103,32,120,54,54,53,41,0,0,0,0};
-static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,17),40,102,120,97,110,100,32,120,54,54,55,32,121,54,54,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,17),40,102,120,105,111,114,32,120,54,55,48,32,121,54,55,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,17),40,102,120,120,111,114,32,120,54,55,51,32,121,54,55,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,12),40,102,120,110,111,116,32,120,54,55,54,41,0,0,0,0};
-static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,17),40,102,120,115,104,108,32,120,54,55,56,32,121,54,55,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,17),40,102,120,115,104,114,32,120,54,56,49,32,121,54,56,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,15),40,102,120,47,32,120,54,56,53,32,121,54,56,54,41,0};
-static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,17),40,102,120,109,111,100,32,120,55,48,50,32,121,55,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,14),40,102,108,111,110,117,109,63,32,120,55,51,57,41,0,0};
-static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,14),40,102,105,110,105,116,101,63,32,120,55,52,49,41,0,0};
-static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,15),40,102,112,43,32,120,55,52,54,32,121,55,52,55,41,0};
-static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,15),40,102,112,45,32,120,55,54,53,32,121,55,54,54,41,0};
-static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,15),40,102,112,42,32,120,55,56,52,32,121,55,56,53,41,0};
-static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,15),40,102,112,47,32,120,56,48,51,32,121,56,48,52,41,0};
-static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,15),40,102,112,61,32,120,56,50,50,32,121,56,50,51,41,0};
-static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,15),40,102,112,62,32,120,56,52,49,32,121,56,52,50,41,0};
-static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,15),40,102,112,60,32,120,56,54,48,32,121,56,54,49,41,0};
-static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,16),40,102,112,62,61,32,120,56,55,57,32,121,56,56,48,41};
-static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,16),40,102,112,60,61,32,120,56,57,56,32,121,56,57,57,41};
-static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,12),40,102,112,110,101,103,32,120,57,49,55,41,0,0,0,0};
-static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,17),40,102,112,109,97,120,32,120,57,51,50,32,121,57,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,17),40,102,112,109,105,110,32,120,57,53,49,32,121,57,53,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,14),40,102,112,102,108,111,111,114,32,120,57,55,48,41,0,0};
-static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,17),40,102,112,116,114,117,110,99,97,116,101,32,120,57,56,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li196[] C_aligned={C_lihdr(0,0,15),40,102,112,114,111,117,110,100,32,120,49,48,48,48,41,0};
-static C_char C_TLS li197[] C_aligned={C_lihdr(0,0,17),40,102,112,99,101,105,108,105,110,103,32,120,49,48,49,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,13),40,102,112,115,105,110,32,120,49,48,51,48,41,0,0,0};
-static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,13),40,102,112,99,111,115,32,120,49,48,52,53,41,0,0,0};
-static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,13),40,102,112,116,97,110,32,120,49,48,54,48,41,0,0,0};
-static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,14),40,102,112,97,115,105,110,32,120,49,48,55,53,41,0,0};
-static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,14),40,102,112,97,99,111,115,32,120,49,48,57,48,41,0,0};
-static C_char C_TLS li203[] C_aligned={C_lihdr(0,0,14),40,102,112,97,116,97,110,32,120,49,49,48,53,41,0,0};
-static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,21),40,102,112,97,116,97,110,50,32,120,49,49,50,48,32,121,49,49,50,49,41,0,0,0};
-static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,13),40,102,112,101,120,112,32,120,49,49,51,57,41,0,0,0};
-static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,20),40,102,112,101,120,112,116,32,120,49,49,53,52,32,121,49,49,53,53,41,0,0,0,0};
-static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,13),40,102,112,108,111,103,32,120,49,49,55,51,41,0,0,0};
-static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,14),40,102,112,115,113,114,116,32,120,49,49,56,56,41,0,0};
-static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,13),40,102,112,97,98,115,32,120,49,50,48,51,41,0,0,0};
-static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,18),40,102,112,105,110,116,101,103,101,114,63,32,120,49,50,49,56,41,0,0,0,0,0,0};
-static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,7),67,95,116,105,109,101,115,0};
-static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,7),67,95,109,105,110,117,115,0};
-static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,6),67,95,112,108,117,115,0,0};
-static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,8),67,95,100,105,118,105,100,101};
-static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,9),67,95,110,101,113,117,97,108,112,0,0,0,0,0,0,0};
-static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,10),67,95,103,114,101,97,116,101,114,112,0,0,0,0,0,0};
-static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,7),67,95,108,101,115,115,112,0};
-static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,20),67,95,103,114,101,97,116,101,114,95,111,114,95,101,113,117,97,108,95,112,0,0,0,0};
-static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,17),67,95,108,101,115,115,95,111,114,95,101,113,117,97,108,95,112,0,0,0,0,0,0,0};
-static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,12),40,97,100,100,49,32,110,49,50,51,50,41,0,0,0,0};
-static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,12),40,115,117,98,49,32,110,49,50,51,51,41,0,0,0,0};
-static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,10),67,95,113,117,111,116,105,101,110,116,0,0,0,0,0,0};
-static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,21),40,35,35,115,121,115,35,110,117,109,98,101,114,63,32,120,49,50,51,53,41,0,0,0};
-static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,17),40,114,97,116,105,111,110,97,108,63,32,110,49,50,51,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,17),67,95,102,108,111,110,117,109,95,102,114,97,99,116,105,111,110,0,0,0,0,0,0,0};
-static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,22),40,35,35,115,121,115,35,105,110,116,101,103,101,114,63,32,120,49,50,51,57,41,0,0};
-static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,101,120,97,99,116,63,32,120,49,50,52,49,41,0,0,0,0};
-static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,22),40,35,35,115,121,115,35,105,110,101,120,97,99,116,63,32,120,49,50,52,51,41,0,0};
-static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,6),67,95,101,120,112,116,0,0};
-static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,102,105,116,115,45,105,110,45,105,110,116,63,32,110,49,50,52,53,41,0,0,0,0,0,0};
-static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,102,105,116,115,45,105,110,45,117,110,115,105,103,110,101,100,45,105,110,116,63,32,110,49,50,52,55,41,0,0,0,0,0};
-static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,108,111,110,117,109,45,105,110,45,102,105,120,110,117,109,45,114,97,110,103,101,63,32,110,49,50,52,57,41,0,0,0};
-static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,100,111,117,98,108,101,45,62,110,117,109,98,101,114,32,110,49,50,53,49,41,0,0,0,0};
-static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,13),40,122,101,114,111,63,32,110,49,50,53,51,41,0,0,0};
-static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,17),40,112,111,115,105,116,105,118,101,63,32,110,49,50,53,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,17),40,110,101,103,97,116,105,118,101,63,32,110,49,50,53,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,11),40,97,98,115,32,110,49,50,53,57,41,0,0,0,0,0};
-static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,13),40,97,110,103,108,101,32,110,49,50,54,49,41,0,0,0};
-static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,17),40,114,101,97,108,45,112,97,114,116,32,110,49,50,54,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,17),40,105,109,97,103,45,112,97,114,116,32,110,49,50,54,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,17),40,110,117,109,101,114,97,116,111,114,32,110,49,50,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,19),40,100,101,110,111,109,105,110,97,116,111,114,32,110,49,50,55,51,41,0,0,0,0,0};
-static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,14),40,115,105,103,110,117,109,32,110,49,50,55,54,41,0,0};
-static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,18),67,95,101,120,97,99,116,95,116,111,95,105,110,101,120,97,99,116,0,0,0,0,0,0};
-static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,105,110,101,120,97,99,116,45,62,101,120,97,99,116,32,110,49,50,56,52,41,0,0,0,0};
-static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,13),40,102,108,111,111,114,32,120,49,50,56,54,41,0,0,0};
-static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,15),40,99,101,105,108,105,110,103,32,120,49,50,56,57,41,0};
-static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,16),40,116,114,117,110,99,97,116,101,32,120,49,50,57,50,41};
-static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,13),40,114,111,117,110,100,32,120,49,50,57,53,41,0,0,0};
-static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,23),40,114,101,109,97,105,110,100,101,114,32,120,49,50,57,55,32,121,49,50,57,56,41,0};
-static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,20),40,109,111,100,117,108,111,32,120,49,51,48,48,32,121,49,51,48,49,41,0,0,0,0};
-static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,13),40,101,118,101,110,63,32,110,49,51,48,55,41,0,0,0};
-static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,12),40,111,100,100,63,32,110,49,51,48,57,41,0,0,0,0};
-static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,110,98,101,115,116,49,51,49,55,32,110,115,49,51,49,56,41,0};
-static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,31),40,109,97,120,109,105,110,32,110,49,49,51,49,51,32,110,115,49,51,49,52,32,112,114,101,100,49,51,49,53,41,0};
-static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,21),40,109,97,120,32,110,49,49,51,50,53,32,46,32,110,115,49,51,50,54,41,0,0,0};
-static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,21),40,109,105,110,32,110,49,49,51,50,55,32,46,32,110,115,49,51,50,56,41,0,0,0};
-static C_char C_TLS li258[] C_aligned={C_lihdr(0,0,11),40,101,120,112,32,110,49,51,51,50,41,0,0,0,0,0};
-static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,11),40,108,111,103,32,110,49,51,51,52,41,0,0,0,0,0};
-static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,11),40,115,105,110,32,110,49,51,51,54,41,0,0,0,0,0};
-static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,11),40,99,111,115,32,110,49,51,51,56,41,0,0,0,0,0};
-static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,11),40,116,97,110,32,110,49,51,52,48,41,0,0,0,0,0};
-static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,12),40,97,115,105,110,32,110,49,51,52,50,41,0,0,0,0};
-static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,12),40,97,99,111,115,32,110,49,51,52,52,41,0,0,0,0};
-static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,12),40,115,113,114,116,32,110,49,51,52,54,41,0,0,0,0};
-static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,22),40,97,116,97,110,32,110,49,49,51,52,56,32,46,32,110,50,49,51,52,57,41,0,0};
-static C_char C_TLS li267[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,120,49,51,53,53,32,121,49,51,53,54,41,0,0,0,0,0,0};
-static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,103,99,100,32,120,49,51,53,50,32,121,49,51,53,51,41,0};
-static C_char C_TLS li269[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,110,115,49,51,54,49,32,102,49,51,54,50,41,0,0,0,0,0};
-static C_char C_TLS li270[] C_aligned={C_lihdr(0,0,14),40,103,99,100,32,46,32,110,115,49,51,53,57,41,0,0};
-static C_char C_TLS li271[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,108,99,109,32,120,49,51,56,48,32,121,49,51,56,49,41,0};
-static C_char C_TLS li272[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,110,115,49,51,56,53,32,102,49,51,56,54,41,0,0,0,0,0};
-static C_char C_TLS li273[] C_aligned={C_lihdr(0,0,14),40,108,99,109,32,46,32,110,115,49,51,56,51,41,0,0};
-static C_char C_TLS li274[] C_aligned={C_lihdr(0,0,18),67,95,115,116,114,105,110,103,95,116,111,95,110,117,109,98,101,114,0,0,0,0,0,0};
-static C_char C_TLS li275[] C_aligned={C_lihdr(0,0,18),67,95,110,117,109,98,101,114,95,116,111,95,115,116,114,105,110,103,0,0,0,0,0,0};
-static C_char C_TLS li276[] C_aligned={C_lihdr(0,0,38),40,102,108,111,110,117,109,45,112,114,105,110,116,45,112,114,101,99,105,115,105,111,110,32,46,32,116,109,112,49,52,48,57,49,52,49,48,41,0,0};
-static C_char C_TLS li277[] C_aligned={C_lihdr(0,0,13),67,95,109,97,107,101,95,115,121,109,98,111,108,0,0,0};
-static C_char C_TLS li278[] C_aligned={C_lihdr(0,0,15),40,115,121,109,98,111,108,63,32,120,49,52,50,50,41,0};
-static C_char C_TLS li279[] C_aligned={C_lihdr(0,0,18),67,95,115,116,114,105,110,103,95,116,111,95,115,121,109,98,111,108,0,0,0,0,0,0};
-static C_char C_TLS li280[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,105,110,116,101,114,110,101,100,45,115,121,109,98,111,108,63,32,120,49,52,50,52,41,0,0};
-static C_char C_TLS li281[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,115,121,109,98,111,108,32,115,116,114,49,52,50,54,41,0,0};
-static C_char C_TLS li282[] C_aligned={C_lihdr(0,0,15),40,115,112,108,105,116,32,108,101,110,49,52,51,50,41,0};
-static C_char C_TLS li283[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,115,121,109,98,111,108,45,62,115,116,114,105,110,103,32,115,49,52,51,56,41,0,0,0,0};
-static C_char C_TLS li284[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,115,121,109,98,111,108,45,62,113,117,97,108,105,102,105,101,100,45,115,116,114,105,110,103,32,115,49,52,52,51,41,0,0};
-static C_char C_TLS li285[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,113,117,97,108,105,102,105,101,100,45,115,121,109,98,111,108,45,112,114,101,102,105,120,32,115,49,52,52,56,41,0,0,0};
-static C_char C_TLS li286[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,113,117,97,108,105,102,105,101,100,45,115,121,109,98,111,108,63,32,115,49,52,53,57,41,0};
-static C_char C_TLS li287[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,113,117,97,108,105,102,105,101,100,45,115,121,109,98,111,108,32,112,114,101,102,105,120,49,52,54,51,32,115,116,114,49,52,54,52,41,0,0,0,0,0};
-static C_char C_TLS li288[] C_aligned={C_lihdr(0,0,22),40,115,121,109,98,111,108,45,62,115,116,114,105,110,103,32,115,49,52,54,54,41,0,0};
-static C_char C_TLS li289[] C_aligned={C_lihdr(0,0,24),40,115,116,114,105,110,103,45,62,115,121,109,98,111,108,32,115,116,114,49,52,54,57,41};
-static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,35),40,115,116,114,105,110,103,45,62,117,110,105,110,116,101,114,110,101,100,45,115,121,109,98,111,108,32,115,116,114,49,52,55,50,41,0,0,0,0,0};
-static C_char C_TLS li291[] C_aligned={C_lihdr(0,0,25),40,103,101,110,115,121,109,32,46,32,115,116,114,45,111,114,45,115,121,109,49,52,55,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li292[] C_aligned={C_lihdr(0,0,16),40,107,101,121,119,111,114,100,63,32,120,49,52,57,52,41};
-static C_char C_TLS li293[] C_aligned={C_lihdr(0,0,23),40,115,116,114,105,110,103,45,62,107,101,121,119,111,114,100,32,115,49,52,57,56,41,0};
-static C_char C_TLS li294[] C_aligned={C_lihdr(0,0,24),40,107,101,121,119,111,114,100,45,62,115,116,114,105,110,103,32,107,119,49,53,48,49,41};
-static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,103,101,116,45,107,101,121,119,111,114,100,32,107,101,121,49,53,48,51,32,97,114,103,115,48,49,53,48,52,32,46,32,100,101,102,97,117,108,116,49,53,48,53,41,0,0,0,0,0};
-static C_char C_TLS li296[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,109,97,107,101,45,98,108,111,98,32,115,105,122,101,49,53,49,52,41,0,0,0,0,0,0};
-static C_char C_TLS li297[] C_aligned={C_lihdr(0,0,20),40,109,97,107,101,45,98,108,111,98,32,115,105,122,101,49,53,49,56,41,0,0,0,0};
-static C_char C_TLS li298[] C_aligned={C_lihdr(0,0,13),40,98,108,111,98,63,32,120,49,53,50,49,41,0,0,0};
-static C_char C_TLS li299[] C_aligned={C_lihdr(0,0,18),40,98,108,111,98,45,115,105,122,101,32,98,118,49,53,50,53,41,0,0,0,0,0,0};
-static C_char C_TLS li300[] C_aligned={C_lihdr(0,0,20),40,115,116,114,105,110,103,45,62,98,108,111,98,32,115,49,53,50,56,41,0,0,0,0};
-static C_char C_TLS li301[] C_aligned={C_lihdr(0,0,21),40,98,108,111,98,45,62,115,116,114,105,110,103,32,98,118,49,53,51,53,41,0,0,0};
-static C_char C_TLS li302[] C_aligned={C_lihdr(0,0,22),40,98,108,111,98,61,63,32,98,49,49,53,52,50,32,98,50,49,53,52,51,41,0,0};
-static C_char C_TLS li303[] C_aligned={C_lihdr(0,0,15),40,118,101,99,116,111,114,63,32,120,49,53,53,48,41,0};
-static C_char C_TLS li304[] C_aligned={C_lihdr(0,0,21),40,118,101,99,116,111,114,45,108,101,110,103,116,104,32,118,49,53,53,50,41,0,0,0};
-static C_char C_TLS li305[] C_aligned={C_lihdr(0,0,20),40,102,95,57,51,53,56,32,118,49,53,53,52,32,105,49,53,53,53,41,0,0,0,0};
-static C_char C_TLS li306[] C_aligned={C_lihdr(0,0,31),40,118,101,99,116,111,114,45,115,101,116,33,32,118,49,53,53,55,32,105,49,53,53,56,32,120,49,53,53,57,41,0};
-static C_char C_TLS li307[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,109,97,107,101,45,118,101,99,116,111,114,32,115,105,122,101,49,53,54,49,32,46,32,102,105,108,108,49,53,54,50,41,0};
-static C_char C_TLS li308[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,56,50,41,0,0,0,0};
-static C_char C_TLS li309[] C_aligned={C_lihdr(0,0,23),40,108,105,115,116,45,62,118,101,99,116,111,114,32,108,115,116,48,49,53,55,50,41,0};
-static C_char C_TLS li310[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,56,57,41,0,0,0,0};
-static C_char C_TLS li311[] C_aligned={C_lihdr(0,0,20),40,118,101,99,116,111,114,45,62,108,105,115,116,32,118,49,53,56,54,41,0,0,0,0};
-static C_char C_TLS li312[] C_aligned={C_lihdr(0,0,17),40,118,101,99,116,111,114,32,46,32,120,115,49,53,57,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li313[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,53,57,56,41,0,0,0,0};
-static C_char C_TLS li314[] C_aligned={C_lihdr(0,0,26),40,118,101,99,116,111,114,45,102,105,108,108,33,32,118,49,53,57,53,32,120,49,53,57,54,41,0,0,0,0,0,0};
-static C_char C_TLS li315[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,54,50,53,41,0,0,0,0};
-static C_char C_TLS li316[] C_aligned={C_lihdr(0,0,38),40,118,101,99,116,111,114,45,99,111,112,121,33,32,102,114,111,109,49,54,48,55,32,116,111,49,54,48,56,32,46,32,110,49,54,48,57,41,0,0};
-static C_char C_TLS li317[] C_aligned={C_lihdr(0,0,41),40,118,101,99,116,111,114,45,114,101,115,105,122,101,32,118,49,54,52,51,32,110,49,54,52,52,32,46,32,116,109,112,49,54,52,50,49,54,52,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li318[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,54,53,57,41,0,0,0,0};
-static C_char C_TLS li319[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,103,114,111,119,45,118,101,99,116,111,114,32,118,49,54,53,52,32,110,49,54,53,53,32,105,110,105,116,49,54,53,54,41};
-static C_char C_TLS li320[] C_aligned={C_lihdr(0,0,13),40,99,104,97,114,63,32,120,49,54,54,55,41,0,0,0};
-static C_char C_TLS li321[] C_aligned={C_lihdr(0,0,21),40,99,104,97,114,45,62,105,110,116,101,103,101,114,32,99,49,54,54,57,41,0,0,0};
-static C_char C_TLS li322[] C_aligned={C_lihdr(0,0,21),40,105,110,116,101,103,101,114,45,62,99,104,97,114,32,110,49,54,55,50,41,0,0,0};
-static C_char C_TLS li323[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,61,63,32,99,49,49,54,55,53,32,99,50,49,54,55,54,41,0,0};
-static C_char C_TLS li324[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,62,63,32,99,49,49,54,56,48,32,99,50,49,54,56,49,41,0,0};
-static C_char C_TLS li325[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,60,63,32,99,49,49,54,56,53,32,99,50,49,54,56,54,41,0,0};
-static C_char C_TLS li326[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,62,61,63,32,99,49,49,54,57,48,32,99,50,49,54,57,49,41,0};
-static C_char C_TLS li327[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,60,61,63,32,99,49,49,54,57,53,32,99,50,49,54,57,54,41,0};
-static C_char C_TLS li328[] C_aligned={C_lihdr(0,0,19),40,99,104,97,114,45,117,112,99,97,115,101,32,99,49,55,48,48,41,0,0,0,0,0};
-static C_char C_TLS li329[] C_aligned={C_lihdr(0,0,21),40,99,104,97,114,45,100,111,119,110,99,97,115,101,32,99,49,55,48,51,41,0,0,0};
-static C_char C_TLS li330[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,61,63,32,120,49,55,48,54,32,121,49,55,48,55,41,0};
-static C_char C_TLS li331[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,62,63,32,120,49,55,48,56,32,121,49,55,48,57,41,0};
-static C_char C_TLS li332[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,60,63,32,120,49,55,49,48,32,121,49,55,49,49,41,0};
-static C_char C_TLS li333[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,99,105,62,61,63,32,120,49,55,49,50,32,121,49,55,49,51,41};
-static C_char C_TLS li334[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,99,105,60,61,63,32,120,49,55,49,52,32,121,49,55,49,53,41};
-static C_char C_TLS li335[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,117,112,112,101,114,45,99,97,115,101,63,32,99,49,55,50,49,41};
-static C_char C_TLS li336[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,108,111,119,101,114,45,99,97,115,101,63,32,99,49,55,50,52,41};
-static C_char C_TLS li337[] C_aligned={C_lihdr(0,0,21),40,99,104,97,114,45,110,117,109,101,114,105,99,63,32,99,49,55,50,55,41,0,0,0};
-static C_char C_TLS li338[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,119,104,105,116,101,115,112,97,99,101,63,32,99,49,55,51,48,41};
-static C_char C_TLS li339[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,97,108,112,104,97,98,101,116,105,99,63,32,99,49,55,51,51,41};
-static C_char C_TLS li340[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li341[] C_aligned={C_lihdr(0,0,19),40,108,111,111,107,117,112,45,99,104,97,114,32,99,49,55,51,56,41,0,0,0,0,0};
-static C_char C_TLS li342[] C_aligned={C_lihdr(0,0,25),40,99,104,97,114,45,110,97,109,101,32,120,49,55,52,56,32,46,32,121,49,55,52,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li343[] C_aligned={C_lihdr(0,0,18),40,112,114,111,99,101,100,117,114,101,63,32,120,49,55,55,56,41,0,0,0,0,0,0};
-static C_char C_TLS li344[] C_aligned={C_lihdr(0,0,7),67,95,97,112,112,108,121,0};
-static C_char C_TLS li345[] C_aligned={C_lihdr(0,0,9),67,95,99,97,108,108,95,99,99,0,0,0,0,0,0,0};
-static C_char C_TLS li346[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,99,97,108,108,45,119,105,116,104,45,100,105,114,101,99,116,45,99,111,110,116,105,110,117,97,116,105,111,110,32,107,49,55,56,48,41,0,0,0,0,0};
-static C_char C_TLS li347[] C_aligned={C_lihdr(0,0,19),67,95,99,97,108,108,95,119,105,116,104,95,99,116,104,117,108,104,117,0,0,0,0,0};
-static C_char C_TLS li348[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,100,105,114,101,99,116,45,114,101,116,117,114,110,32,100,107,49,55,56,50,32,120,49,55,56,51,41,0,0,0,0,0,0};
-static C_char C_TLS li349[] C_aligned={C_lihdr(0,0,8),67,95,118,97,108,117,101,115};
-static C_char C_TLS li350[] C_aligned={C_lihdr(0,0,18),67,95,99,97,108,108,95,119,105,116,104,95,118,97,108,117,101,115,0,0,0,0,0,0};
-static C_char C_TLS li351[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,49,55,56,56,41,0,0};
-static C_char C_TLS li352[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,102,111,114,45,101,97,99,104,32,112,49,55,56,53,32,108,115,116,48,49,55,56,54,41,0};
-static C_char C_TLS li353[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,49,56,48,53,41,0,0};
-static C_char C_TLS li354[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,109,97,112,32,112,49,56,48,50,32,108,115,116,48,49,56,48,51,41,0,0,0,0,0,0};
-static C_char C_TLS li355[] C_aligned={C_lihdr(0,0,42),40,109,97,112,115,97,102,101,32,112,49,56,50,49,32,108,115,116,115,49,56,50,50,32,115,116,97,114,116,49,56,50,51,32,108,111,99,49,56,50,52,41,0,0,0,0,0,0};
-static C_char C_TLS li356[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li357[] C_aligned={C_lihdr(0,0,34),40,99,104,101,99,107,32,108,115,116,115,49,56,51,54,32,115,116,97,114,116,49,56,51,55,32,108,111,99,49,56,51,56,41,0,0,0,0,0,0};
-static C_char C_TLS li358[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,53,54,32,103,49,56,54,48,49,56,54,50,41,0,0,0,0};
-static C_char C_TLS li359[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,97,108,108,49,56,54,56,41,0,0};
-static C_char C_TLS li360[] C_aligned={C_lihdr(0,0,37),40,102,111,114,45,101,97,99,104,32,102,110,49,56,53,49,32,108,115,116,49,49,56,53,50,32,46,32,108,115,116,115,49,56,53,51,41,0,0,0};
-static C_char C_TLS li361[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,56,51,32,103,49,56,57,51,49,56,57,55,41,0,0,0,0};
-static C_char C_TLS li362[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,97,108,108,49,57,48,53,41,0,0};
-static C_char C_TLS li363[] C_aligned={C_lihdr(0,0,32),40,109,97,112,32,102,110,49,56,55,56,32,108,115,116,49,49,56,55,57,32,46,32,108,115,116,115,49,56,56,48,41};
-static C_char C_TLS li364[] C_aligned={C_lihdr(0,0,22),40,97,49,48,52,48,56,32,46,32,114,101,115,117,108,116,115,49,57,50,50,41,0,0};
-static C_char C_TLS li365[] C_aligned={C_lihdr(0,0,45),40,100,121,110,97,109,105,99,45,119,105,110,100,32,98,101,102,111,114,101,49,57,49,57,32,116,104,117,110,107,49,57,50,48,32,97,102,116,101,114,49,57,50,49,41,0,0,0};
-static C_char C_TLS li366[] C_aligned={C_lihdr(0,0,22),40,97,49,48,52,51,56,32,46,32,114,101,115,117,108,116,115,49,57,51,49,41,0,0};
-static C_char C_TLS li367[] C_aligned={C_lihdr(0,0,17),40,97,49,48,52,51,50,32,99,111,110,116,49,57,51,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li368[] C_aligned={C_lihdr(0,0,41),40,99,97,108,108,45,119,105,116,104,45,99,117,114,114,101,110,116,45,99,111,110,116,105,110,117,97,116,105,111,110,32,112,114,111,99,49,57,50,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li369[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,100,121,110,97,109,105,99,45,117,110,119,105,110,100,32,119,105,110,100,115,49,57,51,54,32,110,49,57,51,55,41,0,0};
-static C_char C_TLS li370[] C_aligned={C_lihdr(0,0,31),40,99,111,110,116,105,110,117,97,116,105,111,110,45,99,97,112,116,117,114,101,32,112,114,111,99,49,57,53,55,41,0};
-static C_char C_TLS li371[] C_aligned={C_lihdr(0,0,21),40,99,111,110,116,105,110,117,97,116,105,111,110,63,32,120,49,57,54,49,41,0,0,0};
-static C_char C_TLS li372[] C_aligned={C_lihdr(0,0,20),67,95,99,111,110,116,105,110,117,97,116,105,111,110,95,103,114,97,102,116,0,0,0,0};
-static C_char C_TLS li373[] C_aligned={C_lihdr(0,0,36),40,99,111,110,116,105,110,117,97,116,105,111,110,45,103,114,97,102,116,32,107,49,57,54,51,32,116,104,117,110,107,49,57,54,52,41,0,0,0,0};
-static C_char C_TLS li374[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,56,51,41};
-static C_char C_TLS li375[] C_aligned={C_lihdr(0,0,38),40,99,111,110,116,105,110,117,97,116,105,111,110,45,114,101,116,117,114,110,32,107,49,57,55,49,32,46,32,118,97,108,115,49,57,55,50,41,0,0};
-static C_char C_TLS li376[] C_aligned={C_lihdr(0,0,13),40,112,111,114,116,63,32,120,49,57,55,53,41,0,0,0};
-static C_char C_TLS li377[] C_aligned={C_lihdr(0,0,19),40,105,110,112,117,116,45,112,111,114,116,63,32,120,49,57,55,56,41,0,0,0,0,0};
-static C_char C_TLS li378[] C_aligned={C_lihdr(0,0,20),40,111,117,116,112,117,116,45,112,111,114,116,63,32,120,49,57,56,55,41,0,0,0,0};
-static C_char C_TLS li379[] C_aligned={C_lihdr(0,0,53),40,35,35,115,121,115,35,109,97,107,101,45,112,111,114,116,32,105,47,111,49,57,57,54,32,99,108,97,115,115,49,57,57,55,32,110,97,109,101,49,57,57,56,32,116,121,112,101,49,57,57,57,41,0,0,0};
-static C_char C_TLS li380[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,57,56,32,112,50,48,48,55,41,0,0};
-static C_char C_TLS li381[] C_aligned={C_lihdr(0,0,14),40,97,50,50,48,48,49,32,112,50,48,48,56,41,0,0};
-static C_char C_TLS li382[] C_aligned={C_lihdr(0,0,20),40,97,50,50,48,48,52,32,112,50,48,48,57,32,99,50,48,49,48,41,0,0,0,0};
-static C_char C_TLS li383[] C_aligned={C_lihdr(0,0,20),40,97,50,50,48,48,55,32,112,50,48,49,49,32,115,50,48,49,50,41,0,0,0,0};
-static C_char C_TLS li384[] C_aligned={C_lihdr(0,0,14),40,97,50,50,48,49,48,32,112,50,48,49,51,41,0,0};
-static C_char C_TLS li385[] C_aligned={C_lihdr(0,0,14),40,97,50,50,48,49,54,32,112,50,48,49,53,41,0,0};
-static C_char C_TLS li386[] C_aligned={C_lihdr(0,0,14),40,97,50,50,48,49,57,32,112,50,48,49,54,41,0,0};
-static C_char C_TLS li387[] C_aligned={C_lihdr(0,0,24),40,108,111,111,112,32,97,99,116,50,48,50,51,32,115,116,97,114,116,50,48,50,52,41};
-static C_char C_TLS li388[] C_aligned={C_lihdr(0,0,39),40,97,50,50,48,50,50,32,112,50,48,49,55,32,110,50,48,49,56,32,100,101,115,116,50,48,49,57,32,115,116,97,114,116,50,48,50,48,41,0};
-static C_char C_TLS li389[] C_aligned={C_lihdr(0,0,52),40,108,111,111,112,32,108,101,110,50,48,52,57,32,108,105,109,105,116,50,48,53,48,32,98,117,102,102,101,114,50,48,53,49,32,114,101,115,117,108,116,50,48,53,50,32,102,50,48,53,51,41,0,0,0,0};
-static C_char C_TLS li390[] C_aligned={C_lihdr(0,0,24),40,97,50,50,48,55,56,32,112,50,48,52,51,32,108,105,109,105,116,50,48,52,52,41};
-static C_char C_TLS li391[] C_aligned={C_lihdr(0,0,16),67,95,111,112,101,110,95,102,105,108,101,95,112,111,114,116};
-static C_char C_TLS li392[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,101,99,107,45,112,111,114,116,32,120,50,48,55,50,32,46,32,108,111,99,50,48,55,51,41,0,0,0,0,0,0};
-static C_char C_TLS li393[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,99,104,101,99,107,45,112,111,114,116,45,109,111,100,101,32,112,111,114,116,50,48,56,52,32,109,111,100,101,50,48,56,53,32,46,32,108,111,99,50,48,56,54,41,0,0,0,0,0};
-static C_char C_TLS li394[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,99,104,101,99,107,45,112,111,114,116,42,32,112,50,48,57,50,32,108,111,99,50,48,57,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li395[] C_aligned={C_lihdr(0,0,30),40,99,117,114,114,101,110,116,45,105,110,112,117,116,45,112,111,114,116,32,46,32,97,114,103,50,48,57,57,41,0,0};
-static C_char C_TLS li396[] C_aligned={C_lihdr(0,0,31),40,99,117,114,114,101,110,116,45,111,117,116,112,117,116,45,112,111,114,116,32,46,32,97,114,103,50,49,48,51,41,0};
-static C_char C_TLS li397[] C_aligned={C_lihdr(0,0,30),40,99,117,114,114,101,110,116,45,101,114,114,111,114,45,112,111,114,116,32,46,32,97,114,103,50,49,48,55,41,0,0};
-static C_char C_TLS li398[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,116,116,121,45,112,111,114,116,63,32,112,111,114,116,50,49,49,49,41,0,0,0,0,0,0};
-static C_char C_TLS li399[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,112,111,114,116,45,100,97,116,97,32,112,111,114,116,50,49,49,53,41,0,0,0,0,0,0};
-static C_char C_TLS li400[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,115,101,116,45,112,111,114,116,45,100,97,116,97,33,32,112,111,114,116,50,49,49,55,32,100,97,116,97,50,49,49,56,41};
-static C_char C_TLS li401[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,112,108,97,116,102,111,114,109,45,102,105,120,117,112,45,112,97,116,104,110,97,109,101,32,110,97,109,101,50,49,50,52,41};
-static C_char C_TLS li402[] C_aligned={C_lihdr(0,0,54),40,35,35,115,121,115,35,112,97,116,104,110,97,109,101,45,114,101,115,111,108,117,116,105,111,110,32,110,97,109,101,50,49,51,51,32,116,104,117,110,107,50,49,51,52,32,46,32,95,50,49,51,53,41,0,0};
-static C_char C_TLS li403[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,50,49,53,49,41,0,0,0,0};
-static C_char C_TLS li404[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,101,120,112,97,110,100,45,104,111,109,101,45,112,97,116,104,32,112,97,116,104,50,49,51,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li405[] C_aligned={C_lihdr(0,0,22),40,100,111,108,111,111,112,50,49,55,51,32,109,111,100,101,115,50,49,55,55,41,0,0};
-static C_char C_TLS li406[] C_aligned={C_lihdr(0,0,17),40,97,49,48,57,55,53,32,110,97,109,101,50,49,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li407[] C_aligned={C_lihdr(0,0,41),40,111,112,101,110,32,110,97,109,101,50,49,54,54,32,105,110,112,50,49,54,55,32,109,111,100,101,115,50,49,54,56,32,108,111,99,50,49,54,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li408[] C_aligned={C_lihdr(0,0,24),40,99,108,111,115,101,32,112,111,114,116,50,49,57,51,32,108,111,99,50,49,57,52,41};
-static C_char C_TLS li409[] C_aligned={C_lihdr(0,0,37),40,111,112,101,110,45,105,110,112,117,116,45,102,105,108,101,32,110,97,109,101,50,50,48,50,32,46,32,109,111,100,101,50,50,48,51,41,0,0,0};
-static C_char C_TLS li410[] C_aligned={C_lihdr(0,0,38),40,111,112,101,110,45,111,117,116,112,117,116,45,102,105,108,101,32,110,97,109,101,50,50,48,52,32,46,32,109,111,100,101,50,50,48,53,41,0,0};
-static C_char C_TLS li411[] C_aligned={C_lihdr(0,0,27),40,99,108,111,115,101,45,105,110,112,117,116,45,112,111,114,116,32,112,111,114,116,50,50,48,54,41,0,0,0,0,0};
-static C_char C_TLS li412[] C_aligned={C_lihdr(0,0,28),40,99,108,111,115,101,45,111,117,116,112,117,116,45,112,111,114,116,32,112,111,114,116,50,50,48,55,41,0,0,0,0};
-static C_char C_TLS li413[] C_aligned={C_lihdr(0,0,8),40,97,49,49,49,50,50,41};
-static C_char C_TLS li414[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,50,56,32,46,32,114,101,115,117,108,116,115,50,50,49,57,41,0,0};
-static C_char C_TLS li415[] C_aligned={C_lihdr(0,0,48),40,99,97,108,108,45,119,105,116,104,45,105,110,112,117,116,45,102,105,108,101,32,110,97,109,101,50,50,49,53,32,112,50,50,49,54,32,46,32,109,111,100,101,50,50,49,55,41};
-static C_char C_TLS li416[] C_aligned={C_lihdr(0,0,8),40,97,49,49,49,52,54,41};
-static C_char C_TLS li417[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,53,50,32,46,32,114,101,115,117,108,116,115,50,50,50,55,41,0,0};
-static C_char C_TLS li418[] C_aligned={C_lihdr(0,0,49),40,99,97,108,108,45,119,105,116,104,45,111,117,116,112,117,116,45,102,105,108,101,32,110,97,109,101,50,50,50,51,32,112,50,50,50,52,32,46,32,109,111,100,101,50,50,50,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li419[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,55,49,32,46,32,114,101,115,117,108,116,115,50,50,51,54,41,0,0};
-static C_char C_TLS li420[] C_aligned={C_lihdr(0,0,51),40,119,105,116,104,45,105,110,112,117,116,45,102,114,111,109,45,102,105,108,101,32,115,116,114,50,50,51,49,32,116,104,117,110,107,50,50,51,50,32,46,32,109,111,100,101,50,50,51,51,41,0,0,0,0,0};
-static C_char C_TLS li421[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,57,49,32,46,32,114,101,115,117,108,116,115,50,50,52,55,41,0,0};
-static C_char C_TLS li422[] C_aligned={C_lihdr(0,0,50),40,119,105,116,104,45,111,117,116,112,117,116,45,116,111,45,102,105,108,101,32,115,116,114,50,50,52,50,32,116,104,117,110,107,50,50,52,51,32,46,32,109,111,100,101,50,50,52,52,41,0,0,0,0,0,0};
-static C_char C_TLS li423[] C_aligned={C_lihdr(0,0,17),40,97,49,49,50,49,48,32,110,97,109,101,50,50,53,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li424[] C_aligned={C_lihdr(0,0,23),40,102,105,108,101,45,101,120,105,115,116,115,63,32,110,97,109,101,50,50,53,50,41,0};
-static C_char C_TLS li425[] C_aligned={C_lihdr(0,0,17),40,97,49,49,50,51,50,32,110,97,109,101,50,50,53,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li426[] C_aligned={C_lihdr(0,0,28),40,100,105,114,101,99,116,111,114,121,45,101,120,105,115,116,115,63,32,110,97,109,101,50,50,53,56,41,0,0,0,0};
-static C_char C_TLS li427[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,102,108,117,115,104,45,111,117,116,112,117,116,32,112,111,114,116,50,50,54,55,41,0,0,0};
-static C_char C_TLS li428[] C_aligned={C_lihdr(0,0,28),40,102,108,117,115,104,45,111,117,116,112,117,116,32,46,32,116,109,112,50,50,55,55,50,50,55,56,41,0,0,0,0};
-static C_char C_TLS li429[] C_aligned={C_lihdr(0,0,25),40,112,111,114,116,45,110,97,109,101,32,46,32,116,109,112,50,50,57,50,50,50,57,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li430[] C_aligned={C_lihdr(0,0,34),40,115,101,116,45,112,111,114,116,45,110,97,109,101,33,32,112,111,114,116,50,51,48,49,32,110,97,109,101,50,51,48,50,41,0,0,0,0,0,0};
-static C_char C_TLS li431[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,112,111,114,116,45,108,105,110,101,32,112,111,114,116,50,51,48,54,41,0,0,0,0,0,0};
-static C_char C_TLS li432[] C_aligned={C_lihdr(0,0,29),40,112,111,114,116,45,112,111,115,105,116,105,111,110,32,46,32,116,109,112,50,51,49,53,50,51,49,54,41,0,0,0};
-static C_char C_TLS li433[] C_aligned={C_lihdr(0,0,21),40,97,49,49,52,49,49,32,102,105,108,101,110,97,109,101,50,51,50,53,41,0,0,0};
-static C_char C_TLS li434[] C_aligned={C_lihdr(0,0,26),40,100,101,108,101,116,101,45,102,105,108,101,32,102,105,108,101,110,97,109,101,50,51,50,52,41,0,0,0,0,0,0};
-static C_char C_TLS li435[] C_aligned={C_lihdr(0,0,16),40,97,49,49,52,53,55,32,110,101,119,50,51,51,53,41};
-static C_char C_TLS li436[] C_aligned={C_lihdr(0,0,16),40,97,49,49,52,53,49,32,111,108,100,50,51,51,52,41};
-static C_char C_TLS li437[] C_aligned={C_lihdr(0,0,29),40,114,101,110,97,109,101,45,102,105,108,101,32,111,108,100,50,51,51,50,32,110,101,119,50,51,51,51,41,0,0,0};
-static C_char C_TLS li438[] C_aligned={C_lihdr(0,0,15),40,102,95,49,49,53,57,49,32,120,50,51,52,55,41,0};
-static C_char C_TLS li439[] C_aligned={C_lihdr(0,0,19),40,102,95,49,49,53,49,51,32,46,32,97,114,103,50,51,53,50,41,0,0,0,0,0};
-static C_char C_TLS li440[] C_aligned={C_lihdr(0,0,37),40,109,97,107,101,45,112,97,114,97,109,101,116,101,114,32,105,110,105,116,50,51,52,51,32,46,32,103,117,97,114,100,50,51,52,52,41,0,0,0};
-static C_char C_TLS li441[] C_aligned={C_lihdr(0,0,19),40,101,111,102,45,111,98,106,101,99,116,63,32,120,50,51,54,57,41,0,0,0,0,0};
-static C_char C_TLS li442[] C_aligned={C_lihdr(0,0,27),40,99,104,97,114,45,114,101,97,100,121,63,32,46,32,116,109,112,50,51,55,54,50,51,55,55,41,0,0,0,0,0};
-static C_char C_TLS li443[] C_aligned={C_lihdr(0,0,25),40,114,101,97,100,45,99,104,97,114,32,46,32,116,109,112,50,51,57,51,50,51,57,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li444[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,114,101,97,100,45,99,104,97,114,45,48,32,112,50,52,48,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li445[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,114,101,97,100,45,99,104,97,114,47,112,111,114,116,32,112,111,114,116,50,52,49,53,41,0};
-static C_char C_TLS li446[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,112,101,101,107,45,99,104,97,114,45,48,32,112,50,52,49,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li447[] C_aligned={C_lihdr(0,0,25),40,112,101,101,107,45,99,104,97,114,32,46,32,116,109,112,50,52,51,50,50,52,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li448[] C_aligned={C_lihdr(0,0,20),40,114,101,97,100,32,46,32,116,109,112,50,52,52,55,50,52,52,56,41,0,0,0,0};
-static C_char C_TLS li449[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,114,101,97,100,45,112,114,111,109,112,116,45,104,111,111,107,41};
-static C_char C_TLS li450[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,105,110,102,105,120,45,108,105,115,116,45,104,111,111,107,32,108,115,116,50,52,53,56,41,0};
-static C_char C_TLS li451[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,115,104,97,114,112,45,110,117,109,98,101,114,45,104,111,111,107,32,112,111,114,116,50,52,54,48,32,110,50,52,54,49,41};
-static C_char C_TLS li452[] C_aligned={C_lihdr(0,0,48),40,35,35,115,121,115,35,114,101,97,100,45,119,97,114,110,105,110,103,32,112,111,114,116,50,52,54,51,32,109,115,103,50,52,54,52,32,46,32,97,114,103,115,50,52,54,53,41};
-static C_char C_TLS li453[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,114,101,97,100,45,101,114,114,111,114,32,112,111,114,116,50,52,55,48,32,109,115,103,50,52,55,49,32,46,32,97,114,103,115,50,52,55,50,41,0,0};
-static C_char C_TLS li454[] C_aligned={C_lihdr(0,0,15),40,102,95,49,49,57,51,50,32,99,50,53,48,51,41,0};
-static C_char C_TLS li455[] C_aligned={C_lihdr(0,0,33),40,105,110,102,111,32,99,108,97,115,115,50,53,48,52,32,100,97,116,97,50,53,48,53,32,118,97,108,50,53,48,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li456[] C_aligned={C_lihdr(0,0,12),40,115,107,105,112,32,99,50,53,48,56,41,0,0,0,0};
-static C_char C_TLS li457[] C_aligned={C_lihdr(0,0,13),40,115,107,105,112,45,116,111,45,101,111,108,41,0,0,0};
-static C_char C_TLS li458[] C_aligned={C_lihdr(0,0,26),40,114,101,115,101,114,118,101,100,45,99,104,97,114,97,99,116,101,114,32,99,50,53,49,50,41,0,0,0,0,0,0};
-static C_char C_TLS li459[] C_aligned={C_lihdr(0,0,33),40,114,101,97,100,45,117,110,114,101,115,101,114,118,101,100,45,99,104,97,114,45,48,32,112,111,114,116,50,53,49,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li460[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,99,50,53,51,55,41,0,0,0,0};
-static C_char C_TLS li461[] C_aligned={C_lihdr(0,0,10),40,114,45,115,112,97,99,101,115,41,0,0,0,0,0,0};
-static C_char C_TLS li462[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,115,101,113,50,53,53,53,32,110,50,53,53,54,41,0,0,0,0};
-static C_char C_TLS li463[] C_aligned={C_lihdr(0,0,25),40,114,45,117,115,101,113,117,101,110,99,101,32,117,50,53,53,50,32,110,50,53,53,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li464[] C_aligned={C_lihdr(0,0,18),40,108,112,32,105,50,53,55,56,32,108,115,116,50,53,55,57,41,0,0,0,0,0,0};
-static C_char C_TLS li465[] C_aligned={C_lihdr(0,0,33),40,114,45,99,111,110,115,45,99,111,100,101,112,111,105,110,116,32,99,112,50,53,55,50,32,108,115,116,50,53,55,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li466[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,53,56,51,32,108,115,116,50,53,56,52,41,0,0,0,0};
-static C_char C_TLS li467[] C_aligned={C_lihdr(0,0,19),40,114,45,115,116,114,105,110,103,32,116,101,114,109,50,53,56,49,41,0,0,0,0,0};
-static C_char C_TLS li468[] C_aligned={C_lihdr(0,0,15),40,102,95,49,50,53,53,51,32,99,50,54,50,51,41,0};
-static C_char C_TLS li469[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,108,97,115,116,50,54,50,53,41,0};
-static C_char C_TLS li470[] C_aligned={C_lihdr(0,0,19),40,97,49,50,53,52,57,32,114,101,116,117,114,110,50,54,50,50,41,0,0,0,0,0};
-static C_char C_TLS li471[] C_aligned={C_lihdr(0,0,26),40,114,45,108,105,115,116,32,115,116,97,114,116,50,54,49,55,32,101,110,100,50,54,49,56,41,0,0,0,0,0,0};
-static C_char C_TLS li472[] C_aligned={C_lihdr(0,0,10),40,114,45,118,101,99,116,111,114,41,0,0,0,0,0,0};
-static C_char C_TLS li473[] C_aligned={C_lihdr(0,0,20),40,114,45,110,117,109,98,101,114,32,114,97,100,105,120,50,54,57,51,41,0,0,0,0};
-static C_char C_TLS li474[] C_aligned={C_lihdr(0,0,35),40,114,45,110,117,109,98,101,114,45,119,105,116,104,45,101,120,97,99,116,110,101,115,115,32,114,97,100,105,120,50,55,49,51,41,0,0,0,0,0};
-static C_char C_TLS li475[] C_aligned={C_lihdr(0,0,21),40,114,45,110,117,109,98,101,114,45,119,105,116,104,45,114,97,100,105,120,41,0,0,0};
-static C_char C_TLS li476[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,55,52,51,32,108,115,116,50,55,52,52,41,0,0,0,0};
-static C_char C_TLS li477[] C_aligned={C_lihdr(0,0,9),40,114,45,116,111,107,101,110,41,0,0,0,0,0,0,0};
-static C_char C_TLS li478[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,55,54,55,32,108,115,116,50,55,54,56,41,0,0,0,0};
-static C_char C_TLS li479[] C_aligned={C_lihdr(0,0,10),40,114,45,100,105,103,105,116,115,41,0,0,0,0,0,0};
-static C_char C_TLS li480[] C_aligned={C_lihdr(0,0,10),40,114,45,115,121,109,98,111,108,41,0,0,0,0,0,0};
-static C_char C_TLS li481[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,55,56,53,32,108,115,116,50,55,56,54,41,0,0,0,0};
-static C_char C_TLS li482[] C_aligned={C_lihdr(0,0,10),40,114,45,120,116,111,107,101,110,41,0,0,0,0,0,0};
-static C_char C_TLS li483[] C_aligned={C_lihdr(0,0,8),40,114,45,99,104,97,114,41};
-static C_char C_TLS li484[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,50,56,53,52,41,0,0,0,0};
-static C_char C_TLS li485[] C_aligned={C_lihdr(0,0,11),40,114,45,99,111,109,109,101,110,116,41,0,0,0,0,0};
-static C_char C_TLS li486[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,50,56,54,57,41,0,0,0,0};
-static C_char C_TLS li487[] C_aligned={C_lihdr(0,0,14),40,114,45,101,120,116,45,115,121,109,98,111,108,41,0,0};
-static C_char C_TLS li488[] C_aligned={C_lihdr(0,0,24),40,114,101,115,111,108,118,101,45,115,121,109,98,111,108,32,116,111,107,50,56,56,50,41};
-static C_char C_TLS li489[] C_aligned={C_lihdr(0,0,23),40,98,117,105,108,100,45,107,101,121,119,111,114,100,32,116,111,107,50,57,48,56,41,0};
-static C_char C_TLS li490[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,56,54,41};
-static C_char C_TLS li491[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,57,49,41};
-static C_char C_TLS li492[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,57,55,41};
-static C_char C_TLS li493[] C_aligned={C_lihdr(0,0,9),40,114,101,97,100,114,101,99,41,0,0,0,0,0,0,0};
-static C_char C_TLS li494[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,114,101,97,100,32,112,111,114,116,50,52,56,55,32,105,110,102,111,104,97,110,100,108,101,114,50,52,56,56,41,0,0,0};
-static C_char C_TLS li495[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,99,104,97,114,45,62,117,116,102,56,45,115,116,114,105,110,103,32,99,51,48,55,51,41,0};
-static C_char C_TLS li496[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,117,110,105,99,111,100,101,45,115,117,114,114,111,103,97,116,101,63,32,110,51,48,56,50,41};
-static C_char C_TLS li497[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,115,117,114,114,111,103,97,116,101,115,45,62,99,111,100,101,112,111,105,110,116,32,104,105,51,48,56,54,32,108,111,51,48,56,55,41,0,0,0,0,0};
-static C_char C_TLS li498[] C_aligned={C_lihdr(0,0,27),40,102,95,49,52,53,52,54,32,99,104,97,114,51,48,57,55,32,112,111,114,116,51,48,57,56,41,0,0,0,0,0};
-static C_char C_TLS li499[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,115,101,116,45,114,101,97,100,45,109,97,114,107,33,32,115,121,109,51,49,49,55,32,112,114,111,99,51,49,49,56,41,0};
-static C_char C_TLS li500[] C_aligned={C_lihdr(0,0,26),40,102,95,49,52,54,48,56,32,99,104,114,51,49,50,54,32,112,114,111,99,51,49,50,55,41,0,0,0,0,0,0};
-static C_char C_TLS li501[] C_aligned={C_lihdr(0,0,41),40,115,121,110,116,97,120,45,115,101,116,116,101,114,32,108,111,99,51,49,50,51,32,115,108,111,116,51,49,50,52,32,119,114,97,112,51,49,50,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li502[] C_aligned={C_lihdr(0,0,24),40,99,111,112,121,45,114,101,97,100,45,116,97,98,108,101,32,114,116,51,49,53,56,41};
-static C_char C_TLS li503[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,119,114,105,116,101,45,99,104,97,114,45,48,32,99,51,49,55,48,32,112,51,49,55,49,41};
-static C_char C_TLS li504[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,119,114,105,116,101,45,99,104,97,114,47,112,111,114,116,32,99,51,49,55,53,32,112,111,114,116,51,49,55,54,41,0,0};
-static C_char C_TLS li505[] C_aligned={C_lihdr(0,0,32),40,119,114,105,116,101,45,99,104,97,114,32,99,51,49,56,54,32,46,32,116,109,112,51,49,56,53,51,49,56,55,41};
-static C_char C_TLS li506[] C_aligned={C_lihdr(0,0,23),40,110,101,119,108,105,110,101,32,46,32,116,109,112,51,50,48,50,51,50,48,51,41,0};
-static C_char C_TLS li507[] C_aligned={C_lihdr(0,0,27),40,119,114,105,116,101,32,120,51,50,49,54,32,46,32,116,109,112,51,50,49,53,51,50,49,55,41,0,0,0,0,0};
-static C_char C_TLS li508[] C_aligned={C_lihdr(0,0,29),40,100,105,115,112,108,97,121,32,120,51,50,51,49,32,46,32,116,109,112,51,50,51,48,51,50,51,50,41,0,0,0};
-static C_char C_TLS li509[] C_aligned={C_lihdr(0,0,22),40,97,49,52,56,55,56,32,103,51,50,54,49,51,50,54,50,51,50,54,51,41,0,0};
-static C_char C_TLS li510[] C_aligned={C_lihdr(0,0,18),40,112,114,105,110,116,32,46,32,97,114,103,115,51,50,52,49,41,0,0,0,0,0,0};
-static C_char C_TLS li511[] C_aligned={C_lihdr(0,0,22),40,97,49,52,57,48,49,32,103,51,50,56,57,51,50,57,48,51,50,57,49,41,0,0};
-static C_char C_TLS li512[] C_aligned={C_lihdr(0,0,19),40,112,114,105,110,116,42,32,46,32,97,114,103,115,51,50,54,57,41,0,0,0,0,0};
-static C_char C_TLS li513[] C_aligned={C_lihdr(0,0,25),40,111,117,116,115,116,114,32,112,111,114,116,51,51,49,52,32,115,116,114,51,51,49,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li514[] C_aligned={C_lihdr(0,0,25),40,111,117,116,99,104,114,32,112,111,114,116,51,51,51,53,32,99,104,114,51,51,51,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li515[] C_aligned={C_lihdr(0,0,14),40,115,112,101,99,105,97,108,99,104,97,114,63,41,0,0};
-static C_char C_TLS li516[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,51,54,53,41,0,0,0,0};
-static C_char C_TLS li517[] C_aligned={C_lihdr(0,0,33),40,111,117,116,114,101,97,100,97,98,108,101,115,121,109,32,112,111,114,116,51,51,54,49,32,115,116,114,51,51,54,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li518[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,51,57,55,41,0,0,0,0};
-static C_char C_TLS li519[] C_aligned={C_lihdr(0,0,26),40,115,121,109,45,105,115,45,114,101,97,100,97,98,108,101,63,32,115,116,114,51,51,55,56,41,0,0,0,0,0,0};
-static C_char C_TLS li520[] C_aligned={C_lihdr(0,0,14),40,103,51,52,53,52,32,99,110,51,52,53,54,41,0,0};
-static C_char C_TLS li521[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,51,52,56,55,32,105,51,52,57,49,32,99,51,52,57,50,41};
-static C_char C_TLS li522[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,51,53,49,56,32,120,51,53,50,50,41,0,0,0,0,0,0};
-static C_char C_TLS li523[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,51,53,52,56,32,105,51,53,53,50,32,99,51,53,53,51,41};
-static C_char C_TLS li524[] C_aligned={C_lihdr(0,0,11),40,111,117,116,32,120,51,52,51,50,41,0,0,0,0,0};
-static C_char C_TLS li525[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,112,114,105,110,116,32,120,51,51,48,49,32,114,101,97,100,97,98,108,101,51,51,48,50,32,112,111,114,116,51,51,48,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li526[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,112,114,111,99,101,100,117,114,101,45,62,115,116,114,105,110,103,32,120,51,53,54,56,41,0};
-static C_char C_TLS li527[] C_aligned={C_lihdr(0,0,49),40,35,35,115,121,115,35,114,101,103,105,115,116,101,114,45,114,101,99,111,114,100,45,112,114,105,110,116,101,114,32,116,121,112,101,51,53,55,49,32,112,114,111,99,51,53,55,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li528[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,117,115,101,114,45,112,114,105,110,116,45,104,111,111,107,32,120,51,53,55,54,32,114,101,97,100,97,98,108,101,51,53,55,55,32,112,111,114,116,51,53,55,56,41,0,0,0,0,0};
-static C_char C_TLS li529[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,51,54,48,52,41,0,0,0,0,0,0};
-static C_char C_TLS li530[] C_aligned={C_lihdr(0,0,8),40,97,49,54,48,48,57,41};
-static C_char C_TLS li531[] C_aligned={C_lihdr(0,0,19),40,97,49,53,57,56,48,32,114,101,116,117,114,110,51,54,48,51,41,0,0,0,0,0};
-static C_char C_TLS li532[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,119,105,116,104,45,112,114,105,110,116,45,108,101,110,103,116,104,45,108,105,109,105,116,32,108,105,109,105,116,51,54,48,49,32,116,104,117,110,107,51,54,48,50,41,0,0,0,0,0};
-static C_char C_TLS li533[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,120,51,54,51,55,32,120,115,51,54,51,56,41,0,0,0,0,0};
-static C_char C_TLS li534[] C_aligned={C_lihdr(0,0,22),40,98,105,116,119,105,115,101,45,97,110,100,32,46,32,120,115,51,54,51,53,41,0,0};
-static C_char C_TLS li535[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,120,51,54,52,51,32,120,115,51,54,52,52,41,0,0,0,0,0};
-static C_char C_TLS li536[] C_aligned={C_lihdr(0,0,22),40,98,105,116,119,105,115,101,45,105,111,114,32,46,32,120,115,51,54,52,49,41,0,0};
-static C_char C_TLS li537[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,120,51,54,52,57,32,120,115,51,54,53,48,41,0,0,0,0,0};
-static C_char C_TLS li538[] C_aligned={C_lihdr(0,0,22),40,98,105,116,119,105,115,101,45,120,111,114,32,46,32,120,115,51,54,52,55,41,0,0};
-static C_char C_TLS li539[] C_aligned={C_lihdr(0,0,19),40,98,105,116,119,105,115,101,45,110,111,116,32,120,51,54,53,51,41,0,0,0,0,0};
-static C_char C_TLS li540[] C_aligned={C_lihdr(0,0,30),40,97,114,105,116,104,109,101,116,105,99,45,115,104,105,102,116,32,120,51,54,53,53,32,121,51,54,53,54,41,0,0};
-static C_char C_TLS li541[] C_aligned={C_lihdr(0,0,22),40,98,105,116,45,115,101,116,63,32,110,51,54,53,56,32,105,51,54,53,57,41,0,0};
-static C_char C_TLS li542[] C_aligned={C_lihdr(0,0,19),40,99,104,101,99,107,32,112,51,54,54,49,32,110,51,54,54,50,41,0,0,0,0,0};
-static C_char C_TLS li543[] C_aligned={C_lihdr(0,0,14),40,97,50,49,55,51,54,32,112,51,54,55,57,41,0,0};
-static C_char C_TLS li544[] C_aligned={C_lihdr(0,0,14),40,97,50,49,55,54,49,32,112,51,54,56,53,41,0,0};
-static C_char C_TLS li545[] C_aligned={C_lihdr(0,0,20),40,97,50,49,55,55,57,32,112,51,54,56,57,32,99,51,54,57,48,41,0,0,0,0};
-static C_char C_TLS li546[] C_aligned={C_lihdr(0,0,22),40,97,50,49,55,57,56,32,112,51,54,57,53,32,115,116,114,51,54,57,54,41,0,0};
-static C_char C_TLS li547[] C_aligned={C_lihdr(0,0,14),40,97,50,49,56,49,55,32,112,51,55,48,50,41,0,0};
-static C_char C_TLS li548[] C_aligned={C_lihdr(0,0,14),40,97,50,49,56,50,55,32,112,51,55,48,51,41,0,0};
-static C_char C_TLS li549[] C_aligned={C_lihdr(0,0,14),40,97,50,49,56,51,48,32,112,51,55,48,52,41,0,0};
-static C_char C_TLS li550[] C_aligned={C_lihdr(0,0,39),40,97,50,49,56,52,52,32,112,51,55,48,53,32,110,51,55,48,54,32,100,101,115,116,51,55,48,55,32,115,116,97,114,116,51,55,48,56,41,0};
-static C_char C_TLS li551[] C_aligned={C_lihdr(0,0,26),40,97,50,49,57,49,51,32,112,111,115,50,51,55,50,57,32,110,101,120,116,51,55,51,48,41,0,0,0,0,0,0};
-static C_char C_TLS li552[] C_aligned={C_lihdr(0,0,24),40,97,50,49,56,56,53,32,112,51,55,50,50,32,108,105,109,105,116,51,55,50,51,41};
-static C_char C_TLS li553[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,112,111,115,50,51,55,52,52,41,0};
-static C_char C_TLS li554[] C_aligned={C_lihdr(0,0,56),40,35,35,115,121,115,35,115,99,97,110,45,98,117,102,102,101,114,45,108,105,110,101,32,98,117,102,51,55,51,57,32,108,105,109,105,116,51,55,52,48,32,112,111,115,51,55,52,49,32,107,51,55,52,50,41};
-static C_char C_TLS li555[] C_aligned={C_lihdr(0,0,30),40,111,112,101,110,45,105,110,112,117,116,45,115,116,114,105,110,103,32,115,116,114,105,110,103,51,55,53,56,41,0,0};
-static C_char C_TLS li556[] C_aligned={C_lihdr(0,0,20),40,111,112,101,110,45,111,117,116,112,117,116,45,115,116,114,105,110,103,41,0,0,0,0};
-static C_char C_TLS li557[] C_aligned={C_lihdr(0,0,28),40,103,101,116,45,111,117,116,112,117,116,45,115,116,114,105,110,103,32,112,111,114,116,51,55,55,48,41,0,0,0,0};
-static C_char C_TLS li558[] C_aligned={C_lihdr(0,0,13),40,103,51,55,56,54,32,120,51,55,56,56,41,0,0,0};
-static C_char C_TLS li559[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,55,55,57,32,103,51,55,56,51,51,55,56,53,41,0,0,0,0};
-static C_char C_TLS li560[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,112,114,105,110,116,45,116,111,45,115,116,114,105,110,103,32,120,115,51,55,55,53,41,0,0};
-static C_char C_TLS li561[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,112,111,105,110,116,101,114,45,62,115,116,114,105,110,103,32,120,51,55,57,51,41,0,0,0};
-static C_char C_TLS li562[] C_aligned={C_lihdr(0,0,15),40,115,111,102,116,119,97,114,101,45,116,121,112,101,41,0};
-static C_char C_TLS li563[] C_aligned={C_lihdr(0,0,14),40,109,97,99,104,105,110,101,45,116,121,112,101,41,0,0};
-static C_char C_TLS li564[] C_aligned={C_lihdr(0,0,20),40,109,97,99,104,105,110,101,45,98,121,116,101,45,111,114,100,101,114,41,0,0,0,0};
-static C_char C_TLS li565[] C_aligned={C_lihdr(0,0,18),40,115,111,102,116,119,97,114,101,45,118,101,114,115,105,111,110,41,0,0,0,0,0,0};
-static C_char C_TLS li566[] C_aligned={C_lihdr(0,0,16),40,98,117,105,108,100,45,112,108,97,116,102,111,114,109,41};
-static C_char C_TLS li567[] C_aligned={C_lihdr(0,0,11),40,99,45,114,117,110,116,105,109,101,41,0,0,0,0,0};
-static C_char C_TLS li568[] C_aligned={C_lihdr(0,0,11),40,115,116,114,32,120,51,56,52,48,41,0,0,0,0,0};
-static C_char C_TLS li569[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,45,118,101,114,115,105,111,110,32,46,32,116,109,112,51,56,50,55,51,56,50,56,41,0};
-static C_char C_TLS li570[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,45,62,102,101,97,116,117,114,101,45,105,100,32,120,51,56,53,49,41,0,0,0,0,0,0};
-static C_char C_TLS li571[] C_aligned={C_lihdr(0,0,13),40,99,104,101,99,107,32,102,51,56,54,49,41,0,0,0};
-static C_char C_TLS li572[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,56,56,48,32,103,51,56,56,52,51,56,56,54,41,0,0,0,0};
-static C_char C_TLS li573[] C_aligned={C_lihdr(0,0,28),40,114,101,103,105,115,116,101,114,45,102,101,97,116,117,114,101,33,32,46,32,102,115,51,56,55,55,41,0,0,0,0};
-static C_char C_TLS li574[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,102,102,115,51,57,50,51,41,0,0};
-static C_char C_TLS li575[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,57,48,49,32,103,51,57,49,49,51,57,49,53,41,0,0,0,0};
-static C_char C_TLS li576[] C_aligned={C_lihdr(0,0,30),40,117,110,114,101,103,105,115,116,101,114,45,102,101,97,116,117,114,101,33,32,46,32,102,115,51,56,57,55,41,0,0};
-static C_char C_TLS li577[] C_aligned={C_lihdr(0,0,10),40,102,101,97,116,117,114,101,115,41,0,0,0,0,0,0};
-static C_char C_TLS li578[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,51,57,51,50,41,0,0};
-static C_char C_TLS li579[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,102,101,97,116,117,114,101,63,32,46,32,105,100,115,51,57,51,48,41,0,0,0,0,0,0};
-static C_char C_TLS li580[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,57,55,56,41,0,0,0,0};
-static C_char C_TLS li581[] C_aligned={C_lihdr(0,0,31),40,98,111,100,121,51,57,53,57,32,115,116,97,114,116,51,57,54,56,32,116,104,114,101,97,100,51,57,54,57,41,0};
-static C_char C_TLS li582[] C_aligned={C_lihdr(0,0,31),40,100,101,102,45,116,104,114,101,97,100,51,57,54,50,32,37,115,116,97,114,116,51,57,53,55,51,57,57,50,41,0};
-static C_char C_TLS li583[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,115,116,97,114,116,51,57,54,49,41,0};
-static C_char C_TLS li584[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,103,101,116,45,99,97,108,108,45,99,104,97,105,110,32,46,32,116,109,112,51,57,53,50,51,57,53,51,41,0,0,0,0};
-static C_char C_TLS li585[] C_aligned={C_lihdr(0,0,8),40,97,49,55,48,56,51,41};
-static C_char C_TLS li586[] C_aligned={C_lihdr(0,0,16),40,103,52,48,49,51,32,105,110,102,111,52,48,49,53,41};
-static C_char C_TLS li587[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,48,48,54,32,103,52,48,49,48,52,48,49,50,41,0,0,0,0};
-static C_char C_TLS li588[] C_aligned={C_lihdr(0,0,61),40,35,35,115,121,115,35,114,101,97,108,108,121,45,112,114,105,110,116,45,99,97,108,108,45,99,104,97,105,110,32,112,111,114,116,51,57,57,57,32,99,104,97,105,110,52,48,48,48,32,104,101,97,100,101,114,52,48,48,49,41,0,0,0};
-static C_char C_TLS li589[] C_aligned={C_lihdr(0,0,51),40,98,111,100,121,52,48,52,56,32,112,111,114,116,52,48,53,57,32,115,116,97,114,116,52,48,54,48,32,116,104,114,101,97,100,52,48,54,49,32,104,101,97,100,101,114,52,48,54,50,41,0,0,0,0,0};
-static C_char C_TLS li590[] C_aligned={C_lihdr(0,0,61),40,100,101,102,45,104,101,97,100,101,114,52,48,53,51,32,37,112,111,114,116,52,48,52,52,52,48,54,55,32,37,115,116,97,114,116,52,48,52,53,52,48,54,56,32,37,116,104,114,101,97,100,52,48,52,54,52,48,54,57,41,0,0,0};
-static C_char C_TLS li591[] C_aligned={C_lihdr(0,0,45),40,100,101,102,45,116,104,114,101,97,100,52,48,53,50,32,37,112,111,114,116,52,48,52,52,52,48,55,49,32,37,115,116,97,114,116,52,48,52,53,52,48,55,50,41,0,0,0};
-static C_char C_TLS li592[] C_aligned={C_lihdr(0,0,29),40,100,101,102,45,115,116,97,114,116,52,48,53,49,32,37,112,111,114,116,52,48,52,52,52,48,55,52,41,0,0,0};
-static C_char C_TLS li593[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,112,111,114,116,52,48,53,48,41,0,0};
-static C_char C_TLS li594[] C_aligned={C_lihdr(0,0,32),40,112,114,105,110,116,45,99,97,108,108,45,99,104,97,105,110,32,46,32,116,109,112,52,48,51,57,52,48,52,48,41};
-static C_char C_TLS li595[] C_aligned={C_lihdr(0,0,7),40,98,114,101,97,107,41,0};
-static C_char C_TLS li596[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,117,115,101,114,45,105,110,116,101,114,114,117,112,116,45,104,111,111,107,41,0,0,0,0,0};
-static C_char C_TLS li597[] C_aligned={C_lihdr(0,0,9),40,102,95,49,55,50,55,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li598[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,99,108,101,97,110,117,112,45,98,101,102,111,114,101,45,101,120,105,116,41,0,0,0,0,0};
-static C_char C_TLS li599[] C_aligned={C_lihdr(0,0,19),40,111,110,45,101,120,105,116,32,116,104,117,110,107,52,49,55,50,41,0,0,0,0,0};
-static C_char C_TLS li600[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,49,57,49,32,103,52,49,57,53,52,49,57,55,41,0,0,0,0};
-static C_char C_TLS li601[] C_aligned={C_lihdr(0,0,47),40,35,35,115,121,115,35,115,105,103,110,97,108,45,104,111,111,107,32,109,111,100,101,52,49,55,54,32,109,115,103,52,49,55,55,32,46,32,97,114,103,115,52,49,55,56,41,0};
-static C_char C_TLS li602[] C_aligned={C_lihdr(0,0,19),40,35,35,115,121,115,35,97,98,111,114,116,32,120,52,50,51,52,41,0,0,0,0,0};
-static C_char C_TLS li603[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,115,105,103,110,97,108,32,120,52,50,51,55,41,0,0,0,0};
-static C_char C_TLS li604[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,53,54,49,32,99,52,50,51,57,41,0};
-static C_char C_TLS li605[] C_aligned={C_lihdr(0,0,8),40,97,49,55,55,50,54,41};
-static C_char C_TLS li606[] C_aligned={C_lihdr(0,0,8),40,97,49,55,55,51,48,41};
-static C_char C_TLS li607[] C_aligned={C_lihdr(0,0,46),40,119,105,116,104,45,101,120,99,101,112,116,105,111,110,45,104,97,110,100,108,101,114,32,104,97,110,100,108,101,114,52,50,56,48,32,116,104,117,110,107,52,50,56,49,41,0,0};
-static C_char C_TLS li608[] C_aligned={C_lihdr(0,0,27),40,99,117,114,114,101,110,116,45,101,120,99,101,112,116,105,111,110,45,104,97,110,100,108,101,114,41,0,0,0,0,0};
-static C_char C_TLS li609[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,114,111,112,115,52,50,56,56,41};
-static C_char C_TLS li610[] C_aligned={C_lihdr(0,0,46),40,109,97,107,101,45,112,114,111,112,101,114,116,121,45,99,111,110,100,105,116,105,111,110,32,107,105,110,100,52,50,56,53,32,46,32,112,114,111,112,115,52,50,56,54,41,0,0};
-static C_char C_TLS li611[] C_aligned={C_lihdr(0,0,10),40,108,111,111,112,52,50,57,54,41,0,0,0,0,0,0};
-static C_char C_TLS li612[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,51,51,52,32,103,52,51,52,52,52,51,52,56,41,0,0,0,0};
-static C_char C_TLS li613[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,51,49,48,32,103,52,51,50,48,52,51,50,52,41,0,0,0,0};
-static C_char C_TLS li614[] C_aligned={C_lihdr(0,0,45),40,109,97,107,101,45,99,111,109,112,111,115,105,116,101,45,99,111,110,100,105,116,105,111,110,32,99,49,52,50,57,49,32,46,32,99,111,110,100,115,52,50,57,50,41,0,0,0};
-static C_char C_TLS li615[] C_aligned={C_lihdr(0,0,18),40,99,111,110,100,105,116,105,111,110,63,32,120,52,51,53,56,41,0,0,0,0,0,0};
-static C_char C_TLS li616[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,57,51,50,32,99,52,51,54,49,41,0};
-static C_char C_TLS li617[] C_aligned={C_lihdr(0,0,30),40,99,111,110,100,105,116,105,111,110,45,112,114,101,100,105,99,97,116,101,32,107,105,110,100,52,51,54,48,41,0,0};
-static C_char C_TLS li618[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,57,53,54,32,99,52,51,54,57,41,0};
-static C_char C_TLS li619[] C_aligned={C_lihdr(0,0,61),40,99,111,110,100,105,116,105,111,110,45,112,114,111,112,101,114,116,121,45,97,99,99,101,115,115,111,114,32,107,105,110,100,52,51,54,52,32,112,114,111,112,52,51,54,53,32,46,32,101,114,114,45,100,101,102,52,51,54,54,41,0,0,0};
-static C_char C_TLS li620[] C_aligned={C_lihdr(0,0,62),40,103,101,116,45,99,111,110,100,105,116,105,111,110,45,112,114,111,112,101,114,116,121,32,99,52,51,56,49,32,107,105,110,100,52,51,56,50,32,112,114,111,112,52,51,56,51,32,46,32,101,114,114,45,100,101,102,52,51,56,52,41,0,0};
-static C_char C_TLS li621[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,101,114,114,111,114,45,104,111,111,107,32,99,111,100,101,52,51,56,56,32,108,111,99,52,51,56,57,32,46,32,97,114,103,115,52,51,57,48,41,0,0};
-static C_char C_TLS li622[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,115,116,114,117,99,116,117,114,101,63,32,120,52,52,48,51,32,115,52,52,48,52,41,0,0};
-static C_char C_TLS li623[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,103,101,110,101,114,105,99,45,115,116,114,117,99,116,117,114,101,63,32,120,52,52,48,54,41};
-static C_char C_TLS li624[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,115,108,111,116,32,120,52,52,48,56,32,105,52,52,48,57,41};
-static C_char C_TLS li625[] C_aligned={C_lihdr(0,0,18),40,35,35,115,121,115,35,115,105,122,101,32,120,52,52,49,49,41,0,0,0,0,0,0};
-static C_char C_TLS li626[] C_aligned={C_lihdr(0,0,14),67,95,109,97,107,101,95,112,111,105,110,116,101,114,0,0};
-static C_char C_TLS li627[] C_aligned={C_lihdr(0,0,21),67,95,109,97,107,101,95,116,97,103,103,101,100,95,112,111,105,110,116,101,114,0,0,0};
-static C_char C_TLS li628[] C_aligned={C_lihdr(0,0,22),40,35,35,115,121,115,35,112,111,105,110,116,101,114,63,32,120,52,52,49,51,41,0,0};
-static C_char C_TLS li629[] C_aligned={C_lihdr(0,0,45),40,35,35,115,121,115,35,115,101,116,45,112,111,105,110,116,101,114,45,97,100,100,114,101,115,115,33,32,112,116,114,52,52,49,53,32,97,100,100,114,52,52,49,54,41,0,0,0};
-static C_char C_TLS li630[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,98,121,116,101,118,101,99,116,111,114,63,32,120,52,52,49,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li631[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,112,98,121,116,101,118,101,99,116,111,114,32,115,52,52,50,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li632[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,112,101,114,109,97,110,101,110,116,63,32,120,52,52,50,50,41};
-static C_char C_TLS li633[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,98,108,111,99,107,45,97,100,100,114,101,115,115,32,120,52,52,50,52,41,0,0,0,0,0};
-static C_char C_TLS li634[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,108,111,99,97,116,105,118,101,63,32,120,52,52,50,54,41,0};
-static C_char C_TLS li635[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,110,117,108,108,45,112,111,105,110,116,101,114,41,0,0,0,0};
-static C_char C_TLS li636[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,110,117,108,108,45,112,111,105,110,116,101,114,63,32,120,52,52,51,49,41,0,0,0,0,0};
-static C_char C_TLS li637[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,97,100,100,114,101,115,115,45,62,112,111,105,110,116,101,114,32,97,100,100,114,52,52,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li638[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,112,111,105,110,116,101,114,45,62,97,100,100,114,101,115,115,32,112,116,114,52,52,51,55,41};
-static C_char C_TLS li639[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,109,97,107,101,45,99,45,115,116,114,105,110,103,32,115,116,114,52,52,51,57,41,0,0,0};
-static C_char C_TLS li640[] C_aligned={C_lihdr(0,0,21),67,95,112,101,101,107,95,115,105,103,110,101,100,95,105,110,116,101,103,101,114,0,0,0};
-static C_char C_TLS li641[] C_aligned={C_lihdr(0,0,23),67,95,112,101,101,107,95,117,110,115,105,103,110,101,100,95,105,110,116,101,103,101,114,0};
-static C_char C_TLS li642[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,112,101,101,107,45,102,105,120,110,117,109,32,98,52,52,52,49,32,105,52,52,52,50,41,0};
-static C_char C_TLS li643[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,112,101,101,107,45,98,121,116,101,32,112,116,114,52,52,52,52,32,105,52,52,52,53,41,0};
-static C_char C_TLS li644[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,118,101,99,116,111,114,45,62,115,116,114,117,99,116,117,114,101,33,32,118,101,99,52,52,52,55,41,0,0,0,0,0,0};
-static C_char C_TLS li645[] C_aligned={C_lihdr(0,0,31),40,35,35,115,121,115,35,112,101,101,107,45,100,111,117,98,108,101,32,98,52,52,52,57,32,105,52,52,53,48,41,0};
-static C_char C_TLS li646[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,112,101,101,107,45,99,45,115,116,114,105,110,103,32,98,52,52,53,50,32,105,52,52,53,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li647[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,112,101,101,107,45,110,111,110,110,117,108,108,45,99,45,115,116,114,105,110,103,32,98,52,52,54,49,32,105,52,52,54,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li648[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,112,101,101,107,45,97,110,100,45,102,114,101,101,45,99,45,115,116,114,105,110,103,32,98,52,52,54,56,32,105,52,52,54,57,41,0,0,0,0,0,0};
-static C_char C_TLS li649[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,112,101,101,107,45,97,110,100,45,102,114,101,101,45,110,111,110,110,117,108,108,45,99,45,115,116,114,105,110,103,32,98,52,52,55,56,32,105,52,52,55,57,41,0,0,0,0,0,0};
-static C_char C_TLS li650[] C_aligned={C_lihdr(0,0,39),40,35,35,115,121,115,35,112,111,107,101,45,99,45,115,116,114,105,110,103,32,98,52,52,56,54,32,105,52,52,56,55,32,115,52,52,56,56,41,0};
-static C_char C_TLS li651[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,112,111,107,101,45,105,110,116,101,103,101,114,32,98,52,52,57,48,32,105,52,52,57,49,32,110,52,52,57,50,41,0,0};
-static C_char C_TLS li652[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,112,111,107,101,45,100,111,117,98,108,101,32,98,52,52,57,52,32,105,52,52,57,53,32,110,52,52,57,54,41,0,0,0};
-static C_char C_TLS li653[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,52,53,49,48,41,0,0,0,0};
-static C_char C_TLS li654[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,112,101,101,107,45,99,45,115,116,114,105,110,103,45,108,105,115,116,32,112,116,114,52,53,48,55,32,110,52,53,48,56,41};
-static C_char C_TLS li655[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,52,53,51,54,41,0,0,0,0};
-static C_char C_TLS li656[] C_aligned={C_lihdr(0,0,49),40,35,35,115,121,115,35,112,101,101,107,45,97,110,100,45,102,114,101,101,45,99,45,115,116,114,105,110,103,45,108,105,115,116,32,112,116,114,52,53,51,50,32,110,52,53,51,51,41,0,0,0,0,0,0,0};
-static C_char C_TLS li657[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,118,101,99,116,111,114,45,62,99,108,111,115,117,114,101,33,32,118,101,99,52,53,53,48,32,97,100,100,114,52,53,53,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li658[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,115,121,109,98,111,108,45,104,97,115,45,116,111,112,108,101,118,101,108,45,98,105,110,100,105,110,103,63,32,115,52,53,53,52,41,0,0,0,0,0,0};
-static C_char C_TLS li659[] C_aligned={C_lihdr(0,0,68),40,35,35,115,121,115,35,99,111,112,121,45,98,121,116,101,115,32,102,114,111,109,52,53,53,54,32,116,111,52,53,53,55,32,111,102,102,115,101,116,49,52,53,53,56,32,111,102,102,115,101,116,50,52,53,53,57,32,98,121,116,101,115,52,53,54,48,41,0,0,0,0};
-static C_char C_TLS li660[] C_aligned={C_lihdr(0,0,68),40,35,35,115,121,115,35,99,111,112,121,45,119,111,114,100,115,32,102,114,111,109,52,53,54,50,32,116,111,52,53,54,51,32,111,102,102,115,101,116,49,52,53,54,52,32,111,102,102,115,101,116,50,52,53,54,53,32,119,111,114,100,115,52,53,54,54,41,0,0,0,0};
-static C_char C_TLS li661[] C_aligned={C_lihdr(0,0,71),40,35,35,115,121,115,35,99,111,109,112,97,114,101,45,98,121,116,101,115,32,102,114,111,109,52,53,54,56,32,116,111,52,53,54,57,32,111,102,102,115,101,116,49,52,53,55,48,32,111,102,102,115,101,116,50,52,53,55,49,32,98,121,116,101,115,52,53,55,50,41,0};
-static C_char C_TLS li662[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,122,97,112,45,115,116,114,105,110,103,115,32,97,52,53,55,51,52,53,55,54,41,0,0,0};
-static C_char C_TLS li663[] C_aligned={C_lihdr(0,0,27),40,35,35,115,121,115,35,98,108,111,99,107,45,112,111,105,110,116,101,114,32,120,52,53,55,56,41,0,0,0,0,0};
-static C_char C_TLS li664[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,99,104,97,114,45,97,114,103,117,109,101,110,116,32,120,52,53,56,50,41,0,0,0,0,0};
-static C_char C_TLS li665[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,102,105,120,110,117,109,45,97,114,103,117,109,101,110,116,32,120,52,53,56,52,41,0,0,0};
-static C_char C_TLS li666[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,102,108,111,110,117,109,45,97,114,103,117,109,101,110,116,32,120,52,53,56,54,41,0,0,0};
-static C_char C_TLS li667[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,98,108,111,99,107,45,97,114,103,117,109,101,110,116,32,120,52,53,56,56,41,0,0,0,0};
-static C_char C_TLS li668[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,110,117,109,98,101,114,45,118,101,99,116,111,114,45,97,114,103,117,109,101,110,116,32,116,52,53,57,48,32,120,52,53,57,49,41,0,0,0,0,0,0};
-static C_char C_TLS li669[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,115,116,114,105,110,103,45,97,114,103,117,109,101,110,116,32,120,52,53,57,51,41,0,0,0};
-static C_char C_TLS li670[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,115,121,109,98,111,108,45,97,114,103,117,109,101,110,116,32,120,52,53,57,53,41,0,0,0};
-static C_char C_TLS li671[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,112,111,105,110,116,101,114,45,97,114,103,117,109,101,110,116,32,120,52,53,57,55,41,0,0};
-static C_char C_TLS li672[] C_aligned={C_lihdr(0,0,52),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,116,97,103,103,101,100,45,112,111,105,110,116,101,114,45,97,114,103,117,109,101,110,116,32,120,52,53,57,57,32,116,120,52,54,48,48,41,0,0,0,0};
-static C_char C_TLS li673[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,105,110,116,101,103,101,114,45,97,114,103,117,109,101,110,116,32,120,52,54,48,50,41,0,0};
-static C_char C_TLS li674[] C_aligned={C_lihdr(0,0,47),40,35,35,115,121,115,35,102,111,114,101,105,103,110,45,117,110,115,105,103,110,101,100,45,105,110,116,101,103,101,114,45,97,114,103,117,109,101,110,116,32,120,52,54,48,52,41,0};
-static C_char C_TLS li675[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,100,101,102,97,117,108,116,45,101,120,99,101,112,116,105,111,110,45,104,97,110,100,108,101,114,32,97,114,103,52,54,48,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li676[] C_aligned={C_lihdr(0,0,54),40,35,35,115,121,115,35,109,97,107,101,45,116,104,114,101,97,100,32,116,104,117,110,107,52,54,48,56,32,115,116,97,116,101,52,54,48,57,32,110,97,109,101,52,54,49,48,32,113,52,54,49,49,41,0,0};
-static C_char C_TLS li677[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,109,97,107,101,45,109,117,116,101,120,32,105,100,52,54,49,51,32,111,119,110,101,114,52,54,49,52,41,0,0,0,0,0};
-static C_char C_TLS li678[] C_aligned={C_lihdr(0,0,10),40,108,111,111,112,52,54,50,50,41,0,0,0,0,0,0};
-static C_char C_TLS li679[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,97,98,97,110,100,111,110,45,109,117,116,101,120,101,115,32,116,104,114,101,97,100,52,54,49,54,41,0,0,0,0,0,0};
-static C_char C_TLS li680[] C_aligned={C_lihdr(0,0,16),40,35,35,115,121,115,35,115,99,104,101,100,117,108,101,41};
-static C_char C_TLS li681[] C_aligned={C_lihdr(0,0,8),40,97,49,56,56,51,56,41};
-static C_char C_TLS li682[] C_aligned={C_lihdr(0,0,19),40,97,49,56,56,50,57,32,114,101,116,117,114,110,52,54,52,49,41,0,0,0,0,0};
-static C_char C_TLS li683[] C_aligned={C_lihdr(0,0,21),40,35,35,115,121,115,35,116,104,114,101,97,100,45,121,105,101,108,100,33,41,0,0,0};
-static C_char C_TLS li684[] C_aligned={C_lihdr(0,0,16),67,95,99,111,110,116,101,120,116,95,115,119,105,116,99,104};
-static C_char C_TLS li685[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,105,110,116,101,114,114,117,112,116,45,104,111,111,107,32,114,101,97,115,111,110,52,54,52,53,32,115,116,97,116,101,52,54,52,54,41,0,0,0,0,0};
-static C_char C_TLS li686[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,117,112,100,97,116,101,45,101,114,114,110,111,41,0,0,0,0};
-static C_char C_TLS li687[] C_aligned={C_lihdr(0,0,7),40,101,114,114,110,111,41,0};
-static C_char C_TLS li688[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,52,54,55,50,32,99,52,54,55,54,41,0,0,0,0,0,0};
-static C_char C_TLS li689[] C_aligned={C_lihdr(0,0,17),40,114,101,97,100,108,110,32,112,111,114,116,52,54,55,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li690[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li691[] C_aligned={C_lihdr(0,0,44),40,114,101,97,100,45,101,115,99,97,112,101,100,45,115,101,120,112,32,112,111,114,116,52,54,57,48,32,115,107,105,112,45,98,114,97,99,101,63,52,54,57,49,41,0,0,0,0};
-static C_char C_TLS li692[] C_aligned={C_lihdr(0,0,19),40,100,111,108,111,111,112,52,55,51,55,32,108,110,52,55,52,49,41,0,0,0,0,0};
-static C_char C_TLS li693[] C_aligned={C_lihdr(0,0,15),40,103,101,116,47,99,108,101,97,114,45,115,116,114,41,0};
-static C_char C_TLS li694[] C_aligned={C_lihdr(0,0,39),40,108,111,111,112,50,32,108,115,116,52,56,48,52,32,110,101,120,116,45,115,116,114,105,110,103,52,56,48,53,32,97,99,99,52,56,48,54,41,0};
-static C_char C_TLS li695[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,52,55,55,51,41,0,0};
-static C_char C_TLS li696[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,117,115,101,114,45,114,101,97,100,45,104,111,111,107,32,99,104,97,114,52,55,48,57,32,112,111,114,116,52,55,49,48,41};
-static C_char C_TLS li697[] C_aligned={C_lihdr(0,0,20),67,95,114,101,103,105,115,116,101,114,95,102,105,110,97,108,105,122,101,114,0,0,0,0};
-static C_char C_TLS li698[] C_aligned={C_lihdr(0,0,28),40,115,101,116,45,102,105,110,97,108,105,122,101,114,33,32,120,52,56,53,56,32,121,52,56,53,57,41,0,0,0,0};
-static C_char C_TLS li699[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,52,56,56,48,32,105,52,56,56,52,41,0,0,0,0,0,0};
-static C_char C_TLS li700[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,114,117,110,45,112,101,110,100,105,110,103,45,102,105,110,97,108,105,122,101,114,115,32,115,116,97,116,101,52,56,55,50,41};
-static C_char C_TLS li701[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li702[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,102,111,114,99,101,45,102,105,110,97,108,105,122,101,114,115,41};
-static C_char C_TLS li703[] C_aligned={C_lihdr(0,0,14),40,103,99,32,46,32,97,114,103,52,57,48,52,41,0,0};
-static C_char C_TLS li704[] C_aligned={C_lihdr(0,0,17),40,97,49,57,54,57,48,32,46,32,120,115,52,57,49,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li705[] C_aligned={C_lihdr(0,0,8),40,97,49,57,54,55,56,41};
-static C_char C_TLS li706[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,109,97,107,101,45,112,114,111,109,105,115,101,32,112,114,111,99,52,57,48,57,41,0,0,0};
-static C_char C_TLS li707[] C_aligned={C_lihdr(0,0,16),40,112,114,111,109,105,115,101,63,32,120,52,57,49,54,41};
-static C_char C_TLS li708[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,114,101,97,100,45,102,114,111,109,45,115,116,114,105,110,103,32,115,52,57,49,56,41,0,0};
-static C_char C_TLS li709[] C_aligned={C_lihdr(0,0,8),40,97,49,57,55,53,49,41};
-static C_char C_TLS li710[] C_aligned={C_lihdr(0,0,13),40,103,52,57,52,48,32,120,52,57,52,50,41,0,0,0};
-static C_char C_TLS li711[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,57,51,51,32,103,52,57,51,55,52,57,51,57,41,0,0,0,0};
-static C_char C_TLS li712[] C_aligned={C_lihdr(0,0,29),40,119,114,105,116,101,97,114,103,115,32,97,114,103,115,52,57,50,57,32,112,111,114,116,52,57,51,48,41,0,0,0};
-static C_char C_TLS li713[] C_aligned={C_lihdr(0,0,15),40,103,52,57,56,48,32,109,115,103,52,57,56,50,41,0};
-static C_char C_TLS li714[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,52,57,53,51,32,112,111,114,116,52,57,54,50,32,104,101,97,100,101,114,52,57,54,51,41,0,0};
-static C_char C_TLS li715[] C_aligned={C_lihdr(0,0,30),40,100,101,102,45,104,101,97,100,101,114,52,57,53,54,32,37,112,111,114,116,52,57,53,49,53,48,48,53,41,0,0};
-static C_char C_TLS li716[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,112,111,114,116,52,57,53,53,41,0,0};
-static C_char C_TLS li717[] C_aligned={C_lihdr(0,0,39),40,112,114,105,110,116,45,101,114,114,111,114,45,109,101,115,115,97,103,101,32,101,120,52,57,52,54,32,46,32,97,114,103,115,52,57,52,55,41,0};
-static C_char C_TLS li718[] C_aligned={C_lihdr(0,0,57),40,35,35,115,121,115,35,109,97,107,101,45,108,111,99,97,116,105,118,101,32,111,98,106,53,48,49,50,32,105,110,100,101,120,53,48,49,51,32,119,101,97,107,63,53,48,49,52,32,108,111,99,53,48,49,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li719[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,102,105,110,100,45,115,121,109,98,111,108,45,116,97,98,108,101,32,97,53,48,54,50,53,48,54,54,41,0,0,0,0,0};
-static C_char C_TLS li720[] C_aligned={C_lihdr(0,0,20),40,99,111,112,121,32,115,53,49,48,57,32,115,116,114,53,49,49,48,41,0,0,0,0};
-static C_char C_TLS li721[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li722[] C_aligned={C_lihdr(0,0,14),40,103,53,49,50,56,32,115,115,53,49,51,48,41,0,0};
-static C_char C_TLS li723[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,53,49,50,49,32,103,53,49,50,53,53,49,50,55,41,0,0,0,0};
-static C_char C_TLS li724[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,53,48,56,53,32,115,121,109,115,53,48,57,52,32,112,114,101,102,105,120,53,48,57,53,41,0,0};
-static C_char C_TLS li725[] C_aligned={C_lihdr(0,0,30),40,100,101,102,45,112,114,101,102,105,120,53,48,56,56,32,37,115,121,109,115,53,48,56,51,53,49,52,57,41,0,0};
-static C_char C_TLS li726[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,115,121,109,115,53,48,56,55,41,0,0};
-static C_char C_TLS li727[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,105,109,112,111,114,116,32,110,115,53,48,55,56,32,46,32,109,111,114,101,53,48,55,57,41};
-static C_char C_TLS li728[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,110,97,109,101,115,112,97,99,101,45,114,101,102,32,110,115,53,49,53,54,32,115,121,109,53,49,53,55,32,46,32,100,101,102,97,117,108,116,53,49,53,56,41,0,0,0,0,0,0};
-static C_char C_TLS li729[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
-static C_char C_TLS li730[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,119,97,108,107,45,110,97,109,101,115,112,97,99,101,32,112,114,111,99,53,49,55,51,32,46,32,97,114,103,115,53,49,55,52,41,0,0,0,0,0,0};
-static C_char C_TLS li731[] C_aligned={C_lihdr(0,0,19),40,109,101,109,111,114,121,45,115,116,97,116,105,115,116,105,99,115,41,0,0,0,0,0};
-static C_char C_TLS li732[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,53,50,49,53,32,105,53,50,49,57,41,0,0,0,0,0,0};
-static C_char C_TLS li733[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,53,50,48,55,41,0,0,0,0};
-static C_char C_TLS li734[] C_aligned={C_lihdr(0,0,55),40,35,35,115,121,115,35,100,101,99,111,114,97,116,101,45,108,97,109,98,100,97,32,112,114,111,99,53,50,48,50,32,112,114,101,100,53,50,48,51,32,100,101,99,111,114,97,116,111,114,53,50,48,52,41,0};
-static C_char C_TLS li735[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,53,50,51,48,41,0,0,0,0};
-static C_char C_TLS li736[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,108,97,109,98,100,97,45,100,101,99,111,114,97,116,105,111,110,32,112,114,111,99,53,50,50,55,32,112,114,101,100,53,50,50,56,41,0,0,0,0,0};
-static C_char C_TLS li737[] C_aligned={C_lihdr(0,0,14),40,97,50,48,54,56,52,32,120,53,50,51,55,41,0,0};
-static C_char C_TLS li738[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,108,97,109,98,100,97,45,105,110,102,111,32,112,114,111,99,53,50,51,54,41,0,0,0,0};
-static C_char C_TLS li739[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,108,97,109,98,100,97,45,105,110,102,111,45,62,115,116,114,105,110,103,32,105,110,102,111,53,50,52,49,41,0,0,0,0};
-static C_char C_TLS li740[] C_aligned={C_lihdr(0,0,29),40,112,114,111,99,101,100,117,114,101,45,105,110,102,111,114,109,97,116,105,111,110,32,120,53,50,52,55,41,0,0,0};
-static C_char C_TLS li741[] C_aligned={C_lihdr(0,0,14),40,97,50,48,55,52,52,32,120,53,50,56,53,41,0,0};
-static C_char C_TLS li742[] C_aligned={C_lihdr(0,0,23),40,97,50,48,55,54,48,32,112,114,111,99,53,50,56,56,32,105,53,50,56,57,41,0};
-static C_char C_TLS li743[] C_aligned={C_lihdr(0,0,36),40,103,101,116,116,101,114,45,119,105,116,104,45,115,101,116,116,101,114,32,103,101,116,53,50,56,51,32,115,101,116,53,50,56,52,41,0,0,0,0};
-static C_char C_TLS li744[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,108,105,115,116,53,51,50,48,41};
-static C_char C_TLS li745[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,112,117,116,33,32,115,121,109,53,51,49,54,32,112,114,111,112,53,51,49,55,32,118,97,108,53,51,49,56,41,0,0,0};
-static C_char C_TLS li746[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,108,105,115,116,53,51,51,53,41};
-static C_char C_TLS li747[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,103,101,116,32,115,121,109,53,51,51,49,32,112,114,111,112,53,51,51,50,32,46,32,100,101,102,97,117,108,116,53,51,51,51,41,0,0,0,0,0,0};
-static C_char C_TLS li748[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,116,108,53,51,53,51,41,0,0};
-static C_char C_TLS li749[] C_aligned={C_lihdr(0,0,27),40,114,101,109,112,114,111,112,33,32,115,121,109,53,51,52,57,32,112,114,111,112,53,51,53,48,41,0,0,0,0,0};
-static C_char C_TLS li750[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,108,105,115,116,53,51,56,49,41};
-static C_char C_TLS li751[] C_aligned={C_lihdr(0,0,34),40,103,101,116,45,112,114,111,112,101,114,116,105,101,115,32,115,121,109,53,51,55,54,32,112,114,111,112,115,53,51,55,55,41,0,0,0,0,0,0};
-static C_char C_TLS li752[] C_aligned={C_lihdr(0,0,16),40,97,50,49,49,48,48,32,115,121,109,53,51,54,57,41};
-static C_char C_TLS li753[] C_aligned={C_lihdr(0,0,24),40,97,50,49,49,48,57,32,115,121,109,53,51,55,49,32,108,115,116,53,51,55,50,41};
-static C_char C_TLS li754[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,50,49,32,120,53,51,49,51,32,121,53,51,49,52,41,0,0,0,0};
-static C_char C_TLS li755[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,51,49,32,120,53,51,49,49,32,121,53,51,49,50,41,0,0,0,0};
-static C_char C_TLS li756[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,52,49,32,120,53,51,48,57,32,121,53,51,49,48,41,0,0,0,0};
-static C_char C_TLS li757[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,53,49,32,120,53,51,48,55,32,121,53,51,48,56,41,0,0,0,0};
-static C_char C_TLS li758[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,54,49,32,120,53,51,48,53,32,121,53,51,48,54,41,0,0,0,0};
-static C_char C_TLS li759[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,55,49,32,120,53,51,48,51,32,121,53,51,48,52,41,0,0,0,0};
-static C_char C_TLS li760[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,56,49,32,120,53,51,48,49,32,121,53,51,48,50,41,0,0,0,0};
-static C_char C_TLS li761[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,57,49,32,120,53,50,57,57,32,121,53,51,48,48,41,0,0,0,0};
-static C_char C_TLS li762[] C_aligned={C_lihdr(0,0,20),40,97,50,49,50,48,49,32,120,53,50,57,55,32,121,53,50,57,56,41,0,0,0,0};
-static C_char C_TLS li763[] C_aligned={C_lihdr(0,0,20),40,97,50,49,50,49,49,32,120,53,50,57,53,32,121,53,50,57,54,41,0,0,0,0};
-static C_char C_TLS li764[] C_aligned={C_lihdr(0,0,20),40,97,50,49,50,50,49,32,120,53,50,57,51,32,121,53,50,57,52,41,0,0,0,0};
-static C_char C_TLS li765[] C_aligned={C_lihdr(0,0,20),40,97,50,49,50,51,49,32,120,53,50,57,49,32,121,53,50,57,50,41,0,0,0,0};
-static C_char C_TLS li766[] C_aligned={C_lihdr(0,0,14),40,97,50,49,50,54,53,32,120,53,50,54,52,41,0,0};
-static C_char C_TLS li767[] C_aligned={C_lihdr(0,0,17),40,97,50,49,50,52,49,32,112,114,111,99,53,50,53,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li768[] C_aligned={C_lihdr(0,0,14),40,97,50,49,50,56,49,32,120,53,50,54,55,41,0,0};
-static C_char C_TLS li769[] C_aligned={C_lihdr(0,0,14),40,97,50,49,51,51,54,32,120,53,50,55,53,41,0,0};
-static C_char C_TLS li770[] C_aligned={C_lihdr(0,0,23),40,97,50,49,51,53,50,32,112,114,111,99,53,50,55,56,32,105,53,50,55,57,41,0};
-static C_char C_TLS li771[] C_aligned={C_lihdr(0,0,24),40,97,50,49,51,48,55,32,103,101,116,53,50,55,50,32,115,101,116,53,50,55,51,41};
-static C_char C_TLS li772[] C_aligned={C_lihdr(0,0,23),40,97,50,49,50,57,55,32,112,114,111,99,53,50,55,48,32,105,53,50,55,49,41,0};
-static C_char C_TLS li773[] C_aligned={C_lihdr(0,0,14),40,97,50,49,51,56,48,32,120,52,56,53,53,41,0,0};
-static C_char C_TLS li774[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,97,114,103,115,52,56,52,57,41,0};
-static C_char C_TLS li775[] C_aligned={C_lihdr(0,0,19),40,102,50,53,52,53,49,32,120,52,56,53,53,50,53,52,53,48,41,0,0,0,0,0};
-static C_char C_TLS li776[] C_aligned={C_lihdr(0,0,14),40,97,50,49,52,52,56,32,120,52,56,52,53,41,0,0};
-static C_char C_TLS li777[] C_aligned={C_lihdr(0,0,8),40,97,50,49,52,54,48,41};
-static C_char C_TLS li778[] C_aligned={C_lihdr(0,0,19),40,97,50,49,52,54,54,32,46,32,99,111,100,101,52,49,54,49,41,0,0,0,0,0};
-static C_char C_TLS li779[] C_aligned={C_lihdr(0,0,8),40,97,50,49,52,56,53,41};
-static C_char C_TLS li780[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,49,49,50,32,103,52,49,49,54,52,49,49,56,41,0,0,0,0};
-static C_char C_TLS li781[] C_aligned={C_lihdr(0,0,13),40,103,52,49,52,57,32,120,52,49,53,49,41,0,0,0};
-static C_char C_TLS li782[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,49,52,50,32,103,52,49,52,54,52,49,52,56,41,0,0,0,0};
-static C_char C_TLS li783[] C_aligned={C_lihdr(0,0,19),40,97,50,49,54,52,51,32,46,32,97,114,103,115,52,48,57,51,41,0,0,0,0,0};
-static C_char C_TLS li784[] C_aligned={C_lihdr(0,0,27),40,97,50,49,52,57,52,32,109,115,103,52,48,57,49,32,46,32,97,114,103,115,52,48,57,50,41,0,0,0,0,0};
-static C_char C_TLS li785[] C_aligned={C_lihdr(0,0,11),67,95,99,95,114,117,110,116,105,109,101,0,0,0,0,0};
-static C_char C_TLS li786[] C_aligned={C_lihdr(0,0,16),67,95,98,117,105,108,100,95,112,108,97,116,102,111,114,109};
-static C_char C_TLS li787[] C_aligned={C_lihdr(0,0,18),67,95,115,111,102,116,119,97,114,101,95,118,101,114,115,105,111,110,0,0,0,0,0,0};
-static C_char C_TLS li788[] C_aligned={C_lihdr(0,0,20),67,95,109,97,99,104,105,110,101,95,98,121,116,101,95,111,114,100,101,114,0,0,0,0};
-static C_char C_TLS li789[] C_aligned={C_lihdr(0,0,14),67,95,109,97,99,104,105,110,101,95,116,121,112,101,0,0};
-static C_char C_TLS li790[] C_aligned={C_lihdr(0,0,15),67,95,115,111,102,116,119,97,114,101,95,116,121,112,101,0};
-static C_char C_TLS li791[] C_aligned={C_lihdr(0,0,32),40,102,95,50,49,57,53,54,32,95,51,49,53,48,32,112,111,114,116,51,49,53,49,32,110,117,109,51,49,53,50,41};
-static C_char C_TLS li792[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,53,51,32,112,114,111,99,51,49,52,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li793[] C_aligned={C_lihdr(0,0,24),40,102,95,50,49,57,54,55,32,95,51,49,52,54,32,112,111,114,116,51,49,52,55,41};
-static C_char C_TLS li794[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,54,52,32,112,114,111,99,51,49,52,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li795[] C_aligned={C_lihdr(0,0,24),40,102,95,50,49,57,55,56,32,95,51,49,52,50,32,112,111,114,116,51,49,52,51,41};
-static C_char C_TLS li796[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,55,53,32,112,114,111,99,51,49,52,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li797[] C_aligned={C_lihdr(0,0,16),67,95,98,117,105,108,100,95,112,108,97,116,102,111,114,109};
-static C_char C_TLS li798[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-/* from k20500 */
-static C_word C_fcall stub5181(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub5181(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-C_word t1=(C_word )(C_a1);
-C_r=((C_word)C_enumerate_symbols(t0,t1));
-return C_r;}
-
-/* from k20208 */
-static C_word C_fcall stub5072(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub5072(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-C_word t1=(C_word )(C_a1);
-C_r=((C_word)C_enumerate_symbols(t0,t1));
-return C_r;}
-
-/* from k20194 in ##sys#find-symbol-table in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall stub5063(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub5063(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-char * t0=(char * )C_string_or_null(C_a0);
-C_r=C_mpointer_or_false(&C_a,(void*)C_find_symbol_table(t0));
-return C_r;}
-
-/* from k20184 */
-static C_word C_fcall stub5056(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub5056(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word t0=(C_word )(C_a0);
-void * t1=(void * )C_c_pointer_or_null(C_a1);
-C_r=((C_word)C_find_symbol(t0,t1));
-return C_r;}
-
-/* from ##sys#zap-strings in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall stub4574(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub4574(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word t0=(C_word )(C_a0);
-C_zap_strings(t0);
-return C_r;}
-
-/* from k18606 */
-static C_word C_fcall stub4527(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub4527(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-C_free(t0);
-return C_r;}
-
-/* from k18597 */
-static C_word C_fcall stub4519(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub4519(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-int t1=(int )C_unfix(C_a1);
-C_r=C_mpointer(&C_a,(void*)C_peek_c_string_at(t0,t1));
-return C_r;}
-
-/* from k18545 */
-static C_word C_fcall stub4500(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub4500(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-int t1=(int )C_unfix(C_a1);
-C_r=C_mpointer(&C_a,(void*)C_peek_c_string_at(t0,t1));
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub3943(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub3943(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word x=(C_word )(C_a0);
-return((C_char *)x);
-C_ret:
-#undef return
-
-return C_r;}
-
-C_noret_decl(C_library_toplevel)
-C_externexport void C_ccall C_library_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9841)
-static void C_ccall f_9841(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10003)
-static void C_ccall f_10003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10006)
-static void C_ccall f_10006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10009)
-static void C_ccall f_10009(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10012)
-static void C_ccall f_10012(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10015)
-static void C_ccall f_10015(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10018)
-static void C_ccall f_10018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10021)
-static void C_ccall f_10021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10024)
-static void C_ccall f_10024(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10027)
-static void C_ccall f_10027(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10030)
-static void C_ccall f_10030(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10033)
-static void C_ccall f_10033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10036)
-static void C_ccall f_10036(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10659)
-static void C_ccall f_10659(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10663)
-static void C_ccall f_10663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10667)
-static void C_ccall f_10667(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10670)
-static void C_ccall f_10670(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10673)
-static void C_ccall f_10673(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10676)
-static void C_ccall f_10676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21997)
-static void C_ccall f_21997(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10829)
-static void C_ccall f_10829(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11847)
-static void C_ccall f_11847(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11851)
-static void C_ccall f_11851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11855)
-static void C_ccall f_11855(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11859)
-static void C_ccall f_11859(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11863)
-static void C_ccall f_11863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21976)
-static void C_ccall f_21976(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21978)
-static void C_ccall f_21978(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21982)
-static void C_ccall f_21982(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14658)
-static void C_ccall f_14658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21965)
-static void C_ccall f_21965(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21967)
-static void C_ccall f_21967(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21971)
-static void C_ccall f_21971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14662)
-static void C_ccall f_14662(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21954)
-static void C_ccall f_21954(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21956)
-static void C_ccall f_21956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_21960)
-static void C_ccall f_21960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14666)
-static void C_ccall f_14666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14919)
-static void C_ccall f_14919(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14923)
-static void C_ccall f_14923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14927)
-static void C_ccall f_14927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21735)
-static void C_ccall f_21735(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16413)
-static void C_ccall f_16413(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21731)
-static void C_ccall f_21731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16419)
-static void C_ccall f_16419(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21727)
-static void C_ccall f_21727(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16425)
-static void C_ccall f_16425(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21723)
-static void C_ccall f_21723(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16431)
-static void C_ccall f_16431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21719)
-static void C_ccall f_21719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16437)
-static void C_ccall f_16437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21715)
-static void C_ccall f_21715(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16443)
-static void C_ccall f_16443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21711)
-static void C_ccall f_21711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21707)
-static void C_ccall f_21707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16449)
-static void C_fcall f_16449(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21693)
-static void C_ccall f_21693(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16681)
-static void C_ccall f_16681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21689)
-static void C_ccall f_21689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16684)
-static void C_ccall f_16684(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21685)
-static void C_ccall f_21685(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16687)
-static void C_ccall f_16687(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21681)
-static void C_ccall f_21681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16690)
-static void C_ccall f_16690(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21677)
-static void C_ccall f_21677(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16693)
-static void C_ccall f_16693(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16696)
-static void C_fcall f_16696(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16699)
-static void C_fcall f_16699(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16702)
-static void C_fcall f_16702(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16705)
-static void C_fcall f_16705(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21495)
-static void C_ccall f_21495(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_21495)
-static void C_ccall f_21495r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_21644)
-static void C_ccall f_21644(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_21499)
-static void C_ccall f_21499(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21595)
-static void C_ccall f_21595(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21598)
-static void C_ccall f_21598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21601)
-static void C_ccall f_21601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21610)
-static void C_fcall f_21610(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21628)
-static void C_ccall f_21628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21618)
-static void C_fcall f_21618(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21622)
-static void C_ccall f_21622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21604)
-static void C_ccall f_21604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21608)
-static void C_ccall f_21608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21508)
-static void C_ccall f_21508(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21589)
-static void C_ccall f_21589(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21511)
-static void C_ccall f_21511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21553)
-static void C_fcall f_21553(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21565)
-static void C_ccall f_21565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21571)
-static void C_ccall f_21571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21541)
-static void C_ccall f_21541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21514)
-static void C_ccall f_21514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21517)
-static void C_ccall f_21517(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21520)
-static void C_ccall f_21520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21526)
-static void C_ccall f_21526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21529)
-static void C_ccall f_21529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21532)
-static void C_ccall f_21532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17258)
-static void C_ccall f_17258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21486)
-static void C_ccall f_21486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21490)
-static void C_ccall f_21490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17262)
-static void C_ccall f_17262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21467)
-static void C_ccall f_21467(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_21467)
-static void C_ccall f_21467r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_21471)
-static void C_ccall f_21471(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17266)
-static void C_ccall f_17266(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21461)
-static void C_ccall f_21461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17270)
-static void C_ccall f_17270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17277)
-static void C_ccall f_17277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18754)
-static void C_ccall f_18754(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21444)
-static void C_ccall f_21444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21449)
-static void C_ccall f_21449(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19439)
-static void C_ccall f_19439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21376)
-static void C_ccall f_21376(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f25451)
-static void C_ccall f25451(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21397)
-static void C_fcall f_21397(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21436)
-static void C_ccall f_21436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21416)
-static void C_fcall f_21416(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21426)
-static void C_ccall f_21426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21379)
-static void C_ccall f_21379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21381)
-static void C_ccall f_21381(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19443)
-static void C_ccall f_19443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19447)
-static void C_ccall f_19447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19722)
-static void C_ccall f_19722(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19725)
-static void C_ccall f_19725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19728)
-static void C_ccall f_19728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21298)
-static void C_ccall f_21298(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21308)
-static void C_ccall f_21308(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21353)
-static void C_ccall f_21353(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21337)
-static void C_ccall f_21337(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21318)
-static void C_ccall f_21318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21282)
-static void C_ccall f_21282(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21242)
-static void C_ccall f_21242(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21266)
-static void C_ccall f_21266(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21258)
-static void C_ccall f_21258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20736)
-static void C_ccall f_20736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20773)
-static void C_ccall f_20773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20777)
-static void C_ccall f_20777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21232)
-static void C_ccall f_21232(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20781)
-static void C_ccall f_20781(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21222)
-static void C_ccall f_21222(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20785)
-static void C_ccall f_20785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21212)
-static void C_ccall f_21212(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20789)
-static void C_ccall f_20789(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21202)
-static void C_ccall f_21202(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20793)
-static void C_ccall f_20793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21192)
-static void C_ccall f_21192(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21200)
-static void C_ccall f_21200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20797)
-static void C_ccall f_20797(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21182)
-static void C_ccall f_21182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20801)
-static void C_ccall f_20801(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21172)
-static void C_ccall f_21172(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21180)
-static void C_ccall f_21180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20805)
-static void C_ccall f_20805(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21162)
-static void C_ccall f_21162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20809)
-static void C_ccall f_20809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21152)
-static void C_ccall f_21152(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21160)
-static void C_ccall f_21160(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20813)
-static void C_ccall f_20813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21142)
-static void C_ccall f_21142(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20817)
-static void C_ccall f_20817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21132)
-static void C_ccall f_21132(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21140)
-static void C_ccall f_21140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20821)
-static void C_ccall f_20821(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21122)
-static void C_ccall f_21122(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20825)
-static void C_ccall f_20825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20829)
-static void C_ccall f_20829(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20833)
-static void C_ccall f_20833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20975)
-static void C_ccall f_20975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21110)
-static void C_ccall f_21110(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21101)
-static void C_ccall f_21101(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21036)
-static void C_ccall f_21036(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21038)
-static void C_ccall f_21038(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21045)
-static void C_fcall f_21045(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21057)
-static void C_fcall f_21057(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20977)
-static void C_ccall f_20977(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20990)
-static C_word C_fcall f_20990(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_20901)
-static void C_ccall f_20901(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_20901)
-static void C_ccall f_20901r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_20914)
-static void C_fcall f_20914(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20835)
-static void C_ccall f_20835(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_20848)
-static void C_fcall f_20848(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20842)
-static void C_ccall f_20842(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20739)
-static void C_ccall f_20739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20761)
-static void C_ccall f_20761(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20745)
-static void C_ccall f_20745(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20707)
-static void C_ccall f_20707(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20711)
-static void C_ccall f_20711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20714)
-static void C_ccall f_20714(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20728)
-static void C_ccall f_20728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20724)
-static void C_ccall f_20724(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20698)
-static void C_ccall f_20698(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20705)
-static void C_ccall f_20705(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20679)
-static void C_ccall f_20679(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20685)
-static void C_ccall f_20685(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20640)
-static void C_ccall f_20640(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20650)
-static void C_fcall f_20650(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20666)
-static void C_ccall f_20666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20563)
-static void C_ccall f_20563(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_20576)
-static void C_fcall f_20576(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20628)
-static void C_ccall f_20628(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20586)
-static void C_ccall f_20586(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20591)
-static void C_fcall f_20591(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20540)
-static void C_ccall f_20540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20544)
-static void C_ccall f_20544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20547)
-static void C_ccall f_20547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20489)
-static void C_ccall f_20489(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_20489)
-static void C_ccall f_20489r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_20496)
-static void C_ccall f_20496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20511)
-static void C_ccall f_20511(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20516)
-static void C_fcall f_20516(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20520)
-static void C_fcall f_20520(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20526)
-static void C_ccall f_20526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20437)
-static void C_ccall f_20437(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_20437)
-static void C_ccall f_20437r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_20460)
-static void C_ccall f_20460(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20468)
-static void C_ccall f_20468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20464)
-static void C_ccall f_20464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20441)
-static void C_fcall f_20441(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20214)
-static void C_ccall f_20214(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_20214)
-static void C_ccall f_20214r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_20389)
-static void C_fcall f_20389(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20384)
-static void C_fcall f_20384(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20216)
-static void C_fcall f_20216(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20220)
-static void C_ccall f_20220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20361)
-static void C_ccall f_20361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20223)
-static void C_ccall f_20223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20246)
-static void C_ccall f_20246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20282)
-static void C_fcall f_20282(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20343)
-static void C_ccall f_20343(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20290)
-static void C_fcall f_20290(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20316)
-static void C_fcall f_20316(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20294)
-static void C_fcall f_20294(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20300)
-static void C_fcall f_20300(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20303)
-static void C_ccall f_20303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20260)
-static void C_fcall f_20260(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20264)
-static void C_fcall f_20264(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20270)
-static void C_ccall f_20270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20225)
-static void C_fcall f_20225(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_20240)
-static void C_ccall f_20240(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20229)
-static void C_ccall f_20229(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20191)
-static void C_ccall f_20191(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_20196)
-static void C_ccall f_20196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19969)
-static void C_ccall f_19969(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_20169)
-static void C_ccall f_20169(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20148)
-static void C_ccall f_20148(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20141)
-static void C_ccall f_20141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20125)
-static void C_ccall f_20125(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20109)
-static void C_ccall f_20109(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20093)
-static void C_ccall f_20093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20077)
-static void C_ccall f_20077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20061)
-static void C_ccall f_20061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20045)
-static void C_ccall f_20045(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20029)
-static void C_ccall f_20029(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_20004)
-static void C_ccall f_20004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19991)
-static void C_ccall f_19991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19771)
-static void C_ccall f_19771(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_19771)
-static void C_ccall f_19771r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_19921)
-static void C_fcall f_19921(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19916)
-static void C_fcall f_19916(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19773)
-static void C_fcall f_19773(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_19777)
-static void C_ccall f_19777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19780)
-static void C_ccall f_19780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19786)
-static void C_fcall f_19786(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19894)
-static void C_ccall f_19894(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19885)
-static void C_ccall f_19885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19888)
-static void C_ccall f_19888(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19789)
-static void C_ccall f_19789(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19869)
-static void C_ccall f_19869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19821)
-static void C_fcall f_19821(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19825)
-static void C_ccall f_19825(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19828)
-static void C_ccall f_19828(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19848)
-static void C_ccall f_19848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19844)
-static void C_ccall f_19844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19831)
-static void C_ccall f_19831(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19792)
-static void C_ccall f_19792(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19795)
-static void C_ccall f_19795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19813)
-static void C_ccall f_19813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19807)
-static void C_ccall f_19807(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19729)
-static void C_fcall f_19729(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_19735)
-static void C_fcall f_19735(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19759)
-static void C_ccall f_19759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19743)
-static void C_fcall f_19743(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19752)
-static void C_ccall f_19752(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19747)
-static void C_ccall f_19747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19711)
-static void C_ccall f_19711(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19715)
-static void C_ccall f_19715(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19705)
-static void C_ccall f_19705(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19673)
-static void C_ccall f_19673(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19679)
-static void C_ccall f_19679(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19691)
-static void C_ccall f_19691(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_19691)
-static void C_ccall f_19691r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_19628)
-static void C_ccall f_19628(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_19628)
-static void C_ccall f_19628r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_19600)
-static void C_ccall f_19600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19606)
-static void C_fcall f_19606(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19610)
-static void C_ccall f_19610(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19619)
-static void C_ccall f_19619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19517)
-static void C_ccall f_19517(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19537)
-static void C_ccall f_19537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19549)
-static void C_fcall f_19549(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19565)
-static void C_ccall f_19565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19540)
-static void C_ccall f_19540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19543)
-static void C_ccall f_19543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19453)
-static void C_ccall f_19453(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_19498)
-static void C_ccall f_19498(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19474)
-static void C_ccall f_19474(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19457)
-static void C_ccall f_19457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18983)
-static void C_ccall f_18983(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18996)
-static void C_ccall f_18996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18999)
-static void C_ccall f_18999(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19121)
-static void C_ccall f_19121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19124)
-static void C_ccall f_19124(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19127)
-static void C_ccall f_19127(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19143)
-static void C_ccall f_19143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19148)
-static void C_fcall f_19148(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19152)
-static void C_ccall f_19152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19385)
-static void C_ccall f_19385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19322)
-static void C_ccall f_19322(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19374)
-static void C_ccall f_19374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19382)
-static void C_ccall f_19382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19355)
-static void C_ccall f_19355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19363)
-static void C_ccall f_19363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19338)
-static void C_ccall f_19338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19331)
-static void C_ccall f_19331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19164)
-static void C_ccall f_19164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19299)
-static void C_ccall f_19299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19176)
-static void C_ccall f_19176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19193)
-static void C_fcall f_19193(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_19224)
-static void C_fcall f_19224(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19274)
-static void C_ccall f_19274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19211)
-static void C_ccall f_19211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19187)
-static void C_ccall f_19187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19129)
-static void C_fcall f_19129(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19133)
-static void C_ccall f_19133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19137)
-static void C_ccall f_19137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19008)
-static void C_ccall f_19008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19011)
-static void C_ccall f_19011(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19014)
-static void C_ccall f_19014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19020)
-static void C_ccall f_19020(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19027)
-static void C_ccall f_19027(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19029)
-static void C_fcall f_19029(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_19058)
-static void C_ccall f_19058(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19061)
-static void C_ccall f_19061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19068)
-static void C_ccall f_19068(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19055)
-static void C_ccall f_19055(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_19042)
-static void C_ccall f_19042(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18938)
-static void C_fcall f_18938(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18942)
-static void C_ccall f_18942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18945)
-static void C_ccall f_18945(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18953)
-static void C_fcall f_18953(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18957)
-static void C_ccall f_18957(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18948)
-static void C_ccall f_18948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18891)
-static void C_fcall f_18891(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18895)
-static void C_ccall f_18895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18902)
-static void C_ccall f_18902(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18904)
-static void C_fcall f_18904(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18926)
-static void C_ccall f_18926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18933)
-static void C_ccall f_18933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18869)
-static void C_ccall f_18869(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18865)
-static void C_ccall f_18865(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18846)
-static void C_ccall f_18846(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18824)
-static void C_ccall f_18824(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18830)
-static void C_ccall f_18830(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18839)
-static void C_ccall f_18839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18815)
-static void C_ccall f_18815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18763)
-static void C_ccall f_18763(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18778)
-static C_word C_fcall f_18778(C_word t0);
-C_noret_decl(f_18757)
-static void C_ccall f_18757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18734)
-static void C_ccall f_18734(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_18746)
-static void C_ccall f_18746(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18731)
-static void C_ccall f_18731(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18727)
-static void C_ccall f_18727(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18724)
-static void C_ccall f_18724(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18721)
-static void C_ccall f_18721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18718)
-static void C_ccall f_18718(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18715)
-static void C_ccall f_18715(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18712)
-static void C_ccall f_18712(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18709)
-static void C_ccall f_18709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18706)
-static void C_ccall f_18706(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18703)
-static void C_ccall f_18703(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18700)
-static void C_ccall f_18700(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18697)
-static void C_ccall f_18697(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18691)
-static void C_ccall f_18691(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18695)
-static void C_ccall f_18695(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18688)
-static void C_ccall f_18688(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18685)
-static void C_ccall f_18685(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_18678)
-static void C_ccall f_18678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_18671)
-static void C_ccall f_18671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_18653)
-static void C_ccall f_18653(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18650)
-static void C_ccall f_18650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18612)
-static void C_ccall f_18612(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18621)
-static void C_fcall f_18621(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18631)
-static void C_ccall f_18631(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18641)
-static void C_ccall f_18641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18616)
-static void C_ccall f_18616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18551)
-static void C_ccall f_18551(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18557)
-static void C_fcall f_18557(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18567)
-static void C_ccall f_18567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18577)
-static void C_ccall f_18577(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18531)
-static void C_ccall f_18531(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_18528)
-static void C_ccall f_18528(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_18521)
-static void C_ccall f_18521(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_18526)
-static void C_ccall f_18526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18515)
-static void C_ccall f_18515(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18519)
-static void C_ccall f_18519(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18499)
-static void C_ccall f_18499(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18509)
-static void C_ccall f_18509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18493)
-static void C_ccall f_18493(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18497)
-static void C_ccall f_18497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18477)
-static void C_ccall f_18477(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18487)
-static void C_ccall f_18487(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18474)
-static void C_ccall f_18474(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18471)
-static void C_ccall f_18471(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18468)
-static void C_ccall f_18468(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18465)
-static void C_ccall f_18465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18453)
-static void C_ccall f_18453(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18446)
-static void C_ccall f_18446(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18440)
-static void C_ccall f_18440(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18444)
-static void C_ccall f_18444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18430)
-static void C_ccall f_18430(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18438)
-static void C_ccall f_18438(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18424)
-static void C_ccall f_18424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18428)
-static void C_ccall f_18428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18421)
-static void C_ccall f_18421(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18418)
-static void C_ccall f_18418(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18415)
-static void C_ccall f_18415(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18412)
-static void C_ccall f_18412(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18409)
-static void C_ccall f_18409(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18406)
-static void C_ccall f_18406(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18403)
-static void C_ccall f_18403(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18398)
-static void C_ccall f_18398(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18395)
-static void C_ccall f_18395(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18392)
-static void C_ccall f_18392(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_18389)
-static void C_ccall f_18389(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_18003)
-static void C_ccall f_18003(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_18003)
-static void C_ccall f_18003r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_18074)
-static void C_ccall f_18074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18078)
-static void C_ccall f_18078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18063)
-static void C_ccall f_18063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18037)
-static void C_ccall f_18037(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18041)
-static void C_ccall f_18041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_18026)
-static void C_ccall f_18026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17994)
-static void C_ccall f_17994(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_17994)
-static void C_ccall f_17994r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_17998)
-static void C_ccall f_17998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17948)
-static void C_ccall f_17948(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_17948)
-static void C_ccall f_17948r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_17956)
-static void C_ccall f_17956(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17930)
-static void C_ccall f_17930(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17932)
-static void C_ccall f_17932(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17924)
-static void C_ccall f_17924(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17788)
-static void C_ccall f_17788(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_17788)
-static void C_ccall f_17788r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_17856)
-static void C_fcall f_17856(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17854)
-static void C_ccall f_17854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17802)
-static void C_ccall f_17802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17812)
-static void C_fcall f_17812(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17810)
-static void C_ccall f_17810(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17806)
-static void C_ccall f_17806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17896)
-static C_word C_fcall f_17896(C_word t0);
-C_noret_decl(f_17738)
-static void C_ccall f_17738(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_17738)
-static void C_ccall f_17738r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_17752)
-static void C_fcall f_17752(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17778)
-static void C_ccall f_17778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17750)
-static void C_ccall f_17750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17735)
-static void C_ccall f_17735(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17721)
-static void C_ccall f_17721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_17731)
-static void C_ccall f_17731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17727)
-static void C_ccall f_17727(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17561)
-static void C_ccall f_17561(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17690)
-static void C_ccall f_17690(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17693)
-static void C_ccall f_17693(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17696)
-static void C_ccall f_17696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17675)
-static void C_ccall f_17675(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17678)
-static void C_ccall f_17678(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17614)
-static void C_ccall f_17614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17644)
-static void C_ccall f_17644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17618)
-static void C_ccall f_17618(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17604)
-static void C_ccall f_17604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17607)
-static void C_ccall f_17607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17565)
-static void C_ccall f_17565(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17552)
-static void C_ccall f_17552(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17535)
-static void C_ccall f_17535(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17539)
-static void C_ccall f_17539(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17312)
-static void C_ccall f_17312(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_17312)
-static void C_ccall f_17312r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_17527)
-static void C_ccall f_17527(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17400)
-static void C_fcall f_17400(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17403)
-static void C_fcall f_17403(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17423)
-static void C_fcall f_17423(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17335)
-static void C_ccall f_17335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17338)
-static void C_ccall f_17338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17384)
-static void C_fcall f_17384(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17341)
-static void C_ccall f_17341(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17349)
-static void C_fcall f_17349(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17361)
-static void C_ccall f_17361(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17367)
-static void C_ccall f_17367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17344)
-static void C_ccall f_17344(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17300)
-static void C_ccall f_17300(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17303)
-static void C_ccall f_17303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17307)
-static void C_ccall f_17307(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17279)
-static void C_ccall f_17279(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17283)
-static void C_ccall f_17283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17289)
-static void C_ccall f_17289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17231)
-static void C_ccall f_17231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17234)
-static void C_ccall f_17234(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17117)
-static void C_ccall f_17117(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_17117)
-static void C_ccall f_17117r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_17152)
-static void C_fcall f_17152(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17147)
-static void C_fcall f_17147(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17142)
-static void C_fcall f_17142(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_17137)
-static void C_fcall f_17137(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17119)
-static void C_fcall f_17119(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17123)
-static void C_ccall f_17123(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17136)
-static void C_ccall f_17136(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17028)
-static void C_ccall f_17028(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_17038)
-static void C_ccall f_17038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17046)
-static void C_fcall f_17046(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17104)
-static void C_ccall f_17104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17054)
-static void C_fcall f_17054(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_17067)
-static void C_ccall f_17067(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17070)
-static void C_ccall f_17070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17073)
-static void C_ccall f_17073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17091)
-static void C_ccall f_17091(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17094)
-static void C_ccall f_17094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17076)
-static void C_ccall f_17076(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17084)
-static void C_ccall f_17084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_17041)
-static void C_ccall f_17041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16872)
-static void C_ccall f_16872(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16872)
-static void C_ccall f_16872r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16980)
-static void C_fcall f_16980(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16975)
-static void C_fcall f_16975(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16874)
-static void C_fcall f_16874(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16878)
-static void C_ccall f_16878(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16886)
-static void C_fcall f_16886(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16905)
-static void C_fcall f_16905(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16924)
-static void C_ccall f_16924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16916)
-static void C_ccall f_16916(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16830)
-static void C_ccall f_16830(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16830)
-static void C_ccall f_16830r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16836)
-static void C_fcall f_16836(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16860)
-static void C_ccall f_16860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16827)
-static void C_ccall f_16827(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16751)
-static void C_ccall f_16751(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16751)
-static void C_ccall f_16751r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16792)
-static void C_fcall f_16792(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16821)
-static void C_ccall f_16821(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16755)
-static void C_ccall f_16755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16761)
-static void C_fcall f_16761(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16790)
-static void C_ccall f_16790(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16759)
-static void C_ccall f_16759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16707)
-static void C_ccall f_16707(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16707)
-static void C_ccall f_16707r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16713)
-static void C_fcall f_16713(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16725)
-static void C_ccall f_16725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16711)
-static void C_ccall f_16711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16663)
-static void C_fcall f_16663(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16678)
-static void C_ccall f_16678(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16629)
-static void C_ccall f_16629(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16645)
-static void C_ccall f_16645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16658)
-static void C_ccall f_16658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16451)
-static void C_ccall f_16451(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16451)
-static void C_ccall f_16451r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16455)
-static void C_ccall f_16455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16514)
-static void C_ccall f_16514(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16521)
-static void C_ccall f_16521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16461)
-static void C_ccall f_16461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16464)
-static void C_ccall f_16464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16467)
-static void C_ccall f_16467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16470)
-static void C_ccall f_16470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16493)
-static void C_ccall f_16493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16497)
-static void C_ccall f_16497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16501)
-static void C_ccall f_16501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16505)
-static void C_ccall f_16505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16472)
-static void C_fcall f_16472(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16486)
-static void C_ccall f_16486(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16525)
-static void C_ccall f_16525(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16529)
-static void C_ccall f_16529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16533)
-static void C_ccall f_16533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16444)
-static void C_ccall f_16444(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16438)
-static void C_ccall f_16438(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16432)
-static void C_ccall f_16432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16426)
-static void C_ccall f_16426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16420)
-static void C_ccall f_16420(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16414)
-static void C_ccall f_16414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16348)
-static void C_ccall f_16348(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16409)
-static void C_ccall f_16409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16405)
-static void C_ccall f_16405(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16398)
-static void C_ccall f_16398(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16394)
-static void C_ccall f_16394(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16359)
-static void C_ccall f_16359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16367)
-static void C_ccall f_16367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16363)
-static void C_ccall f_16363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16308)
-static void C_ccall f_16308(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16312)
-static void C_ccall f_16312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16320)
-static void C_fcall f_16320(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16335)
-static void C_ccall f_16335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16328)
-static void C_fcall f_16328(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16315)
-static void C_ccall f_16315(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16271)
-static void C_ccall f_16271(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16275)
-static void C_ccall f_16275(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16278)
-static void C_ccall f_16278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16252)
-static void C_ccall f_16252(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16256)
-static void C_ccall f_16256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16269)
-static void C_ccall f_16269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16234)
-static void C_ccall f_16234(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16241)
-static void C_ccall f_16241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16162)
-static void C_ccall f_16162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_16168)
-static void C_fcall f_16168(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16197)
-static void C_fcall f_16197(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21886)
-static void C_ccall f_21886(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21914)
-static void C_ccall f_21914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21918)
-static void C_fcall f_21918(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21921)
-static void C_ccall f_21921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21845)
-static void C_ccall f_21845(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_21855)
-static void C_fcall f_21855(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21831)
-static void C_ccall f_21831(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21828)
-static void C_ccall f_21828(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21818)
-static void C_ccall f_21818(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21799)
-static void C_ccall f_21799(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21803)
-static void C_ccall f_21803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21780)
-static void C_ccall f_21780(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_21784)
-static void C_ccall f_21784(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_21762)
-static void C_ccall f_21762(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21737)
-static void C_ccall f_21737(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16107)
-static void C_fcall f_16107(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16129)
-static void C_ccall f_16129(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16132)
-static void C_ccall f_16132(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16135)
-static void C_ccall f_16135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16138)
-static void C_ccall f_16138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16103)
-static void C_ccall f_16103(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16100)
-static void C_ccall f_16100(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16097)
-static void C_ccall f_16097(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16070)
-static void C_ccall f_16070(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16070)
-static void C_ccall f_16070r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16076)
-static void C_fcall f_16076(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16043)
-static void C_ccall f_16043(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16043)
-static void C_ccall f_16043r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16049)
-static void C_fcall f_16049(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_16016)
-static void C_ccall f_16016(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_16016)
-static void C_ccall f_16016r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_16022)
-static void C_fcall f_16022(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15975)
-static void C_ccall f_15975(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15981)
-static void C_ccall f_15981(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_16010)
-static void C_ccall f_16010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15983)
-static void C_ccall f_15983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15987)
-static void C_ccall f_15987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15990)
-static void C_ccall f_15990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15994)
-static void C_ccall f_15994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15997)
-static void C_ccall f_15997(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16001)
-static void C_ccall f_16001(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_16004)
-static void C_ccall f_16004(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15912)
-static void C_ccall f_15912(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_15931)
-static void C_ccall f_15931(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15973)
-static void C_ccall f_15973(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15934)
-static void C_ccall f_15934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15962)
-static void C_ccall f_15962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15946)
-static void C_ccall f_15946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15937)
-static void C_ccall f_15937(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15892)
-static void C_ccall f_15892(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15875)
-static void C_ccall f_15875(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15879)
-static void C_ccall f_15879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15889)
-static void C_ccall f_15889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14929)
-static void C_ccall f_14929(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14933)
-static void C_ccall f_14933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14936)
-static void C_ccall f_14936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14939)
-static void C_ccall f_14939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14942)
-static void C_ccall f_14942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15251)
-static void C_fcall f_15251(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15490)
-static void C_ccall f_15490(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15819)
-static void C_ccall f_15819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15822)
-static void C_ccall f_15822(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15831)
-static void C_fcall f_15831(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15844)
-static void C_ccall f_15844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15847)
-static void C_ccall f_15847(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15785)
-static void C_ccall f_15785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15788)
-static void C_ccall f_15788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15769)
-static void C_ccall f_15769(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15779)
-static void C_ccall f_15779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15772)
-static void C_ccall f_15772(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15757)
-static void C_ccall f_15757(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15725)
-static void C_ccall f_15725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15735)
-static void C_ccall f_15735(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15728)
-static void C_ccall f_15728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15654)
-static void C_ccall f_15654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15657)
-static void C_ccall f_15657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15666)
-static void C_fcall f_15666(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15698)
-static void C_ccall f_15698(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15701)
-static void C_ccall f_15701(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15688)
-static void C_ccall f_15688(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15679)
-static void C_ccall f_15679(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15516)
-static void C_ccall f_15516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15521)
-static void C_fcall f_15521(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15569)
-static void C_ccall f_15569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15626)
-static void C_ccall f_15626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15629)
-static void C_ccall f_15629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15636)
-static void C_ccall f_15636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15534)
-static void C_ccall f_15534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15507)
-static void C_ccall f_15507(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15497)
-static void C_ccall f_15497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15458)
-static void C_ccall f_15458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15467)
-static void C_ccall f_15467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15412)
-static void C_ccall f_15412(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15439)
-static void C_ccall f_15439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15433)
-static void C_ccall f_15433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15421)
-static void C_ccall f_15421(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15376)
-static void C_ccall f_15376(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15300)
-static void C_ccall f_15300(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15306)
-static void C_ccall f_15306(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15346)
-static void C_ccall f_15346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15353)
-static void C_ccall f_15353(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15330)
-static void C_ccall f_15330(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15337)
-static void C_ccall f_15337(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15310)
-static void C_fcall f_15310(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15126)
-static void C_fcall f_15126(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15142)
-static void C_fcall f_15142(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15157)
-static void C_fcall f_15157(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15207)
-static void C_fcall f_15207(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15173)
-static void C_fcall f_15173(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15180)
-static void C_ccall f_15180(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15077)
-static void C_fcall f_15077(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15084)
-static void C_ccall f_15084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15089)
-static void C_fcall f_15089(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_15102)
-static void C_ccall f_15102(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15105)
-static void C_ccall f_15105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15056)
-static C_word C_fcall f_15056(C_word t0);
-C_noret_decl(f_15015)
-static void C_fcall f_15015(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_15019)
-static void C_ccall f_15019(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15022)
-static void C_ccall f_15022(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15041)
-static void C_ccall f_15041(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15044)
-static void C_ccall f_15044(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_15025)
-static void C_ccall f_15025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14944)
-static void C_fcall f_14944(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14954)
-static void C_ccall f_14954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14991)
-static void C_ccall f_14991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14978)
-static void C_ccall f_14978(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14960)
-static void C_ccall f_14960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14894)
-static void C_ccall f_14894(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_14894)
-static void C_ccall f_14894r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_14902)
-static void C_ccall f_14902(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14909)
-static void C_ccall f_14909(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14912)
-static void C_ccall f_14912(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14871)
-static void C_ccall f_14871(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_14871)
-static void C_ccall f_14871r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_14879)
-static void C_ccall f_14879(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14886)
-static void C_ccall f_14886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14889)
-static void C_ccall f_14889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14840)
-static void C_ccall f_14840(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_14840)
-static void C_ccall f_14840r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_14844)
-static void C_ccall f_14844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14847)
-static void C_ccall f_14847(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14809)
-static void C_ccall f_14809(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_14809)
-static void C_ccall f_14809r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_14813)
-static void C_ccall f_14813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14816)
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14781)
-static void C_ccall f_14781(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_14781)
-static void C_ccall f_14781r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_14785)
-static void C_ccall f_14785(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14744)
-static void C_ccall f_14744(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_14744)
-static void C_ccall f_14744r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_14748)
-static void C_ccall f_14748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14754)
-static void C_ccall f_14754(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14757)
-static void C_ccall f_14757(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14732)
-static void C_ccall f_14732(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14736)
-static void C_ccall f_14736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14719)
-static void C_ccall f_14719(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14668)
-static void C_ccall f_14668(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14682)
-static void C_ccall f_14682(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14689)
-static void C_ccall f_14689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14696)
-static void C_ccall f_14696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14606)
-static void C_fcall f_14606(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14608)
-static void C_ccall f_14608(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14621)
-static void C_ccall f_14621(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14654)
-static void C_ccall f_14654(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14624)
-static void C_fcall f_14624(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14633)
-static void C_ccall f_14633(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14644)
-static void C_ccall f_14644(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14583)
-static void C_ccall f_14583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14546)
-static void C_ccall f_14546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14571)
-static void C_ccall f_14571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14559)
-static void C_ccall f_14559(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14484)
-static void C_ccall f_14484(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14472)
-static void C_ccall f_14472(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14307)
-static void C_ccall f_14307(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11914)
-static void C_ccall f_11914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11918)
-static void C_ccall f_11918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11921)
-static void C_ccall f_11921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11924)
-static void C_ccall f_11924(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11927)
-static void C_ccall f_11927(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11930)
-static void C_ccall f_11930(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12007)
-static void C_fcall f_12007(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13624)
-static void C_ccall f_13624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13627)
-static void C_ccall f_13627(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13633)
-static void C_fcall f_13633(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14277)
-static void C_ccall f_14277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14190)
-static void C_ccall f_14190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13716)
-static void C_ccall f_13716(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13719)
-static void C_ccall f_13719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13778)
-static void C_fcall f_13778(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14082)
-static void C_ccall f_14082(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14085)
-static void C_ccall f_14085(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14103)
-static void C_ccall f_14103(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14159)
-static void C_ccall f_14159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14122)
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14097)
-static void C_ccall f_14097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14059)
-static void C_ccall f_14059(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14062)
-static void C_ccall f_14062(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14073)
-static void C_ccall f_14073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14050)
-static void C_ccall f_14050(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14046)
-static void C_ccall f_14046(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14026)
-static void C_ccall f_14026(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14033)
-static void C_ccall f_14033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14010)
-static void C_ccall f_14010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14017)
-static void C_ccall f_14017(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13994)
-static void C_ccall f_13994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14001)
-static void C_ccall f_14001(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13979)
-static void C_ccall f_13979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13982)
-static void C_ccall f_13982(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13967)
-static void C_ccall f_13967(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13952)
-static void C_ccall f_13952(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13955)
-static void C_ccall f_13955(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13940)
-static void C_ccall f_13940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13876)
-static void C_ccall f_13876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13879)
-static void C_ccall f_13879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13882)
-static void C_ccall f_13882(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13898)
-static void C_ccall f_13898(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13892)
-static void C_ccall f_13892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13887)
-static void C_ccall f_13887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13860)
-static void C_ccall f_13860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13867)
-static void C_ccall f_13867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13844)
-static void C_ccall f_13844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13851)
-static void C_ccall f_13851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13832)
-static void C_ccall f_13832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13820)
-static void C_ccall f_13820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13808)
-static void C_ccall f_13808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13796)
-static void C_ccall f_13796(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13772)
-static void C_ccall f_13772(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13728)
-static void C_ccall f_13728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13731)
-static void C_ccall f_13731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13737)
-static void C_fcall f_13737(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13680)
-static void C_ccall f_13680(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13707)
-static void C_ccall f_13707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13703)
-static void C_ccall f_13703(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13689)
-static void C_ccall f_13689(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13696)
-static void C_ccall f_13696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13664)
-static void C_ccall f_13664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13671)
-static void C_ccall f_13671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13648)
-static void C_ccall f_13648(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13655)
-static void C_ccall f_13655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13609)
-static void C_fcall f_13609(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13617)
-static void C_ccall f_13617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13540)
-static void C_fcall f_13540(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13562)
-static void C_ccall f_13562(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13547)
-static void C_ccall f_13547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13454)
-static void C_fcall f_13454(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13458)
-static void C_ccall f_13458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13461)
-static void C_ccall f_13461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13467)
-static void C_ccall f_13467(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13472)
-static void C_fcall f_13472(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13520)
-static void C_ccall f_13520(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13491)
-static void C_fcall f_13491(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13505)
-static void C_ccall f_13505(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13509)
-static void C_ccall f_13509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13501)
-static void C_ccall f_13501(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13371)
-static void C_fcall f_13371(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13377)
-static void C_fcall f_13377(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13381)
-static void C_ccall f_13381(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13440)
-static void C_ccall f_13440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13417)
-static void C_ccall f_13417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13155)
-static void C_fcall f_13155(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13159)
-static void C_ccall f_13159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13162)
-static void C_ccall f_13162(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13344)
-static void C_fcall f_13344(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13351)
-static void C_ccall f_13351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13174)
-static void C_ccall f_13174(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13191)
-static void C_fcall f_13191(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13207)
-static void C_ccall f_13207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13197)
-static void C_ccall f_13197(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13080)
-static void C_fcall f_13080(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13153)
-static void C_ccall f_13153(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13094)
-static void C_ccall f_13094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13096)
-static void C_fcall f_13096(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13142)
-static void C_ccall f_13142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13115)
-static void C_ccall f_13115(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13122)
-static void C_ccall f_13122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13050)
-static void C_fcall f_13050(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13078)
-static void C_ccall f_13078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13065)
-static void C_ccall f_13065(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13054)
-static void C_ccall f_13054(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13061)
-static void C_ccall f_13061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12995)
-static void C_fcall f_12995(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13003)
-static void C_ccall f_13003(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13005)
-static void C_fcall f_13005(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13015)
-static void C_fcall f_13015(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13021)
-static void C_ccall f_13021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13028)
-static void C_ccall f_13028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12933)
-static void C_fcall f_12933(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12941)
-static void C_ccall f_12941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12943)
-static void C_fcall f_12943(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12953)
-static void C_fcall f_12953(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12959)
-static void C_fcall f_12959(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12962)
-static void C_ccall f_12962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12969)
-static void C_ccall f_12969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12863)
-static void C_fcall f_12863(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12931)
-static void C_ccall f_12931(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12873)
-static void C_ccall f_12873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12876)
-static void C_ccall f_12876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12803)
-static void C_fcall f_12803(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12861)
-static void C_ccall f_12861(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12813)
-static void C_ccall f_12813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12816)
-static void C_ccall f_12816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12851)
-static void C_ccall f_12851(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12838)
-static void C_ccall f_12838(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12756)
-static void C_fcall f_12756(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12761)
-static void C_ccall f_12761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12773)
-static void C_ccall f_12773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12788)
-static void C_ccall f_12788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12779)
-static void C_ccall f_12779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12738)
-static void C_fcall f_12738(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12742)
-static void C_ccall f_12742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12748)
-static void C_ccall f_12748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12527)
-static void C_fcall f_12527(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12736)
-static void C_ccall f_12736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12550)
-static void C_ccall f_12550(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12571)
-static void C_fcall f_12571(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12575)
-static void C_ccall f_12575(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12729)
-static void C_ccall f_12729(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12578)
-static void C_fcall f_12578(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12581)
-static void C_ccall f_12581(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12725)
-static void C_ccall f_12725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12605)
-static void C_ccall f_12605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12608)
-static void C_ccall f_12608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12617)
-static void C_fcall f_12617(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12687)
-static void C_ccall f_12687(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12655)
-static void C_ccall f_12655(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12658)
-static void C_ccall f_12658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12661)
-static void C_ccall f_12661(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12620)
-static void C_ccall f_12620(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12623)
-static void C_ccall f_12623(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12646)
-static void C_ccall f_12646(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12629)
-static void C_ccall f_12629(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12642)
-static void C_ccall f_12642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12553)
-static void C_ccall f_12553(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12537)
-static void C_ccall f_12537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12548)
-static void C_ccall f_12548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12154)
-static void C_fcall f_12154(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12525)
-static void C_ccall f_12525(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12521)
-static void C_ccall f_12521(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12517)
-static void C_ccall f_12517(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12168)
-static void C_ccall f_12168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12170)
-static void C_fcall f_12170(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12506)
-static void C_ccall f_12506(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12187)
-static void C_ccall f_12187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12456)
-static void C_fcall f_12456(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12470)
-static void C_ccall f_12470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12477)
-static void C_ccall f_12477(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12463)
-static void C_ccall f_12463(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12423)
-static void C_ccall f_12423(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12429)
-static void C_ccall f_12429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12443)
-static void C_ccall f_12443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12447)
-static void C_ccall f_12447(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12436)
-static void C_ccall f_12436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12351)
-static void C_ccall f_12351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12357)
-static void C_ccall f_12357(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12410)
-static void C_ccall f_12410(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12414)
-static void C_ccall f_12414(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12403)
-static void C_ccall f_12403(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12399)
-static void C_ccall f_12399(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12363)
-static void C_fcall f_12363(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12366)
-static void C_ccall f_12366(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12369)
-static void C_ccall f_12369(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12379)
-static void C_ccall f_12379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12383)
-static void C_ccall f_12383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12342)
-static void C_ccall f_12342(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12334)
-static void C_ccall f_12334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12310)
-static void C_ccall f_12310(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12289)
-static void C_ccall f_12289(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12268)
-static void C_ccall f_12268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12251)
-static void C_ccall f_12251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12234)
-static void C_ccall f_12234(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12217)
-static void C_ccall f_12217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12200)
-static void C_ccall f_12200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12118)
-static void C_fcall f_12118(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12122)
-static void C_ccall f_12122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12130)
-static void C_fcall f_12130(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12058)
-static void C_fcall f_12058(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12064)
-static void C_fcall f_12064(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12090)
-static void C_ccall f_12090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12074)
-static void C_ccall f_12074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12077)
-static void C_ccall f_12077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12087)
-static void C_ccall f_12087(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12010)
-static void C_fcall f_12010(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12018)
-static void C_ccall f_12018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12020)
-static void C_fcall f_12020(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12049)
-static void C_ccall f_12049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12056)
-static void C_ccall f_12056(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12033)
-static void C_ccall f_12033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12040)
-static void C_ccall f_12040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11992)
-static void C_fcall f_11992(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11996)
-static void C_ccall f_11996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11983)
-static void C_fcall f_11983(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11987)
-static void C_ccall f_11987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11947)
-static void C_fcall f_11947(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11955)
-static void C_ccall f_11955(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11957)
-static void C_fcall f_11957(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11964)
-static void C_fcall f_11964(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11971)
-static void C_ccall f_11971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11938)
-static void C_fcall f_11938(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_11932)
-static void C_ccall f_11932(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11888)
-static void C_ccall f_11888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11888)
-static void C_ccall f_11888r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11896)
-static void C_ccall f_11896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11909)
-static void C_ccall f_11909(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11899)
-static void C_ccall f_11899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11865)
-static void C_ccall f_11865(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11865)
-static void C_ccall f_11865r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11873)
-static void C_ccall f_11873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11886)
-static void C_ccall f_11886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11876)
-static void C_ccall f_11876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11839)
-static void C_ccall f_11839(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11836)
-static void C_ccall f_11836(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11833)
-static void C_ccall f_11833(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11796)
-static void C_ccall f_11796(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11796)
-static void C_ccall f_11796r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11800)
-static void C_ccall f_11800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11803)
-static void C_ccall f_11803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11806)
-static void C_ccall f_11806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11762)
-static void C_ccall f_11762(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11762)
-static void C_ccall f_11762r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11766)
-static void C_ccall f_11766(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11769)
-static void C_ccall f_11769(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11772)
-static void C_ccall f_11772(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11737)
-static void C_ccall f_11737(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11750)
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11725)
-static void C_ccall f_11725(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11729)
-static void C_ccall f_11729(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11732)
-static void C_ccall f_11732(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11666)
-static void C_ccall f_11666(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11670)
-static void C_ccall f_11670(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11638)
-static void C_ccall f_11638(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11638)
-static void C_ccall f_11638r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11642)
-static void C_ccall f_11642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11597)
-static void C_ccall f_11597(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11597)
-static void C_ccall f_11597r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11601)
-static void C_ccall f_11601(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11604)
-static void C_ccall f_11604(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11607)
-static void C_ccall f_11607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11594)
-static void C_ccall f_11594(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11495)
-static void C_ccall f_11495(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_11495)
-static void C_ccall f_11495r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_11502)
-static void C_ccall f_11502(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11576)
-static void C_ccall f_11576(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11509)
-static void C_fcall f_11509(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11513)
-static void C_ccall f_11513(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11513)
-static void C_ccall f_11513r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11544)
-static void C_ccall f_11544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11526)
-static void C_fcall f_11526(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11533)
-static void C_ccall f_11533(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11591)
-static void C_ccall f_11591(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11440)
-static void C_ccall f_11440(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11452)
-static void C_ccall f_11452(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11458)
-static void C_ccall f_11458(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11484)
-static void C_ccall f_11484(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11488)
-static void C_ccall f_11488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11468)
-static void C_ccall f_11468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11479)
-static void C_ccall f_11479(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11475)
-static void C_ccall f_11475(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11462)
-static void C_ccall f_11462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11403)
-static void C_ccall f_11403(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11412)
-static void C_ccall f_11412(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11438)
-static void C_ccall f_11438(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11422)
-static void C_ccall f_11422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11433)
-static void C_ccall f_11433(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11429)
-static void C_ccall f_11429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11416)
-static void C_ccall f_11416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11355)
-static void C_ccall f_11355(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11355)
-static void C_ccall f_11355r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11359)
-static void C_ccall f_11359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11362)
-static void C_ccall f_11362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11343)
-static void C_ccall f_11343(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11331)
-static void C_ccall f_11331(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11335)
-static void C_ccall f_11335(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11300)
-static void C_ccall f_11300(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11300)
-static void C_ccall f_11300r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f25047)
-static void C_ccall f25047(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f23942)
-static void C_ccall f23942(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11304)
-static void C_ccall f_11304(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11307)
-static void C_ccall f_11307(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11266)
-static void C_ccall f_11266(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11266)
-static void C_ccall f_11266r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11270)
-static void C_ccall f_11270(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11273)
-static void C_ccall f_11273(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11276)
-static void C_ccall f_11276(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11253)
-static void C_ccall f_11253(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11260)
-static void C_ccall f_11260(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11224)
-static void C_ccall f_11224(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11233)
-static void C_ccall f_11233(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11251)
-static void C_ccall f_11251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11237)
-static void C_ccall f_11237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11202)
-static void C_ccall f_11202(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11211)
-static void C_ccall f_11211(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11222)
-static void C_ccall f_11222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11218)
-static void C_ccall f_11218(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11182)
-static void C_ccall f_11182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11182)
-static void C_ccall f_11182r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11186)
-static void C_ccall f_11186(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11192)
-static void C_ccall f_11192(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11192)
-static void C_ccall f_11192r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11196)
-static void C_ccall f_11196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11162)
-static void C_ccall f_11162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11162)
-static void C_ccall f_11162r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11166)
-static void C_ccall f_11166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11172)
-static void C_ccall f_11172(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11172)
-static void C_ccall f_11172r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11176)
-static void C_ccall f_11176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11138)
-static void C_ccall f_11138(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11138)
-static void C_ccall f_11138r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11142)
-static void C_ccall f_11142(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11153)
-static void C_ccall f_11153(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11153)
-static void C_ccall f_11153r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11157)
-static void C_ccall f_11157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11147)
-static void C_ccall f_11147(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11114)
-static void C_ccall f_11114(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_11114)
-static void C_ccall f_11114r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_11118)
-static void C_ccall f_11118(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11129)
-static void C_ccall f_11129(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_11129)
-static void C_ccall f_11129r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_11133)
-static void C_ccall f_11133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11123)
-static void C_ccall f_11123(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11108)
-static void C_ccall f_11108(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11102)
-static void C_ccall f_11102(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11096)
-static void C_ccall f_11096(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_11096)
-static void C_ccall f_11096r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_11090)
-static void C_ccall f_11090(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_11090)
-static void C_ccall f_11090r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_11065)
-static void C_fcall f_11065(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11069)
-static void C_ccall f_11069(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11081)
-static void C_ccall f_11081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10967)
-static void C_fcall f_10967(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10976)
-static void C_ccall f_10976(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11012)
-static void C_fcall f_11012(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11025)
-static void C_ccall f_11025(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10983)
-static void C_ccall f_10983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10986)
-static void C_ccall f_10986(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11010)
-static void C_ccall f_11010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10992)
-static void C_ccall f_10992(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10995)
-static void C_ccall f_10995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11006)
-static void C_ccall f_11006(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11002)
-static void C_ccall f_11002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10989)
-static void C_ccall f_10989(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10877)
-static void C_ccall f_10877(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10917)
-static void C_fcall f_10917(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10951)
-static void C_ccall f_10951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10940)
-static void C_ccall f_10940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10947)
-static void C_ccall f_10947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10896)
-static void C_ccall f_10896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10903)
-static void C_ccall f_10903(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10867)
-static void C_ccall f_10867(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_10875)
-static void C_ccall f_10875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10833)
-static void C_ccall f_10833(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10821)
-static void C_ccall f_10821(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10815)
-static void C_ccall f_10815(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10798)
-static void C_ccall f_10798(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10813)
-static void C_ccall f_10813(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10782)
-static void C_ccall f_10782(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10782)
-static void C_ccall f_10782r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10795)
-static void C_ccall f_10795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10766)
-static void C_ccall f_10766(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10766)
-static void C_ccall f_10766r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10779)
-static void C_ccall f_10779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10750)
-static void C_ccall f_10750(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10750)
-static void C_ccall f_10750r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10763)
-static void C_ccall f_10763(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10735)
-static void C_ccall f_10735(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10739)
-static void C_ccall f_10739(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10742)
-static void C_ccall f_10742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10705)
-static void C_ccall f_10705(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_10705)
-static void C_ccall f_10705r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_10678)
-static void C_ccall f_10678(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_10678)
-static void C_ccall f_10678r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_10690)
-static void C_fcall f_10690(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22079)
-static void C_ccall f_22079(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_22200)
-static void C_ccall f_22200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22086)
-static void C_fcall f_22086(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22099)
-static void C_fcall f_22099(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_22104)
-static void C_ccall f_22104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22147)
-static void C_ccall f_22147(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22151)
-static void C_ccall f_22151(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22132)
-static void C_ccall f_22132(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22168)
-static void C_ccall f_22168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22023)
-static void C_ccall f_22023(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_22031)
-static void C_fcall f_22031(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_22033)
-static C_word C_fcall f_22033(C_word t0,C_word t1,C_word t2,C_word t3);
-C_noret_decl(f_22020)
-static void C_ccall f_22020(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_22017)
-static void C_ccall f_22017(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_22011)
-static void C_ccall f_22011(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_22008)
-static void C_ccall f_22008(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_22005)
-static void C_ccall f_22005(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_22002)
-static void C_ccall f_22002(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_21999)
-static void C_ccall f_21999(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10631)
-static void C_ccall f_10631(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_10610)
-static void C_ccall f_10610(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10593)
-static void C_ccall f_10593(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10590)
-static void C_ccall f_10590(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10575)
-static void C_ccall f_10575(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_10575)
-static void C_ccall f_10575r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_10584)
-static void C_ccall f_10584(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10542)
-static void C_ccall f_10542(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10552)
-static void C_ccall f_10552(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10535)
-static void C_ccall f_10535(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10525)
-static void C_ccall f_10525(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10467)
-static void C_fcall f_10467(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10512)
-static void C_ccall f_10512(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10483)
-static void C_ccall f_10483(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10489)
-static void C_ccall f_10489(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10427)
-static void C_ccall f_10427(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10433)
-static void C_ccall f_10433(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10439)
-static void C_ccall f_10439(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10439)
-static void C_ccall f_10439r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10443)
-static void C_ccall f_10443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10396)
-static void C_ccall f_10396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10400)
-static void C_ccall f_10400(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10409)
-static void C_ccall f_10409(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_10409)
-static void C_ccall f_10409r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_10417)
-static void C_ccall f_10417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10307)
-static void C_ccall f_10307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_10307)
-static void C_ccall f_10307r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_10361)
-static void C_fcall f_10361(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10393)
-static void C_ccall f_10393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10390)
-static void C_ccall f_10390(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10378)
-static void C_ccall f_10378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10386)
-static void C_ccall f_10386(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10382)
-static void C_ccall f_10382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10319)
-static void C_fcall f_10319(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10348)
-static void C_ccall f_10348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10236)
-static void C_ccall f_10236(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_10236)
-static void C_ccall f_10236r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_10278)
-static void C_fcall f_10278(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10302)
-static void C_ccall f_10302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10291)
-static void C_ccall f_10291(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10298)
-static void C_ccall f_10298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10248)
-static void C_fcall f_10248(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10258)
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10184)
-static void C_fcall f_10184(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10202)
-static C_word C_fcall f_10202(C_word t0);
-C_noret_decl(f_10194)
-static void C_fcall f_10194(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10139)
-static void C_fcall f_10139(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_10171)
-static void C_ccall f_10171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10175)
-static void C_ccall f_10175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10094)
-static void C_ccall f_10094(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10100)
-static void C_fcall f_10100(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10120)
-static void C_ccall f_10120(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10124)
-static void C_ccall f_10124(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10056)
-static void C_ccall f_10056(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10062)
-static void C_fcall f_10062(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10078)
-static void C_ccall f_10078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10050)
-static void C_ccall f_10050(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10043)
-static void C_ccall f_10043(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10038)
-static void C_ccall f_10038(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9884)
-static void C_ccall f_9884(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9884)
-static void C_ccall f_9884r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9915)
-static void C_ccall f_9915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9918)
-static void C_ccall f_9918(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9897)
-static void C_ccall f_9897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9843)
-static void C_fcall f_9843(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9856)
-static C_word C_fcall f_9856(C_word t0,C_word t1);
-C_noret_decl(f_9833)
-static void C_ccall f_9833(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9827)
-static void C_ccall f_9827(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9821)
-static void C_ccall f_9821(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9815)
-static void C_ccall f_9815(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9809)
-static void C_ccall f_9809(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9795)
-static void C_ccall f_9795(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9803)
-static void C_ccall f_9803(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9807)
-static void C_ccall f_9807(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9781)
-static void C_ccall f_9781(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9789)
-static void C_ccall f_9789(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9793)
-static void C_ccall f_9793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9767)
-static void C_ccall f_9767(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9775)
-static void C_ccall f_9775(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9779)
-static void C_ccall f_9779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9753)
-static void C_ccall f_9753(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9761)
-static void C_ccall f_9761(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9765)
-static void C_ccall f_9765(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9739)
-static void C_ccall f_9739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9747)
-static void C_ccall f_9747(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9751)
-static void C_ccall f_9751(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9733)
-static void C_ccall f_9733(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9727)
-static void C_ccall f_9727(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9715)
-static void C_ccall f_9715(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9703)
-static void C_ccall f_9703(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9691)
-static void C_ccall f_9691(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9679)
-static void C_ccall f_9679(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9667)
-static void C_ccall f_9667(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9661)
-static void C_ccall f_9661(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9655)
-static void C_ccall f_9655(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9652)
-static void C_ccall f_9652(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9617)
-static void C_fcall f_9617(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9621)
-static void C_ccall f_9621(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9629)
-static C_word C_fcall f_9629(C_word t0,C_word t1);
-C_noret_decl(f_9583)
-static void C_ccall f_9583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_9583)
-static void C_ccall f_9583r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_9587)
-static void C_ccall f_9587(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9512)
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_9512)
-static void C_ccall f_9512r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_9528)
-static void C_ccall f_9528(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9534)
-static void C_ccall f_9534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9539)
-static C_word C_fcall f_9539(C_word t0,C_word t1);
-C_noret_decl(f_9484)
-static void C_ccall f_9484(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9493)
-static C_word C_fcall f_9493(C_word t0,C_word t1);
-C_noret_decl(f_9478)
-static void C_ccall f_9478(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_9478)
-static void C_ccall f_9478r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_9445)
-static void C_ccall f_9445(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9454)
-static void C_fcall f_9454(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9472)
-static void C_ccall f_9472(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9393)
-static void C_ccall f_9393(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9409)
-static void C_ccall f_9409(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9414)
-static C_word C_fcall f_9414(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_9364)
-static void C_ccall f_9364(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_9364)
-static void C_ccall f_9364r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_9371)
-static void C_ccall f_9371(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9361)
-static void C_ccall f_9361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9358)
-static void C_ccall f_9358(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9355)
-static void C_ccall f_9355(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9352)
-static void C_ccall f_9352(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9327)
-static void C_ccall f_9327(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9331)
-static void C_ccall f_9331(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9334)
-static void C_ccall f_9334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9315)
-static void C_ccall f_9315(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9319)
-static void C_ccall f_9319(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9325)
-static void C_ccall f_9325(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9303)
-static void C_ccall f_9303(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9313)
-static void C_ccall f_9313(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9294)
-static void C_ccall f_9294(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9298)
-static void C_ccall f_9298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9288)
-static void C_ccall f_9288(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9279)
-static void C_ccall f_9279(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9273)
-static void C_ccall f_9273(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9277)
-static void C_ccall f_9277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9233)
-static void C_ccall f_9233(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_9233)
-static void C_ccall f_9233r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_9218)
-static void C_ccall f_9218(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9225)
-static void C_ccall f_9225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9197)
-static void C_ccall f_9197(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9212)
-static void C_ccall f_9212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9208)
-static void C_ccall f_9208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9177)
-static void C_ccall f_9177(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9123)
-static void C_ccall f_9123(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_9123)
-static void C_ccall f_9123r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_9157)
-static void C_ccall f_9157(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f23892)
-static void C_ccall f23892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f23888)
-static void C_ccall f23888(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9144)
-static void C_ccall f_9144(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9148)
-static void C_ccall f_9148(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9140)
-static void C_ccall f_9140(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9110)
-static void C_ccall f_9110(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9121)
-static void C_ccall f_9121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9097)
-static void C_ccall f_9097(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9108)
-static void C_ccall f_9108(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9084)
-static void C_ccall f_9084(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9095)
-static void C_ccall f_9095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9071)
-static void C_ccall f_9071(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9079)
-static void C_ccall f_9079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9048)
-static void C_ccall f_9048(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9030)
-static void C_ccall f_9030(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9004)
-static void C_ccall f_9004(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9024)
-static void C_ccall f_9024(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9028)
-static void C_ccall f_9028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8986)
-static void C_ccall f_8986(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8959)
-static C_word C_fcall f_8959(C_word t0,C_word t1);
-C_noret_decl(f_8947)
-static void C_ccall f_8947(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8944)
-static void C_ccall f_8944(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8939)
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8907)
-static void C_ccall f_8907(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_8907)
-static void C_ccall f_8907r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_8911)
-static void C_ccall f_8911(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8842)
-static void C_ccall f_8842(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_8842)
-static void C_ccall f_8842r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_8854)
-static void C_fcall f_8854(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8864)
-static void C_ccall f_8864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8879)
-static void C_ccall f_8879(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8890)
-static void C_ccall f_8890(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8828)
-static void C_ccall f_8828(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8840)
-static void C_ccall f_8840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8771)
-static void C_ccall f_8771(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_8771)
-static void C_ccall f_8771r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_8783)
-static void C_fcall f_8783(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8793)
-static void C_ccall f_8793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8808)
-static void C_ccall f_8808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8819)
-static void C_ccall f_8819(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8746)
-static void C_ccall f_8746(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8752)
-static void C_fcall f_8752(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8769)
-static void C_ccall f_8769(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8734)
-static void C_ccall f_8734(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_8734)
-static void C_ccall f_8734r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_8731)
-static void C_ccall f_8731(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8728)
-static void C_ccall f_8728(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8725)
-static void C_ccall f_8725(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8722)
-static void C_ccall f_8722(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8719)
-static void C_ccall f_8719(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8716)
-static void C_ccall f_8716(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8713)
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8710)
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8704)
-static void C_ccall f_8704(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_8704)
-static void C_ccall f_8704r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_8698)
-static void C_ccall f_8698(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_8698)
-static void C_ccall f_8698r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_8651)
-static void C_fcall f_8651(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8657)
-static void C_fcall f_8657(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8681)
-static void C_ccall f_8681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8674)
-static void C_ccall f_8674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8646)
-static void C_ccall f_8646(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8643)
-static void C_ccall f_8643(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8614)
-static void C_ccall f_8614(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8635)
-static void C_ccall f_8635(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8600)
-static void C_ccall f_8600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8612)
-static void C_ccall f_8612(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8591)
-static void C_ccall f_8591(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8579)
-static void C_ccall f_8579(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8567)
-static void C_ccall f_8567(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8555)
-static void C_ccall f_8555(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8551)
-static void C_ccall f_8551(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8516)
-static void C_ccall f_8516(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8547)
-static void C_ccall f_8547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8541)
-static void C_ccall f_8541(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8529)
-static void C_ccall f_8529(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8503)
-static void C_ccall f_8503(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8491)
-static void C_ccall f_8491(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8485)
-static void C_ccall f_8485(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8479)
-static void C_ccall f_8479(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8460)
-static void C_ccall f_8460(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8457)
-static void C_ccall f_8457(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8454)
-static void C_ccall f_8454(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8451)
-static void C_ccall f_8451(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8448)
-static void C_ccall f_8448(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8445)
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8442)
-static void C_ccall f_8442(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8439)
-static void C_ccall f_8439(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8436)
-static void C_ccall f_8436(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8430)
-static void C_ccall f_8430(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8427)
-static void C_ccall f_8427(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8423)
-static void C_ccall f_8423(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8419)
-static void C_ccall f_8419(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8413)
-static void C_ccall f_8413(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8406)
-static void C_ccall f_8406(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8400)
-static void C_ccall f_8400(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8374)
-static void C_ccall f_8374(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8389)
-static void C_ccall f_8389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8357)
-static void C_ccall f_8357(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8372)
-static void C_ccall f_8372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8340)
-static void C_ccall f_8340(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8355)
-static void C_ccall f_8355(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8323)
-static void C_ccall f_8323(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8338)
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8300)
-static void C_ccall f_8300(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8321)
-static void C_ccall f_8321(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8283)
-static void C_ccall f_8283(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8298)
-static void C_ccall f_8298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8260)
-static void C_ccall f_8260(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8281)
-static void C_ccall f_8281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8243)
-static void C_ccall f_8243(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8258)
-static void C_ccall f_8258(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8226)
-static void C_ccall f_8226(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8241)
-static void C_ccall f_8241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8209)
-static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8224)
-static void C_ccall f_8224(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8192)
-static void C_ccall f_8192(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8207)
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8175)
-static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8190)
-static void C_ccall f_8190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8158)
-static void C_ccall f_8158(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8173)
-static void C_ccall f_8173(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8137)
-static void C_ccall f_8137(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8152)
-static void C_ccall f_8152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8120)
-static void C_ccall f_8120(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8135)
-static void C_ccall f_8135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8103)
-static void C_ccall f_8103(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8118)
-static void C_ccall f_8118(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8086)
-static void C_ccall f_8086(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8101)
-static void C_ccall f_8101(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8063)
-static void C_ccall f_8063(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8084)
-static void C_ccall f_8084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8040)
-static void C_ccall f_8040(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8061)
-static void C_ccall f_8061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8023)
-static void C_ccall f_8023(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8038)
-static void C_ccall f_8038(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8000)
-static void C_ccall f_8000(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8021)
-static void C_ccall f_8021(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7977)
-static void C_ccall f_7977(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7998)
-static void C_ccall f_7998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7954)
-static void C_ccall f_7954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7975)
-static void C_ccall f_7975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7931)
-static void C_ccall f_7931(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7952)
-static void C_ccall f_7952(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7908)
-static void C_ccall f_7908(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7929)
-static void C_ccall f_7929(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7885)
-static void C_ccall f_7885(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7906)
-static void C_ccall f_7906(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7862)
-static void C_ccall f_7862(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7883)
-static void C_ccall f_7883(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7839)
-static void C_ccall f_7839(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7860)
-static void C_ccall f_7860(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7816)
-static void C_ccall f_7816(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7837)
-static void C_ccall f_7837(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7810)
-static void C_ccall f_7810(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7807)
-static void C_ccall f_7807(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7780)
-static void C_ccall f_7780(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7795)
-static void C_ccall f_7795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7763)
-static void C_ccall f_7763(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7778)
-static void C_ccall f_7778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7760)
-static void C_ccall f_7760(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7757)
-static void C_ccall f_7757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7754)
-static void C_ccall f_7754(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7751)
-static void C_ccall f_7751(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7748)
-static void C_ccall f_7748(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7745)
-static void C_ccall f_7745(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7742)
-static void C_ccall f_7742(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7739)
-static void C_ccall f_7739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7736)
-static void C_ccall f_7736(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7733)
-static void C_ccall f_7733(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7730)
-static void C_ccall f_7730(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7727)
-static void C_ccall f_7727(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7724)
-static void C_ccall f_7724(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7718)
-static void C_ccall f_7718(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7715)
-static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7712)
-static void C_ccall f_7712(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7709)
-static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7706)
-static void C_ccall f_7706(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7667)
-static void C_ccall f_7667(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7671)
-static void C_ccall f_7671(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7676)
-static C_word C_fcall f_7676(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_7661)
-static void C_ccall f_7661(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7661)
-static void C_ccall f_7661r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7622)
-static void C_ccall f_7622(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_7622)
-static void C_ccall f_7622r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_7628)
-static void C_fcall f_7628(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7651)
-static void C_ccall f_7651(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7639)
-static void C_ccall f_7639(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7626)
-static void C_ccall f_7626(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7606)
-static void C_ccall f_7606(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7616)
-static void C_ccall f_7616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7585)
-static void C_ccall f_7585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7591)
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7564)
-static void C_ccall f_7564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7570)
-static void C_ccall f_7570(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7540)
-static void C_ccall f_7540(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7546)
-static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7516)
-static void C_ccall f_7516(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7522)
-static void C_ccall f_7522(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7496)
-static void C_fcall f_7496(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7475)
-static void C_ccall f_7475(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7481)
-static void C_ccall f_7481(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7454)
-static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7460)
-static void C_ccall f_7460(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7430)
-static void C_ccall f_7430(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7436)
-static void C_ccall f_7436(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7406)
-static void C_ccall f_7406(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7412)
-static void C_ccall f_7412(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7386)
-static void C_fcall f_7386(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7383)
-static void C_ccall f_7383(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7380)
-static void C_ccall f_7380(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7370)
-static void C_ccall f_7370(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7374)
-static void C_ccall f_7374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7319)
-static void C_ccall f_7319(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_7319)
-static void C_ccall f_7319r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_7329)
-static void C_fcall f_7329(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7338)
-static void C_fcall f_7338(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7307)
-static void C_ccall f_7307(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7317)
-static void C_ccall f_7317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7294)
-static void C_ccall f_7294(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7242)
-static void C_ccall f_7242(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7255)
-static void C_ccall f_7255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7264)
-static C_word C_fcall f_7264(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_7190)
-static void C_ccall f_7190(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7206)
-static void C_ccall f_7206(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7211)
-static C_word C_fcall f_7211(C_word t0,C_word t1,C_word t2);
-C_noret_decl(f_7160)
-static void C_ccall f_7160(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7169)
-static void C_fcall f_7169(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7183)
-static void C_ccall f_7183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7124)
-static void C_ccall f_7124(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7124)
-static void C_ccall f_7124r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7131)
-static void C_ccall f_7131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7091)
-static void C_ccall f_7091(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_7091)
-static void C_ccall f_7091r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_7095)
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7088)
-static void C_ccall f_7088(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7085)
-static void C_ccall f_7085(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7082)
-static void C_ccall f_7082(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7079)
-static void C_ccall f_7079(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7076)
-static void C_ccall f_7076(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7073)
-static void C_ccall f_7073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7070)
-static void C_ccall f_7070(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7067)
-static void C_ccall f_7067(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7064)
-static void C_ccall f_7064(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7061)
-static void C_ccall f_7061(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7058)
-static void C_ccall f_7058(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7019)
-static void C_ccall f_7019(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7025)
-static void C_fcall f_7025(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6940)
-static void C_ccall f_6940(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6940)
-static void C_ccall f_6940r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6952)
-static void C_fcall f_6952(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6971)
-static void C_fcall f_6971(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7002)
-static void C_ccall f_7002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6923)
-static void C_ccall f_6923(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6923)
-static void C_ccall f_6923r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6880)
-static void C_ccall f_6880(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6886)
-static void C_fcall f_6886(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6913)
-static void C_ccall f_6913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6877)
-static void C_ccall f_6877(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6874)
-static void C_ccall f_6874(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6871)
-static void C_ccall f_6871(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6868)
-static void C_ccall f_6868(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6868)
-static void C_ccall f_6868r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6862)
-static void C_ccall f_6862(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6844)
-static void C_ccall f_6844(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6834)
-static void C_ccall f_6834(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6816)
-static void C_ccall f_6816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6810)
-static void C_ccall f_6810(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6799)
-static void C_ccall f_6799(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6789)
-static void C_ccall f_6789(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6771)
-static void C_ccall f_6771(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6764)
-static void C_ccall f_6764(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6761)
-static void C_ccall f_6761(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6750)
-static void C_ccall f_6750(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6744)
-static void C_ccall f_6744(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6733)
-static void C_ccall f_6733(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6723)
-static void C_ccall f_6723(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6705)
-static void C_ccall f_6705(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6691)
-static void C_ccall f_6691(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6677)
-static void C_ccall f_6677(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6671)
-static void C_ccall f_6671(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6657)
-static void C_ccall f_6657(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6650)
-static void C_ccall f_6650(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6644)
-static void C_ccall f_6644(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6630)
-static void C_ccall f_6630(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6620)
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6610)
-static void C_ccall f_6610(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6600)
-static void C_ccall f_6600(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6597)
-static void C_ccall f_6597(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6594)
-static void C_ccall f_6594(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6591)
-static void C_ccall f_6591(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6588)
-static void C_ccall f_6588(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6585)
-static void C_ccall f_6585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6582)
-static void C_ccall f_6582(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6579)
-static void C_ccall f_6579(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6576)
-static void C_ccall f_6576(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6573)
-static void C_ccall f_6573(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6570)
-static void C_ccall f_6570(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6567)
-static void C_ccall f_6567(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6564)
-static void C_ccall f_6564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6561)
-static void C_ccall f_6561(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6558)
-static void C_ccall f_6558(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6555)
-static void C_ccall f_6555(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6542)
-static void C_ccall f_6542(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6547)
-static void C_ccall f_6547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6553)
-static void C_ccall f_6553(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6522)
-static void C_ccall f_6522(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6535)
-static void C_ccall f_6535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6506)
-static void C_ccall f_6506(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6493)
-static void C_ccall f_6493(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6493)
-static void C_ccall f_6493r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6471)
-static void C_ccall f_6471(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6471)
-static void C_ccall f_6471r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6440)
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
-C_noret_decl(f_6440)
-static void C_ccall f_6440r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
-C_noret_decl(f_6421)
-static void C_ccall f_6421(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6421)
-static void C_ccall f_6421r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6408)
-static void C_ccall f_6408(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6408)
-static void C_ccall f_6408r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6395)
-static void C_ccall f_6395(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6395)
-static void C_ccall f_6395r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6382)
-static void C_ccall f_6382(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6382)
-static void C_ccall f_6382r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6369)
-static void C_ccall f_6369(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6369)
-static void C_ccall f_6369r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6356)
-static void C_ccall f_6356(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6356)
-static void C_ccall f_6356r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6343)
-static void C_ccall f_6343(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6343)
-static void C_ccall f_6343r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6330)
-static void C_ccall f_6330(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6330)
-static void C_ccall f_6330r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6317)
-static void C_ccall f_6317(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6317)
-static void C_ccall f_6317r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6304)
-static void C_ccall f_6304(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6304)
-static void C_ccall f_6304r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6290)
-static void C_ccall f_6290(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6290)
-static void C_ccall f_6290r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6277)
-static void C_ccall f_6277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_6277)
-static void C_ccall f_6277r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_6274)
-static void C_ccall f_6274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6240)
-static void C_ccall f_6240(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6244)
-static void C_ccall f_6244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6247)
-static void C_ccall f_6247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6231)
-static void C_ccall f_6231(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6227)
-static void C_ccall f_6227(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6224)
-static void C_ccall f_6224(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6219)
-static void C_ccall f_6219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6216)
-static void C_ccall f_6216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6213)
-static void C_ccall f_6213(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6210)
-static void C_ccall f_6210(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6204)
-static void C_ccall f_6204(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6200)
-static void C_ccall f_6200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6190)
-static void C_ccall f_6190(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6184)
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6176)
-static void C_ccall f_6176(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6168)
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6163)
-static void C_ccall f_6163(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6160)
-static void C_ccall f_6160(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6156)
-static void C_ccall f_6156(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6141)
-static void C_ccall f_6141(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6141)
-static void C_ccall f_6141r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6132)
-static void C_ccall f_6132(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6132)
-static void C_ccall f_6132r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6116)
-static void C_ccall f_6116(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6116)
-static void C_ccall f_6116r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6107)
-static void C_ccall f_6107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6111)
-static void C_ccall f_6111(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6097)
-static void C_ccall f_6097(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_6097)
-static void C_ccall f_6097r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_6105)
-static void C_ccall f_6105(C_word c,C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_16449)
-static void C_fcall trf_16449(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16449(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16449(t0,t1);}
-
-C_noret_decl(trf_16696)
-static void C_fcall trf_16696(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16696(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16696(t0,t1);}
-
-C_noret_decl(trf_16699)
-static void C_fcall trf_16699(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16699(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16699(t0,t1);}
-
-C_noret_decl(trf_16702)
-static void C_fcall trf_16702(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16702(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16702(t0,t1);}
-
-C_noret_decl(trf_16705)
-static void C_fcall trf_16705(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16705(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16705(t0,t1);}
-
-C_noret_decl(trf_21610)
-static void C_fcall trf_21610(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21610(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_21610(t0,t1,t2);}
-
-C_noret_decl(trf_21618)
-static void C_fcall trf_21618(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21618(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_21618(t0,t1,t2);}
-
-C_noret_decl(trf_21553)
-static void C_fcall trf_21553(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21553(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_21553(t0,t1,t2);}
-
-C_noret_decl(trf_21397)
-static void C_fcall trf_21397(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21397(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_21397(t0,t1,t2);}
-
-C_noret_decl(trf_21416)
-static void C_fcall trf_21416(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21416(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_21416(t0,t1);}
-
-C_noret_decl(trf_21045)
-static void C_fcall trf_21045(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21045(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_21045(t0,t1);}
-
-C_noret_decl(trf_21057)
-static void C_fcall trf_21057(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21057(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_21057(t0,t1,t2);}
-
-C_noret_decl(trf_20914)
-static void C_fcall trf_20914(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20914(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20914(t0,t1,t2);}
-
-C_noret_decl(trf_20848)
-static void C_fcall trf_20848(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20848(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20848(t0,t1,t2);}
-
-C_noret_decl(trf_20650)
-static void C_fcall trf_20650(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20650(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20650(t0,t1,t2);}
-
-C_noret_decl(trf_20576)
-static void C_fcall trf_20576(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20576(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20576(t0,t1,t2);}
-
-C_noret_decl(trf_20591)
-static void C_fcall trf_20591(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20591(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20591(t0,t1,t2);}
-
-C_noret_decl(trf_20516)
-static void C_fcall trf_20516(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20516(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20516(t0,t1);}
-
-C_noret_decl(trf_20520)
-static void C_fcall trf_20520(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20520(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20520(t0,t1);}
-
-C_noret_decl(trf_20441)
-static void C_fcall trf_20441(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20441(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20441(t0,t1);}
-
-C_noret_decl(trf_20389)
-static void C_fcall trf_20389(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20389(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20389(t0,t1);}
-
-C_noret_decl(trf_20384)
-static void C_fcall trf_20384(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20384(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20384(t0,t1,t2);}
-
-C_noret_decl(trf_20216)
-static void C_fcall trf_20216(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20216(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_20216(t0,t1,t2,t3);}
-
-C_noret_decl(trf_20282)
-static void C_fcall trf_20282(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20282(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20282(t0,t1,t2);}
-
-C_noret_decl(trf_20290)
-static void C_fcall trf_20290(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20290(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_20290(t0,t1,t2);}
-
-C_noret_decl(trf_20316)
-static void C_fcall trf_20316(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20316(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20316(t0,t1);}
-
-C_noret_decl(trf_20294)
-static void C_fcall trf_20294(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20294(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20294(t0,t1);}
-
-C_noret_decl(trf_20300)
-static void C_fcall trf_20300(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20300(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20300(t0,t1);}
-
-C_noret_decl(trf_20260)
-static void C_fcall trf_20260(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20260(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20260(t0,t1);}
-
-C_noret_decl(trf_20264)
-static void C_fcall trf_20264(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20264(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_20264(t0,t1);}
-
-C_noret_decl(trf_20225)
-static void C_fcall trf_20225(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_20225(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_20225(t0,t1,t2,t3);}
-
-C_noret_decl(trf_19921)
-static void C_fcall trf_19921(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19921(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_19921(t0,t1);}
-
-C_noret_decl(trf_19916)
-static void C_fcall trf_19916(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19916(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19916(t0,t1,t2);}
-
-C_noret_decl(trf_19773)
-static void C_fcall trf_19773(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19773(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_19773(t0,t1,t2,t3);}
-
-C_noret_decl(trf_19786)
-static void C_fcall trf_19786(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19786(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_19786(t0,t1);}
-
-C_noret_decl(trf_19821)
-static void C_fcall trf_19821(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19821(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19821(t0,t1,t2);}
-
-C_noret_decl(trf_19729)
-static void C_fcall trf_19729(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19729(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_19729(t0,t1,t2,t3);}
-
-C_noret_decl(trf_19735)
-static void C_fcall trf_19735(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19735(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19735(t0,t1,t2);}
-
-C_noret_decl(trf_19743)
-static void C_fcall trf_19743(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19743(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19743(t0,t1,t2);}
-
-C_noret_decl(trf_19606)
-static void C_fcall trf_19606(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19606(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_19606(t0,t1);}
-
-C_noret_decl(trf_19549)
-static void C_fcall trf_19549(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19549(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19549(t0,t1,t2);}
-
-C_noret_decl(trf_19148)
-static void C_fcall trf_19148(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19148(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19148(t0,t1,t2);}
-
-C_noret_decl(trf_19193)
-static void C_fcall trf_19193(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19193(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_19193(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_19224)
-static void C_fcall trf_19224(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19224(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_19224(t0,t1);}
-
-C_noret_decl(trf_19129)
-static void C_fcall trf_19129(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19129(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_19129(t0,t1);}
-
-C_noret_decl(trf_19029)
-static void C_fcall trf_19029(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_19029(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_19029(t0,t1,t2);}
-
-C_noret_decl(trf_18938)
-static void C_fcall trf_18938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18938(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_18938(t0,t1,t2,t3);}
-
-C_noret_decl(trf_18953)
-static void C_fcall trf_18953(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18953(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_18953(t0,t1);}
-
-C_noret_decl(trf_18891)
-static void C_fcall trf_18891(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18891(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18891(t0,t1,t2);}
-
-C_noret_decl(trf_18904)
-static void C_fcall trf_18904(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18904(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18904(t0,t1,t2);}
-
-C_noret_decl(trf_18621)
-static void C_fcall trf_18621(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18621(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18621(t0,t1,t2);}
-
-C_noret_decl(trf_18557)
-static void C_fcall trf_18557(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_18557(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_18557(t0,t1,t2);}
-
-C_noret_decl(trf_17856)
-static void C_fcall trf_17856(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17856(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17856(t0,t1,t2);}
-
-C_noret_decl(trf_17812)
-static void C_fcall trf_17812(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17812(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17812(t0,t1,t2);}
-
-C_noret_decl(trf_17752)
-static void C_fcall trf_17752(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17752(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17752(t0,t1,t2);}
-
-C_noret_decl(trf_17400)
-static void C_fcall trf_17400(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17400(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17400(t0,t1);}
-
-C_noret_decl(trf_17403)
-static void C_fcall trf_17403(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17403(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17403(t0,t1);}
-
-C_noret_decl(trf_17423)
-static void C_fcall trf_17423(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17423(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17423(t0,t1);}
-
-C_noret_decl(trf_17384)
-static void C_fcall trf_17384(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17384(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17384(t0,t1);}
-
-C_noret_decl(trf_17349)
-static void C_fcall trf_17349(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17349(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17349(t0,t1,t2);}
-
-C_noret_decl(trf_17152)
-static void C_fcall trf_17152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17152(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_17152(t0,t1);}
-
-C_noret_decl(trf_17147)
-static void C_fcall trf_17147(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17147(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17147(t0,t1,t2);}
-
-C_noret_decl(trf_17142)
-static void C_fcall trf_17142(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17142(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_17142(t0,t1,t2,t3);}
-
-C_noret_decl(trf_17137)
-static void C_fcall trf_17137(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17137(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_17137(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_17119)
-static void C_fcall trf_17119(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17119(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_17119(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_17046)
-static void C_fcall trf_17046(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17046(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17046(t0,t1,t2);}
-
-C_noret_decl(trf_17054)
-static void C_fcall trf_17054(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_17054(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_17054(t0,t1,t2);}
-
-C_noret_decl(trf_16980)
-static void C_fcall trf_16980(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16980(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16980(t0,t1);}
-
-C_noret_decl(trf_16975)
-static void C_fcall trf_16975(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16975(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16975(t0,t1,t2);}
-
-C_noret_decl(trf_16874)
-static void C_fcall trf_16874(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16874(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16874(t0,t1,t2);}
-
-C_noret_decl(trf_16886)
-static void C_fcall trf_16886(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16886(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16886(t0,t1,t2);}
-
-C_noret_decl(trf_16905)
-static void C_fcall trf_16905(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16905(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16905(t0,t1);}
-
-C_noret_decl(trf_16836)
-static void C_fcall trf_16836(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16836(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16836(t0,t1,t2);}
-
-C_noret_decl(trf_16792)
-static void C_fcall trf_16792(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16792(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16792(t0,t1,t2);}
-
-C_noret_decl(trf_16761)
-static void C_fcall trf_16761(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16761(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16761(t0,t1,t2);}
-
-C_noret_decl(trf_16713)
-static void C_fcall trf_16713(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16713(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16713(t0,t1,t2);}
-
-C_noret_decl(trf_16663)
-static void C_fcall trf_16663(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16663(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16663(t0,t1);}
-
-C_noret_decl(trf_16472)
-static void C_fcall trf_16472(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16472(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16472(t0,t1);}
-
-C_noret_decl(trf_16320)
-static void C_fcall trf_16320(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16320(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16320(t0,t1,t2);}
-
-C_noret_decl(trf_16328)
-static void C_fcall trf_16328(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16328(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16328(t0,t1,t2);}
-
-C_noret_decl(trf_16168)
-static void C_fcall trf_16168(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16168(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_16168(t0,t1,t2);}
-
-C_noret_decl(trf_16197)
-static void C_fcall trf_16197(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16197(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_16197(t0,t1);}
-
-C_noret_decl(trf_21918)
-static void C_fcall trf_21918(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21918(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_21918(t0,t1);}
-
-C_noret_decl(trf_21855)
-static void C_fcall trf_21855(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_21855(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_21855(t0,t1);}
-
-C_noret_decl(trf_16107)
-static void C_fcall trf_16107(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16107(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_16107(t0,t1,t2,t3);}
-
-C_noret_decl(trf_16076)
-static void C_fcall trf_16076(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16076(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_16076(t0,t1,t2,t3);}
-
-C_noret_decl(trf_16049)
-static void C_fcall trf_16049(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16049(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_16049(t0,t1,t2,t3);}
-
-C_noret_decl(trf_16022)
-static void C_fcall trf_16022(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_16022(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_16022(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15251)
-static void C_fcall trf_15251(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15251(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15251(t0,t1,t2);}
-
-C_noret_decl(trf_15831)
-static void C_fcall trf_15831(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15831(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15831(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15666)
-static void C_fcall trf_15666(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15666(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15666(t0,t1,t2);}
-
-C_noret_decl(trf_15521)
-static void C_fcall trf_15521(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15521(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15521(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15310)
-static void C_fcall trf_15310(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15310(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15310(t0,t1,t2);}
-
-C_noret_decl(trf_15126)
-static void C_fcall trf_15126(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15126(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15126(t0,t1,t2);}
-
-C_noret_decl(trf_15142)
-static void C_fcall trf_15142(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15142(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15142(t0,t1);}
-
-C_noret_decl(trf_15157)
-static void C_fcall trf_15157(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15157(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15157(t0,t1,t2);}
-
-C_noret_decl(trf_15207)
-static void C_fcall trf_15207(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15207(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15207(t0,t1);}
-
-C_noret_decl(trf_15173)
-static void C_fcall trf_15173(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15173(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_15173(t0,t1);}
-
-C_noret_decl(trf_15077)
-static void C_fcall trf_15077(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15077(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15077(t0,t1,t2,t3);}
-
-C_noret_decl(trf_15089)
-static void C_fcall trf_15089(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15089(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_15089(t0,t1,t2);}
-
-C_noret_decl(trf_15015)
-static void C_fcall trf_15015(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_15015(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_15015(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14944)
-static void C_fcall trf_14944(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14944(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_14944(t0,t1,t2,t3);}
-
-C_noret_decl(trf_14606)
-static void C_fcall trf_14606(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14606(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_14606(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_14624)
-static void C_fcall trf_14624(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14624(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_14624(t0,t1);}
-
-C_noret_decl(trf_12007)
-static void C_fcall trf_12007(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12007(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12007(t0,t1);}
-
-C_noret_decl(trf_13633)
-static void C_fcall trf_13633(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13633(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13633(t0,t1);}
-
-C_noret_decl(trf_13778)
-static void C_fcall trf_13778(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13778(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13778(t0,t1);}
-
-C_noret_decl(trf_13737)
-static void C_fcall trf_13737(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13737(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13737(t0,t1);}
-
-C_noret_decl(trf_13609)
-static void C_fcall trf_13609(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13609(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13609(t0,t1,t2);}
-
-C_noret_decl(trf_13540)
-static void C_fcall trf_13540(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13540(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13540(t0,t1,t2);}
-
-C_noret_decl(trf_13454)
-static void C_fcall trf_13454(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13454(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13454(t0,t1);}
-
-C_noret_decl(trf_13472)
-static void C_fcall trf_13472(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13472(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13472(t0,t1,t2);}
-
-C_noret_decl(trf_13491)
-static void C_fcall trf_13491(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13491(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13491(t0,t1);}
-
-C_noret_decl(trf_13371)
-static void C_fcall trf_13371(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13371(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13371(t0,t1);}
-
-C_noret_decl(trf_13377)
-static void C_fcall trf_13377(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13377(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13377(t0,t1,t2);}
-
-C_noret_decl(trf_13155)
-static void C_fcall trf_13155(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13155(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13155(t0,t1);}
-
-C_noret_decl(trf_13344)
-static void C_fcall trf_13344(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13344(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13344(t0,t1);}
-
-C_noret_decl(trf_13191)
-static void C_fcall trf_13191(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13191(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13191(t0,t1);}
-
-C_noret_decl(trf_13080)
-static void C_fcall trf_13080(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13080(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13080(t0,t1);}
-
-C_noret_decl(trf_13096)
-static void C_fcall trf_13096(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13096(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13096(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13050)
-static void C_fcall trf_13050(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13050(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13050(t0,t1);}
-
-C_noret_decl(trf_12995)
-static void C_fcall trf_12995(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12995(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12995(t0,t1);}
-
-C_noret_decl(trf_13005)
-static void C_fcall trf_13005(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13005(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13005(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13015)
-static void C_fcall trf_13015(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13015(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13015(t0,t1);}
-
-C_noret_decl(trf_12933)
-static void C_fcall trf_12933(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12933(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12933(t0,t1);}
-
-C_noret_decl(trf_12943)
-static void C_fcall trf_12943(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12943(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12943(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12953)
-static void C_fcall trf_12953(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12953(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12953(t0,t1);}
-
-C_noret_decl(trf_12959)
-static void C_fcall trf_12959(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12959(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12959(t0,t1);}
-
-C_noret_decl(trf_12863)
-static void C_fcall trf_12863(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12863(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12863(t0,t1);}
-
-C_noret_decl(trf_12803)
-static void C_fcall trf_12803(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12803(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12803(t0,t1,t2);}
-
-C_noret_decl(trf_12756)
-static void C_fcall trf_12756(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12756(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12756(t0,t1,t2);}
-
-C_noret_decl(trf_12738)
-static void C_fcall trf_12738(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12738(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12738(t0,t1);}
-
-C_noret_decl(trf_12527)
-static void C_fcall trf_12527(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12527(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12527(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12571)
-static void C_fcall trf_12571(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12571(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12571(t0,t1,t2);}
-
-C_noret_decl(trf_12578)
-static void C_fcall trf_12578(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12578(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12578(t0,t1);}
-
-C_noret_decl(trf_12617)
-static void C_fcall trf_12617(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12617(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12617(t0,t1);}
-
-C_noret_decl(trf_12154)
-static void C_fcall trf_12154(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12154(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12154(t0,t1,t2);}
-
-C_noret_decl(trf_12170)
-static void C_fcall trf_12170(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12170(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12170(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12456)
-static void C_fcall trf_12456(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12456(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12456(t0,t1);}
-
-C_noret_decl(trf_12363)
-static void C_fcall trf_12363(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12363(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12363(t0,t1);}
-
-C_noret_decl(trf_12118)
-static void C_fcall trf_12118(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12118(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12118(t0,t1,t2);}
-
-C_noret_decl(trf_12130)
-static void C_fcall trf_12130(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12130(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12130(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12058)
-static void C_fcall trf_12058(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12058(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12058(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12064)
-static void C_fcall trf_12064(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12064(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12064(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12010)
-static void C_fcall trf_12010(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12010(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12010(t0,t1);}
-
-C_noret_decl(trf_12020)
-static void C_fcall trf_12020(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12020(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12020(t0,t1,t2);}
-
-C_noret_decl(trf_11992)
-static void C_fcall trf_11992(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11992(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11992(t0,t1,t2);}
-
-C_noret_decl(trf_11983)
-static void C_fcall trf_11983(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11983(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11983(t0,t1,t2);}
-
-C_noret_decl(trf_11947)
-static void C_fcall trf_11947(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11947(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11947(t0,t1);}
-
-C_noret_decl(trf_11957)
-static void C_fcall trf_11957(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11957(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11957(t0,t1,t2);}
-
-C_noret_decl(trf_11964)
-static void C_fcall trf_11964(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11964(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11964(t0,t1);}
-
-C_noret_decl(trf_11938)
-static void C_fcall trf_11938(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11938(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_11938(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_11509)
-static void C_fcall trf_11509(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11509(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11509(t0,t1);}
-
-C_noret_decl(trf_11526)
-static void C_fcall trf_11526(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11526(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11526(t0,t1);}
-
-C_noret_decl(trf_11065)
-static void C_fcall trf_11065(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11065(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11065(t0,t1,t2);}
-
-C_noret_decl(trf_10967)
-static void C_fcall trf_10967(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10967(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_10967(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_11012)
-static void C_fcall trf_11012(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11012(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11012(t0,t1,t2);}
-
-C_noret_decl(trf_10917)
-static void C_fcall trf_10917(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10917(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10917(t0,t1,t2);}
-
-C_noret_decl(trf_10690)
-static void C_fcall trf_10690(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10690(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10690(t0,t1);}
-
-C_noret_decl(trf_22086)
-static void C_fcall trf_22086(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_22086(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_22086(t0,t1);}
-
-C_noret_decl(trf_22099)
-static void C_fcall trf_22099(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_22099(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_22099(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_22031)
-static void C_fcall trf_22031(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_22031(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_22031(t0,t1);}
-
-C_noret_decl(trf_10467)
-static void C_fcall trf_10467(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10467(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10467(t0,t1,t2);}
-
-C_noret_decl(trf_10361)
-static void C_fcall trf_10361(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10361(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10361(t0,t1,t2);}
-
-C_noret_decl(trf_10319)
-static void C_fcall trf_10319(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10319(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10319(t0,t1,t2);}
-
-C_noret_decl(trf_10278)
-static void C_fcall trf_10278(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10278(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10278(t0,t1,t2);}
-
-C_noret_decl(trf_10248)
-static void C_fcall trf_10248(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10248(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10248(t0,t1,t2);}
-
-C_noret_decl(trf_10184)
-static void C_fcall trf_10184(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10184(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10184(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10194)
-static void C_fcall trf_10194(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10194(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10194(t0,t1);}
-
-C_noret_decl(trf_10139)
-static void C_fcall trf_10139(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10139(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_10139(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_10100)
-static void C_fcall trf_10100(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10100(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10100(t0,t1,t2);}
-
-C_noret_decl(trf_10062)
-static void C_fcall trf_10062(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10062(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10062(t0,t1,t2);}
-
-C_noret_decl(trf_9843)
-static void C_fcall trf_9843(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9843(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9843(t0,t1,t2);}
-
-C_noret_decl(trf_9617)
-static void C_fcall trf_9617(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9617(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9617(t0,t1,t2,t3);}
-
-C_noret_decl(trf_9454)
-static void C_fcall trf_9454(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9454(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9454(t0,t1,t2);}
-
-C_noret_decl(trf_8854)
-static void C_fcall trf_8854(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8854(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8854(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8783)
-static void C_fcall trf_8783(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8783(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8783(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8752)
-static void C_fcall trf_8752(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8752(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8752(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8651)
-static void C_fcall trf_8651(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8651(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8651(t0,t1,t2,t3);}
-
-C_noret_decl(trf_8657)
-static void C_fcall trf_8657(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8657(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_8657(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7628)
-static void C_fcall trf_7628(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7628(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7628(t0,t1,t2,t3);}
-
-C_noret_decl(trf_7496)
-static void C_fcall trf_7496(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7496(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_7496(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_7386)
-static void C_fcall trf_7386(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7386(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_7386(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_7329)
-static void C_fcall trf_7329(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7329(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7329(t0,t1);}
-
-C_noret_decl(trf_7338)
-static void C_fcall trf_7338(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7338(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7338(t0,t1);}
-
-C_noret_decl(trf_7169)
-static void C_fcall trf_7169(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7169(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7169(t0,t1,t2);}
-
-C_noret_decl(trf_7025)
-static void C_fcall trf_7025(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7025(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_7025(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6952)
-static void C_fcall trf_6952(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6952(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6952(t0,t1,t2);}
-
-C_noret_decl(trf_6971)
-static void C_fcall trf_6971(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6971(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6971(t0,t1,t2);}
-
-C_noret_decl(trf_6886)
-static void C_fcall trf_6886(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6886(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6886(t0,t1,t2);}
-
-C_noret_decl(tr7)
-static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
-C_regparm static void C_fcall tr7(C_proc7 k){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-(k)(7,t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr6)
-static void C_fcall tr6(C_proc6 k) C_regparm C_noret;
-C_regparm static void C_fcall tr6(C_proc6 k){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-(k)(6,t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr5r)
-static void C_fcall tr5r(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5r(C_proc5 k){
-int n;
-C_word *a,t5;
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t5=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_library_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_library_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word t130;
-C_word t131;
-C_word t132;
-C_word t133;
-C_word t134;
-C_word t135;
-C_word t136;
-C_word t137;
-C_word t138;
-C_word t139;
-C_word t140;
-C_word t141;
-C_word t142;
-C_word t143;
-C_word t144;
-C_word t145;
-C_word t146;
-C_word t147;
-C_word t148;
-C_word t149;
-C_word t150;
-C_word t151;
-C_word t152;
-C_word t153;
-C_word t154;
-C_word t155;
-C_word t156;
-C_word t157;
-C_word t158;
-C_word t159;
-C_word t160;
-C_word t161;
-C_word t162;
-C_word t163;
-C_word t164;
-C_word t165;
-C_word t166;
-C_word t167;
-C_word t168;
-C_word t169;
-C_word t170;
-C_word t171;
-C_word t172;
-C_word t173;
-C_word t174;
-C_word t175;
-C_word t176;
-C_word t177;
-C_word t178;
-C_word t179;
-C_word t180;
-C_word t181;
-C_word t182;
-C_word t183;
-C_word t184;
-C_word t185;
-C_word t186;
-C_word t187;
-C_word t188;
-C_word t189;
-C_word t190;
-C_word t191;
-C_word t192;
-C_word t193;
-C_word t194;
-C_word t195;
-C_word t196;
-C_word t197;
-C_word t198;
-C_word t199;
-C_word t200;
-C_word t201;
-C_word t202;
-C_word t203;
-C_word t204;
-C_word t205;
-C_word t206;
-C_word t207;
-C_word t208;
-C_word t209;
-C_word t210;
-C_word t211;
-C_word t212;
-C_word t213;
-C_word t214;
-C_word t215;
-C_word t216;
-C_word t217;
-C_word t218;
-C_word t219;
-C_word t220;
-C_word t221;
-C_word t222;
-C_word t223;
-C_word t224;
-C_word t225;
-C_word t226;
-C_word t227;
-C_word t228;
-C_word t229;
-C_word t230;
-C_word t231;
-C_word t232;
-C_word t233;
-C_word t234;
-C_word t235;
-C_word t236;
-C_word t237;
-C_word t238;
-C_word t239;
-C_word t240;
-C_word t241;
-C_word t242;
-C_word t243;
-C_word t244;
-C_word t245;
-C_word t246;
-C_word t247;
-C_word t248;
-C_word t249;
-C_word t250;
-C_word t251;
-C_word t252;
-C_word t253;
-C_word t254;
-C_word t255;
-C_word t256;
-C_word t257;
-C_word t258;
-C_word t259;
-C_word t260;
-C_word t261;
-C_word t262;
-C_word t263;
-C_word t264;
-C_word t265;
-C_word t266;
-C_word t267;
-C_word t268;
-C_word t269;
-C_word t270;
-C_word t271;
-C_word t272;
-C_word t273;
-C_word t274;
-C_word t275;
-C_word t276;
-C_word t277;
-C_word t278;
-C_word t279;
-C_word t280;
-C_word t281;
-C_word t282;
-C_word t283;
-C_word t284;
-C_word t285;
-C_word t286;
-C_word t287;
-C_word t288;
-C_word t289;
-C_word t290;
-C_word t291;
-C_word t292;
-C_word t293;
-C_word t294;
-C_word t295;
-C_word t296;
-C_word t297;
-C_word t298;
-C_word t299;
-C_word t300;
-C_word t301;
-C_word t302;
-C_word t303;
-C_word t304;
-C_word t305;
-C_word t306;
-C_word t307;
-C_word t308;
-C_word t309;
-C_word t310;
-C_word t311;
-C_word t312;
-C_word t313;
-C_word t314;
-C_word t315;
-C_word t316;
-C_word t317;
-C_word t318;
-C_word t319;
-C_word t320;
-C_word t321;
-C_word t322;
-C_word t323;
-C_word t324;
-C_word t325;
-C_word t326;
-C_word t327;
-C_word t328;
-C_word t329;
-C_word t330;
-C_word t331;
-C_word t332;
-C_word t333;
-C_word t334;
-C_word t335;
-C_word t336;
-C_word t337;
-C_word t338;
-C_word t339;
-C_word t340;
-C_word t341;
-C_word t342;
-C_word t343;
-C_word t344;
-C_word t345;
-C_word t346;
-C_word t347;
-C_word t348;
-C_word t349;
-C_word t350;
-C_word t351;
-C_word t352;
-C_word t353;
-C_word t354;
-C_word t355;
-C_word t356;
-C_word t357;
-C_word t358;
-C_word t359;
-C_word t360;
-C_word t361;
-C_word t362;
-C_word t363;
-C_word t364;
-C_word t365;
-C_word t366;
-C_word t367;
-C_word t368;
-C_word t369;
-C_word t370;
-C_word t371;
-C_word t372;
-C_word t373;
-C_word t374;
-C_word t375;
-C_word t376;
-C_word t377;
-C_word t378;
-C_word t379;
-C_word t380;
-C_word t381;
-C_word t382;
-C_word t383;
-C_word t384;
-C_word t385;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("library_toplevel"));
-C_check_nursery_minimum(988);
-if(!C_demand(988)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(8372)){
-C_save(t1);
-C_rereclaim2(8372*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(988);
-C_initialize_lf(lf,1049);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[3]=C_decode_literal(C_heaptop,"\376B\000\000\0054.3.6");
-lf[4]=C_h_intern(&lf[4],4,"exit");
-lf[5]=C_h_intern(&lf[5],16,"\003sysexit-handler");
-lf[6]=C_h_intern(&lf[6],5,"reset");
-lf[7]=C_h_intern(&lf[7],17,"\003sysreset-handler");
-lf[8]=C_h_intern(&lf[8],9,"\003syserror");
-lf[9]=C_h_intern(&lf[9],15,"\003syssignal-hook");
-lf[10]=C_h_intern(&lf[10],6,"\000error");
-lf[11]=C_h_intern(&lf[11],20,"\003syswarnings-enabled");
-lf[12]=C_h_intern(&lf[12],8,"\003syswarn");
-lf[13]=C_h_intern(&lf[13],8,"\000warning");
-lf[14]=C_h_intern(&lf[14],15,"enable-warnings");
-lf[15]=C_h_intern(&lf[15],5,"error");
-lf[16]=C_h_intern(&lf[16],7,"warning");
-lf[17]=C_h_intern(&lf[17],14,"set-gc-report!");
-lf[18]=C_h_intern(&lf[18],6,"\003sysgc");
-lf[19]=C_h_intern(&lf[19],11,"\003syssetslot");
-lf[20]=C_h_intern(&lf[20],12,"\003syssetislot");
-lf[21]=C_h_intern(&lf[21],19,"\003sysallocate-vector");
-lf[22]=C_h_intern(&lf[22],4,"argv");
-lf[23]=C_h_intern(&lf[23],9,"argc+argv");
-lf[24]=C_h_intern(&lf[24],18,"\003sysmake-structure");
-lf[25]=C_h_intern(&lf[25],23,"\003sysensure-heap-reserve");
-lf[26]=C_h_intern(&lf[26],9,"\003sysfudge");
-lf[27]=C_h_intern(&lf[27],13,"\003syscall-host");
-lf[28]=C_h_intern(&lf[28],14,"return-to-host");
-lf[29]=C_h_intern(&lf[29],13,"\003sysfile-info");
-lf[30]=C_h_intern(&lf[30],21,"\003syssymbol-table-info");
-lf[31]=C_h_intern(&lf[31],15,"\003sysmemory-info");
-lf[32]=C_h_intern(&lf[32],20,"current-milliseconds");
-lf[33]=C_h_intern(&lf[33],23,"current-gc-milliseconds");
-lf[34]=C_h_intern(&lf[34],8,"cpu-time");
-lf[35]=C_h_intern(&lf[35],18,"\003sysdecode-seconds");
-lf[36]=C_h_intern(&lf[36],24,"get-environment-variable");
-lf[37]=C_h_intern(&lf[37],6,"getenv");
-lf[38]=C_h_intern(&lf[38],15,"\003sysstart-timer");
-lf[39]=C_h_intern(&lf[39],14,"\003sysstop-timer");
-lf[40]=C_h_intern(&lf[40],14,"\003sysimmediate\077");
-lf[41]=C_h_intern(&lf[41],11,"\003sysmessage");
-lf[42]=C_h_intern(&lf[42],8,"\003sysbyte");
-lf[43]=C_h_intern(&lf[43],11,"\003syssetbyte");
-lf[44]=C_h_intern(&lf[44],8,"\003sysvoid");
-lf[45]=C_h_intern(&lf[45],4,"void");
-lf[46]=C_h_intern(&lf[46],19,"\003sysundefined-value");
-lf[47]=C_h_intern(&lf[47],8,"\003syshalt");
-lf[48]=C_h_intern(&lf[48],11,"\003sysflo2fix");
-lf[49]=C_h_intern(&lf[49],11,"\003sysbecome!");
-lf[50]=C_h_intern(&lf[50],13,"\003sysblock-ref");
-lf[51]=C_h_intern(&lf[51],16,"\003sysapply-values");
-lf[52]=C_h_intern(&lf[52],16,"\003syscopy-closure");
-lf[53]=C_h_intern(&lf[53],24,"\003sysapply-argument-limit");
-lf[54]=C_h_intern(&lf[54],14,"\003sysblock-set!");
-lf[55]=C_h_intern(&lf[55],15,"\003syscheck-range");
-lf[56]=C_h_intern(&lf[56],11,"\000type-error");
-lf[57]=C_decode_literal(C_heaptop,"\376B\000\000\023slot not accessible");
-lf[58]=C_h_intern(&lf[58],15,"current-seconds");
-lf[59]=C_h_intern(&lf[59],19,"\003syscheck-structure");
-lf[60]=C_h_intern(&lf[60],14,"\003syscheck-blob");
-lf[61]=C_h_intern(&lf[61],21,"\003syscheck-byte-vector");
-lf[62]=C_h_intern(&lf[62],14,"\003syscheck-pair");
-lf[63]=C_h_intern(&lf[63],14,"\003syscheck-list");
-lf[64]=C_h_intern(&lf[64],16,"\003syscheck-string");
-lf[65]=C_h_intern(&lf[65],16,"\003syscheck-number");
-lf[66]=C_h_intern(&lf[66],15,"\003syscheck-exact");
-lf[67]=C_h_intern(&lf[67],17,"\003syscheck-inexact");
-lf[68]=C_h_intern(&lf[68],16,"\003syscheck-symbol");
-lf[69]=C_h_intern(&lf[69],16,"\003syscheck-vector");
-lf[70]=C_h_intern(&lf[70],14,"\003syscheck-char");
-lf[71]=C_h_intern(&lf[71],17,"\003syscheck-integer");
-lf[72]=C_h_intern(&lf[72],14,"\003syserror-hook");
-lf[73]=C_h_intern(&lf[73],17,"\003syscheck-special");
-lf[74]=C_decode_literal(C_heaptop,"\376B\000\000-bad argument type - not a pointer-like object");
-lf[75]=C_h_intern(&lf[75],17,"\003syscheck-closure");
-lf[76]=C_h_intern(&lf[76],9,"\003sysforce");
-lf[77]=C_h_intern(&lf[77],7,"promise");
-lf[78]=C_h_intern(&lf[78],5,"force");
-lf[79]=C_h_intern(&lf[79],6,"system");
-lf[80]=C_h_intern(&lf[80],14,"\000process-error");
-lf[81]=C_decode_literal(C_heaptop,"\376B\000\000\032`system\047 invocation failed");
-lf[82]=C_h_intern(&lf[82],16,"\003sysupdate-errno");
-lf[83]=C_h_intern(&lf[83],9,"\003sysdload");
-lf[84]=C_h_intern(&lf[84],21,"\003sysset-dlopen-flags!");
-lf[85]=C_h_intern(&lf[85],11,"\003sysdunload");
-lf[86]=C_h_intern(&lf[86],17,"\003sysmake-c-string");
-lf[87]=C_h_intern(&lf[87],3,"not");
-lf[88]=C_h_intern(&lf[88],8,"boolean\077");
-lf[89]=C_h_intern(&lf[89],3,"eq\077");
-lf[90]=C_h_intern(&lf[90],4,"eqv\077");
-lf[91]=C_h_intern(&lf[91],6,"equal\077");
-lf[92]=C_h_intern(&lf[92],5,"pair\077");
-lf[93]=C_h_intern(&lf[93],4,"cons");
-lf[94]=C_h_intern(&lf[94],3,"car");
-lf[95]=C_h_intern(&lf[95],3,"cdr");
-lf[96]=C_h_intern(&lf[96],8,"set-car!");
-lf[97]=C_h_intern(&lf[97],8,"set-cdr!");
-lf[98]=C_h_intern(&lf[98],4,"cadr");
-lf[99]=C_h_intern(&lf[99],5,"caddr");
-lf[100]=C_h_intern(&lf[100],6,"cadddr");
-lf[101]=C_h_intern(&lf[101],6,"cddddr");
-lf[102]=C_h_intern(&lf[102],4,"caar");
-lf[103]=C_h_intern(&lf[103],4,"cdar");
-lf[104]=C_h_intern(&lf[104],4,"cddr");
-lf[105]=C_h_intern(&lf[105],5,"caaar");
-lf[106]=C_h_intern(&lf[106],5,"caadr");
-lf[107]=C_h_intern(&lf[107],5,"cadar");
-lf[108]=C_h_intern(&lf[108],5,"cdaar");
-lf[109]=C_h_intern(&lf[109],5,"cdadr");
-lf[110]=C_h_intern(&lf[110],5,"cddar");
-lf[111]=C_h_intern(&lf[111],5,"cdddr");
-lf[112]=C_h_intern(&lf[112],6,"caaaar");
-lf[113]=C_h_intern(&lf[113],6,"caaadr");
-lf[114]=C_h_intern(&lf[114],6,"caadar");
-lf[115]=C_h_intern(&lf[115],6,"caaddr");
-lf[116]=C_h_intern(&lf[116],6,"cadaar");
-lf[117]=C_h_intern(&lf[117],6,"cadadr");
-lf[118]=C_h_intern(&lf[118],6,"caddar");
-lf[119]=C_h_intern(&lf[119],6,"cdaaar");
-lf[120]=C_h_intern(&lf[120],6,"cdaadr");
-lf[121]=C_h_intern(&lf[121],6,"cdadar");
-lf[122]=C_h_intern(&lf[122],6,"cdaddr");
-lf[123]=C_h_intern(&lf[123],6,"cddaar");
-lf[124]=C_h_intern(&lf[124],6,"cddadr");
-lf[125]=C_h_intern(&lf[125],6,"cdddar");
-lf[126]=C_h_intern(&lf[126],5,"null\077");
-lf[127]=C_h_intern(&lf[127],4,"list");
-lf[128]=C_h_intern(&lf[128],6,"length");
-lf[129]=C_h_intern(&lf[129],9,"list-tail");
-lf[130]=C_h_intern(&lf[130],8,"list-ref");
-lf[131]=C_h_intern(&lf[131],8,"\003sysdelq");
-lf[132]=C_h_intern(&lf[132],27,"\003syserror-not-a-proper-list");
-lf[133]=C_h_intern(&lf[133],27,"\003sysnot-a-proper-list-error");
-lf[134]=C_h_intern(&lf[134],6,"append");
-lf[135]=C_h_intern(&lf[135],7,"reverse");
-lf[136]=C_h_intern(&lf[136],4,"memq");
-lf[137]=C_h_intern(&lf[137],4,"memv");
-lf[138]=C_h_intern(&lf[138],6,"member");
-lf[139]=C_h_intern(&lf[139],4,"assq");
-lf[140]=C_h_intern(&lf[140],4,"assv");
-lf[141]=C_h_intern(&lf[141],5,"assoc");
-lf[142]=C_h_intern(&lf[142],5,"list\077");
-lf[143]=C_h_intern(&lf[143],7,"string\077");
-lf[144]=C_h_intern(&lf[144],13,"string-length");
-lf[145]=C_h_intern(&lf[145],10,"string-ref");
-lf[146]=C_h_intern(&lf[146],11,"string-set!");
-lf[147]=C_h_intern(&lf[147],15,"\003sysmake-string");
-lf[148]=C_h_intern(&lf[148],11,"make-string");
-lf[149]=C_h_intern(&lf[149],13,"\000bounds-error");
-lf[150]=C_decode_literal(C_heaptop,"\376B\000\000\020size is negative");
-lf[151]=C_h_intern(&lf[151],16,"\003sysstring->list");
-lf[152]=C_h_intern(&lf[152],12,"string->list");
-lf[153]=C_h_intern(&lf[153],16,"\003syslist->string");
-lf[154]=C_h_intern(&lf[154],12,"list->string");
-lf[155]=C_h_intern(&lf[155],24,"\003sysreverse-list->string");
-lf[156]=C_h_intern(&lf[156],20,"reverse-list->string");
-lf[157]=C_h_intern(&lf[157],12,"string-fill!");
-lf[158]=C_h_intern(&lf[158],11,"string-copy");
-lf[159]=C_h_intern(&lf[159],9,"substring");
-lf[160]=C_h_intern(&lf[160],13,"\003syssubstring");
-lf[161]=C_h_intern(&lf[161],8,"string=\077");
-lf[162]=C_h_intern(&lf[162],11,"string-ci=\077");
-lf[163]=C_h_intern(&lf[163],8,"string<\077");
-lf[164]=C_h_intern(&lf[164],8,"string>\077");
-lf[165]=C_h_intern(&lf[165],9,"string<=\077");
-lf[166]=C_h_intern(&lf[166],9,"string>=\077");
-lf[167]=C_h_intern(&lf[167],11,"string-ci<\077");
-lf[168]=C_h_intern(&lf[168],11,"string-ci>\077");
-lf[169]=C_h_intern(&lf[169],12,"string-ci<=\077");
-lf[170]=C_h_intern(&lf[170],12,"string-ci>=\077");
-lf[171]=C_h_intern(&lf[171],17,"\003sysstring-append");
-lf[172]=C_h_intern(&lf[172],13,"string-append");
-lf[173]=C_h_intern(&lf[173],6,"string");
-lf[174]=C_h_intern(&lf[174],21,"\003sysfragments->string");
-lf[175]=C_h_intern(&lf[175],20,"most-positive-fixnum");
-lf[176]=C_h_intern(&lf[176],20,"most-negative-fixnum");
-lf[177]=C_h_intern(&lf[177],11,"fixnum-bits");
-lf[178]=C_h_intern(&lf[178],16,"fixnum-precision");
-lf[179]=C_h_intern(&lf[179],7,"fixnum\077");
-lf[180]=C_h_intern(&lf[180],3,"fx+");
-lf[181]=C_h_intern(&lf[181],3,"fx-");
-lf[182]=C_h_intern(&lf[182],3,"fx*");
-lf[183]=C_h_intern(&lf[183],3,"fx=");
-lf[184]=C_h_intern(&lf[184],3,"fx>");
-lf[185]=C_h_intern(&lf[185],3,"fx<");
-lf[186]=C_h_intern(&lf[186],4,"fx>=");
-lf[187]=C_h_intern(&lf[187],4,"fx<=");
-lf[188]=C_h_intern(&lf[188],5,"fxmin");
-lf[189]=C_h_intern(&lf[189],5,"fxmax");
-lf[190]=C_h_intern(&lf[190],5,"fxneg");
-lf[191]=C_h_intern(&lf[191],5,"fxand");
-lf[192]=C_h_intern(&lf[192],5,"fxior");
-lf[193]=C_h_intern(&lf[193],5,"fxxor");
-lf[194]=C_h_intern(&lf[194],5,"fxnot");
-lf[195]=C_h_intern(&lf[195],5,"fxshl");
-lf[196]=C_h_intern(&lf[196],5,"fxshr");
-lf[197]=C_h_intern(&lf[197],3,"fx/");
-lf[198]=C_h_intern(&lf[198],5,"fxmod");
-lf[199]=C_h_intern(&lf[199],14,"maximum-flonum");
-lf[200]=C_h_intern(&lf[200],14,"minimum-flonum");
-lf[201]=C_h_intern(&lf[201],12,"flonum-radix");
-lf[202]=C_h_intern(&lf[202],14,"flonum-epsilon");
-lf[203]=C_h_intern(&lf[203],16,"flonum-precision");
-lf[204]=C_h_intern(&lf[204],24,"flonum-decimal-precision");
-lf[205]=C_h_intern(&lf[205],23,"flonum-maximum-exponent");
-lf[206]=C_h_intern(&lf[206],23,"flonum-minimum-exponent");
-lf[207]=C_h_intern(&lf[207],31,"flonum-maximum-decimal-exponent");
-lf[208]=C_h_intern(&lf[208],31,"flonum-minimum-decimal-exponent");
-lf[209]=C_h_intern(&lf[209],7,"flonum\077");
-lf[210]=C_h_intern(&lf[210],7,"finite\077");
-lf[211]=C_h_intern(&lf[211],3,"fp+");
-lf[212]=C_h_intern(&lf[212],3,"fp-");
-lf[213]=C_h_intern(&lf[213],3,"fp*");
-lf[214]=C_h_intern(&lf[214],3,"fp/");
-lf[215]=C_h_intern(&lf[215],3,"fp=");
-lf[216]=C_h_intern(&lf[216],3,"fp>");
-lf[217]=C_h_intern(&lf[217],3,"fp<");
-lf[218]=C_h_intern(&lf[218],4,"fp>=");
-lf[219]=C_h_intern(&lf[219],4,"fp<=");
-lf[220]=C_h_intern(&lf[220],5,"fpneg");
-lf[221]=C_h_intern(&lf[221],5,"fpmax");
-lf[222]=C_h_intern(&lf[222],5,"fpmin");
-lf[223]=C_h_intern(&lf[223],7,"fpfloor");
-lf[224]=C_h_intern(&lf[224],10,"fptruncate");
-lf[225]=C_h_intern(&lf[225],7,"fpround");
-lf[226]=C_h_intern(&lf[226],9,"fpceiling");
-lf[227]=C_h_intern(&lf[227],9,"\003sysfloor");
-lf[228]=C_h_intern(&lf[228],12,"\003systruncate");
-lf[229]=C_h_intern(&lf[229],9,"\003sysround");
-lf[230]=C_h_intern(&lf[230],11,"\003sysceiling");
-lf[231]=C_h_intern(&lf[231],5,"fpsin");
-lf[232]=C_h_intern(&lf[232],5,"fpcos");
-lf[233]=C_h_intern(&lf[233],5,"fptan");
-lf[234]=C_h_intern(&lf[234],6,"fpasin");
-lf[235]=C_h_intern(&lf[235],6,"fpacos");
-lf[236]=C_h_intern(&lf[236],6,"fpatan");
-lf[237]=C_h_intern(&lf[237],7,"fpatan2");
-lf[238]=C_h_intern(&lf[238],5,"fpexp");
-lf[239]=C_h_intern(&lf[239],6,"fpexpt");
-lf[240]=C_h_intern(&lf[240],5,"fplog");
-lf[241]=C_h_intern(&lf[241],6,"fpsqrt");
-lf[242]=C_h_intern(&lf[242],5,"fpabs");
-lf[243]=C_h_intern(&lf[243],10,"fpinteger\077");
-lf[244]=C_h_intern(&lf[244],1,"*");
-lf[245]=C_h_intern(&lf[245],1,"-");
-lf[246]=C_h_intern(&lf[246],1,"+");
-lf[247]=C_h_intern(&lf[247],1,"/");
-lf[248]=C_h_intern(&lf[248],1,"=");
-lf[249]=C_h_intern(&lf[249],1,">");
-lf[250]=C_h_intern(&lf[250],1,"<");
-lf[251]=C_h_intern(&lf[251],2,">=");
-lf[252]=C_h_intern(&lf[252],2,"<=");
-lf[253]=C_h_intern(&lf[253],4,"add1");
-lf[254]=C_h_intern(&lf[254],4,"sub1");
-lf[255]=C_h_intern(&lf[255],8,"quotient");
-lf[256]=C_h_intern(&lf[256],11,"\003sysnumber\077");
-lf[257]=C_h_intern(&lf[257],7,"number\077");
-lf[258]=C_h_intern(&lf[258],8,"complex\077");
-lf[259]=C_h_intern(&lf[259],5,"real\077");
-lf[260]=C_h_intern(&lf[260],9,"rational\077");
-lf[261]=C_h_intern(&lf[261],19,"\003sysflonum-fraction");
-lf[262]=C_h_intern(&lf[262],12,"\003sysinteger\077");
-lf[263]=C_h_intern(&lf[263],8,"integer\077");
-lf[264]=C_h_intern(&lf[264],10,"\003sysexact\077");
-lf[265]=C_h_intern(&lf[265],12,"\003sysinexact\077");
-lf[266]=C_h_intern(&lf[266],6,"exact\077");
-lf[267]=C_h_intern(&lf[267],8,"inexact\077");
-lf[268]=C_h_intern(&lf[268],4,"expt");
-lf[269]=C_h_intern(&lf[269],16,"\003sysfits-in-int\077");
-lf[270]=C_h_intern(&lf[270],25,"\003sysfits-in-unsigned-int\077");
-lf[271]=C_h_intern(&lf[271],27,"\003sysflonum-in-fixnum-range\077");
-lf[272]=C_h_intern(&lf[272],18,"\003sysdouble->number");
-lf[273]=C_h_intern(&lf[273],5,"zero\077");
-lf[274]=C_h_intern(&lf[274],9,"positive\077");
-lf[275]=C_h_intern(&lf[275],9,"negative\077");
-lf[276]=C_h_intern(&lf[276],3,"abs");
-lf[277]=C_h_intern(&lf[277],5,"angle");
-lf[278]=C_decode_literal(C_heaptop,"\376U3.14159265358979\000");
-lf[279]=C_decode_literal(C_heaptop,"\376U0.\000");
-lf[280]=C_h_intern(&lf[280],9,"real-part");
-lf[281]=C_h_intern(&lf[281],9,"imag-part");
-lf[282]=C_h_intern(&lf[282],9,"numerator");
-lf[283]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a rational number");
-lf[284]=C_h_intern(&lf[284],11,"denominator");
-lf[285]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a rational number");
-lf[286]=C_h_intern(&lf[286],9,"magnitude");
-lf[287]=C_h_intern(&lf[287],6,"signum");
-lf[288]=C_decode_literal(C_heaptop,"\376U1.\000");
-lf[289]=C_decode_literal(C_heaptop,"\376U-1.\000");
-lf[290]=C_decode_literal(C_heaptop,"\376U0.\000");
-lf[291]=C_h_intern(&lf[291],18,"\003sysexact->inexact");
-lf[292]=C_h_intern(&lf[292],14,"exact->inexact");
-lf[293]=C_h_intern(&lf[293],18,"\003sysinexact->exact");
-lf[294]=C_h_intern(&lf[294],14,"inexact->exact");
-lf[295]=C_h_intern(&lf[295],5,"floor");
-lf[296]=C_h_intern(&lf[296],7,"ceiling");
-lf[297]=C_h_intern(&lf[297],8,"truncate");
-lf[298]=C_h_intern(&lf[298],5,"round");
-lf[299]=C_h_intern(&lf[299],9,"remainder");
-lf[300]=C_h_intern(&lf[300],6,"modulo");
-lf[301]=C_h_intern(&lf[301],5,"even\077");
-lf[302]=C_h_intern(&lf[302],4,"odd\077");
-lf[303]=C_h_intern(&lf[303],3,"max");
-lf[304]=C_h_intern(&lf[304],3,"min");
-lf[305]=C_h_intern(&lf[305],3,"exp");
-lf[306]=C_h_intern(&lf[306],3,"log");
-lf[307]=C_h_intern(&lf[307],3,"sin");
-lf[308]=C_h_intern(&lf[308],3,"cos");
-lf[309]=C_h_intern(&lf[309],3,"tan");
-lf[310]=C_h_intern(&lf[310],4,"asin");
-lf[311]=C_h_intern(&lf[311],4,"acos");
-lf[312]=C_h_intern(&lf[312],4,"sqrt");
-lf[313]=C_h_intern(&lf[313],4,"atan");
-lf[314]=C_h_intern(&lf[314],7,"\003sysgcd");
-lf[315]=C_h_intern(&lf[315],3,"gcd");
-lf[316]=C_h_intern(&lf[316],7,"\003syslcm");
-lf[317]=C_h_intern(&lf[317],3,"lcm");
-lf[318]=C_h_intern(&lf[318],18,"\003sysstring->number");
-lf[319]=C_h_intern(&lf[319],14,"string->number");
-lf[320]=C_h_intern(&lf[320],18,"\003sysnumber->string");
-lf[321]=C_h_intern(&lf[321],14,"number->string");
-lf[322]=C_h_intern(&lf[322],22,"flonum-print-precision");
-lf[323]=C_h_intern(&lf[323],15,"\003sysmake-symbol");
-lf[324]=C_h_intern(&lf[324],7,"symbol\077");
-lf[325]=C_h_intern(&lf[325],9,"\003syssnafu");
-lf[326]=C_h_intern(&lf[326],9,"\003sysfnord");
-lf[327]=C_h_intern(&lf[327],17,"\003sysintern-symbol");
-lf[328]=C_h_intern(&lf[328],20,"\003sysinterned-symbol\077");
-lf[329]=C_h_intern(&lf[329],18,"\003sysstring->symbol");
-lf[330]=C_h_intern(&lf[330],18,"\003syssymbol->string");
-lf[331]=C_h_intern(&lf[331],28,"\003syssymbol->qualified-string");
-lf[332]=C_h_intern(&lf[332],27,"\003sysqualified-symbol-prefix");
-lf[333]=C_decode_literal(C_heaptop,"\376B\000\000\002##");
-lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
-lf[335]=C_h_intern(&lf[335],21,"\003sysqualified-symbol\077");
-lf[336]=C_h_intern(&lf[336],28,"\003sysstring->qualified-symbol");
-lf[337]=C_h_intern(&lf[337],14,"symbol->string");
-lf[338]=C_h_intern(&lf[338],14,"string->symbol");
-lf[339]=C_h_intern(&lf[339],25,"string->uninterned-symbol");
-lf[340]=C_h_intern(&lf[340],6,"gensym");
-lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\001g");
-lf[342]=C_decode_literal(C_heaptop,"\376B\000\000\042argument is not a string or symbol");
-lf[343]=C_h_intern(&lf[343],8,"keyword\077");
-lf[344]=C_h_intern(&lf[344],15,"string->keyword");
-lf[345]=C_h_intern(&lf[345],15,"keyword->string");
-lf[346]=C_decode_literal(C_heaptop,"\376B\000\000!bad argument type - not a keyword");
-lf[347]=C_h_intern(&lf[347],15,"\003sysget-keyword");
-lf[348]=C_h_intern(&lf[348],11,"get-keyword");
-lf[349]=C_decode_literal(C_heaptop,"\376B\000\000\030missing keyword argument");
-lf[350]=C_h_intern(&lf[350],13,"\003sysmake-blob");
-lf[351]=C_h_intern(&lf[351],9,"make-blob");
-lf[352]=C_h_intern(&lf[352],5,"blob\077");
-lf[353]=C_h_intern(&lf[353],9,"blob-size");
-lf[354]=C_h_intern(&lf[354],12,"string->blob");
-lf[355]=C_h_intern(&lf[355],12,"blob->string");
-lf[356]=C_h_intern(&lf[356],6,"blob=\077");
-lf[357]=C_h_intern(&lf[357],7,"vector\077");
-lf[358]=C_h_intern(&lf[358],13,"vector-length");
-lf[359]=C_h_intern(&lf[359],10,"vector-ref");
-lf[360]=C_h_intern(&lf[360],11,"vector-set!");
-lf[361]=C_h_intern(&lf[361],15,"\003sysmake-vector");
-lf[362]=C_h_intern(&lf[362],11,"make-vector");
-lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\020size is negative");
-lf[364]=C_h_intern(&lf[364],12,"list->vector");
-lf[365]=C_h_intern(&lf[365],12,"vector->list");
-lf[366]=C_h_intern(&lf[366],6,"vector");
-lf[367]=C_h_intern(&lf[367],16,"\003syslist->vector");
-lf[368]=C_h_intern(&lf[368],12,"vector-fill!");
-lf[369]=C_h_intern(&lf[369],12,"vector-copy!");
-lf[370]=C_decode_literal(C_heaptop,"\376B\000\000)cannot copy vector - count exceeds length");
-lf[371]=C_h_intern(&lf[371],13,"vector-resize");
-lf[373]=C_h_intern(&lf[373],5,"char\077");
-lf[374]=C_h_intern(&lf[374],13,"char->integer");
-lf[375]=C_h_intern(&lf[375],13,"integer->char");
-lf[376]=C_h_intern(&lf[376],6,"char=\077");
-lf[377]=C_h_intern(&lf[377],6,"char>\077");
-lf[378]=C_h_intern(&lf[378],6,"char<\077");
-lf[379]=C_h_intern(&lf[379],7,"char>=\077");
-lf[380]=C_h_intern(&lf[380],7,"char<=\077");
-lf[381]=C_h_intern(&lf[381],11,"char-upcase");
-lf[382]=C_h_intern(&lf[382],13,"char-downcase");
-lf[383]=C_h_intern(&lf[383],9,"char-ci=\077");
-lf[384]=C_h_intern(&lf[384],9,"char-ci>\077");
-lf[385]=C_h_intern(&lf[385],9,"char-ci<\077");
-lf[386]=C_h_intern(&lf[386],10,"char-ci>=\077");
-lf[387]=C_h_intern(&lf[387],10,"char-ci<=\077");
-lf[388]=C_h_intern(&lf[388],16,"char-upper-case\077");
-lf[389]=C_h_intern(&lf[389],16,"char-lower-case\077");
-lf[390]=C_h_intern(&lf[390],13,"char-numeric\077");
-lf[391]=C_h_intern(&lf[391],16,"char-whitespace\077");
-lf[392]=C_h_intern(&lf[392],16,"char-alphabetic\077");
-lf[393]=C_h_intern(&lf[393],9,"char-name");
-lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid character name");
-lf[395]=C_h_intern(&lf[395],10,"procedure\077");
-lf[396]=C_h_intern(&lf[396],5,"apply");
-lf[397]=C_h_intern(&lf[397],34,"\003syscall-with-current-continuation");
-lf[398]=C_h_intern(&lf[398],33,"\003syscall-with-direct-continuation");
-lf[399]=C_h_intern(&lf[399],21,"\003syscall-with-cthulhu");
-lf[400]=C_h_intern(&lf[400],17,"\003sysdirect-return");
-lf[401]=C_h_intern(&lf[401],6,"values");
-lf[402]=C_h_intern(&lf[402],20,"\003syscall-with-values");
-lf[403]=C_h_intern(&lf[403],16,"call-with-values");
-lf[404]=C_h_intern(&lf[404],12,"\003sysfor-each");
-lf[405]=C_h_intern(&lf[405],8,"for-each");
-lf[406]=C_h_intern(&lf[406],7,"\003sysmap");
-lf[407]=C_h_intern(&lf[407],3,"map");
-lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\034lists are not of same length");
-lf[409]=C_h_intern(&lf[409],17,"\003sysdynamic-winds");
-lf[410]=C_h_intern(&lf[410],12,"dynamic-wind");
-lf[411]=C_h_intern(&lf[411],16,"\003sysdynamic-wind");
-lf[412]=C_h_intern(&lf[412],30,"call-with-current-continuation");
-lf[414]=C_h_intern(&lf[414],7,"call/cc");
-lf[415]=C_h_intern(&lf[415],20,"continuation-capture");
-lf[416]=C_h_intern(&lf[416],12,"continuation");
-lf[417]=C_h_intern(&lf[417],13,"continuation\077");
-lf[418]=C_h_intern(&lf[418],22,"\003syscontinuation-graft");
-lf[419]=C_h_intern(&lf[419],18,"continuation-graft");
-lf[420]=C_h_intern(&lf[420],19,"continuation-return");
-lf[421]=C_h_intern(&lf[421],5,"port\077");
-lf[422]=C_h_intern(&lf[422],11,"input-port\077");
-lf[423]=C_h_intern(&lf[423],12,"output-port\077");
-lf[424]=C_h_intern(&lf[424],13,"\003sysmake-port");
-lf[425]=C_h_intern(&lf[425],9,"read-line");
-lf[426]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[427]=C_h_intern(&lf[427],21,"\003sysstream-port-class");
-lf[428]=C_h_intern(&lf[428],18,"\003sysopen-file-port");
-lf[429]=C_h_intern(&lf[429],18,"\003sysstandard-input");
-lf[430]=C_h_intern(&lf[430],19,"\003sysstandard-output");
-lf[431]=C_h_intern(&lf[431],18,"\003sysstandard-error");
-lf[432]=C_h_intern(&lf[432],14,"\003syscheck-port");
-lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\026argument is not a port");
-lf[434]=C_h_intern(&lf[434],19,"\003syscheck-port-mode");
-lf[435]=C_decode_literal(C_heaptop,"\376B\000\000\031port is not an input port");
-lf[436]=C_decode_literal(C_heaptop,"\376B\000\000\032port is not an output-port");
-lf[437]=C_h_intern(&lf[437],15,"\003syscheck-port*");
-lf[438]=C_h_intern(&lf[438],11,"\000file-error");
-lf[439]=C_decode_literal(C_heaptop,"\376B\000\000\023port already closed");
-lf[440]=C_h_intern(&lf[440],18,"current-input-port");
-lf[441]=C_h_intern(&lf[441],19,"current-output-port");
-lf[442]=C_h_intern(&lf[442],18,"current-error-port");
-lf[443]=C_h_intern(&lf[443],13,"\003systty-port\077");
-lf[444]=C_h_intern(&lf[444],25,"\003syspeek-unsigned-integer");
-lf[445]=C_h_intern(&lf[445],13,"\003sysport-data");
-lf[446]=C_h_intern(&lf[446],18,"\003sysset-port-data!");
-lf[447]=C_h_intern(&lf[447],7,"mingw32");
-lf[448]=C_h_intern(&lf[448],27,"\003sysplatform-fixup-pathname");
-lf[449]=C_h_intern(&lf[449],23,"\003syspathname-resolution");
-lf[450]=C_h_intern(&lf[450],20,"\003sysexpand-home-path");
-lf[451]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[452]=C_decode_literal(C_heaptop,"\376B\000\000\004HOME");
-lf[453]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[454]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[455]=C_h_intern(&lf[455],15,"open-input-file");
-lf[456]=C_h_intern(&lf[456],16,"open-output-file");
-lf[457]=C_h_intern(&lf[457],16,"close-input-port");
-lf[458]=C_h_intern(&lf[458],17,"close-output-port");
-lf[459]=C_decode_literal(C_heaptop,"\376B\000\000\001r");
-lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\001w");
-lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\023cannot open file - ");
-lf[463]=C_h_intern(&lf[463],17,"\003syspeek-c-string");
-lf[464]=C_h_intern(&lf[464],6,"stream");
-lf[465]=C_h_intern(&lf[465],7,"\000binary");
-lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\001b");
-lf[467]=C_h_intern(&lf[467],5,"\000text");
-lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[469]=C_h_intern(&lf[469],7,"\000append");
-lf[470]=C_decode_literal(C_heaptop,"\376B\000\000&cannot use append mode with input file");
-lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
-lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid file option");
-lf[473]=C_h_intern(&lf[473],5,"\000open");
-lf[474]=C_h_intern(&lf[474],20,"call-with-input-file");
-lf[475]=C_h_intern(&lf[475],21,"call-with-output-file");
-lf[476]=C_h_intern(&lf[476],20,"with-input-from-file");
-lf[477]=C_h_intern(&lf[477],19,"with-output-to-file");
-lf[478]=C_h_intern(&lf[478],12,"file-exists\077");
-lf[479]=C_h_intern(&lf[479],8,"\000exists\077");
-lf[480]=C_h_intern(&lf[480],17,"directory-exists\077");
-lf[481]=C_h_intern(&lf[481],16,"\003sysflush-output");
-lf[482]=C_h_intern(&lf[482],12,"flush-output");
-lf[483]=C_h_intern(&lf[483],9,"port-name");
-lf[484]=C_h_intern(&lf[484],14,"set-port-name!");
-lf[485]=C_h_intern(&lf[485],13,"\003sysport-line");
-lf[486]=C_h_intern(&lf[486],13,"port-position");
-lf[487]=C_decode_literal(C_heaptop,"\376B\000\000\037cannot compute position of port");
-lf[488]=C_h_intern(&lf[488],11,"delete-file");
-lf[489]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot delete file - ");
-lf[490]=C_h_intern(&lf[490],7,"\000delete");
-lf[491]=C_h_intern(&lf[491],11,"rename-file");
-lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot rename file - ");
-lf[493]=C_h_intern(&lf[493],7,"\000rename");
-lf[495]=C_h_intern(&lf[495],28,"\003syscurrent-parameter-vector");
-lf[496]=C_decode_literal(C_heaptop,"\376\000\000\000\000");
-lf[497]=C_h_intern(&lf[497],14,"make-parameter");
-lf[498]=C_h_intern(&lf[498],11,"eof-object\077");
-lf[499]=C_h_intern(&lf[499],11,"char-ready\077");
-lf[500]=C_h_intern(&lf[500],9,"read-char");
-lf[501]=C_h_intern(&lf[501],18,"\003sysread-char/port");
-lf[502]=C_h_intern(&lf[502],15,"\003sysread-char-0");
-lf[503]=C_h_intern(&lf[503],15,"\003syspeek-char-0");
-lf[504]=C_h_intern(&lf[504],9,"peek-char");
-lf[505]=C_h_intern(&lf[505],4,"read");
-lf[506]=C_h_intern(&lf[506],8,"\003sysread");
-lf[507]=C_h_intern(&lf[507],26,"\003sysdefault-read-info-hook");
-lf[508]=C_h_intern(&lf[508],31,"\003sysread-error-with-line-number");
-lf[509]=C_h_intern(&lf[509],21,"\003sysenable-qualifiers");
-lf[510]=C_h_intern(&lf[510],20,"\003sysread-prompt-hook");
-lf[511]=C_h_intern(&lf[511],19,"\003sysinfix-list-hook");
-lf[512]=C_h_intern(&lf[512],21,"\003syssharp-number-hook");
-lf[513]=C_h_intern(&lf[513],14,"\003sysread-error");
-lf[514]=C_decode_literal(C_heaptop,"\376B\000\000!invalid parameterized read syntax");
-lf[515]=C_h_intern(&lf[515],14,"case-sensitive");
-lf[516]=C_h_intern(&lf[516],13,"keyword-style");
-lf[517]=C_h_intern(&lf[517],20,"parentheses-synonyms");
-lf[518]=C_h_intern(&lf[518],13,"symbol-escape");
-lf[519]=C_h_intern(&lf[519],18,"current-read-table");
-lf[520]=C_h_intern(&lf[520],16,"\003sysread-warning");
-lf[521]=C_decode_literal(C_heaptop,"\376B\000\000\011 in line ");
-lf[522]=C_h_intern(&lf[522],13,"\000syntax-error");
-lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\011 in line ");
-lf[524]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000,\376\003\000\000\002\376\377\012\000\000;\376\003\000\000\002\376\377\012\000\000(\376\003\000\000\002\376\377\012\000\000)\376\003\000\000\002\376\377\012\000\000\047\376\003\000\000\002\376\377\012\000\000\042\376\003\000\000\002\376\377\012\000\000[\376\003\000"
-"\000\002\376\377\012\000\000]\376\003\000\000\002\376\377\012\000\000{\376\003\000\000\002\376\377\012\000\000}\376\377\016");
-lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\032unexpected list terminator");
-lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\022reserved character");
-lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid escape-sequence \047\134");
-lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
-lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\034unterminated string constant");
-lf[530]=C_h_intern(&lf[530],21,"\003syschar->utf8-string");
-lf[531]=C_decode_literal(C_heaptop,"\376B\000\000\023unterminated string");
-lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\001x");
-lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\022bad surrogate pair");
-lf[534]=C_h_intern(&lf[534],25,"\003syssurrogates->codepoint");
-lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\001u");
-lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\032unpaired escaped surrogate");
-lf[537]=C_h_intern(&lf[537],22,"\003sysunicode-surrogate\077");
-lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\001u");
-lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid escape (surrogate)");
-lf[540]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
-lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\077undefined escape sequence in string - probably forgot backslash");
-lf[542]=C_decode_literal(C_heaptop,"\376B\000\000\011missing `");
-lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
-lf[544]=C_h_intern(&lf[544],9,"list-info");
-lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\030list-terminator mismatch");
-lf[546]=C_decode_literal(C_heaptop,"\376B\000\000\021unterminated list");
-lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\027missing list terminator");
-lf[548]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid use of `.\047");
-lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[550]=C_decode_literal(C_heaptop,"\376B\000\000\015missing token");
-lf[551]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid vector syntax");
-lf[552]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid use of `.\047");
-lf[554]=C_decode_literal(C_heaptop,"\376B\000\0003cannot represent exact fraction - coerced to flonum");
-lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\025illegal number syntax");
-lf[556]=C_decode_literal(C_heaptop,"\376B\000\000!unexpected end of numeric literal");
-lf[557]=C_decode_literal(C_heaptop,"\376B\000\0000illegal number syntax - invalid exactness prefix");
-lf[558]=C_decode_literal(C_heaptop,"\376B\000\000!unexpected end of numeric literal");
-lf[559]=C_decode_literal(C_heaptop,"\376B\000\000%illegal number syntax - invalid radix");
-lf[560]=C_h_intern(&lf[560],11,"symbol-info");
-lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\042unexpected end of `| ... |\047 symbol");
-lf[562]=C_decode_literal(C_heaptop,"\376B\000\000\013missing \047|\047");
-lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\027unknown named character");
-lf[564]=C_decode_literal(C_heaptop,"\376B\000\000\032unterminated block-comment");
-lf[565]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid qualified symbol syntax");
-lf[566]=C_decode_literal(C_heaptop,"\376B\000\000&qualified symbol syntax is not allowed");
-lf[567]=C_h_intern(&lf[567],7,"\000suffix");
-lf[568]=C_h_intern(&lf[568],7,"\000prefix");
-lf[569]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000[\376\003\000\000\002\376\377\012\000\000]\376\003\000\000\002\376\377\012\000\000{\376\003\000\000\002\376\377\012\000\000}\376\377\016");
-lf[570]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000|\376\377\016");
-lf[571]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000[\376\003\000\000\002\376\377\012\000\000]\376\003\000\000\002\376\377\012\000\000{\376\003\000\000\002\376\377\012\000\000}\376\003\000\000\002\376\377\012\000\000|\376\377\016");
-lf[572]=C_h_intern(&lf[572],5,"quote");
-lf[573]=C_h_intern(&lf[573],10,"quasiquote");
-lf[574]=C_h_intern(&lf[574],16,"unquote-splicing");
-lf[575]=C_h_intern(&lf[575],7,"unquote");
-lf[576]=C_decode_literal(C_heaptop,"\376B\000\000!invalid parameterized read syntax");
-lf[577]=C_decode_literal(C_heaptop,"\376B\000\0006unexpected end of input while reading `#c...\047 sequence");
-lf[578]=C_decode_literal(C_heaptop,"\376B\000\000*invalid case specifier in `#c...\047 sequence");
-lf[579]=C_h_intern(&lf[579],11,"quasisyntax");
-lf[580]=C_h_intern(&lf[580],8,"location");
-lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
-lf[582]=C_h_intern(&lf[582],11,"cond-expand");
-lf[583]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\004else\376\377\016");
-lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\003eof");
-lf[585]=C_decode_literal(C_heaptop,"\376B\000\000\010optional");
-lf[586]=C_decode_literal(C_heaptop,"\376B\000\000\004rest");
-lf[587]=C_decode_literal(C_heaptop,"\376B\000\000\003key");
-lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\002#!");
-lf[589]=C_decode_literal(C_heaptop,"\376B\000\000\014current-line");
-lf[590]=C_decode_literal(C_heaptop,"\376B\000\000\014current-file");
-lf[592]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid `#!\047 token");
-lf[593]=C_h_intern(&lf[593],18,"\003sysuser-read-hook");
-lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\035UTF-8 codepoint out of range:");
-lf[595]=C_decode_literal(C_heaptop,"\376B\000\000\036invalid sharp-sign read syntax");
-lf[596]=C_h_intern(&lf[596],18,"\003sysset-read-mark!");
-lf[597]=C_h_intern(&lf[597],16,"set-read-syntax!");
-lf[598]=C_h_intern(&lf[598],22,"set-sharp-read-syntax!");
-lf[599]=C_h_intern(&lf[599],30,"set-parameterized-read-syntax!");
-lf[600]=C_h_intern(&lf[600],15,"copy-read-table");
-lf[601]=C_h_intern(&lf[601],10,"read-table");
-lf[602]=C_h_intern(&lf[602],16,"\003syswrite-char-0");
-lf[603]=C_h_intern(&lf[603],19,"\003syswrite-char/port");
-lf[604]=C_h_intern(&lf[604],10,"write-char");
-lf[605]=C_h_intern(&lf[605],7,"newline");
-lf[606]=C_h_intern(&lf[606],5,"write");
-lf[607]=C_h_intern(&lf[607],9,"\003sysprint");
-lf[608]=C_h_intern(&lf[608],7,"display");
-lf[609]=C_h_intern(&lf[609],5,"print");
-lf[610]=C_h_intern(&lf[610],6,"print*");
-lf[614]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
-lf[615]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
-lf[616]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000(\376\003\000\000\002\376\377\012\000\000)\376\003\000\000\002\376\377\012\000\000,\376\003\000\000\002\376\377\012\000\000[\376\003\000\000\002\376\377\012\000\000]\376\003\000\000\002\376\377\012\000\000{\376\003\000\000\002\376\377\012\000\000}\376\003\000"
-"\000\002\376\377\012\000\000\047\376\003\000\000\002\376\377\012\000\000\042\376\003\000\000\002\376\377\012\000\000;\376\003\000\000\002\376\377\012\000\000 \376\003\000\000\002\376\377\012\000\000`\376\003\000\000\002\376\377\012\000\000|\376\377\016");
-lf[617]=C_decode_literal(C_heaptop,"\376B\000\000\002#!");
-lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\002()");
-lf[619]=C_decode_literal(C_heaptop,"\376B\000\000\002#t");
-lf[620]=C_decode_literal(C_heaptop,"\376B\000\000\002#f");
-lf[621]=C_decode_literal(C_heaptop,"\376B\000\000\005#!eof");
-lf[622]=C_decode_literal(C_heaptop,"\376B\000\000\016#<unspecified>");
-lf[623]=C_decode_literal(C_heaptop,"\376B\000\000\002#\134");
-lf[624]=C_h_intern(&lf[624],28,"\003sysarbitrary-unbound-symbol");
-lf[625]=C_decode_literal(C_heaptop,"\376B\000\000\020#<unbound value>");
-lf[626]=C_decode_literal(C_heaptop,"\376B\000\000\033#<invalid forwarded object>");
-lf[627]=C_decode_literal(C_heaptop,"\376B\000\000\002#:");
-lf[628]=C_h_intern(&lf[628],10,"#!optional");
-lf[629]=C_h_intern(&lf[629],5,"#!key");
-lf[630]=C_h_intern(&lf[630],6,"#!rest");
-lf[631]=C_h_intern(&lf[631],19,"\003syspointer->string");
-lf[632]=C_decode_literal(C_heaptop,"\376B\000\000\002\134\042");
-lf[633]=C_decode_literal(C_heaptop,"\376B\000\000\002\134\134");
-lf[634]=C_decode_literal(C_heaptop,"\376B\000\000\003 . ");
-lf[635]=C_decode_literal(C_heaptop,"\376B\000\000\025#<static blob of size");
-lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\017#<blob of size ");
-lf[637]=C_h_intern(&lf[637],19,"\003sysuser-print-hook");
-lf[638]=C_h_intern(&lf[638],21,"\003sysprocedure->string");
-lf[639]=C_decode_literal(C_heaptop,"\376B\000\000\013#<locative>");
-lf[640]=C_h_intern(&lf[640],23,"\003syslambda-info->string");
-lf[641]=C_decode_literal(C_heaptop,"\376B\000\000\016#<lambda info ");
-lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\002\042>");
-lf[643]=C_decode_literal(C_heaptop,"\376B\000\000\016#<input port \042");
-lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\017#<output port \042");
-lf[645]=C_decode_literal(C_heaptop,"\376B\000\000\003#()");
-lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\002#(");
-lf[647]=C_decode_literal(C_heaptop,"\376B\000\000,unprintable non-immediate object encountered");
-lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\033#<invalid immediate object>");
-lf[649]=C_decode_literal(C_heaptop,"\376B\000\000\014#<procedure ");
-lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[651]=C_decode_literal(C_heaptop,"\376B\000\000\014#<procedure>");
-lf[652]=C_h_intern(&lf[652],15,"\003syslambda-info");
-lf[653]=C_h_intern(&lf[653],19,"\003sysrecord-printers");
-lf[654]=C_h_intern(&lf[654],27,"\003sysregister-record-printer");
-lf[655]=C_h_intern(&lf[655],9,"condition");
-lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[657]=C_h_intern(&lf[657],6,"thread");
-lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[659]=C_decode_literal(C_heaptop,"\376B\000\000\002#<");
-lf[660]=C_h_intern(&lf[660],27,"\003syswith-print-length-limit");
-lf[661]=C_h_intern(&lf[661],11,"bitwise-and");
-lf[662]=C_h_intern(&lf[662],11,"bitwise-ior");
-lf[663]=C_h_intern(&lf[663],11,"bitwise-xor");
-lf[664]=C_h_intern(&lf[664],11,"bitwise-not");
-lf[665]=C_h_intern(&lf[665],16,"arithmetic-shift");
-lf[666]=C_h_intern(&lf[666],8,"bit-set\077");
-lf[667]=C_h_intern(&lf[667],14,"\003syscopy-bytes");
-lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\022string buffer full");
-lf[669]=C_h_intern(&lf[669],20,"\003sysscan-buffer-line");
-lf[670]=C_h_intern(&lf[670],21,"\003sysstring-port-class");
-lf[671]=C_h_intern(&lf[671],17,"open-input-string");
-lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\010(string)");
-lf[673]=C_h_intern(&lf[673],18,"open-output-string");
-lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\010(string)");
-lf[675]=C_h_intern(&lf[675],17,"get-output-string");
-lf[676]=C_decode_literal(C_heaptop,"\376B\000\000$argument is not a string-output-port");
-lf[677]=C_h_intern(&lf[677],19,"\003sysprint-to-string");
-lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\021#<tagged pointer ");
-lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[681]=C_h_intern(&lf[681],20,"\003syspointer->address");
-lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\021#<SWIG pointer 0x");
-lf[683]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[684]=C_decode_literal(C_heaptop,"\376B\000\000\014#<pointer 0x");
-lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
-lf[686]=C_h_intern(&lf[686],13,"software-type");
-lf[687]=C_h_intern(&lf[687],12,"machine-type");
-lf[688]=C_h_intern(&lf[688],18,"machine-byte-order");
-lf[689]=C_h_intern(&lf[689],16,"software-version");
-lf[690]=C_h_intern(&lf[690],14,"build-platform");
-lf[691]=C_h_intern(&lf[691],9,"c-runtime");
-lf[692]=C_h_intern(&lf[692],20,"\003syswindows-platform");
-lf[693]=C_h_intern(&lf[693],15,"chicken-version");
-lf[694]=C_decode_literal(C_heaptop,"\376B\000\000\010Version ");
-lf[695]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
-lf[696]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
-lf[698]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\002 [");
-lf[700]=C_decode_literal(C_heaptop,"\376B\000\000\002 ]");
-lf[701]=C_h_intern(&lf[701],7,"unknown");
-lf[702]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
-lf[704]=C_decode_literal(C_heaptop,"\376B\000\000\006 64bit");
-lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[706]=C_decode_literal(C_heaptop,"\376B\000\000\011 symbolgc");
-lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[708]=C_decode_literal(C_heaptop,"\376B\000\000\011 manyargs");
-lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[710]=C_decode_literal(C_heaptop,"\376B\000\000\006 dload");
-lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[712]=C_decode_literal(C_heaptop,"\376B\000\000\010 ptables");
-lf[713]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[714]=C_decode_literal(C_heaptop,"\376B\000\000\010 gchooks");
-lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[716]=C_decode_literal(C_heaptop,"\376B\000\000\006 cross");
-lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[718]=C_h_intern(&lf[718],32,"\003syspathname-directory-separator");
-lf[719]=C_h_intern(&lf[719],16,"\003sys->feature-id");
-lf[720]=C_decode_literal(C_heaptop,"\376B\000\0001bad argument type - not a valid feature identifer");
-lf[721]=C_h_intern(&lf[721],12,"\003sysfeatures");
-lf[722]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\000chicken\376\003\000\000\002\376\001\000\000\012\000chicken-4\376\003\000\000\002\376\001\000\000\010\000srfi-23\376\003\000\000\002\376\001\000\000\010\000srfi-30\376\003\000\000\002\376"
-"\001\000\000\010\000srfi-39\376\003\000\000\002\376\001\000\000\010\000srfi-62\376\003\000\000\002\376\001\000\000\010\000srfi-17\376\003\000\000\002\376\001\000\000\010\000srfi-12\376\003\000\000\002\376\001\000\000\010\000srf"
-"i-88\376\003\000\000\002\376\001\000\000\010\000srfi-98\376\377\016");
-lf[723]=C_h_intern(&lf[723],17,"register-feature!");
-lf[724]=C_h_intern(&lf[724],19,"unregister-feature!");
-lf[725]=C_h_intern(&lf[725],8,"features");
-lf[726]=C_h_intern(&lf[726],12,"\003sysfeature\077");
-lf[727]=C_h_intern(&lf[727],8,"feature\077");
-lf[728]=C_h_intern(&lf[728],18,"\003sysget-call-chain");
-lf[729]=C_h_intern(&lf[729],25,"\003syspeek-nonnull-c-string");
-lf[730]=C_h_intern(&lf[730],18,"\003syscurrent-thread");
-lf[731]=C_h_intern(&lf[731],27,"\003sysreally-print-call-chain");
-lf[732]=C_decode_literal(C_heaptop,"\376B\000\000\005\011<--\012");
-lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\002] ");
-lf[734]=C_decode_literal(C_heaptop,"\376B\000\000\002\011\011");
-lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\002\012\011");
-lf[736]=C_h_intern(&lf[736],16,"print-call-chain");
-lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\020\012\011Call history:\012");
-lf[738]=C_h_intern(&lf[738],14,"get-call-chain");
-lf[739]=C_h_intern(&lf[739],23,"\003sysuser-interrupt-hook");
-lf[740]=C_h_intern(&lf[740],15,"\000user-interrupt");
-lf[741]=C_h_intern(&lf[741],21,"\003sysprimordial-thread");
-lf[742]=C_h_intern(&lf[742],18,"\003sysbreak-on-error");
-lf[743]=C_h_intern(&lf[743],17,"\003syserror-handler");
-lf[744]=C_h_intern(&lf[744],13,"reset-handler");
-lf[745]=C_h_intern(&lf[745],12,"exit-handler");
-lf[746]=C_h_intern(&lf[746],21,"implicit-exit-handler");
-lf[747]=C_h_intern(&lf[747],25,"\003sysimplicit-exit-handler");
-lf[748]=C_h_intern(&lf[748],16,"force-finalizers");
-lf[749]=C_h_intern(&lf[749],23,"\003syscleanup-before-exit");
-lf[750]=C_h_intern(&lf[750],20,"\003sysforce-finalizers");
-lf[751]=C_decode_literal(C_heaptop,"\376B\000\000\036[debug] forcing finalizers...\012");
-lf[752]=C_h_intern(&lf[752],7,"on-exit");
-lf[753]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016user-interrupt\376\377\016");
-lf[754]=C_h_intern(&lf[754],9,"\003sysabort");
-lf[755]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[756]=C_decode_literal(C_heaptop,"\376B\000\000\012\012Warning: ");
-lf[757]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
-lf[758]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
-lf[759]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
-lf[760]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\004type\376\377\016");
-lf[761]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\006syntax\376\377\016");
-lf[762]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\006bounds\376\377\016");
-lf[763]=C_h_intern(&lf[763],17,"\000arithmetic-error");
-lf[764]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\012arithmetic\376\377\016");
-lf[765]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\003i/o\376\003\000\000\002\376\001\000\000\004file\376\377\016");
-lf[766]=C_h_intern(&lf[766],14,"\000runtime-error");
-lf[767]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\007runtime\376\377\016");
-lf[768]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\007process\376\377\016");
-lf[769]=C_h_intern(&lf[769],14,"\000network-error");
-lf[770]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\003i/o\376\003\000\000\002\376\001\000\000\003net\376\377\016");
-lf[771]=C_h_intern(&lf[771],22,"\000network-timeout-error");
-lf[772]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\003i/o\376\003\000\000\002\376\001\000\000\003net\376\003\000\000\002\376\001\000\000\007timeout\376\377\016");
-lf[773]=C_h_intern(&lf[773],12,"\000limit-error");
-lf[774]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\007runtime\376\003\000\000\002\376\001\000\000\005limit\376\377\016");
-lf[775]=C_h_intern(&lf[775],12,"\000arity-error");
-lf[776]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\005arity\376\377\016");
-lf[777]=C_h_intern(&lf[777],13,"\000access-error");
-lf[778]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\006access\376\377\016");
-lf[779]=C_h_intern(&lf[779],13,"\000domain-error");
-lf[780]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\003\000\000\002\376\001\000\000\006domain\376\377\016");
-lf[781]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\377\016");
-lf[782]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
-lf[783]=C_decode_literal(C_heaptop,"\376B\000\000\032exception handler returned");
-lf[784]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
-lf[785]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
-lf[786]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\377\016");
-lf[787]=C_h_intern(&lf[787],29,"\003syscurrent-exception-handler");
-lf[788]=C_h_intern(&lf[788],10,"\003syssignal");
-lf[789]=C_h_intern(&lf[789],5,"abort");
-lf[790]=C_h_intern(&lf[790],6,"signal");
-lf[791]=C_h_intern(&lf[791],18,"\003syslast-exception");
-lf[792]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
-lf[793]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
-lf[794]=C_h_intern(&lf[794],3,"exn");
-lf[795]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
-lf[796]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
-lf[797]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
-lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[799]=C_decode_literal(C_heaptop,"\376B\000\000\002) ");
-lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\000");
-lf[801]=C_decode_literal(C_heaptop,"\376B\000\000 <exn: has no `message\047 property>");
-lf[802]=C_h_intern(&lf[802],14,"user-interrupt");
-lf[803]=C_decode_literal(C_heaptop,"\376B\000\000\030\012*** user interrupt ***\012");
-lf[804]=C_h_intern(&lf[804],18,"uncaught-exception");
-lf[805]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
-lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\022uncaught exception");
-lf[807]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
-lf[808]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
-lf[809]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
-lf[810]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
-lf[811]=C_h_intern(&lf[811],22,"with-exception-handler");
-lf[812]=C_h_intern(&lf[812],25,"current-exception-handler");
-lf[813]=C_h_intern(&lf[813],23,"make-property-condition");
-lf[814]=C_h_intern(&lf[814],24,"make-composite-condition");
-lf[815]=C_h_intern(&lf[815],10,"\003sysappend");
-lf[816]=C_h_intern(&lf[816],10,"condition\077");
-lf[817]=C_h_intern(&lf[817],19,"condition-predicate");
-lf[818]=C_h_intern(&lf[818],27,"condition-property-accessor");
-lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\036condition has no such property");
-lf[820]=C_h_intern(&lf[820],22,"get-condition-property");
-lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument count - received ");
-lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\016 but expected ");
-lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\035too few arguments - received ");
-lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\016 but expected ");
-lf[825]=C_decode_literal(C_heaptop,"\376B\000\000\021bad argument type");
-lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\020unbound variable");
-lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\030parameter limit exceeded");
-lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\015out of memory");
-lf[829]=C_decode_literal(C_heaptop,"\376B\000\000\020division by zero");
-lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\014out of range");
-lf[831]=C_decode_literal(C_heaptop,"\376B\000\000\025call of non-procedure");
-lf[832]=C_decode_literal(C_heaptop,"\376B\000\000+continuation cannot receive multiple values");
-lf[833]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a non-cyclic list");
-lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\022recursion too deep");
-lf[835]=C_decode_literal(C_heaptop,"\376B\000\0007inexact number cannot be represented as an exact number");
-lf[836]=C_decode_literal(C_heaptop,"\376B\000\000%bad argument type - not a proper list");
-lf[837]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a fixnum");
-lf[838]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a number");
-lf[839]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a string");
-lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a pair");
-lf[841]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a list");
-lf[842]=C_decode_literal(C_heaptop,"\376B\000\000#bad argument type - not a character");
-lf[843]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a vector");
-lf[844]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a symbol");
-lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\016stack overflow");
-lf[846]=C_decode_literal(C_heaptop,"\376B\000\0008bad argument type - not a structure of the required type");
-lf[847]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a blob");
-lf[848]=C_decode_literal(C_heaptop,"\376B\000\000#locative refers to reclaimed object");
-lf[849]=C_decode_literal(C_heaptop,"\376B\000\000-bad argument type - not a non-immediate value");
-lf[850]=C_decode_literal(C_heaptop,"\376B\000\000\047bad argument type - not a number vector");
-lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\042bad argument type - not an integer");
-lf[852]=C_decode_literal(C_heaptop,"\376B\000\000+bad argument type - not an unsigned integer");
-lf[853]=C_decode_literal(C_heaptop,"\376B\000\000!bad argument type - not a pointer");
-lf[854]=C_decode_literal(C_heaptop,"\376B\000\000(bad argument type - not a tagged pointer");
-lf[855]=C_decode_literal(C_heaptop,"\376B\000\000^code to load dynamically was linked with safe runtime libraries, but execut"
-"ing runtime was not");
-lf[856]=C_decode_literal(C_heaptop,"\376B\000\000`code to load dynamically was linked with unsafe runtime libraries, but exec"
-"uting runtime was not");
-lf[857]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a flonum");
-lf[858]=C_decode_literal(C_heaptop,"\376B\000\000#bad argument type - not a procedure");
-lf[859]=C_decode_literal(C_heaptop,"\376B\000\000\026unknown internal error");
-lf[860]=C_h_intern(&lf[860],14,"\003sysstructure\077");
-lf[861]=C_h_intern(&lf[861],22,"\003sysgeneric-structure\077");
-lf[862]=C_h_intern(&lf[862],8,"\003sysslot");
-lf[863]=C_h_intern(&lf[863],8,"\003syssize");
-lf[864]=C_h_intern(&lf[864],16,"\003sysmake-pointer");
-lf[865]=C_h_intern(&lf[865],23,"\003sysmake-tagged-pointer");
-lf[866]=C_h_intern(&lf[866],12,"\003syspointer\077");
-lf[867]=C_h_intern(&lf[867],24,"\003sysset-pointer-address!");
-lf[868]=C_h_intern(&lf[868],15,"\003sysbytevector\077");
-lf[869]=C_h_intern(&lf[869],23,"\003sysstring->pbytevector");
-lf[870]=C_h_intern(&lf[870],14,"\003syspermanent\077");
-lf[871]=C_h_intern(&lf[871],17,"\003sysblock-address");
-lf[872]=C_h_intern(&lf[872],13,"\003syslocative\077");
-lf[873]=C_h_intern(&lf[873],16,"\003sysnull-pointer");
-lf[874]=C_h_intern(&lf[874],17,"\003sysnull-pointer\077");
-lf[875]=C_h_intern(&lf[875],20,"\003sysaddress->pointer");
-lf[876]=C_h_intern(&lf[876],23,"\003syspeek-signed-integer");
-lf[877]=C_h_intern(&lf[877],15,"\003syspeek-fixnum");
-lf[878]=C_h_intern(&lf[878],13,"\003syspeek-byte");
-lf[879]=C_h_intern(&lf[879],22,"\003sysvector->structure!");
-lf[880]=C_h_intern(&lf[880],15,"\003syspeek-double");
-lf[881]=C_h_intern(&lf[881],26,"\003syspeek-and-free-c-string");
-lf[882]=C_h_intern(&lf[882],34,"\003syspeek-and-free-nonnull-c-string");
-lf[883]=C_h_intern(&lf[883],17,"\003syspoke-c-string");
-lf[884]=C_h_intern(&lf[884],16,"\003syspoke-integer");
-lf[885]=C_h_intern(&lf[885],15,"\003syspoke-double");
-lf[886]=C_h_intern(&lf[886],22,"\003syspeek-c-string-list");
-lf[887]=C_h_intern(&lf[887],31,"\003syspeek-and-free-c-string-list");
-lf[888]=C_h_intern(&lf[888],20,"\003sysvector->closure!");
-lf[889]=C_h_intern(&lf[889],32,"\003syssymbol-has-toplevel-binding\077");
-lf[890]=C_h_intern(&lf[890],14,"\003syscopy-words");
-lf[891]=C_h_intern(&lf[891],17,"\003syscompare-bytes");
-lf[892]=C_h_intern(&lf[892],15,"\003syszap-strings");
-lf[893]=C_h_intern(&lf[893],17,"\003sysblock-pointer");
-lf[894]=C_h_intern(&lf[894],25,"\003sysforeign-char-argument");
-lf[895]=C_h_intern(&lf[895],27,"\003sysforeign-fixnum-argument");
-lf[896]=C_h_intern(&lf[896],27,"\003sysforeign-flonum-argument");
-lf[897]=C_h_intern(&lf[897],26,"\003sysforeign-block-argument");
-lf[898]=C_h_intern(&lf[898],34,"\003sysforeign-number-vector-argument");
-lf[899]=C_h_intern(&lf[899],27,"\003sysforeign-string-argument");
-lf[900]=C_h_intern(&lf[900],27,"\003sysforeign-symbol-argument");
-lf[901]=C_h_intern(&lf[901],28,"\003sysforeign-pointer-argument");
-lf[902]=C_h_intern(&lf[902],35,"\003sysforeign-tagged-pointer-argument");
-lf[903]=C_h_intern(&lf[903],28,"\003sysforeign-integer-argument");
-lf[904]=C_h_intern(&lf[904],37,"\003sysforeign-unsigned-integer-argument");
-lf[905]=C_h_intern(&lf[905],26,"\003sysdefault-thread-quantum");
-lf[906]=C_h_intern(&lf[906],29,"\003sysdefault-exception-handler");
-lf[907]=C_decode_literal(C_heaptop,"\376B\000\000>internal error: default exception handler shouldn\047t be called!");
-lf[908]=C_h_intern(&lf[908],15,"\003sysmake-thread");
-lf[909]=C_h_intern(&lf[909],14,"\003sysmake-mutex");
-lf[910]=C_h_intern(&lf[910],5,"mutex");
-lf[911]=C_h_intern(&lf[911],19,"\003sysabandon-mutexes");
-lf[912]=C_h_intern(&lf[912],12,"\003sysschedule");
-lf[913]=C_h_intern(&lf[913],17,"\003systhread-yield!");
-lf[914]=C_h_intern(&lf[914],18,"\003syscontext-switch");
-lf[915]=C_h_intern(&lf[915],18,"\003sysinterrupt-hook");
-lf[916]=C_h_intern(&lf[916],22,"\003syspending-finalizers");
-lf[917]=C_h_intern(&lf[917],26,"\003sysrun-pending-finalizers");
-lf[918]=C_h_intern(&lf[918],5,"errno");
-lf[919]=C_decode_literal(C_heaptop,"\376B\000\000Lunexpected end of file - unterminated `#{...}\047 item in `here\047 string litera"
-"l");
-lf[920]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
-lf[921]=C_decode_literal(C_heaptop,"\376B\000\000&unterminated here-doc string literal `");
-lf[922]=C_decode_literal(C_heaptop,"\376B\000\000$Missing tag after #<< here-doc token");
-lf[923]=C_decode_literal(C_heaptop,"\376B\000\000!Whitespace after #<< here-doc tag");
-lf[924]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\377\016\376\377\016");
-lf[925]=C_decode_literal(C_heaptop,"\376B\000\000$Missing tag after #<# here-doc token");
-lf[926]=C_decode_literal(C_heaptop,"\376B\000\000!Whitespace after #<# here-doc tag");
-lf[927]=C_decode_literal(C_heaptop,"\376B\000\000\021unreadable object");
-lf[928]=C_h_intern(&lf[928],12,"program-name");
-lf[929]=C_h_intern(&lf[929],22,"command-line-arguments");
-lf[930]=C_h_intern(&lf[930],18,"\003sysset-finalizer!");
-lf[931]=C_h_intern(&lf[931],14,"set-finalizer!");
-lf[932]=C_decode_literal(C_heaptop,"\376B\000\000\035[debug] too many finalizers (");
-lf[933]=C_decode_literal(C_heaptop,"\376B\000\000\035), resized max finalizers to ");
-lf[934]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
-lf[935]=C_decode_literal(C_heaptop,"\376B\000\000\035[debug] too many finalizers (");
-lf[936]=C_decode_literal(C_heaptop,"\376B\000\000\016), forcing ...");
-lf[937]=C_decode_literal(C_heaptop,"\376B\000\000\020[debug] running ");
-lf[938]=C_decode_literal(C_heaptop,"\376B\000\000\015 finalizers (");
-lf[939]=C_decode_literal(C_heaptop,"\376B\000\000\007 live, ");
-lf[940]=C_decode_literal(C_heaptop,"\376B\000\000\017 allocated) ...");
-lf[941]=C_h_intern(&lf[941],2,"gc");
-lf[942]=C_h_intern(&lf[942],8,"\003syslist");
-lf[943]=C_h_intern(&lf[943],8,"\003syscons");
-lf[944]=C_h_intern(&lf[944],10,"\003sysvector");
-lf[945]=C_h_intern(&lf[945],9,"\003sysapply");
-lf[946]=C_h_intern(&lf[946],10,"\003sysvalues");
-lf[947]=C_h_intern(&lf[947],10,"\003sysequal\077");
-lf[948]=C_h_intern(&lf[948],7,"\003syscar");
-lf[949]=C_h_intern(&lf[949],7,"\003syscdr");
-lf[950]=C_h_intern(&lf[950],9,"\003syspair\077");
-lf[951]=C_h_intern(&lf[951],11,"\003sysvector\077");
-lf[952]=C_h_intern(&lf[952],16,"\003sysvector->list");
-lf[953]=C_h_intern(&lf[953],17,"\003sysvector-length");
-lf[954]=C_h_intern(&lf[954],14,"\003sysvector-ref");
-lf[955]=C_h_intern(&lf[955],6,"\003sys>=");
-lf[956]=C_h_intern(&lf[956],5,"\003sys=");
-lf[957]=C_h_intern(&lf[957],5,"\003sys+");
-lf[958]=C_h_intern(&lf[958],7,"\003syseq\077");
-lf[959]=C_h_intern(&lf[959],8,"\003syseqv\077");
-lf[960]=C_h_intern(&lf[960],9,"\003syslist\077");
-lf[961]=C_h_intern(&lf[961],9,"\003sysnull\077");
-lf[962]=C_h_intern(&lf[962],9,"\003sysmap-n");
-lf[963]=C_h_intern(&lf[963],12,"\003syslist-ref");
-lf[964]=C_h_intern(&lf[964],16,"\003sysmake-promise");
-lf[965]=C_h_intern(&lf[965],8,"promise\077");
-lf[966]=C_h_intern(&lf[966],20,"\003sysread-from-string");
-lf[967]=C_h_intern(&lf[967],19,"print-error-message");
-lf[968]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[969]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
-lf[970]=C_decode_literal(C_heaptop,"\376B\000\000\002) ");
-lf[971]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[972]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016user-interrupt\376\377\016");
-lf[973]=C_decode_literal(C_heaptop,"\376B\000\000\030: *** user interrupt ***");
-lf[974]=C_decode_literal(C_heaptop,"\376B\000\000\016: <condition> ");
-lf[975]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[976]=C_decode_literal(C_heaptop,"\376B\000\000\026: uncaught exception: ");
-lf[977]=C_decode_literal(C_heaptop,"\376B\000\000\005Error");
-lf[978]=C_h_intern(&lf[978],17,"\003sysmake-locative");
-lf[979]=C_decode_literal(C_heaptop,"\376B\000\000)locative cannot refer to immediate object");
-lf[980]=C_h_intern(&lf[980],8,"u8vector");
-lf[981]=C_h_intern(&lf[981],8,"s8vector");
-lf[982]=C_h_intern(&lf[982],9,"u16vector");
-lf[983]=C_h_intern(&lf[983],9,"s16vector");
-lf[984]=C_h_intern(&lf[984],9,"u32vector");
-lf[985]=C_h_intern(&lf[985],9,"s32vector");
-lf[986]=C_h_intern(&lf[986],9,"f32vector");
-lf[987]=C_h_intern(&lf[987],9,"f64vector");
-lf[988]=C_decode_literal(C_heaptop,"\376B\000\000Abad argument type - locative cannot refer to objects of this type");
-lf[989]=C_h_intern(&lf[989],21,"\003sysfind-symbol-table");
-lf[990]=C_h_intern(&lf[990],10,"\003sysimport");
-lf[991]=C_decode_literal(C_heaptop,"\376B\000\000\042symbol not exported from namespace");
-lf[992]=C_decode_literal(C_heaptop,"\376B\000\000\023undefined namespace");
-lf[993]=C_decode_literal(C_heaptop,"\376B\000\000\042bad argument type - invalid prefix");
-lf[994]=C_h_intern(&lf[994],17,"\003sysnamespace-ref");
-lf[995]=C_decode_literal(C_heaptop,"\376B\000\000\042symbol not exported from namespace");
-lf[996]=C_decode_literal(C_heaptop,"\376B\000\000+bad argument type - not a valid import name");
-lf[997]=C_h_intern(&lf[997],18,"\003syswalk-namespace");
-lf[998]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
-lf[999]=C_decode_literal(C_heaptop,"\376B\000\000\023undefined namespace");
-lf[1000]=C_h_intern(&lf[1000],17,"memory-statistics");
-lf[1001]=C_h_intern(&lf[1001],19,"\003sysdecorate-lambda");
-lf[1002]=C_h_intern(&lf[1002],21,"\003syslambda-decoration");
-lf[1003]=C_h_intern(&lf[1003],21,"procedure-information");
-lf[1004]=C_h_intern(&lf[1004],6,"setter");
-lf[1006]=C_h_intern(&lf[1006],10,"\003syssetter");
-lf[1007]=C_h_intern(&lf[1007],18,"getter-with-setter");
-lf[1008]=C_h_intern(&lf[1008],8,"\003sysput!");
-lf[1009]=C_h_intern(&lf[1009],4,"put!");
-lf[1010]=C_h_intern(&lf[1010],7,"\003sysget");
-lf[1011]=C_h_intern(&lf[1011],3,"get");
-lf[1012]=C_h_intern(&lf[1012],8,"remprop!");
-lf[1013]=C_h_intern(&lf[1013],12,"symbol-plist");
-lf[1014]=C_h_intern(&lf[1014],14,"get-properties");
-lf[1015]=C_h_intern(&lf[1015],19,"symbol-plist/setter");
-lf[1016]=C_decode_literal(C_heaptop,"\376B\000\000\021no setter defined");
-lf[1017]=C_decode_literal(C_heaptop,"\376B\000\000!can\047t set setter of non-procedure");
-lf[1018]=C_h_intern(&lf[1018],9,"arguments");
-lf[1019]=C_h_intern(&lf[1019],7,"message");
-lf[1020]=C_decode_literal(C_heaptop,"\376B\000\000\002-:");
-lf[1021]=C_decode_literal(C_heaptop,"\376B\000\000\011<unknown>");
-lf[1022]=C_h_intern(&lf[1022],7,"running");
-lf[1023]=C_h_intern(&lf[1023],10,"primordial");
-lf[1024]=C_h_intern(&lf[1024],4,"repl");
-lf[1025]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[1026]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
-lf[1027]=C_decode_literal(C_heaptop,"\376B\000\000\006\012Error");
-lf[1028]=C_decode_literal(C_heaptop,"\376B\000\000\016error in error");
-lf[1029]=C_h_intern(&lf[1029],14,"\000cross-chicken");
-lf[1030]=C_h_intern(&lf[1030],8,"\000ptables");
-lf[1031]=C_h_intern(&lf[1031],6,"\000dload");
-lf[1032]=C_h_intern(&lf[1032],9,"\000manyargs");
-lf[1033]=C_h_intern(&lf[1033],7,"windows");
-lf[1034]=C_h_intern(&lf[1034],6,"cygwin");
-lf[1035]=C_decode_literal(C_heaptop,"\376B\000\000\010(stderr)");
-lf[1036]=C_decode_literal(C_heaptop,"\376B\000\000\010(stdout)");
-lf[1037]=C_decode_literal(C_heaptop,"\376B\000\000\007(stdin)");
-lf[1038]=C_h_intern(&lf[1038],9,"backspace");
-lf[1039]=C_h_intern(&lf[1039],4,"page");
-lf[1040]=C_h_intern(&lf[1040],6,"return");
-lf[1041]=C_h_intern(&lf[1041],3,"nul");
-lf[1042]=C_h_intern(&lf[1042],5,"alarm");
-lf[1043]=C_h_intern(&lf[1043],3,"esc");
-lf[1044]=C_h_intern(&lf[1044],6,"delete");
-lf[1045]=C_h_intern(&lf[1045],4,"vtab");
-lf[1046]=C_h_intern(&lf[1046],8,"linefeed");
-lf[1047]=C_h_intern(&lf[1047],3,"tab");
-lf[1048]=C_h_intern(&lf[1048],5,"space");
-C_register_lf2(lf,1049,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c377 ...) */,lf[1]);
-t3=C_mutate(&lf[2] /* (set! constant5 ...) */,lf[3]);
-t4=C_mutate((C_word*)lf[4]+1 /* (set! exit ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6097,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[6]+1 /* (set! reset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6107,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[8]+1 /* (set! error ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6116,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
-t7=C_set_block_item(lf[11] /* warnings-enabled */,0,C_SCHEME_TRUE);
-t8=C_mutate((C_word*)lf[12]+1 /* (set! warn ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6132,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[14]+1 /* (set! enable-warnings ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6141,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[15]+1 /* (set! error ...) */,*((C_word*)lf[8]+1));
-t11=C_mutate((C_word*)lf[16]+1 /* (set! warning ...) */,*((C_word*)lf[12]+1));
-t12=C_mutate((C_word*)lf[17]+1 /* (set! set-gc-report! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6156,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[18]+1 /* (set! gc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_gc,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[19]+1 /* (set! setslot ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6160,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[20]+1 /* (set! setislot ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6163,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[21]+1 /* (set! allocate-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_allocate_vector,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[22]+1 /* (set! argv ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_get_argv,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[23]+1 /* (set! argc+argv ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6168,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate((C_word*)lf[24]+1 /* (set! make-structure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_structure,a[2]=((C_word)li12),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[25]+1 /* (set! ensure-heap-reserve ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_ensure_heap_reserve,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp));
-t21=C_mutate((C_word*)lf[26]+1 /* (set! fudge ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6176,a[2]=((C_word)li14),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[27]+1 /* (set! call-host ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_return_to_host,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
-t23=C_mutate((C_word*)lf[28]+1 /* (set! return-to-host ...) */,*((C_word*)lf[27]+1));
-t24=C_mutate((C_word*)lf[29]+1 /* (set! file-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_file_info,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
-t25=C_mutate((C_word*)lf[30]+1 /* (set! symbol-table-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_get_symbol_table_info,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp));
-t26=C_mutate((C_word*)lf[31]+1 /* (set! memory-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_get_memory_info,a[2]=((C_word)li18),tmp=(C_word)a,a+=3,tmp));
-t27=C_mutate((C_word*)lf[32]+1 /* (set! current-milliseconds ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6184,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
-t28=C_mutate((C_word*)lf[33]+1 /* (set! current-gc-milliseconds ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6190,a[2]=((C_word)li20),tmp=(C_word)a,a+=3,tmp));
-t29=C_mutate((C_word*)lf[34]+1 /* (set! cpu-time ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_cpu_time,a[2]=((C_word)li21),tmp=(C_word)a,a+=3,tmp));
-t30=C_mutate((C_word*)lf[35]+1 /* (set! decode-seconds ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_decode_seconds,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
-t31=C_mutate((C_word*)lf[36]+1 /* (set! get-environment-variable ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_get_environment_variable,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp));
-t32=C_mutate((C_word*)lf[37]+1 /* (set! getenv ...) */,*((C_word*)lf[36]+1));
-t33=C_mutate((C_word*)lf[38]+1 /* (set! start-timer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6200,a[2]=((C_word)li24),tmp=(C_word)a,a+=3,tmp));
-t34=C_mutate((C_word*)lf[39]+1 /* (set! stop-timer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_stop_timer,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
-t35=C_mutate((C_word*)lf[40]+1 /* (set! immediate? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6204,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
-t36=C_mutate((C_word*)lf[41]+1 /* (set! message ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6210,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp));
-t37=C_mutate((C_word*)lf[42]+1 /* (set! byte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6213,a[2]=((C_word)li28),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[43]+1 /* (set! setbyte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6216,a[2]=((C_word)li29),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[44]+1 /* (set! void ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6219,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
-t40=C_mutate((C_word*)lf[45]+1 /* (set! void ...) */,*((C_word*)lf[44]+1));
-t41=C_set_block_item(lf[46] /* undefined-value */,0,C_SCHEME_UNDEFINED);
-t42=C_mutate((C_word*)lf[47]+1 /* (set! halt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6224,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
-t43=C_mutate((C_word*)lf[48]+1 /* (set! flo2fix ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6227,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
-t44=C_mutate((C_word*)lf[49]+1 /* (set! become! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_become,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
-t45=C_mutate((C_word*)lf[50]+1 /* (set! block-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6231,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-t46=C_mutate((C_word*)lf[51]+1 /* (set! apply-values ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_apply_values,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp));
-t47=C_mutate((C_word*)lf[52]+1 /* (set! copy-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_copy_closure,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
-t48=C_fudge(C_fix(34));
-t49=C_mutate((C_word*)lf[53]+1 /* (set! apply-argument-limit ...) */,t48);
-t50=C_mutate((C_word*)lf[54]+1 /* (set! block-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6240,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp));
-t51=C_mutate((C_word*)lf[58]+1 /* (set! current-seconds ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6274,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp));
-t52=C_mutate((C_word*)lf[59]+1 /* (set! check-structure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6277,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
-t53=C_mutate((C_word*)lf[60]+1 /* (set! check-blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6290,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp));
-t54=C_mutate((C_word*)lf[61]+1 /* (set! check-byte-vector ...) */,*((C_word*)lf[60]+1));
-t55=C_mutate((C_word*)lf[62]+1 /* (set! check-pair ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6304,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
-t56=C_mutate((C_word*)lf[63]+1 /* (set! check-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6317,a[2]=((C_word)li42),tmp=(C_word)a,a+=3,tmp));
-t57=C_mutate((C_word*)lf[64]+1 /* (set! check-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6330,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
-t58=C_mutate((C_word*)lf[65]+1 /* (set! check-number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6343,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp));
-t59=C_mutate((C_word*)lf[66]+1 /* (set! check-exact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6356,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
-t60=C_mutate((C_word*)lf[67]+1 /* (set! check-inexact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6369,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp));
-t61=C_mutate((C_word*)lf[68]+1 /* (set! check-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6382,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
-t62=C_mutate((C_word*)lf[69]+1 /* (set! check-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6395,a[2]=((C_word)li48),tmp=(C_word)a,a+=3,tmp));
-t63=C_mutate((C_word*)lf[70]+1 /* (set! check-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6408,a[2]=((C_word)li49),tmp=(C_word)a,a+=3,tmp));
-t64=C_mutate((C_word*)lf[71]+1 /* (set! check-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6421,a[2]=((C_word)li50),tmp=(C_word)a,a+=3,tmp));
-t65=C_mutate((C_word*)lf[55]+1 /* (set! check-range ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6440,a[2]=((C_word)li51),tmp=(C_word)a,a+=3,tmp));
-t66=C_mutate((C_word*)lf[73]+1 /* (set! check-special ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6471,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
-t67=C_mutate((C_word*)lf[75]+1 /* (set! check-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6493,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp));
-t68=C_mutate((C_word*)lf[76]+1 /* (set! force ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6506,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
-t69=C_mutate((C_word*)lf[78]+1 /* (set! force ...) */,*((C_word*)lf[76]+1));
-t70=C_mutate((C_word*)lf[79]+1 /* (set! system ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6522,a[2]=((C_word)li55),tmp=(C_word)a,a+=3,tmp));
-t71=C_mutate((C_word*)lf[83]+1 /* (set! dload ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_dload,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp));
-t72=C_mutate((C_word*)lf[84]+1 /* (set! set-dlopen-flags! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_set_dlopen_flags,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp));
-t73=C_mutate((C_word*)lf[85]+1 /* (set! dunload ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6542,a[2]=((C_word)li58),tmp=(C_word)a,a+=3,tmp));
-t74=C_mutate((C_word*)lf[87]+1 /* (set! not ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6555,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp));
-t75=C_mutate((C_word*)lf[88]+1 /* (set! boolean? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6558,a[2]=((C_word)li60),tmp=(C_word)a,a+=3,tmp));
-t76=C_mutate((C_word*)lf[89]+1 /* (set! eq? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6561,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp));
-t77=C_mutate((C_word*)lf[90]+1 /* (set! eqv? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6564,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
-t78=C_mutate((C_word*)lf[91]+1 /* (set! equal? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6567,a[2]=((C_word)li63),tmp=(C_word)a,a+=3,tmp));
-t79=C_mutate((C_word*)lf[92]+1 /* (set! pair? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6570,a[2]=((C_word)li64),tmp=(C_word)a,a+=3,tmp));
-t80=C_mutate((C_word*)lf[93]+1 /* (set! cons ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6573,a[2]=((C_word)li65),tmp=(C_word)a,a+=3,tmp));
-t81=C_mutate((C_word*)lf[94]+1 /* (set! car ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6576,a[2]=((C_word)li66),tmp=(C_word)a,a+=3,tmp));
-t82=C_mutate((C_word*)lf[95]+1 /* (set! cdr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6579,a[2]=((C_word)li67),tmp=(C_word)a,a+=3,tmp));
-t83=C_mutate((C_word*)lf[96]+1 /* (set! set-car! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6582,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
-t84=C_mutate((C_word*)lf[97]+1 /* (set! set-cdr! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6585,a[2]=((C_word)li69),tmp=(C_word)a,a+=3,tmp));
-t85=C_mutate((C_word*)lf[98]+1 /* (set! cadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6588,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp));
-t86=C_mutate((C_word*)lf[99]+1 /* (set! caddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6591,a[2]=((C_word)li71),tmp=(C_word)a,a+=3,tmp));
-t87=C_mutate((C_word*)lf[100]+1 /* (set! cadddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6594,a[2]=((C_word)li72),tmp=(C_word)a,a+=3,tmp));
-t88=C_mutate((C_word*)lf[101]+1 /* (set! cddddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6597,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp));
-t89=C_mutate((C_word*)lf[102]+1 /* (set! caar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6600,a[2]=((C_word)li74),tmp=(C_word)a,a+=3,tmp));
-t90=C_mutate((C_word*)lf[103]+1 /* (set! cdar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6610,a[2]=((C_word)li75),tmp=(C_word)a,a+=3,tmp));
-t91=C_mutate((C_word*)lf[104]+1 /* (set! cddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6620,a[2]=((C_word)li76),tmp=(C_word)a,a+=3,tmp));
-t92=C_mutate((C_word*)lf[105]+1 /* (set! caaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6630,a[2]=((C_word)li77),tmp=(C_word)a,a+=3,tmp));
-t93=C_mutate((C_word*)lf[106]+1 /* (set! caadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6644,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp));
-t94=C_mutate((C_word*)lf[107]+1 /* (set! cadar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6650,a[2]=((C_word)li79),tmp=(C_word)a,a+=3,tmp));
-t95=C_mutate((C_word*)lf[108]+1 /* (set! cdaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6657,a[2]=((C_word)li80),tmp=(C_word)a,a+=3,tmp));
-t96=C_mutate((C_word*)lf[109]+1 /* (set! cdadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6671,a[2]=((C_word)li81),tmp=(C_word)a,a+=3,tmp));
-t97=C_mutate((C_word*)lf[110]+1 /* (set! cddar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6677,a[2]=((C_word)li82),tmp=(C_word)a,a+=3,tmp));
-t98=C_mutate((C_word*)lf[111]+1 /* (set! cdddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6691,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
-t99=C_mutate((C_word*)lf[112]+1 /* (set! caaaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6705,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
-t100=C_mutate((C_word*)lf[113]+1 /* (set! caaadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6723,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp));
-t101=C_mutate((C_word*)lf[114]+1 /* (set! caadar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6733,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp));
-t102=C_mutate((C_word*)lf[115]+1 /* (set! caaddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6744,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp));
-t103=C_mutate((C_word*)lf[116]+1 /* (set! cadaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6750,a[2]=((C_word)li88),tmp=(C_word)a,a+=3,tmp));
-t104=C_mutate((C_word*)lf[117]+1 /* (set! cadadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6761,a[2]=((C_word)li89),tmp=(C_word)a,a+=3,tmp));
-t105=C_mutate((C_word*)lf[118]+1 /* (set! caddar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6764,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp));
-t106=C_mutate((C_word*)lf[119]+1 /* (set! cdaaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6771,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp));
-t107=C_mutate((C_word*)lf[120]+1 /* (set! cdaadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6789,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp));
-t108=C_mutate((C_word*)lf[121]+1 /* (set! cdadar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6799,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
-t109=C_mutate((C_word*)lf[122]+1 /* (set! cdaddr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6810,a[2]=((C_word)li94),tmp=(C_word)a,a+=3,tmp));
-t110=C_mutate((C_word*)lf[123]+1 /* (set! cddaar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6816,a[2]=((C_word)li95),tmp=(C_word)a,a+=3,tmp));
-t111=C_mutate((C_word*)lf[124]+1 /* (set! cddadr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6834,a[2]=((C_word)li96),tmp=(C_word)a,a+=3,tmp));
-t112=C_mutate((C_word*)lf[125]+1 /* (set! cdddar ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6844,a[2]=((C_word)li97),tmp=(C_word)a,a+=3,tmp));
-t113=C_mutate((C_word*)lf[126]+1 /* (set! null? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6862,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
-t114=C_mutate((C_word*)lf[127]+1 /* (set! list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6868,a[2]=((C_word)li99),tmp=(C_word)a,a+=3,tmp));
-t115=C_mutate((C_word*)lf[128]+1 /* (set! length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6871,a[2]=((C_word)li100),tmp=(C_word)a,a+=3,tmp));
-t116=C_mutate((C_word*)lf[129]+1 /* (set! list-tail ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6874,a[2]=((C_word)li101),tmp=(C_word)a,a+=3,tmp));
-t117=C_mutate((C_word*)lf[130]+1 /* (set! list-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6877,a[2]=((C_word)li102),tmp=(C_word)a,a+=3,tmp));
-t118=C_mutate((C_word*)lf[131]+1 /* (set! delq ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6880,a[2]=((C_word)li104),tmp=(C_word)a,a+=3,tmp));
-t119=C_mutate((C_word*)lf[132]+1 /* (set! error-not-a-proper-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6923,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp));
-t120=C_mutate((C_word*)lf[133]+1 /* (set! not-a-proper-list-error ...) */,*((C_word*)lf[132]+1));
-t121=C_mutate((C_word*)lf[134]+1 /* (set! append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6940,a[2]=((C_word)li108),tmp=(C_word)a,a+=3,tmp));
-t122=C_mutate((C_word*)lf[135]+1 /* (set! reverse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7019,a[2]=((C_word)li110),tmp=(C_word)a,a+=3,tmp));
-t123=C_mutate((C_word*)lf[136]+1 /* (set! memq ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7058,a[2]=((C_word)li111),tmp=(C_word)a,a+=3,tmp));
-t124=C_mutate((C_word*)lf[137]+1 /* (set! memv ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7061,a[2]=((C_word)li112),tmp=(C_word)a,a+=3,tmp));
-t125=C_mutate((C_word*)lf[138]+1 /* (set! member ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7064,a[2]=((C_word)li113),tmp=(C_word)a,a+=3,tmp));
-t126=C_mutate((C_word*)lf[139]+1 /* (set! assq ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7067,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
-t127=C_mutate((C_word*)lf[140]+1 /* (set! assv ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7070,a[2]=((C_word)li115),tmp=(C_word)a,a+=3,tmp));
-t128=C_mutate((C_word*)lf[141]+1 /* (set! assoc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7073,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
-t129=C_mutate((C_word*)lf[142]+1 /* (set! list? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7076,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
-t130=C_mutate((C_word*)lf[143]+1 /* (set! string? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7079,a[2]=((C_word)li118),tmp=(C_word)a,a+=3,tmp));
-t131=C_mutate((C_word*)lf[144]+1 /* (set! string-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7082,a[2]=((C_word)li119),tmp=(C_word)a,a+=3,tmp));
-t132=C_mutate((C_word*)lf[145]+1 /* (set! string-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7085,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp));
-t133=C_mutate((C_word*)lf[146]+1 /* (set! string-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7088,a[2]=((C_word)li121),tmp=(C_word)a,a+=3,tmp));
-t134=C_mutate((C_word*)lf[147]+1 /* (set! make-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7091,a[2]=((C_word)li122),tmp=(C_word)a,a+=3,tmp));
-t135=C_mutate((C_word*)lf[148]+1 /* (set! make-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7124,a[2]=((C_word)li123),tmp=(C_word)a,a+=3,tmp));
-t136=C_mutate((C_word*)lf[151]+1 /* (set! string->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7160,a[2]=((C_word)li125),tmp=(C_word)a,a+=3,tmp));
-t137=C_mutate((C_word*)lf[152]+1 /* (set! string->list ...) */,*((C_word*)lf[151]+1));
-t138=C_mutate((C_word*)lf[153]+1 /* (set! list->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7190,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp));
-t139=C_mutate((C_word*)lf[154]+1 /* (set! list->string ...) */,*((C_word*)lf[153]+1));
-t140=C_mutate((C_word*)lf[155]+1 /* (set! reverse-list->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7242,a[2]=((C_word)li129),tmp=(C_word)a,a+=3,tmp));
-t141=C_mutate((C_word*)lf[156]+1 /* (set! reverse-list->string ...) */,*((C_word*)lf[155]+1));
-t142=C_mutate((C_word*)lf[157]+1 /* (set! string-fill! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7294,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp));
-t143=C_mutate((C_word*)lf[158]+1 /* (set! string-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7307,a[2]=((C_word)li131),tmp=(C_word)a,a+=3,tmp));
-t144=C_mutate((C_word*)lf[159]+1 /* (set! substring ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7319,a[2]=((C_word)li132),tmp=(C_word)a,a+=3,tmp));
-t145=C_mutate((C_word*)lf[160]+1 /* (set! substring ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7370,a[2]=((C_word)li133),tmp=(C_word)a,a+=3,tmp));
-t146=C_mutate((C_word*)lf[161]+1 /* (set! string=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7380,a[2]=((C_word)li134),tmp=(C_word)a,a+=3,tmp));
-t147=C_mutate((C_word*)lf[162]+1 /* (set! string-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7383,a[2]=((C_word)li135),tmp=(C_word)a,a+=3,tmp));
-t148=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7386,a[2]=((C_word)li136),tmp=(C_word)a,a+=3,tmp);
-t149=C_mutate((C_word*)lf[163]+1 /* (set! string<? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7406,a[2]=t148,a[3]=((C_word)li138),tmp=(C_word)a,a+=4,tmp));
-t150=C_mutate((C_word*)lf[164]+1 /* (set! string>? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7430,a[2]=t148,a[3]=((C_word)li140),tmp=(C_word)a,a+=4,tmp));
-t151=C_mutate((C_word*)lf[165]+1 /* (set! string<=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7454,a[2]=t148,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
-t152=C_mutate((C_word*)lf[166]+1 /* (set! string>=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7475,a[2]=t148,a[3]=((C_word)li144),tmp=(C_word)a,a+=4,tmp));
-t153=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7496,a[2]=((C_word)li145),tmp=(C_word)a,a+=3,tmp);
-t154=C_mutate((C_word*)lf[167]+1 /* (set! string-ci<? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7516,a[2]=t153,a[3]=((C_word)li147),tmp=(C_word)a,a+=4,tmp));
-t155=C_mutate((C_word*)lf[168]+1 /* (set! string-ci>? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7540,a[2]=t153,a[3]=((C_word)li149),tmp=(C_word)a,a+=4,tmp));
-t156=C_mutate((C_word*)lf[169]+1 /* (set! string-ci<=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7564,a[2]=t153,a[3]=((C_word)li151),tmp=(C_word)a,a+=4,tmp));
-t157=C_mutate((C_word*)lf[170]+1 /* (set! string-ci>=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7585,a[2]=t153,a[3]=((C_word)li153),tmp=(C_word)a,a+=4,tmp));
-t158=C_mutate((C_word*)lf[171]+1 /* (set! string-append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7606,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp));
-t159=C_mutate((C_word*)lf[172]+1 /* (set! string-append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7622,a[2]=((C_word)li156),tmp=(C_word)a,a+=3,tmp));
-t160=*((C_word*)lf[154]+1);
-t161=C_mutate((C_word*)lf[173]+1 /* (set! string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7661,a[2]=t160,a[3]=((C_word)li157),tmp=(C_word)a,a+=4,tmp));
-t162=C_mutate((C_word*)lf[174]+1 /* (set! fragments->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7667,a[2]=((C_word)li159),tmp=(C_word)a,a+=3,tmp));
-t163=C_mutate((C_word*)lf[175]+1 /* (set! most-positive-fixnum ...) */,C_fix((C_word)C_MOST_POSITIVE_FIXNUM));
-t164=C_mutate((C_word*)lf[176]+1 /* (set! most-negative-fixnum ...) */,C_fix((C_word)C_MOST_NEGATIVE_FIXNUM));
-t165=C_mutate((C_word*)lf[177]+1 /* (set! fixnum-bits ...) */,C_fix((C_word)(C_WORD_SIZE - 1)));
-t166=C_mutate((C_word*)lf[178]+1 /* (set! fixnum-precision ...) */,C_fix((C_word)(C_WORD_SIZE - (1 + 1))));
-t167=C_mutate((C_word*)lf[179]+1 /* (set! fixnum? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7706,a[2]=((C_word)li160),tmp=(C_word)a,a+=3,tmp));
-t168=C_mutate((C_word*)lf[180]+1 /* (set! fx+ ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7709,a[2]=((C_word)li161),tmp=(C_word)a,a+=3,tmp));
-t169=C_mutate((C_word*)lf[181]+1 /* (set! fx- ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7712,a[2]=((C_word)li162),tmp=(C_word)a,a+=3,tmp));
-t170=C_mutate((C_word*)lf[182]+1 /* (set! fx* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7715,a[2]=((C_word)li163),tmp=(C_word)a,a+=3,tmp));
-t171=C_mutate((C_word*)lf[183]+1 /* (set! fx= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7718,a[2]=((C_word)li164),tmp=(C_word)a,a+=3,tmp));
-t172=C_mutate((C_word*)lf[184]+1 /* (set! fx> ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7724,a[2]=((C_word)li165),tmp=(C_word)a,a+=3,tmp));
-t173=C_mutate((C_word*)lf[185]+1 /* (set! fx< ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7727,a[2]=((C_word)li166),tmp=(C_word)a,a+=3,tmp));
-t174=C_mutate((C_word*)lf[186]+1 /* (set! fx>= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7730,a[2]=((C_word)li167),tmp=(C_word)a,a+=3,tmp));
-t175=C_mutate((C_word*)lf[187]+1 /* (set! fx<= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7733,a[2]=((C_word)li168),tmp=(C_word)a,a+=3,tmp));
-t176=C_mutate((C_word*)lf[188]+1 /* (set! fxmin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7736,a[2]=((C_word)li169),tmp=(C_word)a,a+=3,tmp));
-t177=C_mutate((C_word*)lf[189]+1 /* (set! fxmax ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7739,a[2]=((C_word)li170),tmp=(C_word)a,a+=3,tmp));
-t178=C_mutate((C_word*)lf[190]+1 /* (set! fxneg ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7742,a[2]=((C_word)li171),tmp=(C_word)a,a+=3,tmp));
-t179=C_mutate((C_word*)lf[191]+1 /* (set! fxand ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7745,a[2]=((C_word)li172),tmp=(C_word)a,a+=3,tmp));
-t180=C_mutate((C_word*)lf[192]+1 /* (set! fxior ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7748,a[2]=((C_word)li173),tmp=(C_word)a,a+=3,tmp));
-t181=C_mutate((C_word*)lf[193]+1 /* (set! fxxor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7751,a[2]=((C_word)li174),tmp=(C_word)a,a+=3,tmp));
-t182=C_mutate((C_word*)lf[194]+1 /* (set! fxnot ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7754,a[2]=((C_word)li175),tmp=(C_word)a,a+=3,tmp));
-t183=C_mutate((C_word*)lf[195]+1 /* (set! fxshl ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7757,a[2]=((C_word)li176),tmp=(C_word)a,a+=3,tmp));
-t184=C_mutate((C_word*)lf[196]+1 /* (set! fxshr ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7760,a[2]=((C_word)li177),tmp=(C_word)a,a+=3,tmp));
-t185=C_mutate((C_word*)lf[197]+1 /* (set! fx/ ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7763,a[2]=((C_word)li178),tmp=(C_word)a,a+=3,tmp));
-t186=C_mutate((C_word*)lf[198]+1 /* (set! fxmod ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7780,a[2]=((C_word)li179),tmp=(C_word)a,a+=3,tmp));
-t187=C_mutate((C_word*)lf[199]+1 /* (set! maximum-flonum ...) */,C_flonum(&a,DBL_MAX));
-t188=C_mutate((C_word*)lf[200]+1 /* (set! minimum-flonum ...) */,C_flonum(&a,DBL_MIN));
-t189=C_mutate((C_word*)lf[201]+1 /* (set! flonum-radix ...) */,C_fix((C_word)FLT_RADIX));
-t190=C_mutate((C_word*)lf[202]+1 /* (set! flonum-epsilon ...) */,C_flonum(&a,DBL_EPSILON));
-t191=C_mutate((C_word*)lf[203]+1 /* (set! flonum-precision ...) */,C_fix((C_word)DBL_MANT_DIG));
-t192=C_mutate((C_word*)lf[204]+1 /* (set! flonum-decimal-precision ...) */,C_fix((C_word)DBL_DIG));
-t193=C_mutate((C_word*)lf[205]+1 /* (set! flonum-maximum-exponent ...) */,C_fix((C_word)DBL_MAX_EXP));
-t194=C_mutate((C_word*)lf[206]+1 /* (set! flonum-minimum-exponent ...) */,C_fix((C_word)DBL_MIN_EXP));
-t195=C_mutate((C_word*)lf[207]+1 /* (set! flonum-maximum-decimal-exponent ...) */,C_fix((C_word)DBL_MAX_10_EXP));
-t196=C_mutate((C_word*)lf[208]+1 /* (set! flonum-minimum-decimal-exponent ...) */,C_fix((C_word)DBL_MIN_10_EXP));
-t197=C_mutate((C_word*)lf[209]+1 /* (set! flonum? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7807,a[2]=((C_word)li180),tmp=(C_word)a,a+=3,tmp));
-t198=C_mutate((C_word*)lf[210]+1 /* (set! finite? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7810,a[2]=((C_word)li181),tmp=(C_word)a,a+=3,tmp));
-t199=C_mutate((C_word*)lf[211]+1 /* (set! fp+ ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7816,a[2]=((C_word)li182),tmp=(C_word)a,a+=3,tmp));
-t200=C_mutate((C_word*)lf[212]+1 /* (set! fp- ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7839,a[2]=((C_word)li183),tmp=(C_word)a,a+=3,tmp));
-t201=C_mutate((C_word*)lf[213]+1 /* (set! fp* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7862,a[2]=((C_word)li184),tmp=(C_word)a,a+=3,tmp));
-t202=C_mutate((C_word*)lf[214]+1 /* (set! fp/ ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7885,a[2]=((C_word)li185),tmp=(C_word)a,a+=3,tmp));
-t203=C_mutate((C_word*)lf[215]+1 /* (set! fp= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7908,a[2]=((C_word)li186),tmp=(C_word)a,a+=3,tmp));
-t204=C_mutate((C_word*)lf[216]+1 /* (set! fp> ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7931,a[2]=((C_word)li187),tmp=(C_word)a,a+=3,tmp));
-t205=C_mutate((C_word*)lf[217]+1 /* (set! fp< ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7954,a[2]=((C_word)li188),tmp=(C_word)a,a+=3,tmp));
-t206=C_mutate((C_word*)lf[218]+1 /* (set! fp>= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7977,a[2]=((C_word)li189),tmp=(C_word)a,a+=3,tmp));
-t207=C_mutate((C_word*)lf[219]+1 /* (set! fp<= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8000,a[2]=((C_word)li190),tmp=(C_word)a,a+=3,tmp));
-t208=C_mutate((C_word*)lf[220]+1 /* (set! fpneg ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8023,a[2]=((C_word)li191),tmp=(C_word)a,a+=3,tmp));
-t209=C_mutate((C_word*)lf[221]+1 /* (set! fpmax ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8040,a[2]=((C_word)li192),tmp=(C_word)a,a+=3,tmp));
-t210=C_mutate((C_word*)lf[222]+1 /* (set! fpmin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8063,a[2]=((C_word)li193),tmp=(C_word)a,a+=3,tmp));
-t211=C_mutate((C_word*)lf[223]+1 /* (set! fpfloor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8086,a[2]=((C_word)li194),tmp=(C_word)a,a+=3,tmp));
-t212=C_mutate((C_word*)lf[224]+1 /* (set! fptruncate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8103,a[2]=((C_word)li195),tmp=(C_word)a,a+=3,tmp));
-t213=C_mutate((C_word*)lf[225]+1 /* (set! fpround ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8120,a[2]=((C_word)li196),tmp=(C_word)a,a+=3,tmp));
-t214=C_mutate((C_word*)lf[226]+1 /* (set! fpceiling ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8137,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
-t215=C_mutate((C_word*)lf[227]+1 /* (set! floor ...) */,*((C_word*)lf[223]+1));
-t216=C_mutate((C_word*)lf[228]+1 /* (set! truncate ...) */,*((C_word*)lf[224]+1));
-t217=C_mutate((C_word*)lf[229]+1 /* (set! round ...) */,*((C_word*)lf[225]+1));
-t218=C_mutate((C_word*)lf[230]+1 /* (set! ceiling ...) */,*((C_word*)lf[226]+1));
-t219=C_mutate((C_word*)lf[231]+1 /* (set! fpsin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8158,a[2]=((C_word)li198),tmp=(C_word)a,a+=3,tmp));
-t220=C_mutate((C_word*)lf[232]+1 /* (set! fpcos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8175,a[2]=((C_word)li199),tmp=(C_word)a,a+=3,tmp));
-t221=C_mutate((C_word*)lf[233]+1 /* (set! fptan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8192,a[2]=((C_word)li200),tmp=(C_word)a,a+=3,tmp));
-t222=C_mutate((C_word*)lf[234]+1 /* (set! fpasin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8209,a[2]=((C_word)li201),tmp=(C_word)a,a+=3,tmp));
-t223=C_mutate((C_word*)lf[235]+1 /* (set! fpacos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8226,a[2]=((C_word)li202),tmp=(C_word)a,a+=3,tmp));
-t224=C_mutate((C_word*)lf[236]+1 /* (set! fpatan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8243,a[2]=((C_word)li203),tmp=(C_word)a,a+=3,tmp));
-t225=C_mutate((C_word*)lf[237]+1 /* (set! fpatan2 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8260,a[2]=((C_word)li204),tmp=(C_word)a,a+=3,tmp));
-t226=C_mutate((C_word*)lf[238]+1 /* (set! fpexp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8283,a[2]=((C_word)li205),tmp=(C_word)a,a+=3,tmp));
-t227=C_mutate((C_word*)lf[239]+1 /* (set! fpexpt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8300,a[2]=((C_word)li206),tmp=(C_word)a,a+=3,tmp));
-t228=C_mutate((C_word*)lf[240]+1 /* (set! fplog ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8323,a[2]=((C_word)li207),tmp=(C_word)a,a+=3,tmp));
-t229=C_mutate((C_word*)lf[241]+1 /* (set! fpsqrt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8340,a[2]=((C_word)li208),tmp=(C_word)a,a+=3,tmp));
-t230=C_mutate((C_word*)lf[242]+1 /* (set! fpabs ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8357,a[2]=((C_word)li209),tmp=(C_word)a,a+=3,tmp));
-t231=C_mutate((C_word*)lf[243]+1 /* (set! fpinteger? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8374,a[2]=((C_word)li210),tmp=(C_word)a,a+=3,tmp));
-t232=C_mutate((C_word*)lf[244]+1 /* (set! * ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_times,a[2]=((C_word)li211),tmp=(C_word)a,a+=3,tmp));
-t233=C_mutate((C_word*)lf[245]+1 /* (set! - ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_minus,a[2]=((C_word)li212),tmp=(C_word)a,a+=3,tmp));
-t234=C_mutate((C_word*)lf[246]+1 /* (set! + ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_plus,a[2]=((C_word)li213),tmp=(C_word)a,a+=3,tmp));
-t235=C_mutate((C_word*)lf[247]+1 /* (set! / ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_divide,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
-t236=C_mutate((C_word*)lf[248]+1 /* (set! = ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_nequalp,a[2]=((C_word)li215),tmp=(C_word)a,a+=3,tmp));
-t237=C_mutate((C_word*)lf[249]+1 /* (set! > ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_greaterp,a[2]=((C_word)li216),tmp=(C_word)a,a+=3,tmp));
-t238=C_mutate((C_word*)lf[250]+1 /* (set! < ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_lessp,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
-t239=C_mutate((C_word*)lf[251]+1 /* (set! >= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_greater_or_equal_p,a[2]=((C_word)li218),tmp=(C_word)a,a+=3,tmp));
-t240=C_mutate((C_word*)lf[252]+1 /* (set! <= ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_less_or_equal_p,a[2]=((C_word)li219),tmp=(C_word)a,a+=3,tmp));
-t241=C_mutate((C_word*)lf[253]+1 /* (set! add1 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8400,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp));
-t242=C_mutate((C_word*)lf[254]+1 /* (set! sub1 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8406,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp));
-t243=C_mutate((C_word*)lf[255]+1 /* (set! quotient ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_quotient,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
-t244=C_mutate((C_word*)lf[256]+1 /* (set! number? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8413,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
-t245=C_mutate((C_word*)lf[257]+1 /* (set! number? ...) */,*((C_word*)lf[256]+1));
-t246=C_mutate((C_word*)lf[258]+1 /* (set! complex? ...) */,*((C_word*)lf[257]+1));
-t247=C_mutate((C_word*)lf[259]+1 /* (set! real? ...) */,*((C_word*)lf[257]+1));
-t248=C_mutate((C_word*)lf[260]+1 /* (set! rational? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8419,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp));
-t249=C_mutate((C_word*)lf[261]+1 /* (set! flonum-fraction ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_flonum_fraction,a[2]=((C_word)li225),tmp=(C_word)a,a+=3,tmp));
-t250=C_mutate((C_word*)lf[262]+1 /* (set! integer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8423,a[2]=((C_word)li226),tmp=(C_word)a,a+=3,tmp));
-t251=C_mutate((C_word*)lf[263]+1 /* (set! integer? ...) */,*((C_word*)lf[262]+1));
-t252=C_mutate((C_word*)lf[264]+1 /* (set! exact? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8427,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp));
-t253=C_mutate((C_word*)lf[265]+1 /* (set! inexact? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8430,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp));
-t254=C_mutate((C_word*)lf[266]+1 /* (set! exact? ...) */,*((C_word*)lf[264]+1));
-t255=C_mutate((C_word*)lf[267]+1 /* (set! inexact? ...) */,*((C_word*)lf[265]+1));
-t256=C_mutate((C_word*)lf[268]+1 /* (set! expt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_expt,a[2]=((C_word)li229),tmp=(C_word)a,a+=3,tmp));
-t257=C_mutate((C_word*)lf[269]+1 /* (set! fits-in-int? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8436,a[2]=((C_word)li230),tmp=(C_word)a,a+=3,tmp));
-t258=C_mutate((C_word*)lf[270]+1 /* (set! fits-in-unsigned-int? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8439,a[2]=((C_word)li231),tmp=(C_word)a,a+=3,tmp));
-t259=C_mutate((C_word*)lf[271]+1 /* (set! flonum-in-fixnum-range? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8442,a[2]=((C_word)li232),tmp=(C_word)a,a+=3,tmp));
-t260=C_mutate((C_word*)lf[272]+1 /* (set! double->number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8445,a[2]=((C_word)li233),tmp=(C_word)a,a+=3,tmp));
-t261=C_mutate((C_word*)lf[273]+1 /* (set! zero? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8448,a[2]=((C_word)li234),tmp=(C_word)a,a+=3,tmp));
-t262=C_mutate((C_word*)lf[274]+1 /* (set! positive? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8451,a[2]=((C_word)li235),tmp=(C_word)a,a+=3,tmp));
-t263=C_mutate((C_word*)lf[275]+1 /* (set! negative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8454,a[2]=((C_word)li236),tmp=(C_word)a,a+=3,tmp));
-t264=C_mutate((C_word*)lf[276]+1 /* (set! abs ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8457,a[2]=((C_word)li237),tmp=(C_word)a,a+=3,tmp));
-t265=C_mutate((C_word*)lf[277]+1 /* (set! angle ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8460,a[2]=((C_word)li238),tmp=(C_word)a,a+=3,tmp));
-t266=C_mutate((C_word*)lf[280]+1 /* (set! real-part ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8479,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp));
-t267=C_mutate((C_word*)lf[281]+1 /* (set! imag-part ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8485,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp));
-t268=C_mutate((C_word*)lf[282]+1 /* (set! numerator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8491,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp));
-t269=C_mutate((C_word*)lf[284]+1 /* (set! denominator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8503,a[2]=((C_word)li242),tmp=(C_word)a,a+=3,tmp));
-t270=C_mutate((C_word*)lf[286]+1 /* (set! magnitude ...) */,*((C_word*)lf[276]+1));
-t271=C_mutate((C_word*)lf[287]+1 /* (set! signum ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8516,a[2]=((C_word)li243),tmp=(C_word)a,a+=3,tmp));
-t272=C_mutate((C_word*)lf[291]+1 /* (set! exact->inexact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_exact_to_inexact,a[2]=((C_word)li244),tmp=(C_word)a,a+=3,tmp));
-t273=C_mutate((C_word*)lf[292]+1 /* (set! exact->inexact ...) */,*((C_word*)lf[291]+1));
-t274=C_mutate((C_word*)lf[293]+1 /* (set! inexact->exact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8551,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp));
-t275=C_mutate((C_word*)lf[294]+1 /* (set! inexact->exact ...) */,*((C_word*)lf[293]+1));
-t276=C_mutate((C_word*)lf[295]+1 /* (set! floor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8555,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp));
-t277=C_mutate((C_word*)lf[296]+1 /* (set! ceiling ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8567,a[2]=((C_word)li247),tmp=(C_word)a,a+=3,tmp));
-t278=C_mutate((C_word*)lf[297]+1 /* (set! truncate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8579,a[2]=((C_word)li248),tmp=(C_word)a,a+=3,tmp));
-t279=C_mutate((C_word*)lf[298]+1 /* (set! round ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8591,a[2]=((C_word)li249),tmp=(C_word)a,a+=3,tmp));
-t280=C_mutate((C_word*)lf[299]+1 /* (set! remainder ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8600,a[2]=((C_word)li250),tmp=(C_word)a,a+=3,tmp));
-t281=*((C_word*)lf[295]+1);
-t282=C_mutate((C_word*)lf[300]+1 /* (set! modulo ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8614,a[2]=t281,a[3]=((C_word)li251),tmp=(C_word)a,a+=4,tmp));
-t283=C_mutate((C_word*)lf[301]+1 /* (set! even? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8643,a[2]=((C_word)li252),tmp=(C_word)a,a+=3,tmp));
-t284=C_mutate((C_word*)lf[302]+1 /* (set! odd? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8646,a[2]=((C_word)li253),tmp=(C_word)a,a+=3,tmp));
-t285=C_set_block_item(lf[303] /* max */,0,C_SCHEME_UNDEFINED);
-t286=C_set_block_item(lf[304] /* min */,0,C_SCHEME_UNDEFINED);
-t287=*((C_word*)lf[249]+1);
-t288=*((C_word*)lf[250]+1);
-t289=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8651,a[2]=((C_word)li255),tmp=(C_word)a,a+=3,tmp);
-t290=C_mutate((C_word*)lf[303]+1 /* (set! max ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8698,a[2]=t287,a[3]=t289,a[4]=((C_word)li256),tmp=(C_word)a,a+=5,tmp));
-t291=C_mutate((C_word*)lf[304]+1 /* (set! min ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8704,a[2]=t288,a[3]=t289,a[4]=((C_word)li257),tmp=(C_word)a,a+=5,tmp));
-t292=C_mutate((C_word*)lf[305]+1 /* (set! exp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8710,a[2]=((C_word)li258),tmp=(C_word)a,a+=3,tmp));
-t293=C_mutate((C_word*)lf[306]+1 /* (set! log ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8713,a[2]=((C_word)li259),tmp=(C_word)a,a+=3,tmp));
-t294=C_mutate((C_word*)lf[307]+1 /* (set! sin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8716,a[2]=((C_word)li260),tmp=(C_word)a,a+=3,tmp));
-t295=C_mutate((C_word*)lf[308]+1 /* (set! cos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8719,a[2]=((C_word)li261),tmp=(C_word)a,a+=3,tmp));
-t296=C_mutate((C_word*)lf[309]+1 /* (set! tan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8722,a[2]=((C_word)li262),tmp=(C_word)a,a+=3,tmp));
-t297=C_mutate((C_word*)lf[310]+1 /* (set! asin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8725,a[2]=((C_word)li263),tmp=(C_word)a,a+=3,tmp));
-t298=C_mutate((C_word*)lf[311]+1 /* (set! acos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8728,a[2]=((C_word)li264),tmp=(C_word)a,a+=3,tmp));
-t299=C_mutate((C_word*)lf[312]+1 /* (set! sqrt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8731,a[2]=((C_word)li265),tmp=(C_word)a,a+=3,tmp));
-t300=C_mutate((C_word*)lf[313]+1 /* (set! atan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8734,a[2]=((C_word)li266),tmp=(C_word)a,a+=3,tmp));
-t301=*((C_word*)lf[299]+1);
-t302=C_mutate((C_word*)lf[314]+1 /* (set! gcd ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8746,a[2]=t301,a[3]=((C_word)li268),tmp=(C_word)a,a+=4,tmp));
-t303=C_mutate((C_word*)lf[315]+1 /* (set! gcd ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8771,a[2]=((C_word)li270),tmp=(C_word)a,a+=3,tmp));
-t304=C_mutate((C_word*)lf[316]+1 /* (set! lcm ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8828,a[2]=((C_word)li271),tmp=(C_word)a,a+=3,tmp));
-t305=C_mutate((C_word*)lf[317]+1 /* (set! lcm ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8842,a[2]=((C_word)li273),tmp=(C_word)a,a+=3,tmp));
-t306=C_mutate((C_word*)lf[318]+1 /* (set! string->number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_string_to_number,a[2]=((C_word)li274),tmp=(C_word)a,a+=3,tmp));
-t307=C_mutate((C_word*)lf[319]+1 /* (set! string->number ...) */,*((C_word*)lf[318]+1));
-t308=C_mutate((C_word*)lf[320]+1 /* (set! number->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_number_to_string,a[2]=((C_word)li275),tmp=(C_word)a,a+=3,tmp));
-t309=C_mutate((C_word*)lf[321]+1 /* (set! number->string ...) */,*((C_word*)lf[320]+1));
-t310=C_mutate((C_word*)lf[322]+1 /* (set! flonum-print-precision ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8907,a[2]=((C_word)li276),tmp=(C_word)a,a+=3,tmp));
-t311=C_mutate((C_word*)lf[323]+1 /* (set! make-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_symbol,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
-t312=C_mutate((C_word*)lf[324]+1 /* (set! symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8939,a[2]=((C_word)li278),tmp=(C_word)a,a+=3,tmp));
-t313=C_mutate((C_word*)lf[325]+1 /* (set! snafu ...) */,lf[326]);
-t314=C_mutate((C_word*)lf[327]+1 /* (set! intern-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_string_to_symbol,a[2]=((C_word)li279),tmp=(C_word)a,a+=3,tmp));
-t315=C_mutate((C_word*)lf[328]+1 /* (set! interned-symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8944,a[2]=((C_word)li280),tmp=(C_word)a,a+=3,tmp));
-t316=C_mutate((C_word*)lf[329]+1 /* (set! string->symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8947,a[2]=((C_word)li281),tmp=(C_word)a,a+=3,tmp));
-t317=C_set_block_item(lf[330] /* symbol->string */,0,C_SCHEME_UNDEFINED);
-t318=C_set_block_item(lf[331] /* symbol->qualified-string */,0,C_SCHEME_UNDEFINED);
-t319=C_set_block_item(lf[332] /* qualified-symbol-prefix */,0,C_SCHEME_UNDEFINED);
-t320=*((C_word*)lf[172]+1);
-t321=*((C_word*)lf[158]+1);
-t322=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8959,a[2]=((C_word)li282),tmp=(C_word)a,a+=3,tmp);
-t323=C_mutate((C_word*)lf[330]+1 /* (set! symbol->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8986,a[2]=t322,a[3]=((C_word)li283),tmp=(C_word)a,a+=4,tmp));
-t324=C_mutate((C_word*)lf[331]+1 /* (set! symbol->qualified-string ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9004,a[2]=t320,a[3]=t322,a[4]=((C_word)li284),tmp=(C_word)a,a+=5,tmp));
-t325=C_mutate((C_word*)lf[332]+1 /* (set! qualified-symbol-prefix ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9030,a[2]=t322,a[3]=((C_word)li285),tmp=(C_word)a,a+=4,tmp));
-t326=C_mutate((C_word*)lf[335]+1 /* (set! qualified-symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9048,a[2]=((C_word)li286),tmp=(C_word)a,a+=3,tmp));
-t327=C_mutate((C_word*)lf[336]+1 /* (set! string->qualified-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9071,a[2]=((C_word)li287),tmp=(C_word)a,a+=3,tmp));
-t328=C_mutate((C_word*)lf[337]+1 /* (set! symbol->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9084,a[2]=((C_word)li288),tmp=(C_word)a,a+=3,tmp));
-t329=*((C_word*)lf[158]+1);
-t330=C_mutate((C_word*)lf[338]+1 /* (set! string->symbol ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9097,a[2]=t329,a[3]=((C_word)li289),tmp=(C_word)a,a+=4,tmp));
-t331=*((C_word*)lf[158]+1);
-t332=C_mutate((C_word*)lf[339]+1 /* (set! string->uninterned-symbol ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9110,a[2]=t331,a[3]=((C_word)li290),tmp=(C_word)a,a+=4,tmp));
-t333=C_fix(-1);
-t334=(*a=C_VECTOR_TYPE|1,a[1]=t333,tmp=(C_word)a,a+=2,tmp);
-t335=C_mutate((C_word*)lf[340]+1 /* (set! gensym ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9123,a[2]=t334,a[3]=((C_word)li291),tmp=(C_word)a,a+=4,tmp));
-t336=C_mutate((C_word*)lf[343]+1 /* (set! keyword? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9177,a[2]=((C_word)li292),tmp=(C_word)a,a+=3,tmp));
-t337=*((C_word*)lf[173]+1);
-t338=C_mutate((C_word*)lf[344]+1 /* (set! string->keyword ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9197,a[2]=t337,a[3]=((C_word)li293),tmp=(C_word)a,a+=4,tmp));
-t339=*((C_word*)lf[343]+1);
-t340=C_mutate((C_word*)lf[345]+1 /* (set! keyword->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9218,a[2]=t339,a[3]=((C_word)li294),tmp=(C_word)a,a+=4,tmp));
-t341=C_mutate((C_word*)lf[347]+1 /* (set! get-keyword ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9233,a[2]=((C_word)li295),tmp=(C_word)a,a+=3,tmp));
-t342=C_mutate((C_word*)lf[348]+1 /* (set! get-keyword ...) */,*((C_word*)lf[347]+1));
-t343=C_mutate((C_word*)lf[350]+1 /* (set! make-blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9273,a[2]=((C_word)li296),tmp=(C_word)a,a+=3,tmp));
-t344=C_mutate((C_word*)lf[351]+1 /* (set! make-blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9279,a[2]=((C_word)li297),tmp=(C_word)a,a+=3,tmp));
-t345=C_mutate((C_word*)lf[352]+1 /* (set! blob? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9288,a[2]=((C_word)li298),tmp=(C_word)a,a+=3,tmp));
-t346=C_mutate((C_word*)lf[353]+1 /* (set! blob-size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9294,a[2]=((C_word)li299),tmp=(C_word)a,a+=3,tmp));
-t347=C_mutate((C_word*)lf[354]+1 /* (set! string->blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9303,a[2]=((C_word)li300),tmp=(C_word)a,a+=3,tmp));
-t348=C_mutate((C_word*)lf[355]+1 /* (set! blob->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9315,a[2]=((C_word)li301),tmp=(C_word)a,a+=3,tmp));
-t349=C_mutate((C_word*)lf[356]+1 /* (set! blob=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9327,a[2]=((C_word)li302),tmp=(C_word)a,a+=3,tmp));
-t350=C_mutate((C_word*)lf[357]+1 /* (set! vector? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9352,a[2]=((C_word)li303),tmp=(C_word)a,a+=3,tmp));
-t351=C_mutate((C_word*)lf[358]+1 /* (set! vector-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9355,a[2]=((C_word)li304),tmp=(C_word)a,a+=3,tmp));
-t352=C_mutate((C_word*)lf[359]+1 /* (set! vector-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9358,a[2]=((C_word)li305),tmp=(C_word)a,a+=3,tmp));
-t353=C_mutate((C_word*)lf[360]+1 /* (set! vector-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9361,a[2]=((C_word)li306),tmp=(C_word)a,a+=3,tmp));
-t354=C_mutate((C_word*)lf[361]+1 /* (set! make-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9364,a[2]=((C_word)li307),tmp=(C_word)a,a+=3,tmp));
-t355=C_mutate((C_word*)lf[362]+1 /* (set! make-vector ...) */,*((C_word*)lf[361]+1));
-t356=C_mutate((C_word*)lf[364]+1 /* (set! list->vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9393,a[2]=((C_word)li309),tmp=(C_word)a,a+=3,tmp));
-t357=C_mutate((C_word*)lf[365]+1 /* (set! vector->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9445,a[2]=((C_word)li311),tmp=(C_word)a,a+=3,tmp));
-t358=C_mutate((C_word*)lf[366]+1 /* (set! vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9478,a[2]=((C_word)li312),tmp=(C_word)a,a+=3,tmp));
-t359=C_mutate((C_word*)lf[368]+1 /* (set! vector-fill! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9484,a[2]=((C_word)li314),tmp=(C_word)a,a+=3,tmp));
-t360=C_mutate((C_word*)lf[369]+1 /* (set! vector-copy! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9512,a[2]=((C_word)li316),tmp=(C_word)a,a+=3,tmp));
-t361=C_mutate((C_word*)lf[371]+1 /* (set! vector-resize ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9583,a[2]=((C_word)li317),tmp=(C_word)a,a+=3,tmp));
-t362=C_mutate(&lf[372] /* (set! grow-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9617,a[2]=((C_word)li319),tmp=(C_word)a,a+=3,tmp));
-t363=C_mutate((C_word*)lf[373]+1 /* (set! char? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9652,a[2]=((C_word)li320),tmp=(C_word)a,a+=3,tmp));
-t364=C_mutate((C_word*)lf[374]+1 /* (set! char->integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9655,a[2]=((C_word)li321),tmp=(C_word)a,a+=3,tmp));
-t365=C_mutate((C_word*)lf[375]+1 /* (set! integer->char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9661,a[2]=((C_word)li322),tmp=(C_word)a,a+=3,tmp));
-t366=C_mutate((C_word*)lf[376]+1 /* (set! char=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9667,a[2]=((C_word)li323),tmp=(C_word)a,a+=3,tmp));
-t367=C_mutate((C_word*)lf[377]+1 /* (set! char>? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9679,a[2]=((C_word)li324),tmp=(C_word)a,a+=3,tmp));
-t368=C_mutate((C_word*)lf[378]+1 /* (set! char<? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9691,a[2]=((C_word)li325),tmp=(C_word)a,a+=3,tmp));
-t369=C_mutate((C_word*)lf[379]+1 /* (set! char>=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9703,a[2]=((C_word)li326),tmp=(C_word)a,a+=3,tmp));
-t370=C_mutate((C_word*)lf[380]+1 /* (set! char<=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9715,a[2]=((C_word)li327),tmp=(C_word)a,a+=3,tmp));
-t371=C_mutate((C_word*)lf[381]+1 /* (set! char-upcase ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9727,a[2]=((C_word)li328),tmp=(C_word)a,a+=3,tmp));
-t372=C_mutate((C_word*)lf[382]+1 /* (set! char-downcase ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9733,a[2]=((C_word)li329),tmp=(C_word)a,a+=3,tmp));
-t373=*((C_word*)lf[382]+1);
-t374=C_mutate((C_word*)lf[383]+1 /* (set! char-ci=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9739,a[2]=t373,a[3]=((C_word)li330),tmp=(C_word)a,a+=4,tmp));
-t375=C_mutate((C_word*)lf[384]+1 /* (set! char-ci>? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9753,a[2]=t373,a[3]=((C_word)li331),tmp=(C_word)a,a+=4,tmp));
-t376=C_mutate((C_word*)lf[385]+1 /* (set! char-ci<? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9767,a[2]=t373,a[3]=((C_word)li332),tmp=(C_word)a,a+=4,tmp));
-t377=C_mutate((C_word*)lf[386]+1 /* (set! char-ci>=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9781,a[2]=t373,a[3]=((C_word)li333),tmp=(C_word)a,a+=4,tmp));
-t378=C_mutate((C_word*)lf[387]+1 /* (set! char-ci<=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9795,a[2]=t373,a[3]=((C_word)li334),tmp=(C_word)a,a+=4,tmp));
-t379=C_mutate((C_word*)lf[388]+1 /* (set! char-upper-case? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9809,a[2]=((C_word)li335),tmp=(C_word)a,a+=3,tmp));
-t380=C_mutate((C_word*)lf[389]+1 /* (set! char-lower-case? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9815,a[2]=((C_word)li336),tmp=(C_word)a,a+=3,tmp));
-t381=C_mutate((C_word*)lf[390]+1 /* (set! char-numeric? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9821,a[2]=((C_word)li337),tmp=(C_word)a,a+=3,tmp));
-t382=C_mutate((C_word*)lf[391]+1 /* (set! char-whitespace? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9827,a[2]=((C_word)li338),tmp=(C_word)a,a+=3,tmp));
-t383=C_mutate((C_word*)lf[392]+1 /* (set! char-alphabetic? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9833,a[2]=((C_word)li339),tmp=(C_word)a,a+=3,tmp));
-t384=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9841,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1543 make-vector */
-t385=*((C_word*)lf[362]+1);
-((C_proc4)(void*)(*((C_word*)t385+1)))(4,t385,t384,C_fix(37),C_SCHEME_END_OF_LIST);}
-
-/* k9839 */
-static void C_ccall f_9841(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9841,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9843,a[2]=t1,a[3]=((C_word)li341),tmp=(C_word)a,a+=4,tmp);
-t5=C_mutate((C_word*)lf[393]+1 /* (set! char-name ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9884,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=((C_word)li342),tmp=(C_word)a,a+=6,tmp));
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10003,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1581 char-name */
-t7=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,lf[1048],C_make_character(32));}
-
-/* k10001 in k9839 */
-static void C_ccall f_10003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10003,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10006,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1582 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1047],C_make_character(9));}
-
-/* k10004 in k10001 in k9839 */
-static void C_ccall f_10006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10006,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10009,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1583 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1046],C_make_character(10));}
-
-/* k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10009(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10009,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10012,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1584 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[605],C_make_character(10));}
-
-/* k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10012(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10012,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10015,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1585 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1045],C_make_character(11));}
-
-/* k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10015(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10015,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10018,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1586 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1044],C_make_character(127));}
-
-/* k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10018,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10021,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1587 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1043],C_make_character(27));}
-
-/* k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10021,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10024,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1588 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1042],C_make_character(7));}
-
-/* k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10024(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10024,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10027,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1589 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1041],C_make_character(0));}
-
-/* k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10027(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10027,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10030,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1590 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1040],C_make_character(13));}
-
-/* k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10030(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10030,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10033,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1591 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1039],C_make_character(12));}
-
-/* k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10033,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10036,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1592 char-name */
-t3=*((C_word*)lf[393]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1038],C_make_character(8));}
-
-/* k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10036(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word ab[136],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10036,2,t0,t1);}
-t2=C_mutate((C_word*)lf[395]+1 /* (set! procedure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10038,a[2]=((C_word)li343),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate((C_word*)lf[396]+1 /* (set! apply ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_apply,a[2]=((C_word)li344),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[397]+1 /* (set! call-with-current-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_cc,a[2]=((C_word)li345),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[398]+1 /* (set! call-with-direct-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10043,a[2]=((C_word)li346),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[399]+1 /* (set! call-with-cthulhu ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_with_cthulhu,a[2]=((C_word)li347),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[400]+1 /* (set! direct-return ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10050,a[2]=((C_word)li348),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[401]+1 /* (set! values ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_values,a[2]=((C_word)li349),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[402]+1 /* (set! call-with-values ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_with_values,a[2]=((C_word)li350),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[403]+1 /* (set! call-with-values ...) */,*((C_word*)lf[402]+1));
-t11=C_mutate((C_word*)lf[404]+1 /* (set! for-each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10056,a[2]=((C_word)li352),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[406]+1 /* (set! map ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10094,a[2]=((C_word)li354),tmp=(C_word)a,a+=3,tmp));
-t13=C_set_block_item(lf[405] /* for-each */,0,C_SCHEME_UNDEFINED);
-t14=C_set_block_item(lf[407] /* map */,0,C_SCHEME_UNDEFINED);
-t15=*((C_word*)lf[94]+1);
-t16=*((C_word*)lf[95]+1);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_SCHEME_UNDEFINED;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10139,a[2]=t18,a[3]=t20,a[4]=((C_word)li355),tmp=(C_word)a,a+=5,tmp));
-t22=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10184,a[2]=((C_word)li357),tmp=(C_word)a,a+=3,tmp));
-t23=C_mutate((C_word*)lf[405]+1 /* (set! for-each ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10236,a[2]=t20,a[3]=t15,a[4]=t16,a[5]=t18,a[6]=((C_word)li360),tmp=(C_word)a,a+=7,tmp));
-t24=C_mutate((C_word*)lf[407]+1 /* (set! map ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10307,a[2]=t20,a[3]=t15,a[4]=t16,a[5]=t18,a[6]=((C_word)li363),tmp=(C_word)a,a+=7,tmp));
-t25=C_set_block_item(lf[409] /* dynamic-winds */,0,C_SCHEME_END_OF_LIST);
-t26=C_mutate((C_word*)lf[410]+1 /* (set! dynamic-wind ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10396,a[2]=((C_word)li365),tmp=(C_word)a,a+=3,tmp));
-t27=C_mutate((C_word*)lf[411]+1 /* (set! dynamic-wind ...) */,*((C_word*)lf[410]+1));
-t28=C_mutate((C_word*)lf[412]+1 /* (set! call-with-current-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10427,a[2]=((C_word)li368),tmp=(C_word)a,a+=3,tmp));
-t29=C_mutate((C_word*)lf[414]+1 /* (set! call/cc ...) */,*((C_word*)lf[412]+1));
-t30=C_mutate(&lf[413] /* (set! dynamic-unwind ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10467,a[2]=((C_word)li369),tmp=(C_word)a,a+=3,tmp));
-t31=C_mutate((C_word*)lf[415]+1 /* (set! continuation-capture ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10525,a[2]=((C_word)li370),tmp=(C_word)a,a+=3,tmp));
-t32=C_mutate((C_word*)lf[417]+1 /* (set! continuation? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10535,a[2]=((C_word)li371),tmp=(C_word)a,a+=3,tmp));
-t33=C_mutate((C_word*)lf[418]+1 /* (set! continuation-graft ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_continuation_graft,a[2]=((C_word)li372),tmp=(C_word)a,a+=3,tmp));
-t34=C_mutate((C_word*)lf[419]+1 /* (set! continuation-graft ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10542,a[2]=((C_word)li373),tmp=(C_word)a,a+=3,tmp));
-t35=*((C_word*)lf[419]+1);
-t36=C_mutate((C_word*)lf[420]+1 /* (set! continuation-return ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10575,a[2]=t35,a[3]=((C_word)li375),tmp=(C_word)a,a+=4,tmp));
-t37=C_mutate((C_word*)lf[421]+1 /* (set! port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10590,a[2]=((C_word)li376),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[422]+1 /* (set! input-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10593,a[2]=((C_word)li377),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[423]+1 /* (set! output-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10610,a[2]=((C_word)li378),tmp=(C_word)a,a+=3,tmp));
-t40=C_mutate((C_word*)lf[424]+1 /* (set! make-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10631,a[2]=((C_word)li379),tmp=(C_word)a,a+=3,tmp));
-t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21999,a[2]=((C_word)li380),tmp=(C_word)a,a+=3,tmp);
-t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22002,a[2]=((C_word)li381),tmp=(C_word)a,a+=3,tmp);
-t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22005,a[2]=((C_word)li382),tmp=(C_word)a,a+=3,tmp);
-t44=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22008,a[2]=((C_word)li383),tmp=(C_word)a,a+=3,tmp);
-t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22011,a[2]=((C_word)li384),tmp=(C_word)a,a+=3,tmp);
-t46=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22017,a[2]=((C_word)li385),tmp=(C_word)a,a+=3,tmp);
-t47=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22020,a[2]=((C_word)li386),tmp=(C_word)a,a+=3,tmp);
-t48=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22023,a[2]=((C_word)li388),tmp=(C_word)a,a+=3,tmp);
-t49=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22079,a[2]=((C_word)li390),tmp=(C_word)a,a+=3,tmp);
-t50=C_a_i_vector(&a,9,t41,t42,t43,t44,t45,t46,t47,t48,t49);
-t51=C_mutate((C_word*)lf[427]+1 /* (set! stream-port-class ...) */,t50);
-t52=C_mutate((C_word*)lf[428]+1 /* (set! open-file-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_open_file_port,a[2]=((C_word)li391),tmp=(C_word)a,a+=3,tmp));
-t53=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10659,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1871 ##sys#make-port */
-t54=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t54+1)))(6,t54,t53,C_SCHEME_TRUE,*((C_word*)lf[427]+1),lf[1037],lf[464]);}
-
-/* k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10659(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10659,2,t0,t1);}
-t2=C_mutate((C_word*)lf[429]+1 /* (set! standard-input ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10663,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1872 ##sys#make-port */
-t4=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,C_SCHEME_FALSE,*((C_word*)lf[427]+1),lf[1036],lf[464]);}
-
-/* k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10663(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10663,2,t0,t1);}
-t2=C_mutate((C_word*)lf[430]+1 /* (set! standard-output ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10667,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1873 ##sys#make-port */
-t4=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,C_SCHEME_FALSE,*((C_word*)lf[427]+1),lf[1035],lf[464]);}
-
-/* k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10667(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10667,2,t0,t1);}
-t2=C_mutate((C_word*)lf[431]+1 /* (set! standard-error ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10670,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1875 ##sys#open-file-port */
-t4=*((C_word*)lf[428]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,*((C_word*)lf[429]+1),C_fix(0),C_SCHEME_FALSE);}
-
-/* k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10670(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10670,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10673,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1876 ##sys#open-file-port */
-t3=*((C_word*)lf[428]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,*((C_word*)lf[430]+1),C_fix(1),C_SCHEME_FALSE);}
-
-/* k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10673(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10673,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10676,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1877 ##sys#open-file-port */
-t3=*((C_word*)lf[428]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,*((C_word*)lf[431]+1),C_fix(2),C_SCHEME_FALSE);}
-
-/* k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[36],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10676,2,t0,t1);}
-t2=C_mutate((C_word*)lf[432]+1 /* (set! check-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10678,a[2]=((C_word)li392),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate((C_word*)lf[434]+1 /* (set! check-port-mode ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10705,a[2]=((C_word)li393),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[437]+1 /* (set! check-port* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10735,a[2]=((C_word)li394),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[440]+1 /* (set! current-input-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10750,a[2]=((C_word)li395),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[441]+1 /* (set! current-output-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10766,a[2]=((C_word)li396),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[442]+1 /* (set! current-error-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10782,a[2]=((C_word)li397),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[443]+1 /* (set! tty-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10798,a[2]=((C_word)li398),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[445]+1 /* (set! port-data ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10815,a[2]=((C_word)li399),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[446]+1 /* (set! set-port-data! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10821,a[2]=((C_word)li400),tmp=(C_word)a,a+=3,tmp));
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10829,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_build_platform,a[2]=((C_word)li797),tmp=(C_word)a,a+=3,tmp);
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21997,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
-/* g21212122 */
-t14=t12;
-((C_proc2)C_retrieve_proc(t14))(2,t14,t13);}
-
-/* k21995 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21997(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1924 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10829(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word ab[146],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10829,2,t0,t1);}
-t2=C_eqp(t1,lf[447]);
-t3=C_mutate((C_word*)lf[448]+1 /* (set! platform-fixup-pathname ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10833,a[2]=t2,a[3]=((C_word)li401),tmp=(C_word)a,a+=4,tmp));
-t4=C_mutate((C_word*)lf[449]+1 /* (set! pathname-resolution ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10867,a[2]=((C_word)li402),tmp=(C_word)a,a+=3,tmp));
-t5=*((C_word*)lf[36]+1);
-t6=C_mutate((C_word*)lf[450]+1 /* (set! expand-home-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10877,a[2]=t5,a[3]=((C_word)li404),tmp=(C_word)a,a+=4,tmp));
-t7=C_set_block_item(lf[455] /* open-input-file */,0,C_SCHEME_UNDEFINED);
-t8=C_set_block_item(lf[456] /* open-output-file */,0,C_SCHEME_UNDEFINED);
-t9=C_set_block_item(lf[457] /* close-input-port */,0,C_SCHEME_UNDEFINED);
-t10=C_set_block_item(lf[458] /* close-output-port */,0,C_SCHEME_UNDEFINED);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10967,a[2]=((C_word)li407),tmp=(C_word)a,a+=3,tmp));
-t16=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11065,a[2]=((C_word)li408),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[455]+1 /* (set! open-input-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11090,a[2]=t12,a[3]=((C_word)li409),tmp=(C_word)a,a+=4,tmp));
-t18=C_mutate((C_word*)lf[456]+1 /* (set! open-output-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11096,a[2]=t12,a[3]=((C_word)li410),tmp=(C_word)a,a+=4,tmp));
-t19=C_mutate((C_word*)lf[457]+1 /* (set! close-input-port ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11102,a[2]=t14,a[3]=((C_word)li411),tmp=(C_word)a,a+=4,tmp));
-t20=C_mutate((C_word*)lf[458]+1 /* (set! close-output-port ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11108,a[2]=t14,a[3]=((C_word)li412),tmp=(C_word)a,a+=4,tmp));
-t21=*((C_word*)lf[455]+1);
-t22=*((C_word*)lf[457]+1);
-t23=C_mutate((C_word*)lf[474]+1 /* (set! call-with-input-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11114,a[2]=t21,a[3]=t22,a[4]=((C_word)li415),tmp=(C_word)a,a+=5,tmp));
-t24=*((C_word*)lf[456]+1);
-t25=*((C_word*)lf[458]+1);
-t26=C_mutate((C_word*)lf[475]+1 /* (set! call-with-output-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11138,a[2]=t24,a[3]=t25,a[4]=((C_word)li418),tmp=(C_word)a,a+=5,tmp));
-t27=*((C_word*)lf[455]+1);
-t28=*((C_word*)lf[457]+1);
-t29=C_mutate((C_word*)lf[476]+1 /* (set! with-input-from-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11162,a[2]=t27,a[3]=t28,a[4]=((C_word)li420),tmp=(C_word)a,a+=5,tmp));
-t30=*((C_word*)lf[456]+1);
-t31=*((C_word*)lf[458]+1);
-t32=C_mutate((C_word*)lf[477]+1 /* (set! with-output-to-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11182,a[2]=t30,a[3]=t31,a[4]=((C_word)li422),tmp=(C_word)a,a+=5,tmp));
-t33=C_mutate((C_word*)lf[478]+1 /* (set! file-exists? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11202,a[2]=((C_word)li424),tmp=(C_word)a,a+=3,tmp));
-t34=C_mutate((C_word*)lf[480]+1 /* (set! directory-exists? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11224,a[2]=((C_word)li426),tmp=(C_word)a,a+=3,tmp));
-t35=C_mutate((C_word*)lf[481]+1 /* (set! flush-output ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11253,a[2]=((C_word)li427),tmp=(C_word)a,a+=3,tmp));
-t36=C_mutate((C_word*)lf[482]+1 /* (set! flush-output ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11266,a[2]=((C_word)li428),tmp=(C_word)a,a+=3,tmp));
-t37=C_mutate((C_word*)lf[483]+1 /* (set! port-name ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11300,a[2]=((C_word)li429),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[484]+1 /* (set! set-port-name! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11331,a[2]=((C_word)li430),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[485]+1 /* (set! port-line ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11343,a[2]=((C_word)li431),tmp=(C_word)a,a+=3,tmp));
-t40=C_mutate((C_word*)lf[486]+1 /* (set! port-position ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11355,a[2]=((C_word)li432),tmp=(C_word)a,a+=3,tmp));
-t41=C_mutate((C_word*)lf[488]+1 /* (set! delete-file ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11403,a[2]=((C_word)li434),tmp=(C_word)a,a+=3,tmp));
-t42=C_mutate((C_word*)lf[491]+1 /* (set! rename-file ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11440,a[2]=((C_word)li437),tmp=(C_word)a,a+=3,tmp));
-t43=C_SCHEME_UNDEFINED;
-t44=C_a_i_vector(&a,16,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43,t43);
-t45=C_mutate(&lf[494] /* (set! default-parameter-vector ...) */,t44);
-t46=C_mutate((C_word*)lf[495]+1 /* (set! current-parameter-vector ...) */,lf[496]);
-t47=C_fix(0);
-t48=(*a=C_VECTOR_TYPE|1,a[1]=t47,tmp=(C_word)a,a+=2,tmp);
-t49=C_mutate((C_word*)lf[497]+1 /* (set! make-parameter ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11495,a[2]=t48,a[3]=((C_word)li440),tmp=(C_word)a,a+=4,tmp));
-t50=C_mutate((C_word*)lf[498]+1 /* (set! eof-object? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11594,a[2]=((C_word)li441),tmp=(C_word)a,a+=3,tmp));
-t51=C_mutate((C_word*)lf[499]+1 /* (set! char-ready? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11597,a[2]=((C_word)li442),tmp=(C_word)a,a+=3,tmp));
-t52=C_mutate((C_word*)lf[500]+1 /* (set! read-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11638,a[2]=((C_word)li443),tmp=(C_word)a,a+=3,tmp));
-t53=C_mutate((C_word*)lf[502]+1 /* (set! read-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11666,a[2]=((C_word)li444),tmp=(C_word)a,a+=3,tmp));
-t54=C_mutate((C_word*)lf[501]+1 /* (set! read-char/port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11725,a[2]=((C_word)li445),tmp=(C_word)a,a+=3,tmp));
-t55=C_mutate((C_word*)lf[503]+1 /* (set! peek-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11737,a[2]=((C_word)li446),tmp=(C_word)a,a+=3,tmp));
-t56=C_mutate((C_word*)lf[504]+1 /* (set! peek-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11762,a[2]=((C_word)li447),tmp=(C_word)a,a+=3,tmp));
-t57=C_mutate((C_word*)lf[505]+1 /* (set! read ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11796,a[2]=((C_word)li448),tmp=(C_word)a,a+=3,tmp));
-t58=C_set_block_item(lf[507] /* default-read-info-hook */,0,C_SCHEME_FALSE);
-t59=C_set_block_item(lf[508] /* read-error-with-line-number */,0,C_SCHEME_FALSE);
-t60=C_set_block_item(lf[509] /* enable-qualifiers */,0,C_SCHEME_TRUE);
-t61=C_mutate((C_word*)lf[510]+1 /* (set! read-prompt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11833,a[2]=((C_word)li449),tmp=(C_word)a,a+=3,tmp));
-t62=C_mutate((C_word*)lf[511]+1 /* (set! infix-list-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11836,a[2]=((C_word)li450),tmp=(C_word)a,a+=3,tmp));
-t63=C_mutate((C_word*)lf[512]+1 /* (set! sharp-number-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11839,a[2]=((C_word)li451),tmp=(C_word)a,a+=3,tmp));
-t64=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11847,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2221 make-parameter */
-t65=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t65+1)))(3,t65,t64,C_SCHEME_TRUE);}
-
-/* k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11847(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11847,2,t0,t1);}
-t2=C_mutate((C_word*)lf[515]+1 /* (set! case-sensitive ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11851,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2222 make-parameter */
-t4=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[567]);}
-
-/* k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11851,2,t0,t1);}
-t2=C_mutate((C_word*)lf[516]+1 /* (set! keyword-style ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11855,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2223 make-parameter */
-t4=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_TRUE);}
-
-/* k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11855(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11855,2,t0,t1);}
-t2=C_mutate((C_word*)lf[517]+1 /* (set! parentheses-synonyms ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11859,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2224 make-parameter */
-t4=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_TRUE);}
-
-/* k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11859(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11859,2,t0,t1);}
-t2=C_mutate((C_word*)lf[518]+1 /* (set! symbol-escape ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11863,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=C_a_i_record(&a,4,lf[601],C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);
-/* library.scm: 2226 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word ab[49],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11863,2,t0,t1);}
-t2=C_mutate((C_word*)lf[519]+1 /* (set! current-read-table ...) */,t1);
-t3=*((C_word*)lf[172]+1);
-t4=C_mutate((C_word*)lf[520]+1 /* (set! read-warning ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11865,a[2]=t3,a[3]=((C_word)li452),tmp=(C_word)a,a+=4,tmp));
-t5=*((C_word*)lf[172]+1);
-t6=C_mutate((C_word*)lf[513]+1 /* (set! read-error ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11888,a[2]=t5,a[3]=((C_word)li453),tmp=(C_word)a,a+=4,tmp));
-t7=*((C_word*)lf[135]+1);
-t8=*((C_word*)lf[142]+1);
-t9=*((C_word*)lf[172]+1);
-t10=*((C_word*)lf[173]+1);
-t11=*((C_word*)lf[393]+1);
-t12=*((C_word*)lf[515]+1);
-t13=*((C_word*)lf[516]+1);
-t14=*((C_word*)lf[517]+1);
-t15=*((C_word*)lf[518]+1);
-t16=*((C_word*)lf[519]+1);
-t17=C_a_i_string(&a,1,C_make_character(0));
-t18=C_mutate((C_word*)lf[506]+1 /* (set! read ...) */,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_11914,a[2]=t12,a[3]=t13,a[4]=t14,a[5]=t15,a[6]=t16,a[7]=t17,a[8]=t11,a[9]=t8,a[10]=t10,a[11]=t9,a[12]=((C_word)li494),tmp=(C_word)a,a+=13,tmp));
-t19=C_mutate((C_word*)lf[530]+1 /* (set! char->utf8-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14307,a[2]=((C_word)li495),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[537]+1 /* (set! unicode-surrogate? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14472,a[2]=((C_word)li496),tmp=(C_word)a,a+=3,tmp));
-t21=C_mutate((C_word*)lf[534]+1 /* (set! surrogates->codepoint ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14484,a[2]=((C_word)li497),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[593]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14546,a[2]=((C_word)li498),tmp=(C_word)a,a+=3,tmp));
-t23=lf[591] /* read-marks */ =C_SCHEME_END_OF_LIST;;
-t24=C_mutate((C_word*)lf[596]+1 /* (set! set-read-mark! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14583,a[2]=((C_word)li499),tmp=(C_word)a,a+=3,tmp));
-t25=C_set_block_item(lf[597] /* set-read-syntax! */,0,C_SCHEME_UNDEFINED);
-t26=C_set_block_item(lf[598] /* set-sharp-read-syntax! */,0,C_SCHEME_UNDEFINED);
-t27=C_set_block_item(lf[599] /* set-parameterized-read-syntax! */,0,C_SCHEME_UNDEFINED);
-t28=*((C_word*)lf[519]+1);
-t29=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14606,a[2]=t28,a[3]=((C_word)li501),tmp=(C_word)a,a+=4,tmp);
-t30=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14658,a[2]=t29,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t31=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21976,a[2]=((C_word)li796),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2814 syntax-setter */
-t32=t29;
-f_14606(t32,t30,lf[597],C_fix(1),t31);}
-
-/* a21975 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21976(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21976,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21978,a[2]=t2,a[3]=((C_word)li795),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_21978 in a21975 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21978(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21978,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21982,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2818 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k21980 */
-static void C_ccall f_21982(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2819 proc */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14658,2,t0,t1);}
-t2=C_mutate((C_word*)lf[597]+1 /* (set! set-read-syntax! ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14662,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21965,a[2]=((C_word)li794),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2822 syntax-setter */
-t5=((C_word*)t0)[2];
-f_14606(t5,t3,lf[598],C_fix(2),t4);}
-
-/* a21964 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21965(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21965,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21967,a[2]=t2,a[3]=((C_word)li793),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_21967 in a21964 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21967(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21967,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21971,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2826 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k21969 */
-static void C_ccall f_21971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2827 proc */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14662(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14662,2,t0,t1);}
-t2=C_mutate((C_word*)lf[598]+1 /* (set! set-sharp-read-syntax! ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14666,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21954,a[2]=((C_word)li792),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2830 syntax-setter */
-t5=((C_word*)t0)[2];
-f_14606(t5,t3,lf[599],C_fix(3),t4);}
-
-/* a21953 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21954(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21954,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21956,a[2]=t2,a[3]=((C_word)li791),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_21956 in a21953 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_21956,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21960,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2834 ##sys#read-char-0 */
-t6=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-
-/* k21958 */
-static void C_ccall f_21960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2835 proc */
-t2=((C_word*)t0)[5];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[30],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14666,2,t0,t1);}
-t2=C_mutate((C_word*)lf[599]+1 /* (set! set-parameterized-read-syntax! ...) */,t1);
-t3=C_mutate((C_word*)lf[600]+1 /* (set! copy-read-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14668,a[2]=((C_word)li502),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[602]+1 /* (set! write-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14719,a[2]=((C_word)li503),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[603]+1 /* (set! write-char/port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14732,a[2]=((C_word)li504),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[604]+1 /* (set! write-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14744,a[2]=((C_word)li505),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[605]+1 /* (set! newline ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14781,a[2]=((C_word)li506),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[606]+1 /* (set! write ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14809,a[2]=((C_word)li507),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[608]+1 /* (set! display ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14840,a[2]=((C_word)li508),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[609]+1 /* (set! print ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14871,a[2]=((C_word)li510),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[610]+1 /* (set! print* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14894,a[2]=((C_word)li512),tmp=(C_word)a,a+=3,tmp));
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14919,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2892 make-parameter */
-t13=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t13+1)))(3,t13,t12,C_fix(0));}
-
-/* k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14919(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14919,2,t0,t1);}
-t2=C_mutate(&lf[611] /* (set! current-print-length ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14923,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2893 make-parameter */
-t4=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
-
-/* k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14923(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14923,2,t0,t1);}
-t2=C_mutate(&lf[612] /* (set! print-length-limit ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14927,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2894 make-parameter */
-t4=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
-
-/* k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word ab[113],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14927,2,t0,t1);}
-t2=C_mutate(&lf[613] /* (set! print-exit ...) */,t1);
-t3=*((C_word*)lf[393]+1);
-t4=*((C_word*)lf[515]+1);
-t5=*((C_word*)lf[516]+1);
-t6=lf[611];
-t7=*((C_word*)lf[172]+1);
-t8=C_mutate((C_word*)lf[607]+1 /* (set! print ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14929,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=((C_word)li525),tmp=(C_word)a,a+=6,tmp));
-t9=*((C_word*)lf[172]+1);
-t10=C_mutate((C_word*)lf[638]+1 /* (set! procedure->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15875,a[2]=t9,a[3]=((C_word)li526),tmp=(C_word)a,a+=4,tmp));
-t11=C_set_block_item(lf[653] /* record-printers */,0,C_SCHEME_END_OF_LIST);
-t12=C_mutate((C_word*)lf[654]+1 /* (set! register-record-printer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15892,a[2]=((C_word)li527),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[637]+1 /* (set! user-print-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15912,a[2]=((C_word)li528),tmp=(C_word)a,a+=3,tmp));
-t14=*((C_word*)lf[412]+1);
-t15=C_mutate((C_word*)lf[660]+1 /* (set! with-print-length-limit ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15975,a[2]=t14,a[3]=((C_word)li532),tmp=(C_word)a,a+=4,tmp));
-t16=C_mutate((C_word*)lf[661]+1 /* (set! bitwise-and ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16016,a[2]=((C_word)li534),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[662]+1 /* (set! bitwise-ior ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16043,a[2]=((C_word)li536),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[663]+1 /* (set! bitwise-xor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16070,a[2]=((C_word)li538),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate((C_word*)lf[664]+1 /* (set! bitwise-not ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16097,a[2]=((C_word)li539),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[665]+1 /* (set! arithmetic-shift ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16100,a[2]=((C_word)li540),tmp=(C_word)a,a+=3,tmp));
-t21=C_mutate((C_word*)lf[666]+1 /* (set! bit-set? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16103,a[2]=((C_word)li541),tmp=(C_word)a,a+=3,tmp));
-t22=C_SCHEME_UNDEFINED;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16107,a[2]=t23,a[3]=((C_word)li542),tmp=(C_word)a,a+=4,tmp));
-t25=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21737,a[2]=((C_word)li543),tmp=(C_word)a,a+=3,tmp);
-t26=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21762,a[2]=((C_word)li544),tmp=(C_word)a,a+=3,tmp);
-t27=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21780,a[2]=t23,a[3]=((C_word)li545),tmp=(C_word)a,a+=4,tmp);
-t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21799,a[2]=t23,a[3]=((C_word)li546),tmp=(C_word)a,a+=4,tmp);
-t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21818,a[2]=((C_word)li547),tmp=(C_word)a,a+=3,tmp);
-t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21828,a[2]=((C_word)li548),tmp=(C_word)a,a+=3,tmp);
-t31=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21831,a[2]=((C_word)li549),tmp=(C_word)a,a+=3,tmp);
-t32=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21845,a[2]=((C_word)li550),tmp=(C_word)a,a+=3,tmp);
-t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21886,a[2]=((C_word)li552),tmp=(C_word)a,a+=3,tmp);
-t34=C_a_i_vector(&a,9,t25,t26,t27,t28,t29,t30,t31,t32,t33);
-t35=C_mutate((C_word*)lf[670]+1 /* (set! string-port-class ...) */,t34);
-t36=C_mutate((C_word*)lf[669]+1 /* (set! scan-buffer-line ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16162,a[2]=((C_word)li554),tmp=(C_word)a,a+=3,tmp));
-t37=C_mutate((C_word*)lf[671]+1 /* (set! open-input-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16234,a[2]=((C_word)li555),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[673]+1 /* (set! open-output-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16252,a[2]=((C_word)li556),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[675]+1 /* (set! get-output-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16271,a[2]=((C_word)li557),tmp=(C_word)a,a+=3,tmp));
-t40=*((C_word*)lf[675]+1);
-t41=*((C_word*)lf[673]+1);
-t42=C_mutate((C_word*)lf[677]+1 /* (set! print-to-string ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16308,a[2]=t41,a[3]=t40,a[4]=((C_word)li560),tmp=(C_word)a,a+=5,tmp));
-t43=*((C_word*)lf[172]+1);
-t44=C_mutate((C_word*)lf[631]+1 /* (set! pointer->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16348,a[2]=t43,a[3]=((C_word)li561),tmp=(C_word)a,a+=4,tmp));
-t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16413,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t46=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_software_type,a[2]=((C_word)li790),tmp=(C_word)a,a+=3,tmp);
-t47=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21735,a[2]=t45,tmp=(C_word)a,a+=3,tmp);
-/* g38023803 */
-t48=t46;
-((C_proc2)C_retrieve_proc(t48))(2,t48,t47);}
-
-/* k21733 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21735(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3348 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16413(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16413,2,t0,t1);}
-t2=C_mutate((C_word*)lf[686]+1 /* (set! software-type ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16414,a[2]=t1,a[3]=((C_word)li562),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16419,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_machine_type,a[2]=((C_word)li789),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21731,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* g38053806 */
-t6=t4;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k21729 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3352 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16419(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16419,2,t0,t1);}
-t2=C_mutate((C_word*)lf[687]+1 /* (set! machine-type ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16420,a[2]=t1,a[3]=((C_word)li563),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16425,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_machine_byte_order,a[2]=((C_word)li788),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21727,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* g38083809 */
-t6=t4;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k21725 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21727(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3356 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16425(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16425,2,t0,t1);}
-t2=C_mutate((C_word*)lf[688]+1 /* (set! machine-byte-order ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16426,a[2]=t1,a[3]=((C_word)li564),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16431,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_software_version,a[2]=((C_word)li787),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21723,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* g38113812 */
-t6=t4;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k21721 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21723(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3360 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16431(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16431,2,t0,t1);}
-t2=C_mutate((C_word*)lf[689]+1 /* (set! software-version ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16432,a[2]=t1,a[3]=((C_word)li565),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16437,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_build_platform,a[2]=((C_word)li786),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21719,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* g38143815 */
-t6=t4;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k21717 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3364 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16437(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16437,2,t0,t1);}
-t2=C_mutate((C_word*)lf[690]+1 /* (set! build-platform ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16438,a[2]=t1,a[3]=((C_word)li566),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16443,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_c_runtime,a[2]=((C_word)li785),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21715,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* g38173818 */
-t6=t4;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k21713 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21715(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3368 string->symbol */
-t2=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16443,2,t0,t1);}
-t2=C_mutate((C_word*)lf[691]+1 /* (set! c-runtime ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16444,a[2]=t1,a[3]=((C_word)li567),tmp=(C_word)a,a+=4,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16449,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21711,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3372 software-type */
-t5=*((C_word*)lf[686]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k21709 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21711,2,t0,t1);}
-t2=C_eqp(lf[1033],t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21707,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3374 build-platform */
-t4=*((C_word*)lf[690]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=((C_word*)t0)[2];
-f_16449(t3,C_SCHEME_FALSE);}}
-
-/* k21705 in k21709 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_eqp(lf[1034],t1);
-t3=((C_word*)t0)[2];
-f_16449(t3,C_i_not(t2));}
-
-/* k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16449(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16449,NULL,2,t0,t1);}
-t2=C_mutate((C_word*)lf[692]+1 /* (set! windows-platform ...) */,t1);
-t3=C_mutate((C_word*)lf[693]+1 /* (set! chicken-version ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16451,a[2]=((C_word)li569),tmp=(C_word)a,a+=3,tmp));
-t4=C_set_block_item(lf[718] /* pathname-directory-separator */,0,C_make_character(47));
-t5=*((C_word*)lf[344]+1);
-t6=*((C_word*)lf[343]+1);
-t7=C_mutate((C_word*)lf[719]+1 /* (set! ->feature-id ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16629,a[2]=t6,a[3]=t5,a[4]=((C_word)li570),tmp=(C_word)a,a+=5,tmp));
-t8=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,lf[722]);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16663,a[2]=((C_word)li571),tmp=(C_word)a,a+=3,tmp);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16681,a[2]=t9,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21693,a[2]=t10,a[3]=t9,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3436 software-type */
-t12=*((C_word*)lf[686]+1);
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,t11);}
-
-/* k21691 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21693(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3436 check */
-f_16663(((C_word*)t0)[2],t1);}
-
-/* k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16681,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16684,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21689,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3437 software-version */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[689]+1)))(2,*((C_word*)lf[689]+1),t3);}
-
-/* k21687 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3437 check */
-f_16663(((C_word*)t0)[2],t1);}
-
-/* k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16684(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16684,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16687,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21685,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3438 build-platform */
-t4=*((C_word*)lf[690]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k21683 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21685(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3438 check */
-f_16663(((C_word*)t0)[2],t1);}
-
-/* k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16687(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16687,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16690,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21681,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3439 machine-type */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[687]+1)))(2,*((C_word*)lf[687]+1),t3);}
-
-/* k21679 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3439 check */
-f_16663(((C_word*)t0)[2],t1);}
-
-/* k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16690(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16690,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16693,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21677,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3440 machine-byte-order */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[688]+1)))(2,*((C_word*)lf[688]+1),t3);}
-
-/* k21675 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21677(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3440 check */
-f_16663(((C_word*)t0)[2],t1);}
-
-/* k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16693(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16693,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16696,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(40)))){
-t3=C_a_i_cons(&a,2,lf[1032],*((C_word*)lf[721]+1));
-t4=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t3);
-t5=t2;
-f_16696(t5,t4);}
-else{
-t3=t2;
-f_16696(t3,C_SCHEME_UNDEFINED);}}
-
-/* k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16696(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16696,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16699,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(24)))){
-t3=C_a_i_cons(&a,2,lf[1031],*((C_word*)lf[721]+1));
-t4=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t3);
-t5=t2;
-f_16699(t5,t4);}
-else{
-t3=t2;
-f_16699(t3,C_SCHEME_UNDEFINED);}}
-
-/* k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16699(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16699,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16702,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(28)))){
-t3=C_a_i_cons(&a,2,lf[1030],*((C_word*)lf[721]+1));
-t4=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t3);
-t5=t2;
-f_16702(t5,t4);}
-else{
-t3=t2;
-f_16702(t3,C_SCHEME_UNDEFINED);}}
-
-/* k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16702(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16702,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16705,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(39)))){
-t3=C_a_i_cons(&a,2,lf[1029],*((C_word*)lf[721]+1));
-t4=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t3);
-t5=t2;
-f_16705(t5,t4);}
-else{
-t3=t2;
-f_16705(t3,C_SCHEME_UNDEFINED);}}
-
-/* k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16705(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[33],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16705,NULL,2,t0,t1);}
-t2=C_mutate((C_word*)lf[723]+1 /* (set! register-feature! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16707,a[2]=((C_word)li573),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate((C_word*)lf[724]+1 /* (set! unregister-feature! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16751,a[2]=((C_word)li576),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[725]+1 /* (set! features ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16827,a[2]=((C_word)li577),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[726]+1 /* (set! feature? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16830,a[2]=((C_word)li579),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[727]+1 /* (set! feature? ...) */,*((C_word*)lf[726]+1));
-t7=C_mutate((C_word*)lf[728]+1 /* (set! get-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16872,a[2]=((C_word)li584),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[731]+1 /* (set! really-print-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17028,a[2]=((C_word)li588),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[736]+1 /* (set! print-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17117,a[2]=((C_word)li594),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[738]+1 /* (set! get-call-chain ...) */,*((C_word*)lf[728]+1));
-t11=C_mutate((C_word*)lf[739]+1 /* (set! user-interrupt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17231,a[2]=((C_word)li596),tmp=(C_word)a,a+=3,tmp));
-t12=C_fudge(C_fix(25));
-t13=C_mutate((C_word*)lf[742]+1 /* (set! break-on-error ...) */,t12);
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17258,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t15=*((C_word*)lf[172]+1);
-t16=*((C_word*)lf[673]+1);
-t17=*((C_word*)lf[675]+1);
-t18=*((C_word*)lf[736]+1);
-t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21495,a[2]=t16,a[3]=t17,a[4]=t18,a[5]=((C_word)li784),tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3549 make-parameter */
-t20=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t20+1)))(3,t20,t14,t19);}
-
-/* a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21495(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr3r,(void*)f_21495r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_21495r(t0,t1,t2,t3);}}
-
-static void C_ccall f_21495r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(11);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21499,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21644,a[2]=((C_word)li783),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3555 ##sys#error-handler */
-t6=*((C_word*)lf[743]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* a21643 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21644(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21644,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_halt(lf[1028]));}
-
-/* k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21499(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21499,2,t0,t1);}
-if(C_truep(C_fudge(C_fix(4)))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21508,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3557 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[1027],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21595,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3578 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}}
-
-/* k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21595(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21595,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21598,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* library.scm: 3579 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,t1);}
-else{
-t3=t2;
-f_21598(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21598(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21598,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21601,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3580 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,((C_word*)t0)[3]);}
-
-/* k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21601,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21610,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li782),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_21610(t6,t2,((C_word*)t0)[2]);}
-
-/* loop4142 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21610(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21610,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21618,a[2]=((C_word*)t0)[3],a[3]=((C_word)li781),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21628,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g41494150 */
-t6=t3;
-f_21618(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k21626 in loop4142 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_21610(t3,((C_word*)t0)[2],t2);}
-
-/* g4149 in loop4142 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21618(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21618,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21622,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3581 ##sys#print */
-t4=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,t2,C_SCHEME_TRUE,((C_word*)t0)[2]);}
-
-/* k21620 in g4149 in loop4142 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3581 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],C_make_character(10),C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k21602 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21604,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21608,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3582 get-output-string */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k21606 in k21602 in k21599 in k21596 in k21593 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_halt(t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21508(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21508,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21511,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21589,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3559 ##sys#print */
-t4=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[1026],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t3=t2;
-f_21511(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k21587 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21589(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3560 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-
-/* k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21511,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21514,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_length(((C_word*)t0)[2]);
-t4=C_eqp(C_fix(1),t3);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21541,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3562 ##sys#print */
-t6=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[1025],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21553,a[2]=t6,a[3]=((C_word)li780),tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_21553(t8,t2,((C_word*)t0)[2]);}}
-
-/* loop4112 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21553(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21553,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21571,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21565,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3567 ##sys#print */
-t6=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k21563 in loop4112 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3568 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,*((C_word*)lf[431]+1));}
-
-/* k21569 in loop4112 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21571(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_21553(t3,((C_word*)t0)[2],t2);}
-
-/* k21539 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[3],C_fix(0));
-/* library.scm: 3563 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[2],t2,C_SCHEME_TRUE,*((C_word*)lf[431]+1));}
-
-/* k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21514,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21517,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3570 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-
-/* k21515 in k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21517(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21517,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21520,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3571 print-call-chain */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[431]+1));}
-
-/* k21518 in k21515 in k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21520,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21526,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(*((C_word*)lf[742]+1))){
-/* library.scm: 3572 ##sys#symbol-has-toplevel-binding? */
-t3=*((C_word*)lf[889]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[1024]);}
-else{
-t3=t2;
-f_21526(2,t3,C_SCHEME_FALSE);}}
-
-/* k21524 in k21518 in k21515 in k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21526,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21529,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3573 repl */
-t3=*((C_word*)lf[1024]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=C_halt(C_SCHEME_FALSE);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k21527 in k21524 in k21518 in k21515 in k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21529,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3574 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-
-/* k21530 in k21527 in k21524 in k21518 in k21515 in k21512 in k21509 in k21506 in k21497 in a21494 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_exit_runtime(C_fix((C_word)EX_SOFTWARE));
-t3=C_halt(C_SCHEME_FALSE);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17258,2,t0,t1);}
-t2=C_mutate((C_word*)lf[743]+1 /* (set! error-handler ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17262,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21486,a[2]=((C_word)li779),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3585 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a21485 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21486,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21490,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3587 ##sys#exit-handler */
-t3=*((C_word*)lf[5]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k21488 in a21485 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g41594160 */
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_fix((C_word)EX_SOFTWARE));}
-
-/* k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17262(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17262,2,t0,t1);}
-t2=C_mutate((C_word*)lf[744]+1 /* (set! reset-handler ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17266,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21467,a[2]=((C_word)li778),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3590 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a21466 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21467(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_21467r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_21467r(t0,t1,t2);}}
-
-static void C_ccall f_21467r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21471,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3592 ##sys#cleanup-before-exit */
-t4=*((C_word*)lf[749]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k21469 in a21466 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21471(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(C_i_nullp(((C_word*)t0)[3]))){
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_exit_runtime(C_fix(0)));}
-else{
-t2=C_i_car(((C_word*)t0)[3]);
-t3=C_i_check_exact(t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_exit_runtime(t2));}}
-
-/* k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17266(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17266,2,t0,t1);}
-t2=C_mutate((C_word*)lf[745]+1 /* (set! exit-handler ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17270,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21461,a[2]=((C_word)li777),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3602 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* a21460 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21461,2,t0,t1);}
-/* library.scm: 3604 ##sys#cleanup-before-exit */
-t2=*((C_word*)lf[749]+1);
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-
-/* k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17270,2,t0,t1);}
-t2=C_mutate((C_word*)lf[746]+1 /* (set! implicit-exit-handler ...) */,t1);
-t3=C_mutate((C_word*)lf[5]+1 /* (set! exit-handler ...) */,*((C_word*)lf[745]+1));
-t4=C_mutate((C_word*)lf[7]+1 /* (set! reset-handler ...) */,*((C_word*)lf[744]+1));
-t5=C_mutate((C_word*)lf[747]+1 /* (set! implicit-exit-handler ...) */,*((C_word*)lf[746]+1));
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17277,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3610 make-parameter */
-t7=*((C_word*)lf[497]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,C_SCHEME_TRUE);}
-
-/* k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word ab[211],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17277,2,t0,t1);}
-t2=C_mutate((C_word*)lf[748]+1 /* (set! force-finalizers ...) */,t1);
-t3=*((C_word*)lf[748]+1);
-t4=C_mutate((C_word*)lf[749]+1 /* (set! cleanup-before-exit ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17279,a[2]=t3,a[3]=((C_word)li597),tmp=(C_word)a,a+=4,tmp));
-t5=C_mutate((C_word*)lf[752]+1 /* (set! on-exit ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17300,a[2]=((C_word)li599),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[9]+1 /* (set! signal-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17312,a[2]=((C_word)li601),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[754]+1 /* (set! abort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17535,a[2]=((C_word)li602),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[788]+1 /* (set! signal ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17552,a[2]=((C_word)li603),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[789]+1 /* (set! abort ...) */,*((C_word*)lf[754]+1));
-t10=C_mutate((C_word*)lf[790]+1 /* (set! signal ...) */,*((C_word*)lf[788]+1));
-t11=C_set_block_item(lf[791] /* last-exception */,0,C_SCHEME_FALSE);
-t12=*((C_word*)lf[172]+1);
-t13=C_mutate((C_word*)lf[787]+1 /* (set! current-exception-handler ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17561,a[2]=t12,a[3]=((C_word)li604),tmp=(C_word)a,a+=4,tmp));
-t14=C_mutate((C_word*)lf[811]+1 /* (set! with-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17721,a[2]=((C_word)li607),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[812]+1 /* (set! current-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17735,a[2]=((C_word)li608),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[813]+1 /* (set! make-property-condition ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17738,a[2]=((C_word)li610),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[814]+1 /* (set! make-composite-condition ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17788,a[2]=((C_word)li614),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[816]+1 /* (set! condition? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17924,a[2]=((C_word)li615),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate((C_word*)lf[817]+1 /* (set! condition-predicate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17930,a[2]=((C_word)li617),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[818]+1 /* (set! condition-property-accessor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17948,a[2]=((C_word)li619),tmp=(C_word)a,a+=3,tmp));
-t21=*((C_word*)lf[818]+1);
-t22=C_mutate((C_word*)lf[820]+1 /* (set! get-condition-property ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17994,a[2]=t21,a[3]=((C_word)li620),tmp=(C_word)a,a+=4,tmp));
-t23=*((C_word*)lf[172]+1);
-t24=C_mutate((C_word*)lf[72]+1 /* (set! error-hook ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18003,a[2]=t23,a[3]=((C_word)li621),tmp=(C_word)a,a+=4,tmp));
-t25=C_mutate((C_word*)lf[860]+1 /* (set! structure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18389,a[2]=((C_word)li622),tmp=(C_word)a,a+=3,tmp));
-t26=C_mutate((C_word*)lf[861]+1 /* (set! generic-structure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18392,a[2]=((C_word)li623),tmp=(C_word)a,a+=3,tmp));
-t27=C_mutate((C_word*)lf[862]+1 /* (set! slot ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18395,a[2]=((C_word)li624),tmp=(C_word)a,a+=3,tmp));
-t28=C_mutate((C_word*)lf[863]+1 /* (set! size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18398,a[2]=((C_word)li625),tmp=(C_word)a,a+=3,tmp));
-t29=C_mutate((C_word*)lf[864]+1 /* (set! make-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_pointer,a[2]=((C_word)li626),tmp=(C_word)a,a+=3,tmp));
-t30=C_mutate((C_word*)lf[865]+1 /* (set! make-tagged-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_tagged_pointer,a[2]=((C_word)li627),tmp=(C_word)a,a+=3,tmp));
-t31=C_mutate((C_word*)lf[866]+1 /* (set! pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18403,a[2]=((C_word)li628),tmp=(C_word)a,a+=3,tmp));
-t32=C_mutate((C_word*)lf[867]+1 /* (set! set-pointer-address! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18406,a[2]=((C_word)li629),tmp=(C_word)a,a+=3,tmp));
-t33=C_mutate((C_word*)lf[868]+1 /* (set! bytevector? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18409,a[2]=((C_word)li630),tmp=(C_word)a,a+=3,tmp));
-t34=C_mutate((C_word*)lf[869]+1 /* (set! string->pbytevector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18412,a[2]=((C_word)li631),tmp=(C_word)a,a+=3,tmp));
-t35=C_mutate((C_word*)lf[870]+1 /* (set! permanent? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18415,a[2]=((C_word)li632),tmp=(C_word)a,a+=3,tmp));
-t36=C_mutate((C_word*)lf[871]+1 /* (set! block-address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18418,a[2]=((C_word)li633),tmp=(C_word)a,a+=3,tmp));
-t37=C_mutate((C_word*)lf[872]+1 /* (set! locative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18421,a[2]=((C_word)li634),tmp=(C_word)a,a+=3,tmp));
-t38=C_mutate((C_word*)lf[873]+1 /* (set! null-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18424,a[2]=((C_word)li635),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[874]+1 /* (set! null-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18430,a[2]=((C_word)li636),tmp=(C_word)a,a+=3,tmp));
-t40=C_mutate((C_word*)lf[875]+1 /* (set! address->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18440,a[2]=((C_word)li637),tmp=(C_word)a,a+=3,tmp));
-t41=C_mutate((C_word*)lf[681]+1 /* (set! pointer->address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18446,a[2]=((C_word)li638),tmp=(C_word)a,a+=3,tmp));
-t42=C_mutate((C_word*)lf[86]+1 /* (set! make-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18453,a[2]=((C_word)li639),tmp=(C_word)a,a+=3,tmp));
-t43=C_mutate((C_word*)lf[876]+1 /* (set! peek-signed-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_peek_signed_integer,a[2]=((C_word)li640),tmp=(C_word)a,a+=3,tmp));
-t44=C_mutate((C_word*)lf[444]+1 /* (set! peek-unsigned-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_peek_unsigned_integer,a[2]=((C_word)li641),tmp=(C_word)a,a+=3,tmp));
-t45=C_mutate((C_word*)lf[877]+1 /* (set! peek-fixnum ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18465,a[2]=((C_word)li642),tmp=(C_word)a,a+=3,tmp));
-t46=C_mutate((C_word*)lf[878]+1 /* (set! peek-byte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18468,a[2]=((C_word)li643),tmp=(C_word)a,a+=3,tmp));
-t47=C_mutate((C_word*)lf[879]+1 /* (set! vector->structure! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18471,a[2]=((C_word)li644),tmp=(C_word)a,a+=3,tmp));
-t48=C_mutate((C_word*)lf[880]+1 /* (set! peek-double ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18474,a[2]=((C_word)li645),tmp=(C_word)a,a+=3,tmp));
-t49=C_mutate((C_word*)lf[463]+1 /* (set! peek-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18477,a[2]=((C_word)li646),tmp=(C_word)a,a+=3,tmp));
-t50=C_mutate((C_word*)lf[729]+1 /* (set! peek-nonnull-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18493,a[2]=((C_word)li647),tmp=(C_word)a,a+=3,tmp));
-t51=C_mutate((C_word*)lf[881]+1 /* (set! peek-and-free-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18499,a[2]=((C_word)li648),tmp=(C_word)a,a+=3,tmp));
-t52=C_mutate((C_word*)lf[882]+1 /* (set! peek-and-free-nonnull-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18515,a[2]=((C_word)li649),tmp=(C_word)a,a+=3,tmp));
-t53=C_mutate((C_word*)lf[883]+1 /* (set! poke-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18521,a[2]=((C_word)li650),tmp=(C_word)a,a+=3,tmp));
-t54=C_mutate((C_word*)lf[884]+1 /* (set! poke-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18528,a[2]=((C_word)li651),tmp=(C_word)a,a+=3,tmp));
-t55=C_mutate((C_word*)lf[885]+1 /* (set! poke-double ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18531,a[2]=((C_word)li652),tmp=(C_word)a,a+=3,tmp));
-t56=C_mutate((C_word*)lf[886]+1 /* (set! peek-c-string-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18551,a[2]=((C_word)li654),tmp=(C_word)a,a+=3,tmp));
-t57=C_mutate((C_word*)lf[887]+1 /* (set! peek-and-free-c-string-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18612,a[2]=((C_word)li656),tmp=(C_word)a,a+=3,tmp));
-t58=C_mutate((C_word*)lf[888]+1 /* (set! vector->closure! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18650,a[2]=((C_word)li657),tmp=(C_word)a,a+=3,tmp));
-t59=C_mutate((C_word*)lf[889]+1 /* (set! symbol-has-toplevel-binding? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18653,a[2]=((C_word)li658),tmp=(C_word)a,a+=3,tmp));
-t60=C_mutate((C_word*)lf[667]+1 /* (set! copy-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18671,a[2]=((C_word)li659),tmp=(C_word)a,a+=3,tmp));
-t61=C_mutate((C_word*)lf[890]+1 /* (set! copy-words ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18678,a[2]=((C_word)li660),tmp=(C_word)a,a+=3,tmp));
-t62=C_mutate((C_word*)lf[891]+1 /* (set! compare-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18685,a[2]=((C_word)li661),tmp=(C_word)a,a+=3,tmp));
-t63=C_mutate((C_word*)lf[892]+1 /* (set! zap-strings ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18688,a[2]=((C_word)li662),tmp=(C_word)a,a+=3,tmp));
-t64=C_mutate((C_word*)lf[893]+1 /* (set! block-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18691,a[2]=((C_word)li663),tmp=(C_word)a,a+=3,tmp));
-t65=C_mutate((C_word*)lf[894]+1 /* (set! foreign-char-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18697,a[2]=((C_word)li664),tmp=(C_word)a,a+=3,tmp));
-t66=C_mutate((C_word*)lf[895]+1 /* (set! foreign-fixnum-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18700,a[2]=((C_word)li665),tmp=(C_word)a,a+=3,tmp));
-t67=C_mutate((C_word*)lf[896]+1 /* (set! foreign-flonum-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18703,a[2]=((C_word)li666),tmp=(C_word)a,a+=3,tmp));
-t68=C_mutate((C_word*)lf[897]+1 /* (set! foreign-block-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18706,a[2]=((C_word)li667),tmp=(C_word)a,a+=3,tmp));
-t69=C_mutate((C_word*)lf[898]+1 /* (set! foreign-number-vector-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18709,a[2]=((C_word)li668),tmp=(C_word)a,a+=3,tmp));
-t70=C_mutate((C_word*)lf[899]+1 /* (set! foreign-string-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18712,a[2]=((C_word)li669),tmp=(C_word)a,a+=3,tmp));
-t71=C_mutate((C_word*)lf[900]+1 /* (set! foreign-symbol-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18715,a[2]=((C_word)li670),tmp=(C_word)a,a+=3,tmp));
-t72=C_mutate((C_word*)lf[901]+1 /* (set! foreign-pointer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18718,a[2]=((C_word)li671),tmp=(C_word)a,a+=3,tmp));
-t73=C_mutate((C_word*)lf[902]+1 /* (set! foreign-tagged-pointer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18721,a[2]=((C_word)li672),tmp=(C_word)a,a+=3,tmp));
-t74=C_mutate((C_word*)lf[903]+1 /* (set! foreign-integer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18724,a[2]=((C_word)li673),tmp=(C_word)a,a+=3,tmp));
-t75=C_mutate((C_word*)lf[904]+1 /* (set! foreign-unsigned-integer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18727,a[2]=((C_word)li674),tmp=(C_word)a,a+=3,tmp));
-t76=C_set_block_item(lf[905] /* default-thread-quantum */,0,C_fix(10000));
-t77=C_mutate((C_word*)lf[906]+1 /* (set! default-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18731,a[2]=((C_word)li675),tmp=(C_word)a,a+=3,tmp));
-t78=C_mutate((C_word*)lf[908]+1 /* (set! make-thread ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18734,a[2]=((C_word)li676),tmp=(C_word)a,a+=3,tmp));
-t79=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18754,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4042 ##sys#make-thread */
-t80=*((C_word*)lf[908]+1);
-((C_proc6)(void*)(*((C_word*)t80+1)))(6,t80,t79,C_SCHEME_FALSE,lf[1022],lf[1023],*((C_word*)lf[905]+1));}
-
-/* k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18754(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word ab[56],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18754,2,t0,t1);}
-t2=C_mutate((C_word*)lf[741]+1 /* (set! primordial-thread ...) */,t1);
-t3=C_mutate((C_word*)lf[730]+1 /* (set! current-thread ...) */,*((C_word*)lf[741]+1));
-t4=C_mutate((C_word*)lf[909]+1 /* (set! make-mutex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18757,a[2]=((C_word)li677),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[911]+1 /* (set! abandon-mutexes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18763,a[2]=((C_word)li679),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[912]+1 /* (set! schedule ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18815,a[2]=((C_word)li680),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[913]+1 /* (set! thread-yield! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18824,a[2]=((C_word)li683),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[914]+1 /* (set! context-switch ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_context_switch,a[2]=((C_word)li684),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[915]+1 /* (set! interrupt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18846,a[2]=((C_word)li685),tmp=(C_word)a,a+=3,tmp));
-t10=C_fix(0);
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_mutate((C_word*)lf[82]+1 /* (set! update-errno ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18865,a[2]=t11,a[3]=((C_word)li686),tmp=(C_word)a,a+=4,tmp));
-t13=C_mutate((C_word*)lf[918]+1 /* (set! errno ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18869,a[2]=t11,a[3]=((C_word)li687),tmp=(C_word)a,a+=4,tmp));
-t14=*((C_word*)lf[593]+1);
-t15=*((C_word*)lf[673]+1);
-t16=*((C_word*)lf[675]+1);
-t17=*((C_word*)lf[135]+1);
-t18=*((C_word*)lf[505]+1);
-t19=*((C_word*)lf[608]+1);
-t20=C_SCHEME_UNDEFINED;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_SCHEME_UNDEFINED;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18891,a[2]=t15,a[3]=t16,a[4]=((C_word)li689),tmp=(C_word)a,a+=5,tmp));
-t25=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18938,a[2]=t18,a[3]=((C_word)li691),tmp=(C_word)a,a+=4,tmp));
-t26=C_mutate((C_word*)lf[593]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18983,a[2]=t14,a[3]=t23,a[4]=t15,a[5]=t19,a[6]=t21,a[7]=t16,a[8]=((C_word)li696),tmp=(C_word)a,a+=9,tmp));
-t27=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19439,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21444,a[2]=t27,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4223 argv */
-t29=*((C_word*)lf[22]+1);
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,t28);}
-
-/* k21442 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21444,2,t0,t1);}
-t2=C_i_pairp(t1);
-t3=(C_truep(t2)?C_i_car(t1):lf[1021]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21449,a[2]=((C_word)li776),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4222 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t3,t4);}
-
-/* a21448 in k21442 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21449(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21449,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[928]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-
-/* k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19439,2,t0,t1);}
-t2=C_mutate((C_word*)lf[928]+1 /* (set! program-name ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19443,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21376,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4231 argv */
-t5=*((C_word*)lf[22]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21376(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21376,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21379,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_pairp(t1))){
-t3=C_slot(t1,C_fix(1));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21397,a[2]=t5,a[3]=((C_word)li774),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_21397(t7,t2,t3);}
-else{
-t3=t1;
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f25451,a[2]=((C_word)li775),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4230 make-parameter */
-t5=*((C_word*)lf[497]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t3,t4);}}
-
-/* f25451 in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f25451(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f25451,3,t0,t1,t2);}
-t3=C_i_check_list_2(t2,lf[929]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-
-/* loop in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21397(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21397,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21416,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t6=C_block_size(t3);
-if(C_truep(C_fixnum_greater_or_equal_p(t6,C_fix(3)))){
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21436,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4239 ##sys#substring */
-t8=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,t3,C_fix(0),C_fix(2));}
-else{
-t7=t5;
-f_21416(t7,C_SCHEME_FALSE);}}}
-
-/* k21434 in loop in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_21416(t2,C_i_string_equal_p(lf[1020],t1));}
-
-/* k21414 in loop in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21416(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21416,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* library.scm: 4240 loop */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_21397(t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4241 loop */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_21397(t3,t2,((C_word*)t0)[3]);}}
-
-/* k21424 in k21414 in loop in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21426,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k21377 in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21379,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21381,a[2]=((C_word)li773),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4230 make-parameter */
-t3=*((C_word*)lf[497]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
-
-/* a21380 in k21377 in k21374 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21381(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21381,3,t0,t1,t2);}
-t3=C_i_check_list_2(t2,lf[929]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-
-/* k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19443,2,t0,t1);}
-t2=C_mutate((C_word*)lf[929]+1 /* (set! command-line-arguments ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19447,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
-t5=C_fixnum_plus(t4,C_fix(1));
-/* library.scm: 4253 ##sys#make-vector */
-t6=*((C_word*)lf[361]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t5,C_SCHEME_UNDEFINED);}
-
-/* k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word ab[38],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19447,2,t0,t1);}
-t2=C_mutate((C_word*)lf[916]+1 /* (set! pending-finalizers ...) */,t1);
-t3=C_i_set_i_slot(*((C_word*)lf[916]+1),C_fix(0),C_fix(0));
-t4=C_mutate((C_word*)lf[930]+1 /* (set! set-finalizer! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_register_finalizer,a[2]=((C_word)li697),tmp=(C_word)a,a+=3,tmp));
-t5=*((C_word*)lf[609]+1);
-t6=C_mutate((C_word*)lf[931]+1 /* (set! set-finalizer! ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19453,a[2]=t5,a[3]=((C_word)li698),tmp=(C_word)a,a+=4,tmp));
-t7=*((C_word*)lf[368]+1);
-t8=*((C_word*)lf[609]+1);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_mutate((C_word*)lf[917]+1 /* (set! run-pending-finalizers ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19517,a[2]=t8,a[3]=t7,a[4]=t10,a[5]=((C_word)li700),tmp=(C_word)a,a+=6,tmp));
-t12=C_mutate((C_word*)lf[750]+1 /* (set! force-finalizers ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19600,a[2]=((C_word)li702),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[941]+1 /* (set! gc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19628,a[2]=((C_word)li703),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[367]+1 /* (set! list->vector ...) */,*((C_word*)lf[364]+1));
-t15=C_mutate((C_word*)lf[942]+1 /* (set! list ...) */,*((C_word*)lf[127]+1));
-t16=C_mutate((C_word*)lf[943]+1 /* (set! cons ...) */,*((C_word*)lf[93]+1));
-t17=C_mutate((C_word*)lf[815]+1 /* (set! append ...) */,*((C_word*)lf[134]+1));
-t18=C_mutate((C_word*)lf[944]+1 /* (set! vector ...) */,*((C_word*)lf[366]+1));
-t19=C_mutate((C_word*)lf[945]+1 /* (set! apply ...) */,*((C_word*)lf[396]+1));
-t20=C_mutate((C_word*)lf[946]+1 /* (set! values ...) */,*((C_word*)lf[401]+1));
-t21=C_mutate((C_word*)lf[947]+1 /* (set! equal? ...) */,*((C_word*)lf[91]+1));
-t22=C_mutate((C_word*)lf[948]+1 /* (set! car ...) */,*((C_word*)lf[94]+1));
-t23=C_mutate((C_word*)lf[949]+1 /* (set! cdr ...) */,*((C_word*)lf[95]+1));
-t24=C_mutate((C_word*)lf[950]+1 /* (set! pair? ...) */,*((C_word*)lf[92]+1));
-t25=C_mutate((C_word*)lf[951]+1 /* (set! vector? ...) */,*((C_word*)lf[357]+1));
-t26=C_mutate((C_word*)lf[952]+1 /* (set! vector->list ...) */,*((C_word*)lf[365]+1));
-t27=C_mutate((C_word*)lf[953]+1 /* (set! vector-length ...) */,*((C_word*)lf[358]+1));
-t28=C_mutate((C_word*)lf[954]+1 /* (set! vector-ref ...) */,*((C_word*)lf[359]+1));
-t29=C_mutate((C_word*)lf[955]+1 /* (set! >= ...) */,*((C_word*)lf[251]+1));
-t30=C_mutate((C_word*)lf[956]+1 /* (set! = ...) */,*((C_word*)lf[248]+1));
-t31=C_mutate((C_word*)lf[957]+1 /* (set! + ...) */,*((C_word*)lf[246]+1));
-t32=C_mutate((C_word*)lf[958]+1 /* (set! eq? ...) */,*((C_word*)lf[89]+1));
-t33=C_mutate((C_word*)lf[959]+1 /* (set! eqv? ...) */,*((C_word*)lf[90]+1));
-t34=C_mutate((C_word*)lf[960]+1 /* (set! list? ...) */,*((C_word*)lf[142]+1));
-t35=C_mutate((C_word*)lf[961]+1 /* (set! null? ...) */,*((C_word*)lf[126]+1));
-t36=C_mutate((C_word*)lf[962]+1 /* (set! map-n ...) */,*((C_word*)lf[407]+1));
-t37=C_mutate((C_word*)lf[963]+1 /* (set! list-ref ...) */,*((C_word*)lf[130]+1));
-t38=C_mutate((C_word*)lf[964]+1 /* (set! make-promise ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19673,a[2]=((C_word)li706),tmp=(C_word)a,a+=3,tmp));
-t39=C_mutate((C_word*)lf[965]+1 /* (set! promise? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19705,a[2]=((C_word)li707),tmp=(C_word)a,a+=3,tmp));
-t40=*((C_word*)lf[671]+1);
-t41=C_mutate((C_word*)lf[966]+1 /* (set! read-from-string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19711,a[2]=t40,a[3]=((C_word)li708),tmp=(C_word)a,a+=4,tmp));
-t42=*((C_word*)lf[608]+1);
-t43=*((C_word*)lf[605]+1);
-t44=*((C_word*)lf[606]+1);
-t45=*((C_word*)lf[172]+1);
-t46=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19722,a[2]=((C_word*)t0)[2],a[3]=t45,a[4]=t42,a[5]=t44,a[6]=t43,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4383 condition-property-accessor */
-t47=*((C_word*)lf[818]+1);
-((C_proc5)(void*)(*((C_word*)t47+1)))(5,t47,t46,lf[794],lf[1019],C_SCHEME_FALSE);}
-
-/* k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19722(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19722,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19725,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4384 condition-property-accessor */
-t3=*((C_word*)lf[818]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[794],lf[580],C_SCHEME_FALSE);}
-
-/* k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19725,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19728,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 4385 condition-property-accessor */
-t3=*((C_word*)lf[818]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[794],lf[1018],C_SCHEME_FALSE);}
-
-/* k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[63],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19728,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19729,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word)li712),tmp=(C_word)a,a+=5,tmp);
-t3=C_mutate((C_word*)lf[967]+1 /* (set! print-error-message ...) */,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19771,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word)li717),tmp=(C_word)a,a+=10,tmp));
-t4=C_mutate((C_word*)lf[978]+1 /* (set! make-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19969,a[2]=((C_word)li718),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[989]+1 /* (set! find-symbol-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20191,a[2]=((C_word)li719),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[990]+1 /* (set! import ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20214,a[2]=((C_word)li727),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[994]+1 /* (set! namespace-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20437,a[2]=((C_word)li728),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[997]+1 /* (set! walk-namespace ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20489,a[2]=((C_word)li730),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[1000]+1 /* (set! memory-statistics ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20540,a[2]=((C_word)li731),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[1001]+1 /* (set! decorate-lambda ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20563,a[2]=((C_word)li734),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[1002]+1 /* (set! lambda-decoration ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20640,a[2]=((C_word)li736),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[652]+1 /* (set! lambda-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20679,a[2]=((C_word)li738),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[640]+1 /* (set! lambda-info->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20698,a[2]=((C_word)li739),tmp=(C_word)a,a+=3,tmp));
-t14=*((C_word*)lf[671]+1);
-t15=C_mutate((C_word*)lf[1003]+1 /* (set! procedure-information ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20707,a[2]=t14,a[3]=((C_word)li740),tmp=(C_word)a,a+=4,tmp));
-t16=C_a_i_vector(&a,1,lf[1004]);
-t17=C_mutate(&lf[1005] /* (set! setter-tag ...) */,t16);
-t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20736,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t19=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21242,a[2]=((C_word)li767),tmp=(C_word)a,a+=3,tmp);
-t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21282,a[2]=((C_word)li768),tmp=(C_word)a,a+=3,tmp);
-t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21298,a[2]=((C_word)li772),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4632 ##sys#decorate-lambda */
-t22=*((C_word*)lf[1001]+1);
-((C_proc5)(void*)(*((C_word*)t22+1)))(5,t22,t18,t19,t20,t21);}
-
-/* a21297 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21298(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21298,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21308,a[2]=((C_word)li771),tmp=(C_word)a,a+=3,tmp);
-t5=C_a_i_cons(&a,2,lf[1005],t4);
-t6=C_i_setslot(t2,t3,t5);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t2);}
-
-/* a21307 in a21297 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21308(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21308,4,t0,t1,t2,t3);}
-if(C_truep(C_i_closurep(t2))){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21318,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21337,a[2]=((C_word)li769),tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21353,a[2]=t3,a[3]=((C_word)li770),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4646 ##sys#decorate-lambda */
-t7=*((C_word*)lf[1001]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t4,t2,t5,t6);}
-else{
-/* library.scm: 4653 error */
-t4=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[1017],t2);}}
-
-/* a21352 in a21307 in a21297 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21353(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21353,4,t0,t1,t2,t3);}
-t4=C_a_i_cons(&a,2,lf[1005],((C_word*)t0)[2]);
-t5=C_i_setslot(t2,t3,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-
-/* a21336 in a21307 in a21297 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21337(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21337,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[1005],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k21316 in a21307 in a21297 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21318(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21318,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[3],t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}
-else{
-t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t4=C_a_i_list(&a,1,t3);
-/* library.scm: 4652 ##sys#become! */
-t5=*((C_word*)lf[49]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,((C_word*)t0)[2],t4);}}
-
-/* a21281 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21282(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21282,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[1005],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* a21241 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21242(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21242,3,t0,t1,t2);}
-if(C_truep(C_i_closurep(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21258,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21266,a[2]=((C_word)li766),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4635 ##sys#lambda-decoration */
-t5=*((C_word*)lf[1002]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t2,t4);}
-else{
-/* library.scm: 4637 ##sys#error */
-t3=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,lf[1004],lf[1016],t2);}}
-
-/* a21265 in a21241 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21266(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21266,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[1005],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k21256 in a21241 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_slot(t1,C_fix(1));
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* library.scm: 4637 ##sys#error */
-t3=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],lf[1004],lf[1016],((C_word*)t0)[2]);}}
-else{
-/* library.scm: 4637 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[1004],lf[1016],((C_word*)t0)[2]);}}
-
-/* k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20736,2,t0,t1);}
-t2=C_mutate((C_word*)lf[1006]+1 /* (set! setter ...) */,t1);
-t3=C_mutate((C_word*)lf[1004]+1 /* (set! setter ...) */,*((C_word*)lf[1006]+1));
-t4=C_mutate((C_word*)lf[1007]+1 /* (set! getter-with-setter ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20739,a[2]=((C_word)li743),tmp=(C_word)a,a+=3,tmp));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20773,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4666 getter-with-setter */
-t6=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,*((C_word*)lf[94]+1),*((C_word*)lf[96]+1));}
-
-/* k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20773(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20773,2,t0,t1);}
-t2=C_mutate((C_word*)lf[94]+1 /* (set! car ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20777,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4667 getter-with-setter */
-t4=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[95]+1),*((C_word*)lf[97]+1));}
-
-/* k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20777,2,t0,t1);}
-t2=C_mutate((C_word*)lf[95]+1 /* (set! cdr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20781,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21232,a[2]=((C_word)li765),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4668 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[102]+1),t4);}
-
-/* a21231 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21232(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21232,4,t0,t1,t2,t3);}
-t4=C_i_car(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_car(t4,t3));}
-
-/* k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20781(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20781,2,t0,t1);}
-t2=C_mutate((C_word*)lf[102]+1 /* (set! caar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20785,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21222,a[2]=((C_word)li764),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4669 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[98]+1),t4);}
-
-/* a21221 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21222(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21222,4,t0,t1,t2,t3);}
-t4=C_i_cdr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_car(t4,t3));}
-
-/* k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20785,2,t0,t1);}
-t2=C_mutate((C_word*)lf[98]+1 /* (set! cadr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20789,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21212,a[2]=((C_word)li763),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4670 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[103]+1),t4);}
-
-/* a21211 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21212(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21212,4,t0,t1,t2,t3);}
-t4=C_i_car(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_cdr(t4,t3));}
-
-/* k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20789(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20789,2,t0,t1);}
-t2=C_mutate((C_word*)lf[103]+1 /* (set! cdar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20793,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21202,a[2]=((C_word)li762),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4671 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[104]+1),t4);}
-
-/* a21201 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21202(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21202,4,t0,t1,t2,t3);}
-t4=C_i_cdr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_cdr(t4,t3));}
-
-/* k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20793,2,t0,t1);}
-t2=C_mutate((C_word*)lf[104]+1 /* (set! cddr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20797,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21192,a[2]=((C_word)li761),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4672 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[105]+1),t4);}
-
-/* a21191 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21192(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21192,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21200,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4672 caar */
-t5=*((C_word*)lf[102]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k21198 in a21191 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_set_car(t1,((C_word*)t0)[2]));}
-
-/* k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20797(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20797,2,t0,t1);}
-t2=C_mutate((C_word*)lf[105]+1 /* (set! caaar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20801,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21182,a[2]=((C_word)li760),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4673 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[106]+1),t4);}
-
-/* a21181 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21182,4,t0,t1,t2,t3);}
-t4=C_i_cadr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_car(t4,t3));}
-
-/* k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20801(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20801,2,t0,t1);}
-t2=C_mutate((C_word*)lf[106]+1 /* (set! caadr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20805,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21172,a[2]=((C_word)li759),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4674 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[107]+1),t4);}
-
-/* a21171 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21172(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21172,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21180,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4674 cdar */
-t5=*((C_word*)lf[103]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k21178 in a21171 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_set_car(t1,((C_word*)t0)[2]));}
-
-/* k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20805(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20805,2,t0,t1);}
-t2=C_mutate((C_word*)lf[107]+1 /* (set! cadar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20809,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21162,a[2]=((C_word)li758),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4675 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[99]+1),t4);}
-
-/* a21161 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21162,4,t0,t1,t2,t3);}
-t4=C_i_cddr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_car(t4,t3));}
-
-/* k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20809(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20809,2,t0,t1);}
-t2=C_mutate((C_word*)lf[99]+1 /* (set! caddr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20813,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21152,a[2]=((C_word)li757),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4676 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[108]+1),t4);}
-
-/* a21151 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21152(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21152,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21160,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4676 caar */
-t5=*((C_word*)lf[102]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k21158 in a21151 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21160(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_set_cdr(t1,((C_word*)t0)[2]));}
-
-/* k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20813,2,t0,t1);}
-t2=C_mutate((C_word*)lf[108]+1 /* (set! cdaar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20817,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21142,a[2]=((C_word)li756),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4677 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[109]+1),t4);}
-
-/* a21141 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21142(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21142,4,t0,t1,t2,t3);}
-t4=C_i_cadr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_cdr(t4,t3));}
-
-/* k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20817,2,t0,t1);}
-t2=C_mutate((C_word*)lf[109]+1 /* (set! cdadr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20821,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21132,a[2]=((C_word)li755),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4678 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[110]+1),t4);}
-
-/* a21131 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21132(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21132,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21140,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4678 cdar */
-t5=*((C_word*)lf[103]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k21138 in a21131 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_set_cdr(t1,((C_word*)t0)[2]));}
-
-/* k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20821(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20821,2,t0,t1);}
-t2=C_mutate((C_word*)lf[110]+1 /* (set! cddar ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20825,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21122,a[2]=((C_word)li754),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4679 getter-with-setter */
-t5=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[111]+1),t4);}
-
-/* a21121 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21122(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21122,4,t0,t1,t2,t3);}
-t4=C_i_cddr(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_cdr(t4,t3));}
-
-/* k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20825,2,t0,t1);}
-t2=C_mutate((C_word*)lf[111]+1 /* (set! cdddr ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20829,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4680 getter-with-setter */
-t4=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[145]+1),*((C_word*)lf[146]+1));}
-
-/* k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20829(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20829,2,t0,t1);}
-t2=C_mutate((C_word*)lf[145]+1 /* (set! string-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20833,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4681 getter-with-setter */
-t4=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[359]+1),*((C_word*)lf[360]+1));}
-
-/* k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20833,2,t0,t1);}
-t2=C_mutate((C_word*)lf[359]+1 /* (set! vector-ref ...) */,t1);
-t3=C_mutate((C_word*)lf[1008]+1 /* (set! put! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20835,a[2]=((C_word)li745),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[1009]+1 /* (set! put! ...) */,*((C_word*)lf[1008]+1));
-t5=C_mutate((C_word*)lf[1010]+1 /* (set! get ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20901,a[2]=((C_word)li747),tmp=(C_word)a,a+=3,tmp));
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20975,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4703 getter-with-setter */
-t7=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,*((C_word*)lf[1010]+1),*((C_word*)lf[1009]+1));}
-
-/* k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20975,2,t0,t1);}
-t2=C_mutate((C_word*)lf[1011]+1 /* (set! get ...) */,t1);
-t3=C_mutate((C_word*)lf[1012]+1 /* (set! remprop! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20977,a[2]=((C_word)li749),tmp=(C_word)a,a+=3,tmp));
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21036,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21101,a[2]=((C_word)li752),tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21110,a[2]=((C_word)li753),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4720 getter-with-setter */
-t7=*((C_word*)lf[1007]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t4,t5,t6);}
-
-/* a21109 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21110(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21110,4,t0,t1,t2,t3);}
-t4=C_i_check_symbol_2(t2,lf[1013]);
-t5=C_i_check_list_2(t3,lf[1015]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_setslot(t2,C_fix(2),t3));}
-
-/* a21100 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21101(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21101,3,t0,t1,t2);}
-t3=C_i_check_symbol_2(t2,lf[1013]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_slot(t2,C_fix(2)));}
-
-/* k21034 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21036(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_21036,2,t0,t1);}
-t2=C_mutate((C_word*)lf[1013]+1 /* (set! symbol-plist ...) */,t1);
-t3=C_mutate((C_word*)lf[1014]+1 /* (set! get-properties ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21038,a[2]=((C_word)li751),tmp=(C_word)a,a+=3,tmp));
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* get-properties in k21034 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21038(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21038,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_i_check_symbol_2(t2,lf[1014]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21045,a[2]=t1,a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t4)[1]))){
-t7=C_a_i_list(&a,1,((C_word*)t4)[1]);
-t8=C_set_block_item(t4,0,t7);
-t9=t6;
-f_21045(t9,t8);}
-else{
-t7=t6;
-f_21045(t7,C_SCHEME_UNDEFINED);}}
-
-/* k21043 in get-properties in k21034 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21045(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21045,NULL,2,t0,t1);}
-t2=C_i_check_list_2(((C_word*)((C_word*)t0)[4])[1],lf[1014]);
-t3=C_slot(((C_word*)t0)[3],C_fix(2));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21057,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=((C_word)li750),tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_21057(t7,((C_word*)t0)[2],t3);}
-
-/* loop in k21043 in get-properties in k21034 in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21057(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-loop:
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21057,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-/* library.scm: 4736 values */
-C_values(5,0,t1,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t2,C_fix(1));
-t5=C_slot(t4,C_fix(1));
-if(C_truep(C_i_memq(t3,((C_word*)((C_word*)t0)[3])[1]))){
-t6=C_slot(t4,C_fix(0));
-/* library.scm: 4741 values */
-C_values(5,0,t1,t3,t6,t5);}
-else{
-/* library.scm: 4742 loop */
-t8=t1;
-t9=t5;
-t1=t8;
-t2=t9;
-goto loop;}}}
-
-/* remprop! in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20977(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_20977,4,t0,t1,t2,t3);}
-t4=C_i_check_symbol_2(t2,lf[1012]);
-t5=C_slot(t2,C_fix(2));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20990,a[2]=t2,a[3]=t3,a[4]=((C_word)li748),tmp=(C_word)a,a+=5,tmp);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_20990(t6,t5,C_SCHEME_FALSE));}
-
-/* loop in remprop! in k20973 in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_20990(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-loop:
-C_stack_check;
-if(C_truep(C_i_nullp(t1))){
-return(C_SCHEME_FALSE);}
-else{
-t3=C_slot(t1,C_fix(1));
-t4=C_slot(t3,C_fix(1));
-t5=C_slot(t1,C_fix(0));
-t6=C_eqp(t5,((C_word*)t0)[3]);
-if(C_truep(t6)){
-t7=(C_truep(t2)?C_i_setslot(t2,C_fix(1),t4):C_i_setslot(((C_word*)t0)[2],C_fix(2),t4));
-return(C_SCHEME_TRUE);}
-else{
-t9=t4;
-t10=t3;
-t1=t9;
-t2=t10;
-goto loop;}}}
-
-/* ##sys#get in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20901(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr4r,(void*)f_20901r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_20901r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_20901r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(8);
-t5=C_i_check_symbol_2(t2,lf[1011]);
-t6=C_slot(t2,C_fix(2));
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20914,a[2]=t8,a[3]=t3,a[4]=t4,a[5]=((C_word)li746),tmp=(C_word)a,a+=6,tmp));
-t10=((C_word*)t8)[1];
-f_20914(t10,t1,t6);}
-
-/* loop in ##sys#get in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20914(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20914,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=((C_word*)t0)[4];
-if(C_truep(C_i_nullp(t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_car(t3));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,lf[0],t3);}}}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_eqp(t3,((C_word*)t0)[3]);
-if(C_truep(t4)){
-t5=C_slot(t2,C_fix(1));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_slot(t5,C_fix(0)));}
-else{
-t5=C_slot(t2,C_fix(1));
-t6=C_slot(t5,C_fix(1));
-/* library.scm: 4701 loop */
-t11=t1;
-t12=t6;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* ##sys#put! in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20835(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[13],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_20835,5,t0,t1,t2,t3,t4);}
-t5=C_i_check_symbol_2(t2,lf[1009]);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20842,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t7=C_slot(t2,C_fix(2));
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20848,a[2]=t9,a[3]=t3,a[4]=t4,a[5]=t2,a[6]=((C_word)li744),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_20848(t11,t6,t7);}
-
-/* loop in ##sys#put! in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20848(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word *a;
-loop:
-a=C_alloc(6);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_20848,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=C_slot(((C_word*)t0)[5],C_fix(2));
-t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
-t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_setslot(((C_word*)t0)[5],C_fix(2),t5));}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_eqp(t3,((C_word*)t0)[3]);
-if(C_truep(t4)){
-t5=C_slot(t2,C_fix(1));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_setslot(t5,C_fix(0),((C_word*)t0)[4]));}
-else{
-t5=C_slot(t2,C_fix(1));
-t6=C_slot(t5,C_fix(1));
-/* library.scm: 4691 loop */
-t12=t1;
-t13=t6;
-t1=t12;
-t2=t13;
-goto loop;}}}
-
-/* k20840 in ##sys#put! in k20831 in k20827 in k20823 in k20819 in k20815 in k20811 in k20807 in k20803 in k20799 in k20795 in k20791 in k20787 in k20783 in k20779 in k20775 in k20771 in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20842(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* getter-with-setter in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_20739,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20745,a[2]=((C_word)li741),tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20761,a[2]=t3,a[3]=((C_word)li742),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4659 ##sys#decorate-lambda */
-t6=*((C_word*)lf[1001]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t1,t2,t4,t5);}
-
-/* a20760 in getter-with-setter in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20761(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_20761,4,t0,t1,t2,t3);}
-t4=C_a_i_cons(&a,2,lf[1005],((C_word*)t0)[2]);
-t5=C_i_setslot(t2,t3,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-
-/* a20744 in getter-with-setter in k20734 in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20745(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20745,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[1005],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* procedure-information in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20707(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20707,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20711,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4619 ##sys#check-closure */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[75]+1)))(4,*((C_word*)lf[75]+1),t3,t2,lf[1003]);}
-
-/* k20709 in procedure-information in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20711,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20714,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4620 ##sys#lambda-info */
-t3=*((C_word*)lf[652]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k20712 in k20709 in procedure-information in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20714(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20714,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20724,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20728,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4621 ##sys#lambda-info->string */
-t4=*((C_word*)lf[640]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k20726 in k20712 in k20709 in procedure-information in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4621 open-input-string */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k20722 in k20712 in k20709 in procedure-information in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20724(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4621 ##sys#read */
-t2=*((C_word*)lf[506]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-
-/* ##sys#lambda-info->string in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20698(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20698,3,t0,t1,t2);}
-t3=C_block_size(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20705,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4612 ##sys#make-string */
-t5=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k20703 in ##sys#lambda-info->string in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20705(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#lambda-info in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20679(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20679,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20685,a[2]=((C_word)li737),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4606 ##sys#lambda-decoration */
-t4=*((C_word*)lf[1002]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t2,t3);}
-
-/* a20684 in ##sys#lambda-info in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20685(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20685,3,t0,t1,t2);}
-if(C_truep(C_immp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=C_lambdainfop(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* ##sys#lambda-decoration in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20640(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_20640,4,t0,t1,t2,t3);}
-t4=C_block_size(t2);
-t5=C_fixnum_difference(t4,C_fix(1));
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20650,a[2]=t3,a[3]=t7,a[4]=t2,a[5]=((C_word)li735),tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_20650(t9,t1,t5);}
-
-/* loop in ##sys#lambda-decoration in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20650(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20650,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
-t3=C_slot(((C_word*)t0)[4],t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20666,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4598 pred */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k20664 in loop in ##sys#lambda-decoration in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20666(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}
-else{
-t2=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 4600 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_20650(t3,((C_word*)t0)[5],t2);}}
-
-/* ##sys#decorate-lambda in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20563(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[10],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_20563,5,t0,t1,t2,t3,t4);}
-t5=C_block_size(t2);
-t6=C_fixnum_difference(t5,C_fix(1));
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_20576,a[2]=t3,a[3]=t8,a[4]=t4,a[5]=t2,a[6]=t5,a[7]=((C_word)li733),tmp=(C_word)a,a+=8,tmp));
-t10=((C_word*)t8)[1];
-f_20576(t10,t1,t6);}
-
-/* loop in ##sys#decorate-lambda in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20576(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20576,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_zerop(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20586,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-/* library.scm: 4581 make-vector */
-t5=*((C_word*)lf[362]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-else{
-t3=C_slot(((C_word*)t0)[5],t2);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20628,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4590 pred */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}}
-
-/* k20626 in loop in ##sys#decorate-lambda in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20628(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 4591 decorator */
-t2=((C_word*)t0)[6];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t2=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 4592 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_20576(t3,((C_word*)t0)[5],t2);}}
-
-/* k20584 in loop in ##sys#decorate-lambda in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20586(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20586,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_20591,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word)li732),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_20591(t5,((C_word*)t0)[2],C_fix(1));}
-
-/* doloop5215 in k20584 in loop in ##sys#decorate-lambda in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20591(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20591,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
-t3=C_vector_to_closure(((C_word*)t0)[5]);
-t4=C_copy_pointer(((C_word*)t0)[4],((C_word*)t0)[5]);
-/* library.scm: 4586 decorator */
-t5=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t1,((C_word*)t0)[5],t2);}
-else{
-t3=C_slot(((C_word*)t0)[4],t2);
-t4=C_i_setslot(((C_word*)t0)[5],t2,t3);
-t5=C_fixnum_plus(t2,C_fix(1));
-t9=t1;
-t10=t5;
-t1=t9;
-t2=t10;
-goto loop;}}
-
-/* memory-statistics in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20540,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20544,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4569 ##sys#gc */
-t3=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_SCHEME_TRUE);}
-
-/* k20542 in memory-statistics in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20544,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20547,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4570 ##sys#memory-info */
-t3=*((C_word*)lf[31]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20545 in k20542 in memory-statistics in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20547,2,t0,t1);}
-t2=C_slot(t1,C_fix(0));
-t3=C_fixnum_difference(t2,((C_word*)t0)[3]);
-t4=C_slot(t1,C_fix(1));
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_vector(&a,3,t2,t3,t4));}
-
-/* ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20489(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_20489r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_20489r(t0,t1,t2,t3);}}
-
-static void C_ccall f_20489r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t4=C_i_pairp(t3);
-t5=(C_truep(t4)?C_i_car(t3):lf[998]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20496,a[2]=t5,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4556 ##sys#find-symbol-table */
-t7=*((C_word*)lf[989]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t5);}
-
-/* k20494 in ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20496(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20496,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_fix(-1),C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20511,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t4=t3;
-f_20511(2,t4,C_SCHEME_UNDEFINED);}
-else{
-/* library.scm: 4559 ##sys#error */
-t4=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[999],((C_word*)t0)[2]);}}
-
-/* k20509 in k20494 in ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20511(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20511,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20516,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word)li729),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_20516(t5,((C_word*)t0)[2]);}
-
-/* loop in k20509 in k20494 in ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20516(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20516,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20520,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(t3)){
-t4=C_i_foreign_pointer_argumentp(t3);
-t5=t2;
-f_20520(t5,stub5181(C_SCHEME_UNDEFINED,t4,((C_word*)t0)[2]));}
-else{
-t4=t2;
-f_20520(t4,stub5181(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,((C_word*)t0)[2]));}}
-
-/* k20518 in loop in k20509 in k20494 in ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20520(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20520,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20526,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4563 proc */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k20524 in k20518 in loop in k20509 in k20494 in ##sys#walk-namespace in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4564 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_20516(t2,((C_word*)t0)[2]);}
-
-/* ##sys#namespace-ref in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20437(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+10)){
-C_save_and_reclaim((void*)tr4r,(void*)f_20437r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_20437r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_20437r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(10);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20441,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20460,a[2]=t2,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_symbolp(t3))){
-t7=t6;
-f_20460(2,t7,C_slot(t3,C_fix(1)));}
-else{
-if(C_truep(C_i_stringp(t3))){
-t7=t3;
-t8=t6;
-f_20460(2,t8,t7);}
-else{
-/* library.scm: 4548 ##sys#signal-hook */
-t7=*((C_word*)lf[9]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[56],lf[996],t3);}}}
-
-/* k20458 in ##sys#namespace-ref in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20460(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20460,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20464,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20468,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_slot(((C_word*)t0)[2],C_fix(1));
-/* library.scm: 4549 ##sys#make-c-string */
-t5=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* k20466 in k20458 in ##sys#namespace-ref in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4549 ##sys#find-symbol-table */
-t2=*((C_word*)lf[989]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k20462 in k20458 in ##sys#namespace-ref in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-if(C_truep(t1)){
-t3=C_i_foreign_pointer_argumentp(t1);
-t4=((C_word*)t0)[2];
-f_20441(t4,stub5056(C_SCHEME_UNDEFINED,t2,t3));}
-else{
-t3=((C_word*)t0)[2];
-f_20441(t3,stub5056(C_SCHEME_UNDEFINED,t2,C_SCHEME_FALSE));}}
-
-/* k20439 in ##sys#namespace-ref in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20441(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_retrieve(t1);
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_car(((C_word*)t0)[4]));}
-else{
-/* library.scm: 4552 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],lf[995],((C_word*)t0)[3],((C_word*)t0)[2]);}}}
-
-/* ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20214(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+12)){
-C_save_and_reclaim((void*)tr3r,(void*)f_20214r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_20214r(t0,t1,t2,t3);}}
-
-static void C_ccall f_20214r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(12);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20216,a[2]=t2,a[3]=((C_word)li724),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20384,a[2]=t4,a[3]=((C_word)li725),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20389,a[2]=t5,a[3]=((C_word)li726),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-/* def-syms50875150 */
-t7=t6;
-f_20389(t7,t1);}
-else{
-t7=C_i_car(t3);
-t8=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t8))){
-/* def-prefix50885148 */
-t9=t5;
-f_20384(t9,t1,t7);}
-else{
-t9=C_i_car(t8);
-t10=C_i_cdr(t8);
-if(C_truep(C_i_nullp(t10))){
-/* body50855093 */
-t11=t4;
-f_20216(t11,t1,t7,t9);}
-else{
-/* ##sys#error */
-t11=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t1,lf[0],t10);}}}}
-
-/* def-syms5087 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20389(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20389,NULL,2,t0,t1);}
-/* def-prefix50885148 */
-t2=((C_word*)t0)[2];
-f_20384(t2,t1,C_SCHEME_END_OF_LIST);}
-
-/* def-prefix5088 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20384(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20384,NULL,3,t0,t1,t2);}
-/* body50855093 */
-t3=((C_word*)t0)[2];
-f_20216(t3,t1,t2,C_SCHEME_FALSE);}
-
-/* body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20216(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20216,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20220,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t3)){
-if(C_truep(C_i_symbolp(t3))){
-t5=t4;
-f_20220(2,t5,C_slot(t3,C_fix(1)));}
-else{
-if(C_truep(C_i_stringp(t3))){
-t5=t4;
-f_20220(2,t5,t3);}
-else{
-/* library.scm: 4510 ##sys#signal-hook */
-t5=*((C_word*)lf[9]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,lf[56],lf[993],t3);}}}
-else{
-t5=t4;
-f_20220(2,t5,C_SCHEME_FALSE);}}
-
-/* k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20220(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20220,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20223,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20361,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=C_slot(((C_word*)t0)[2],C_fix(1));
-/* library.scm: 4511 ##sys#make-c-string */
-t5=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-
-/* k20359 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4511 ##sys#find-symbol-table */
-t2=*((C_word*)lf[989]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20223,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20225,a[2]=((C_word*)t0)[5],a[3]=((C_word)li720),tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20246,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t1)){
-t4=t3;
-f_20246(2,t4,C_SCHEME_UNDEFINED);}
-else{
-/* library.scm: 4518 ##sys#error */
-t4=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[992],((C_word*)t0)[2]);}}
-
-/* k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20246,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)t0)[6]))){
-t2=C_a_i_cons(&a,2,C_fix(-1),C_SCHEME_END_OF_LIST);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20260,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word)li721),tmp=(C_word)a,a+=7,tmp));
-t6=((C_word*)t4)[1];
-f_20260(t6,((C_word*)t0)[3]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20282,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],a[6]=((C_word)li723),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_20282(t5,((C_word*)t0)[3],((C_word*)t0)[6]);}}
-
-/* loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20282(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20282,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20290,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li722),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20343,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g51285129 */
-t6=t3;
-f_20290(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k20341 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20343(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_20282(t3,((C_word*)t0)[2],t2);}
-
-/* g5128 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20290(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20290,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_20294,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=t6,a[8]=t4,tmp=(C_word)a,a+=9,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20316,a[2]=t7,a[3]=t6,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_i_pairp(t2))){
-t9=C_slot(t2,C_fix(1));
-t10=t8;
-f_20316(t10,C_i_pairp(t9));}
-else{
-t9=t8;
-f_20316(t9,C_SCHEME_FALSE);}}
-
-/* k20314 in g5128 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20316(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(C_truep(t1)){
-t2=C_slot(((C_word*)t0)[5],C_fix(0));
-t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,t2);
-t4=C_slot(((C_word*)t0)[5],C_fix(1));
-t5=C_slot(t4,C_fix(0));
-t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t5);
-t7=((C_word*)t0)[2];
-f_20294(t7,t6);}
-else{
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[5]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,((C_word*)t0)[5]);
-t4=((C_word*)t0)[2];
-f_20294(t4,t3);}}
-
-/* k20292 in g5128 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20294(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20294,NULL,2,t0,t1);}
-t2=C_slot(((C_word*)((C_word*)t0)[8])[1],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20300,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[2];
-if(C_truep(t4)){
-t5=C_i_foreign_pointer_argumentp(t4);
-t6=t3;
-f_20300(t6,stub5056(C_SCHEME_UNDEFINED,t2,t5));}
-else{
-t5=t3;
-f_20300(t5,stub5056(C_SCHEME_UNDEFINED,t2,C_SCHEME_FALSE));}}
-
-/* k20298 in k20292 in g5128 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20300(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20300,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20303,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t3=C_slot(((C_word*)((C_word*)t0)[6])[1],C_fix(1));
-/* library.scm: 4541 copy */
-t4=((C_word*)t0)[5];
-f_20225(t4,((C_word*)t0)[4],t1,t3);}
-else{
-/* library.scm: 4540 ##sys#error */
-t3=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[991],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k20301 in k20298 in k20292 in g5128 in loop5121 in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)((C_word*)t0)[5])[1],C_fix(1));
-/* library.scm: 4541 copy */
-t3=((C_word*)t0)[4];
-f_20225(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* loop in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20260(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20260,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20264,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(t3)){
-t4=C_i_foreign_pointer_argumentp(t3);
-t5=t2;
-f_20264(t5,stub5072(C_SCHEME_UNDEFINED,t4,((C_word*)t0)[2]));}
-else{
-t4=t2;
-f_20264(t4,stub5072(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,((C_word*)t0)[2]));}}
-
-/* k20262 in loop in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20264(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20264,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20270,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(t1,C_fix(1));
-/* library.scm: 4524 copy */
-t4=((C_word*)t0)[2];
-f_20225(t4,t2,t1,t3);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k20268 in k20262 in loop in k20244 in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4525 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_20260(t2,((C_word*)t0)[2]);}
-
-/* copy in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_20225(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_20225,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20229,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20240,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(((C_word*)t0)[2])){
-/* library.scm: 4515 ##sys#string-append */
-t6=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[2],t3);}
-else{
-t6=t3;
-/* library.scm: 4513 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t4,t6);}}
-
-/* k20238 in copy in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20240(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4513 ##sys#intern-symbol */
-C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* k20227 in copy in k20221 in k20218 in body5085 in ##sys#import in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20229(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[3],C_fix(0));
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_setslot(t1,C_fix(0),t2));}
-
-/* ##sys#find-symbol-table in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20191(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_20191,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(3));
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20196,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t2)){
-t5=C_i_foreign_string_argumentp(t2);
-/* ##sys#make-c-string */
-t6=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub5063(t3,C_SCHEME_FALSE));}}
-
-/* k20194 in ##sys#find-symbol-table in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,stub5063(((C_word*)t0)[2],t1));}
-
-/* ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19969(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_19969,6,t0,t1,t2,t3,t4,t5);}
-if(C_truep(C_immp(t2))){
-/* library.scm: 4434 ##sys#signal-hook */
-t6=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,lf[56],t5,lf[979],t2);}
-else{
-t6=C_i_vectorp(t2);
-t7=(C_truep(t6)?t6:C_i_pairp(t2));
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19991,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t9=C_block_size(t2);
-/* library.scm: 4436 ##sys#check-range */
-t10=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t10+1)))(6,t10,t8,t3,C_fix(0),t9,t5);}
-else{
-t8=(C_truep(C_blockp(t2))?C_bytevectorp(t2):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20004,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t10=C_block_size(t2);
-/* library.scm: 4443 ##sys#check-range */
-t11=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t9,t3,C_fix(0),t10,t5);}
-else{
-if(C_truep(C_structurep(t2))){
-t9=C_slot(t2,C_fix(0));
-t10=C_eqp(t9,lf[980]);
-if(C_truep(t10)){
-t11=C_slot(t2,C_fix(1));
-t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20029,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t11,tmp=(C_word)a,a+=6,tmp);
-t13=C_block_size(t11);
-/* library.scm: 4449 ##sys#check-range */
-t14=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t14+1)))(6,t14,t12,t3,C_fix(0),t13,t5);}
-else{
-t11=C_eqp(t9,lf[981]);
-if(C_truep(t11)){
-t12=C_slot(t2,C_fix(1));
-t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20045,a[2]=t4,a[3]=t3,a[4]=t12,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t14=C_block_size(t12);
-/* library.scm: 4453 ##sys#check-range */
-t15=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t15+1)))(6,t15,t13,t3,C_fix(0),t14,t5);}
-else{
-t12=C_eqp(t9,lf[982]);
-if(C_truep(t12)){
-t13=C_slot(t2,C_fix(1));
-t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20061,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t13,tmp=(C_word)a,a+=6,tmp);
-t15=C_block_size(t13);
-/* library.scm: 4457 ##sys#check-range */
-t16=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t16+1)))(6,t16,t14,t3,C_fix(0),t15,t5);}
-else{
-t13=C_eqp(t9,lf[983]);
-if(C_truep(t13)){
-t14=C_slot(t2,C_fix(1));
-t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20077,a[2]=t4,a[3]=t3,a[4]=t14,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t16=C_block_size(t14);
-/* library.scm: 4461 ##sys#check-range */
-t17=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t17+1)))(6,t17,t15,t3,C_fix(0),t16,t5);}
-else{
-t14=C_eqp(t9,lf[984]);
-if(C_truep(t14)){
-t15=C_slot(t2,C_fix(1));
-t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20093,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t15,tmp=(C_word)a,a+=6,tmp);
-t17=C_block_size(t15);
-/* library.scm: 4465 ##sys#check-range */
-t18=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t18+1)))(6,t18,t16,t3,C_fix(0),t17,t5);}
-else{
-t15=C_eqp(t9,lf[985]);
-if(C_truep(t15)){
-t16=C_slot(t2,C_fix(1));
-t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20109,a[2]=t4,a[3]=t3,a[4]=t16,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t18=C_block_size(t16);
-/* library.scm: 4469 ##sys#check-range */
-t19=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t19+1)))(6,t19,t17,t3,C_fix(0),t18,t5);}
-else{
-t16=C_eqp(t9,lf[986]);
-if(C_truep(t16)){
-t17=C_slot(t2,C_fix(1));
-t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20125,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t17,tmp=(C_word)a,a+=6,tmp);
-t19=C_block_size(t17);
-/* library.scm: 4473 ##sys#check-range */
-t20=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t20+1)))(6,t20,t18,t3,C_fix(0),t19,t5);}
-else{
-t17=C_eqp(t9,lf[987]);
-if(C_truep(t17)){
-t18=C_slot(t2,C_fix(1));
-t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20141,a[2]=t4,a[3]=t3,a[4]=t18,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t20=C_block_size(t18);
-/* library.scm: 4477 ##sys#check-range */
-t21=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t21+1)))(6,t21,t19,t3,C_fix(0),t20,t5);}
-else{
-t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20148,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t19=C_block_size(t2);
-t20=C_fixnum_difference(t19,C_fix(1));
-/* library.scm: 4480 ##sys#check-range */
-t21=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t21+1)))(6,t21,t18,t3,C_fix(0),t20,t5);}}}}}}}}}
-else{
-if(C_truep(C_i_stringp(t2))){
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20169,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t10=C_block_size(t2);
-/* library.scm: 4483 ##sys#check-range */
-t11=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t9,t3,C_fix(0),t10,t5);}
-else{
-/* library.scm: 4486 ##sys#signal-hook */
-t9=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t5,lf[988],t2);}}}}}}
-
-/* k20167 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20169(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20169,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20146 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20148(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20148,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_make_locative(&a,4,C_fix(0),((C_word*)t0)[3],t2,((C_word*)t0)[2]));}
-
-/* k20139 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20141(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20141,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_make_locative(&a,4,C_fix(9),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k20123 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20125(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20125,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(8),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20107 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20109(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20109,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_make_locative(&a,4,C_fix(7),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k20091 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20093,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(6),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20075 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20077,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_make_locative(&a,4,C_fix(5),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k20059 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20061,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(4),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20043 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20045(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20045,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_make_locative(&a,4,C_fix(3),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* k20027 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20029(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20029,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(2),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k20002 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_20004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_20004,2,t0,t1);}
-t2=C_a_i_make_locative(&a,4,C_fix(2),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k19989 in ##sys#make-locative in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19991,2,t0,t1);}
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_make_locative(&a,4,C_fix(0),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19771(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+19)){
-C_save_and_reclaim((void*)tr3r,(void*)f_19771r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_19771r(t0,t1,t2,t3);}}
-
-static void C_ccall f_19771r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(19);
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19773,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li714),tmp=(C_word)a,a+=11,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19916,a[2]=t4,a[3]=((C_word)li715),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19921,a[2]=t5,a[3]=((C_word)li716),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-/* def-port49555006 */
-t7=t6;
-f_19921(t7,t1);}
-else{
-t7=C_i_car(t3);
-t8=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t8))){
-/* def-header49565004 */
-t9=t5;
-f_19916(t9,t1,t7);}
-else{
-t9=C_i_car(t8);
-t10=C_i_cdr(t8);
-if(C_truep(C_i_nullp(t10))){
-/* body49534961 */
-t11=t4;
-f_19773(t11,t1,t7,t9);}
-else{
-/* ##sys#error */
-t11=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t1,lf[0],t10);}}}}
-
-/* def-port4955 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19921(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19921,NULL,2,t0,t1);}
-/* def-header49565004 */
-t2=((C_word*)t0)[2];
-f_19916(t2,t1,*((C_word*)lf[430]+1));}
-
-/* def-header4956 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19916(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19916,NULL,3,t0,t1,t2);}
-/* body49534961 */
-t3=((C_word*)t0)[2];
-f_19773(t3,t1,t2,lf[977]);}
-
-/* body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19773(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19773,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_19777,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=t2,a[11]=t1,a[12]=((C_word*)t0)[9],tmp=(C_word)a,a+=13,tmp);
-/* library.scm: 4396 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[967]);}
-
-/* k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19777,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19780,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 4397 display */
-t3=((C_word*)t0)[9];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[10]);}
-
-/* k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19780(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19780,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19786,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(C_immp(((C_word*)t0)[5]))){
-t3=t2;
-f_19786(t3,C_SCHEME_FALSE);}
-else{
-t3=C_slot(((C_word*)t0)[5],C_fix(0));
-t4=t2;
-f_19786(t4,C_eqp(lf[655],t3));}}
-
-/* k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19786(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19786,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19789,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* library.scm: 4399 errmsg */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-if(C_truep(C_i_stringp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19885,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4422 display */
-t3=((C_word*)t0)[8];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[975],((C_word*)t0)[9]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19894,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4426 display */
-t3=((C_word*)t0)[8];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[976],((C_word*)t0)[9]);}}}
-
-/* k19892 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19894(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19894,2,t0,t1);}
-t2=C_a_i_list(&a,1,((C_word*)t0)[5]);
-/* library.scm: 4427 writeargs */
-t3=((C_word*)t0)[4];
-f_19729(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* k19883 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19885,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19888,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4423 display */
-t3=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
-
-/* k19886 in k19883 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19888(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4424 newline */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19789(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19789,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19792,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19821,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[7],a[7]=((C_word)li713),tmp=(C_word)a,a+=8,tmp);
-/* g49804981 */
-t4=t3;
-f_19821(t4,t2,t1);}
-else{
-t3=C_slot(((C_word*)t0)[4],C_fix(1));
-if(C_truep(C_i_equalp(lf[972],t3))){
-/* library.scm: 4409 display */
-t4=((C_word*)t0)[7];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t2,lf[973],((C_word*)t0)[8]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19869,a[2]=((C_word*)t0)[8],a[3]=t2,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4411 display */
-t5=((C_word*)t0)[7];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t4,lf[974],((C_word*)t0)[8]);}}}
-
-/* k19867 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 4412 display */
-t3=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t3))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-
-/* g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19821(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19821,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19825,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 4401 display */
-t4=((C_word*)t0)[6];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t3,lf[971],((C_word*)t0)[5]);}
-
-/* k19823 in g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19825(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19825,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19828,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4402 errloc */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k19826 in k19823 in g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19828(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19828,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19831,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=(C_truep(t1)?C_i_symbolp(t1):C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19844,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19848,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4404 ##sys#symbol->qualified-string */
-t6=*((C_word*)lf[331]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t1);}
-else{
-/* library.scm: 4405 display */
-t4=((C_word*)t0)[6];
-((C_proc4)C_retrieve_proc(t4))(4,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* k19846 in k19826 in k19823 in g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19848(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4404 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[969],t1,lf[970]);}
-
-/* k19842 in k19826 in k19823 in g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4404 display */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k19829 in k19826 in k19823 in g4980 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19831(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4405 display */
-t2=((C_word*)t0)[5];
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19790 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19792(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19792,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19795,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4413 errargs */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k19793 in k19790 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19795,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_length(t1);
-t3=C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19807,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4416 display */
-t5=((C_word*)t0)[3];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t4,lf[968],((C_word*)t0)[4]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19813,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4419 newline */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[4]);}}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k19811 in k19793 in k19790 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4420 writeargs */
-t2=((C_word*)t0)[5];
-f_19729(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19805 in k19793 in k19790 in k19787 in k19784 in k19778 in k19775 in body4953 in print-error-message in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19807(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4417 writeargs */
-t2=((C_word*)t0)[5];
-f_19729(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19729(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19729,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19735,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word)li711),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_19735(t7,t1,t2);}
-
-/* loop4933 in writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19735(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19735,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19743,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li710),tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19759,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g49404941 */
-t6=t3;
-f_19743(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k19757 in loop4933 in writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_19735(t3,((C_word*)t0)[2],t2);}
-
-/* g4940 in loop4933 in writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19743(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19743,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19747,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19752,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word)li709),tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4390 ##sys#with-print-length-limit */
-t5=*((C_word*)lf[660]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,C_fix(80),t4);}
-
-/* a19751 in g4940 in loop4933 in writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19752(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19752,2,t0,t1);}
-/* library.scm: 4390 write */
-t2=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t2))(4,t2,t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19745 in g4940 in loop4933 in writeargs in k19726 in k19723 in k19720 in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4391 newline */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#read-from-string in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19711(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_19711,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19715,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4372 open-input-string */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k19713 in ##sys#read-from-string in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19715(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4373 read */
-t2=*((C_word*)lf[505]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* promise? in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19705(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_19705,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[77]));}
-
-/* ##sys#make-promise in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19673(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_19673,3,t0,t1,t2);}
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19679,a[2]=t2,a[3]=t6,a[4]=t4,a[5]=((C_word)li705),tmp=(C_word)a,a+=6,tmp);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,2,lf[77],t7));}
-
-/* a19678 in ##sys#make-promise in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19679(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19679,2,t0,t1);}
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-C_apply_values(3,0,t1,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19691,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li704),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4353 ##sys#call-with-values */
-C_call_with_values(4,0,t1,((C_word*)t0)[2],t2);}}
-
-/* a19690 in a19678 in ##sys#make-promise in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19691(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_19691r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_19691r(t0,t1,t2);}}
-
-static void C_ccall f_19691r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-C_apply_values(3,0,t1,((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t3=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_TRUE);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-C_apply_values(3,0,t1,((C_word*)((C_word*)t0)[2])[1]);}}
-
-/* gc in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19628(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_19628r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_19628r(t0,t1,t2);}}
-
-static void C_ccall f_19628r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-if(C_truep(C_i_pairp(t2))){
-if(C_truep(C_i_car(t2))){
-/* library.scm: 4311 ##sys#force-finalizers */
-t3=*((C_word*)lf[750]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-else{
-C_apply(4,0,t1,*((C_word*)lf[18]+1),t2);}}
-else{
-C_apply(4,0,t1,*((C_word*)lf[18]+1),t2);}}
-
-/* ##sys#force-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19600(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19600,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19606,a[2]=t3,a[3]=((C_word)li701),tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_19606(t5,t1);}
-
-/* loop in ##sys#force-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19606(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19606,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19610,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4301 ##sys#gc */
-t3=*((C_word*)lf[18]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k19608 in loop in ##sys#force-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19610(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19610,2,t0,t1);}
-t2=C_slot(*((C_word*)lf[916]+1),C_fix(0));
-if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4304 ##sys#run-pending-finalizers */
-t4=*((C_word*)lf[917]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}}
-
-/* k19617 in k19608 in loop in ##sys#force-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4305 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_19606(t2,((C_word*)t0)[2]);}
-
-/* ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19517(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_19517,3,t0,t1,t2);}
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-if(C_truep(t2)){
-/* library.scm: 4297 ##sys#context-switch */
-C_context_switch(3,0,t1,t2);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-else{
-t3=C_set_block_item(((C_word*)t0)[4],0,C_SCHEME_TRUE);
-t4=C_block_size(*((C_word*)lf[916]+1));
-t5=C_slot(*((C_word*)lf[916]+1),C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19537,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_fudge(C_fix(13)))){
-t7=C_fudge(C_fix(26));
-t8=C_fudge(C_fix(27));
-/* library.scm: 4287 print */
-t9=((C_word*)t0)[2];
-((C_proc9)C_retrieve_proc(t9))(9,t9,t6,lf[937],t5,lf[938],t7,lf[939],t8,lf[940]);}
-else{
-t7=t6;
-f_19537(2,t7,C_SCHEME_UNDEFINED);}}}
-
-/* k19535 in ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19537(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19537,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19540,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19549,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word)li699),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_19549(t6,t2,C_fix(0));}
-
-/* doloop4880 in k19535 in ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19549(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19549,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[3]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_fixnum_times(t2,C_fix(2));
-t4=C_fixnum_plus(C_fix(1),t3);
-t5=C_fixnum_plus(t4,C_fix(1));
-t6=C_slot(*((C_word*)lf[916]+1),t5);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19565,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t8=C_slot(*((C_word*)lf[916]+1),t4);
-/* g48864887 */
-t9=t6;
-((C_proc3)C_retrieve_proc(t9))(3,t9,t7,t8);}}
-
-/* k19563 in doloop4880 in k19535 in ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_19549(t3,((C_word*)t0)[2],t2);}
-
-/* k19538 in k19535 in ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19540(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19540,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19543,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4294 vector-fill! */
-t3=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,*((C_word*)lf[916]+1),C_SCHEME_UNDEFINED);}
-
-/* k19541 in k19538 in k19535 in ##sys#run-pending-finalizers in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19543(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_set_i_slot(*((C_word*)lf[916]+1),C_fix(0),C_fix(0));
-t3=C_set_block_item(((C_word*)t0)[4],0,C_SCHEME_FALSE);
-if(C_truep(((C_word*)t0)[3])){
-/* library.scm: 4297 ##sys#context-switch */
-C_context_switch(3,0,((C_word*)t0)[2],((C_word*)t0)[3]);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* set-finalizer! in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19453(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[12],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_19453,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19457,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=C_fudge(C_fix(26));
-if(C_truep(C_fixnum_greaterp(t5,C_fix((C_word)C_max_pending_finalizers)))){
-t6=C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
-if(C_truep(C_resize_pending_finalizers(t6))){
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19474,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=t4,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-t8=C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
-t9=C_fixnum_plus(t8,C_fix(1));
-/* library.scm: 4265 ##sys#grow-vector */
-f_9617(t7,*((C_word*)lf[916]+1),t9,C_SCHEME_UNDEFINED);}
-else{
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19498,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_fudge(C_fix(13)))){
-t8=C_fudge(C_fix(26));
-/* library.scm: 4273 print */
-t9=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t9))(5,t9,t7,lf[935],t8,lf[936]);}
-else{
-/* library.scm: 4274 ##sys#force-finalizers */
-t8=*((C_word*)lf[750]+1);
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t4);}}}
-else{
-/* library.scm: 4275 ##sys#set-finalizer! */
-t6=*((C_word*)lf[930]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t2,t3);}}
-
-/* k19496 in set-finalizer! in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19498(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4274 ##sys#force-finalizers */
-t2=*((C_word*)lf[750]+1);
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* k19472 in set-finalizer! in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19474(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate((C_word*)lf[916]+1 /* (set! pending-finalizers ...) */,t1);
-if(C_truep(C_fudge(C_fix(13)))){
-t3=C_fudge(C_fix(26));
-/* library.scm: 4269 print */
-t4=((C_word*)t0)[6];
-((C_proc7)C_retrieve_proc(t4))(7,t4,((C_word*)t0)[5],lf[932],t3,lf[933],C_fix((C_word)C_max_pending_finalizers),lf[934]);}
-else{
-/* library.scm: 4275 ##sys#set-finalizer! */
-t3=*((C_word*)lf[930]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k19455 in set-finalizer! in k19445 in k19441 in k19437 in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19457(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4275 ##sys#set-finalizer! */
-t2=*((C_word*)lf[930]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18983(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18983,4,t0,t1,t2,t3);}
-t4=C_eqp(C_make_character(60),t2);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18996,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* read-char/port */
-t6=*((C_word*)lf[501]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-else{
-/* library.scm: 4131 old */
-t5=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t1,t2,t3);}}
-
-/* k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18996,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 4134 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}
-
-/* k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18999(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18999,2,t0,t1);}
-switch(t1){
-case C_make_character(60):
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19008,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4136 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);
-case C_make_character(35):
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19121,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4161 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);
-default:
-/* library.scm: 4216 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[7],lf[927]);}}
-
-/* k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19121,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19124,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4162 readln */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18891(t3,t2,((C_word*)t0)[5]);}
-
-/* k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19124(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19124,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19127,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4163 open-output-string */
-t3=((C_word*)t0)[6];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19127(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19127,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19129,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t3,a[5]=((C_word)li693),tmp=(C_word)a,a+=6,tmp);
-t5=C_i_string_length(((C_word*)t0)[5]);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19143,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t4,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-t7=C_eqp(t5,C_fix(0));
-if(C_truep(t7)){
-/* library.scm: 4172 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t6,((C_word*)t0)[4],lf[925]);}
-else{
-t8=C_fixnum_difference(t5,C_fix(1));
-t9=C_i_string_ref(((C_word*)t0)[5],t8);
-t10=C_eqp(t9,C_make_character(32));
-if(C_truep(t10)){
-if(C_truep(t10)){
-/* library.scm: 4176 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t6,((C_word*)t0)[4],lf[926]);}
-else{
-t11=C_SCHEME_UNDEFINED;
-t12=t6;
-f_19143(2,t12,t11);}}
-else{
-t11=C_fixnum_difference(t5,C_fix(1));
-t12=C_i_string_ref(((C_word*)t0)[5],t11);
-t13=C_eqp(t12,C_make_character(9));
-if(C_truep(t13)){
-/* library.scm: 4176 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t6,((C_word*)t0)[4],lf[926]);}
-else{
-t14=C_SCHEME_UNDEFINED;
-t15=t6;
-f_19143(2,t15,t14);}}}}
-
-/* k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19143(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19143,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19148,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li695),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_19148(t5,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19148(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19148,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19152,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=t1,a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-/* library.scm: 4181 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
-
-/* k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19152(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19152,2,t0,t1);}
-t2=C_eqp(t1,C_make_character(10));
-t3=(C_truep(t2)?t2:C_eqp(t1,C_SCHEME_END_OF_FILE));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19164,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4184 get/clear-str */
-t5=((C_word*)t0)[4];
-f_19129(t5,t4);}
-else{
-t4=C_eqp(t1,C_make_character(35));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19322,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 4204 ##sys#peek-char-0 */
-t6=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[6]);}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19385,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4214 ##sys#write-char-0 */
-t6=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t1,((C_word*)((C_word*)t0)[3])[1]);}}}
-
-/* k19383 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19385(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4215 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_19148(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19322(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19322,2,t0,t1);}
-switch(t1){
-case C_make_character(35):
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19331,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19338,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4207 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);
-case C_make_character(123):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19355,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4209 read-escaped-sexp */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18938(t3,t2,((C_word*)t0)[4],C_SCHEME_TRUE);
-default:
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19374,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4211 read-escaped-sexp */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18938(t3,t2,((C_word*)t0)[4],C_SCHEME_FALSE);}}
-
-/* k19372 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19374,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19382,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4212 get/clear-str */
-t3=((C_word*)t0)[2];
-f_19129(t3,t2);}
-
-/* k19380 in k19372 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19382(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19382,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-/* library.scm: 4211 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_19148(t4,((C_word*)t0)[2],t3);}
-
-/* k19353 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19355,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19363,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4210 get/clear-str */
-t3=((C_word*)t0)[2];
-f_19129(t3,t2);}
-
-/* k19361 in k19353 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19363,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
-/* library.scm: 4209 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_19148(t4,((C_word*)t0)[2],t3);}
-
-/* k19336 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4207 ##sys#write-char-0 */
-t2=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k19329 in k19320 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4208 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_19148(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19164,2,t0,t1);}
-t2=C_eofp(((C_word*)t0)[7]);
-t3=(C_truep(t2)?t2:C_i_string_equal_p(((C_word*)t0)[6],t1));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19176,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_eofp(((C_word*)t0)[7]))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19299,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-t6=((C_word*)t0)[6];
-t7=C_a_i_cons(&a,2,lf[920],C_SCHEME_END_OF_LIST);
-t8=C_a_i_cons(&a,2,t6,t7);
-t9=C_a_i_cons(&a,2,lf[921],t8);
-/* library.scm: 4101 ##sys#print-to-string */
-t10=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t5,t9);}
-else{
-t5=t4;
-f_19176(2,t5,C_SCHEME_UNDEFINED);}}
-else{
-t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t5=C_a_i_cons(&a,2,C_make_character(10),t4);
-/* library.scm: 4202 loop */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_19148(t6,((C_word*)t0)[5],t5);}}
-
-/* k19297 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19299(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4187 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19176,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19187,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19193,a[2]=t5,a[3]=((C_word)li694),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_19193(t7,t2,t3,C_SCHEME_END_OF_LIST,lf[924]);}
-
-/* loop2 in k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19193(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19193,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(C_i_nullp(t2))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19211,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4194 ##sys#print-to-string */
-t6=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-else{
-t5=C_i_car(t2);
-t6=C_i_stringp(t5);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19224,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t6)){
-t8=t7;
-f_19224(t8,t6);}
-else{
-t8=C_i_car(t2);
-t9=t7;
-f_19224(t9,C_charp(t8));}}}
-
-/* k19222 in loop2 in k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19224(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19224,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_i_car(((C_word*)t0)[6]);
-t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
-/* library.scm: 4196 loop2 */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_19193(t5,((C_word*)t0)[3],t2,t4,((C_word*)t0)[2]);}
-else{
-t2=C_i_cdr(((C_word*)t0)[6]);
-t3=C_i_car(((C_word*)t0)[6]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19274,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4201 ##sys#print-to-string */
-t5=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}}
-
-/* k19272 in k19222 in loop2 in k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19274,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=C_a_i_cons(&a,2,lf[93],t3);
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
-t7=C_a_i_cons(&a,2,lf[93],t6);
-/* library.scm: 4198 loop2 */
-t8=((C_word*)((C_word*)t0)[4])[1];
-f_19193(t8,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t7);}
-
-/* k19209 in loop2 in k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19211(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19211,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t3=C_a_i_cons(&a,2,t1,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[93],t3));}
-
-/* k19185 in k19174 in k19162 in k19150 in loop in k19141 in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19187,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[677],t2));}
-
-/* get/clear-str in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19129(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19129,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19133,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4165 get-output-string */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k19131 in get/clear-str in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19133,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19137,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4166 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k19135 in k19131 in get/clear-str in k19125 in k19122 in k19119 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19008,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19011,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 4137 open-output-string */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19011(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19011,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19014,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 4138 readln */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_18891(t3,t2,((C_word*)t0)[5]);}
-
-/* k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19014(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19014,2,t0,t1);}
-t2=C_SCHEME_FALSE;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_i_string_length(t1);
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19020,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-t6=C_eqp(t4,C_fix(0));
-if(C_truep(t6)){
-/* library.scm: 4143 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t5,((C_word*)t0)[5],lf[922]);}
-else{
-t7=C_fixnum_difference(t4,C_fix(1));
-t8=C_i_string_ref(t1,t7);
-t9=C_eqp(t8,C_make_character(32));
-if(C_truep(t9)){
-if(C_truep(t9)){
-/* library.scm: 4147 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t5,((C_word*)t0)[5],lf[923]);}
-else{
-t10=C_SCHEME_UNDEFINED;
-t11=t5;
-f_19020(2,t11,t10);}}
-else{
-t10=C_fixnum_difference(t4,C_fix(1));
-t11=C_i_string_ref(t1,t10);
-t12=C_eqp(t11,C_make_character(9));
-if(C_truep(t12)){
-/* library.scm: 4147 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),t5,((C_word*)t0)[5],lf[923]);}
-else{
-t13=C_SCHEME_UNDEFINED;
-t14=t5;
-f_19020(2,t14,t13);}}}}
-
-/* k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19020(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19020,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19027,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* library.scm: 4150 readln */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_18891(t3,t2,((C_word*)t0)[6]);}
-
-/* k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19027(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19027,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19029,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word)li692),tmp=(C_word)a,a+=11,tmp));
-t5=((C_word*)t3)[1];
-f_19029(t5,((C_word*)t0)[2],t1);}
-
-/* doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_19029(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[18],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_19029,NULL,3,t0,t1,t2);}
-t3=C_eofp(t2);
-t4=(C_truep(t3)?t3:C_i_string_equal_p(((C_word*)t0)[9],t2));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19042,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_eofp(t2))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19055,a[2]=((C_word*)t0)[6],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t7=((C_word*)t0)[9];
-t8=C_a_i_cons(&a,2,lf[920],C_SCHEME_END_OF_LIST);
-t9=C_a_i_cons(&a,2,t7,t8);
-t10=C_a_i_cons(&a,2,lf[921],t9);
-/* library.scm: 4101 ##sys#print-to-string */
-t11=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t6,t10);}
-else{
-/* library.scm: 4155 get-output-string */
-t6=((C_word*)t0)[8];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t1,((C_word*)t0)[7]);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19058,a[2]=((C_word*)t0)[7],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[4],a[7]=t1,a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
-/* library.scm: 4157 ##sys#write-char-0 */
-t6=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,C_make_character(10),((C_word*)t0)[7]);}
-else{
-t6=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t7=t5;
-f_19058(2,t7,t6);}}}
-
-/* k19056 in doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19058(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19058,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19061,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4159 display */
-t3=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k19059 in k19056 in doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19061,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19068,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4150 readln */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_18891(t3,t2,((C_word*)t0)[2]);}
-
-/* k19066 in k19059 in k19056 in doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19068(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_19029(t2,((C_word*)t0)[2],t1);}
-
-/* k19053 in doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19055(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4153 ##sys#read-warning */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[520]+1)))(4,*((C_word*)lf[520]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k19040 in doloop4737 in k19025 in k19018 in k19012 in k19009 in k19006 in k18997 in k18994 in ##sys#user-read-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_19042(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 4155 get-output-string */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18938(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18938,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18942,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-/* library.scm: 4120 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-else{
-t5=t4;
-f_18942(2,t5,C_SCHEME_UNDEFINED);}}
-
-/* k18940 in read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18942,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18945,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4121 read */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k18943 in k18940 in read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18945(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18945,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18948,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(((C_word*)t0)[3])){
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18953,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word)li690),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_18953(t6,t2);}
-else{
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}}
-
-/* loop in k18943 in k18940 in read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18953(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18953,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18957,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4125 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k18955 in loop in k18943 in k18940 in read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18957(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_eofp(t1))){
-/* library.scm: 4127 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[919]);}
-else{
-t2=C_eqp(C_make_character(125),t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-else{
-/* library.scm: 4128 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_18953(t3,((C_word*)t0)[4]);}}}
-
-/* k18946 in k18943 in k18940 in read-escaped-sexp in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18891(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18891,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18895,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4113 open-output-string */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k18893 in readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18895(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18895,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18902,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 4114 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k18900 in k18893 in readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18902(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18902,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18904,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li688),tmp=(C_word)a,a+=7,tmp));
-t5=((C_word*)t3)[1];
-f_18904(t5,((C_word*)t0)[2],t1);}
-
-/* doloop4672 in k18900 in k18893 in readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18904(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18904,NULL,3,t0,t1,t2);}
-t3=C_eofp(t2);
-t4=(C_truep(t3)?t3:C_eqp(C_make_character(10),t2));
-if(C_truep(t4)){
-if(C_truep(C_charp(t2))){
-/* library.scm: 4116 get-output-string */
-t5=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t1,((C_word*)t0)[4]);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18926,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 4118 ##sys#write-char-0 */
-t6=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,((C_word*)t0)[4]);}}
-
-/* k18924 in doloop4672 in k18900 in k18893 in readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18926,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18933,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 4114 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k18931 in k18924 in doloop4672 in k18900 in k18893 in readln in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_18904(t2,((C_word*)t0)[2],t1);}
-
-/* errno in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18869(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18869,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* ##sys#update-errno in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18865(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18865,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,C_fix((C_word)errno));
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* ##sys#interrupt-hook in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18846(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18846,4,t0,t1,t2,t3);}
-t4=C_slot(*((C_word*)lf[916]+1),C_fix(0));
-if(C_truep(C_fixnum_greaterp(t4,C_fix(0)))){
-/* library.scm: 4082 ##sys#run-pending-finalizers */
-t5=*((C_word*)lf[917]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t3);}
-else{
-/* library.scm: 4083 ##sys#context-switch */
-C_context_switch(3,0,t1,t3);}}
-
-/* ##sys#thread-yield! in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18824(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18824,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18830,a[2]=((C_word)li682),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 4069 ##sys#call-with-current-continuation */
-C_call_cc(3,0,t1,t2);}
-
-/* a18829 in ##sys#thread-yield! in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18830(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18830,3,t0,t1,t2);}
-t3=*((C_word*)lf[730]+1);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18839,a[2]=t2,a[3]=((C_word)li681),tmp=(C_word)a,a+=4,tmp);
-t5=C_i_setslot(t3,C_fix(1),t4);
-/* library.scm: 4073 ##sys#schedule */
-t6=*((C_word*)lf[912]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}
-
-/* a18838 in a18829 in ##sys#thread-yield! in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18839,2,t0,t1);}
-/* library.scm: 4072 return */
-t2=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,C_SCHEME_UNDEFINED);}
-
-/* ##sys#schedule in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18815,2,t0,t1);}
-t2=C_slot(*((C_word*)lf[730]+1),C_fix(1));
-/* g46384639 */
-t3=t2;
-((C_proc2)C_retrieve_proc(t3))(2,t3,t1);}
-
-/* ##sys#abandon-mutexes in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18763(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18763,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(8));
-if(C_truep(C_i_nullp(t3))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18778,a[2]=((C_word)li678),tmp=(C_word)a,a+=3,tmp);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,f_18778(t3));}}
-
-/* loop4622 in ##sys#abandon-mutexes in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_18778(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-loop:
-C_stack_check;
-if(C_truep(C_i_pairp(t1))){
-t2=C_slot(t1,C_fix(0));
-t3=C_i_set_i_slot(t2,C_fix(2),C_SCHEME_FALSE);
-t4=C_i_set_i_slot(t2,C_fix(4),C_SCHEME_TRUE);
-t5=C_i_set_i_slot(t2,C_fix(5),C_SCHEME_FALSE);
-t6=C_i_set_i_slot(t2,C_fix(3),C_SCHEME_END_OF_LIST);
-t7=C_slot(t1,C_fix(1));
-t10=t7;
-t1=t10;
-goto loop;}
-else{
-t2=C_SCHEME_UNDEFINED;
-return(t2);}}
-
-/* ##sys#make-mutex in k18752 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18757,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,7,lf[910],t2,t3,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_UNDEFINED));}
-
-/* ##sys#make-thread in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18734(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_18734,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18746,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t7=C_block_size(*((C_word*)lf[495]+1));
-/* library.scm: 4032 ##sys#grow-vector */
-f_9617(t6,*((C_word*)lf[495]+1),t7,C_SCHEME_FALSE);}
-
-/* k18744 in ##sys#make-thread in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18746(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18746,2,t0,t1);}
-t2=C_a_i_vector(&a,6,*((C_word*)lf[409]+1),*((C_word*)lf[429]+1),*((C_word*)lf[430]+1),*((C_word*)lf[431]+1),*((C_word*)lf[906]+1),t1);
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,14,lf[657],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],C_SCHEME_FALSE,t2,((C_word*)t0)[3],C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST,((C_word*)t0)[2],C_SCHEME_UNDEFINED,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE));}
-
-/* ##sys#default-exception-handler in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18731(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18731,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_halt(lf[907]));}
-
-/* ##sys#foreign-unsigned-integer-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18727(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18727,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_unsigned_integer_argumentp(t2));}
-
-/* ##sys#foreign-integer-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18724(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18724,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_integer_argumentp(t2));}
-
-/* ##sys#foreign-tagged-pointer-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18721,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_foreign_tagged_pointer_argumentp(t2,t3));}
-
-/* ##sys#foreign-pointer-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18718(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18718,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_pointer_argumentp(t2));}
-
-/* ##sys#foreign-symbol-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18715(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18715,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_symbol_argumentp(t2));}
-
-/* ##sys#foreign-string-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18712(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18712,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_string_argumentp(t2));}
-
-/* ##sys#foreign-number-vector-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18709,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_foreign_number_vector_argumentp(t2,t3));}
-
-/* ##sys#foreign-block-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18706(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18706,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_block_argumentp(t2));}
-
-/* ##sys#foreign-flonum-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18703(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18703,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_flonum_argumentp(t2));}
-
-/* ##sys#foreign-fixnum-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18700(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18700,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_fixnum_argumentp(t2));}
-
-/* ##sys#foreign-char-argument in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18697(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18697,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_foreign_char_argumentp(t2));}
-
-/* ##sys#block-pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18691(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18691,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18695,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3992 ##sys#make-pointer */
-t4=*((C_word*)lf[864]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k18693 in ##sys#block-pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18695(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_pointer_to_block(t1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#zap-strings in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18688(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18688,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub4574(C_SCHEME_UNDEFINED,t2));}
-
-/* ##sys#compare-bytes in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18685(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word *a;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_18685,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_substring_compare(t2,t3,t4,t5,t6));}
-
-/* ##sys#copy-words in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word *a;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_18678,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=C_fixnum_plus(t4,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_subvector_copy(t2,t3,t4,t7,t5));}
-
-/* ##sys#copy-bytes in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word *a;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_18671,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=C_fixnum_plus(t4,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_substring_copy(t2,t3,t4,t7,t5));}
-
-/* ##sys#symbol-has-toplevel-binding? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18653(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18653,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(lf[624],C_fix(0));
-t5=C_eqp(t3,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_not(t5));}
-
-/* ##sys#vector->closure! in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18650,4,t0,t1,t2,t3);}
-t4=C_vector_to_closure(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_update_pointer(t3,t2));}
-
-/* ##sys#peek-and-free-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18612(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18612,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18616,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18621,a[2]=t6,a[3]=t2,a[4]=t3,a[5]=((C_word)li655),tmp=(C_word)a,a+=6,tmp));
-t8=((C_word*)t6)[1];
-f_18621(t8,t4,C_fix(0));}
-
-/* loop in ##sys#peek-and-free-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18621(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18621,NULL,3,t0,t1,t2);}
-t3=(C_truep(((C_word*)t0)[4])?C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]):C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18631,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-t5=((C_word*)t0)[3];
-t6=t2;
-t7=C_a_i_bytevector(&a,1,C_fix(3));
-t8=(C_truep(t5)?C_i_foreign_pointer_argumentp(t5):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t6);
-t10=stub4519(t7,t8,t9);
-/* ##sys#peek-c-string */
-t11=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t4,t10,C_fix(0));}}
-
-/* k18629 in loop in ##sys#peek-and-free-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18631(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18631,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_free_sptr(((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18641,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 3957 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_18621(t5,t3,t4);}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}}
-
-/* k18639 in k18629 in loop in ##sys#peek-and-free-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18641(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18641,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k18614 in ##sys#peek-and-free-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=((C_word*)t0)[3];
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=stub4527(C_SCHEME_UNDEFINED,t3);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t1);}
-else{
-t3=stub4527(C_SCHEME_UNDEFINED,C_SCHEME_FALSE);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}}
-
-/* ##sys#peek-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18551(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18551,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18557,a[2]=t2,a[3]=t5,a[4]=t3,a[5]=((C_word)li653),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_18557(t7,t1,C_fix(0));}
-
-/* loop in ##sys#peek-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_18557(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18557,NULL,3,t0,t1,t2);}
-t3=(C_truep(((C_word*)t0)[4])?C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]):C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18567,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=((C_word*)t0)[2];
-t6=t2;
-t7=C_a_i_bytevector(&a,1,C_fix(3));
-t8=(C_truep(t5)?C_i_foreign_pointer_argumentp(t5):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t6);
-t10=stub4500(t7,t8,t9);
-/* ##sys#peek-c-string */
-t11=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t4,t10,C_fix(0));}}
-
-/* k18565 in loop in ##sys#peek-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18567(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18567,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18577,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 3944 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_18557(t4,t2,t3);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}}
-
-/* k18575 in k18565 in loop in ##sys#peek-c-string-list in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18577(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18577,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ##sys#poke-double in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18531(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_18531,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_poke_double(t2,t3,t4));}
-
-/* ##sys#poke-integer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18528(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_18528,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_poke_integer(t2,t3,t4));}
-
-/* ##sys#poke-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18521(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_18521,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18526,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3931 ##sys#make-c-string */
-t6=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-
-/* k18524 in ##sys#poke-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_poke_c_string(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* ##sys#peek-and-free-nonnull-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18515(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18515,4,t0,t1,t2,t3);}
-t4=C_fetch_c_strlen(t2,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18519,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3925 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-
-/* k18517 in ##sys#peek-and-free-nonnull-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18519(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
-t3=C_free_mptr(((C_word*)t0)[5],((C_word*)t0)[4]);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-
-/* ##sys#peek-and-free-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18499(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18499,4,t0,t1,t2,t3);}
-if(C_truep(C_null_pointerp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_fetch_c_strlen(t2,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18509,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3918 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}}
-
-/* k18507 in ##sys#peek-and-free-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
-t3=C_free_mptr(((C_word*)t0)[5],((C_word*)t0)[4]);
-t4=t1;
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* ##sys#peek-nonnull-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18493(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18493,4,t0,t1,t2,t3);}
-t4=C_fetch_c_strlen(t2,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18497,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3911 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-
-/* k18495 in ##sys#peek-nonnull-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#peek-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18477(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18477,4,t0,t1,t2,t3);}
-if(C_truep(C_null_pointerp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_fetch_c_strlen(t2,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18487,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3905 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}}
-
-/* k18485 in ##sys#peek-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18487(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
-t3=t1;
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* ##sys#peek-double in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18474(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18474,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_f64peek(&a,2,t2,t3));}
-
-/* ##sys#vector->structure! in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18471(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18471,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_vector_to_structure(t2));}
-
-/* ##sys#peek-byte in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18468(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18468,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_peek_byte(t2,t3));}
-
-/* ##sys#peek-fixnum in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18465,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_peek_fixnum(t2,t3));}
-
-/* ##sys#make-c-string in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18453(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[2],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18453,3,t0,t1,t2);}
-t3=C_a_i_string(&a,1,C_make_character(C_unfix(C_fix(0))));
-/* library.scm: 3888 ##sys#string-append */
-t4=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t2,t3);}
-
-/* ##sys#pointer->address in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18446(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18446,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_unsigned_int_to_num(&a,1,t3));}
-
-/* ##sys#address->pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18440(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18440,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18444,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3879 ##sys#make-pointer */
-t4=*((C_word*)lf[864]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k18442 in ##sys#address->pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_update_pointer(((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#null-pointer? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18430(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18430,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18438,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3876 ##sys#pointer->address */
-t4=*((C_word*)lf[681]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k18436 in ##sys#null-pointer? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18438(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_eqp(C_fix(0),t1));}
-
-/* ##sys#null-pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18424,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18428,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3871 ##sys#make-pointer */
-t3=*((C_word*)lf[864]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k18426 in ##sys#null-pointer in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18428(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_update_pointer(C_fix(0),t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#locative? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18421(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18421,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_locativep(t2));}
-
-/* ##sys#block-address in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18418(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18418,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_block_address(&a,1,t2));}
-
-/* ##sys#permanent? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18415(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18415,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_permanentp(t2));}
-
-/* ##sys#string->pbytevector in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18412(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18412,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_string_to_pbytevector(t2));}
-
-/* ##sys#bytevector? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18409(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18409,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_bytevectorp(t2));}
-
-/* ##sys#set-pointer-address! in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18406(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18406,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_update_pointer(t3,t2));}
-
-/* ##sys#pointer? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18403(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18403,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_anypointerp(t2));}
-
-/* ##sys#size in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18398(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18398,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_block_size(t2));}
-
-/* ##sys#slot in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18395(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18395,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_slot(t2,t3));}
-
-/* ##sys#generic-structure? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18392(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_18392,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_structurep(t2));}
-
-/* ##sys#structure? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18389(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_18389,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_structurep(t2,t3));}
-
-/* ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18003(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+10)){
-C_save_and_reclaim((void*)tr4r,(void*)f_18003r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_18003r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_18003r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a=C_alloc(10);
-switch(t2){
-case C_fix(1):
-t5=C_i_car(t4);
-t6=C_i_cadr(t4);
-t7=C_i_caddr(t4);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18026,a[2]=t3,a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18037,a[2]=t5,a[3]=t8,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3801 ##sys#number->string */
-t10=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t6);
-case C_fix(2):
-t5=C_i_car(t4);
-t6=C_i_cadr(t4);
-t7=C_i_caddr(t4);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18063,a[2]=t3,a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18074,a[2]=t5,a[3]=t8,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3810 ##sys#number->string */
-t10=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t6);
-case C_fix(3):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[825],t4);
-case C_fix(4):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[826],t4);
-case C_fix(5):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[773],t3,lf[827],t4);
-case C_fix(6):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[773],t3,lf[828],t4);
-case C_fix(7):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[763],t3,lf[829],t4);
-case C_fix(8):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[149],t3,lf[830],t4);
-case C_fix(9):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[831],t4);
-case C_fix(10):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[775],t3,lf[832],t4);
-case C_fix(11):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[833],t4);
-case C_fix(12):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[773],t3,lf[834],t4);
-case C_fix(13):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[835],t4);
-case C_fix(14):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[836],t4);
-case C_fix(15):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[837],t4);
-case C_fix(16):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[838],t4);
-case C_fix(17):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[839],t4);
-case C_fix(18):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[840],t4);
-case C_fix(19):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[841],t4);
-case C_fix(20):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[842],t4);
-case C_fix(21):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[843],t4);
-case C_fix(22):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[844],t4);
-case C_fix(23):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[773],t3,lf[845],t4);
-case C_fix(24):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[846],t4);
-case C_fix(25):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[847],t4);
-case C_fix(26):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[848],t4);
-case C_fix(27):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[849],t4);
-case C_fix(28):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[850],t4);
-case C_fix(29):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[851],t4);
-case C_fix(30):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[852],t4);
-case C_fix(31):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[853],t4);
-case C_fix(32):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[854],t4);
-case C_fix(33):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[855],t4);
-case C_fix(34):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[856],t4);
-case C_fix(35):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[857],t4);
-case C_fix(36):
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[858],t4);
-default:
-C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[859],t4);}}
-
-/* k18072 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18074,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18078,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3811 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k18076 in k18072 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3810 string-append */
-t2=((C_word*)t0)[4];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[823],((C_word*)t0)[2],lf[824],t1);}
-
-/* k18061 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18063(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18063,2,t0,t1);}
-if(C_truep(((C_word*)t0)[4])){
-t2=C_a_i_list(&a,1,((C_word*)t0)[4]);
-C_apply(7,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[775],((C_word*)t0)[2],t1,t2);}
-else{
-((C_proc5)C_retrieve_proc(*((C_word*)lf[9]+1)))(5,*((C_word*)lf[9]+1),((C_word*)t0)[3],lf[775],((C_word*)t0)[2],t1);}}
-
-/* k18035 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18037(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18037,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18041,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3802 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k18039 in k18035 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3801 string-append */
-t2=((C_word*)t0)[4];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[821],((C_word*)t0)[2],lf[822],t1);}
-
-/* k18024 in ##sys#error-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_18026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18026,2,t0,t1);}
-if(C_truep(((C_word*)t0)[4])){
-t2=C_a_i_list(&a,1,((C_word*)t0)[4]);
-C_apply(7,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[775],((C_word*)t0)[2],t1,t2);}
-else{
-((C_proc5)C_retrieve_proc(*((C_word*)lf[9]+1)))(5,*((C_word*)lf[9]+1),((C_word*)t0)[3],lf[775],((C_word*)t0)[2],t1);}}
-
-/* get-condition-property in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17994(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr5r,(void*)f_17994r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_17994r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_17994r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17998,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3786 condition-property-accessor */
-t7=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t7))(5,t7,t6,t3,t4,t5);}
-
-/* k17996 in get-condition-property in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g43854386 */
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* condition-property-accessor in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17948(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr4r,(void*)f_17948r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_17948r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_17948r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(11);
-t5=C_i_nullp(t4);
-t6=C_a_i_cons(&a,2,t2,t3);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17956,a[2]=t4,a[3]=t3,a[4]=t5,a[5]=t6,a[6]=t2,a[7]=((C_word)li618),tmp=(C_word)a,a+=8,tmp));}
-
-/* f_17956 in condition-property-accessor in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17956(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17956,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[655]);
-t4=C_slot(t2,C_fix(1));
-if(C_truep(C_i_memv(((C_word*)t0)[6],t4))){
-t5=C_slot(t2,C_fix(2));
-t6=C_i_member(((C_word*)t0)[5],t5);
-if(C_truep(t6)){
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_i_cadr(t6));}
-else{
-if(C_truep(((C_word*)t0)[4])){
-/* library.scm: 3778 ##sys#signal-hook */
-t7=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,lf[56],lf[818],lf[819],((C_word*)t0)[3]);}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_i_car(((C_word*)t0)[2]));}}}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-
-/* condition-predicate in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17930(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17930,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17932,a[2]=t2,a[3]=((C_word)li616),tmp=(C_word)a,a+=4,tmp));}
-
-/* f_17932 in condition-predicate in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17932(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17932,3,t0,t1,t2);}
-t3=C_i_check_structure(t2,lf[655]);
-t4=C_slot(t2,C_fix(1));
-t5=C_i_memv(((C_word*)t0)[2],t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_SCHEME_TRUE:C_SCHEME_FALSE));}
-
-/* condition? in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17924(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17924,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[655]));}
-
-/* make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17788(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+25)){
-C_save_and_reclaim((void*)tr3r,(void*)f_17788r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_17788r(t0,t1,t2,t3);}}
-
-static void C_ccall f_17788r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(25);
-t4=C_a_i_cons(&a,2,t2,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17896,a[2]=((C_word)li611),tmp=(C_word)a,a+=3,tmp);
-t6=f_17896(t4);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17802,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_FALSE;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17854,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17856,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li613),tmp=(C_word)a,a+=6,tmp));
-t16=((C_word*)t14)[1];
-f_17856(t16,t12,t4);}
-
-/* loop4310 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17856(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_17856,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t3,C_fix(1));
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop43104323 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop43104323 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17852 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[815]+1),t1);}
-
-/* k17800 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17802(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17802,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17806,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17810,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17812,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li612),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_17812(t11,t7,((C_word*)t0)[2]);}
-
-/* loop4334 in k17800 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17812(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_17812,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t3,C_fix(2));
-t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop43344347 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=C_slot(t2,C_fix(1));
-/* loop43344347 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17808 in k17800 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17810(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[815]+1),t1);}
-
-/* k17804 in k17800 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17806,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[655],((C_word*)t0)[2],t1));}
-
-/* loop4296 in make-composite-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_17896(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep(C_i_pairp(t1))){
-t2=C_slot(t1,C_fix(0));
-t3=C_i_check_structure_2(t2,lf[655],lf[814]);
-t4=C_slot(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}
-else{
-t2=C_SCHEME_UNDEFINED;
-return(t2);}}
-
-/* make-property-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17738(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+14)){
-C_save_and_reclaim((void*)tr3r,(void*)f_17738r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_17738r(t0,t1,t2,t3);}}
-
-static void C_ccall f_17738r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(14);
-t4=C_a_i_list(&a,1,t2);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17750,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17752,a[2]=t7,a[3]=t2,a[4]=((C_word)li609),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_17752(t9,t5,t3);}
-
-/* loop in make-property-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17752(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(8);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_17752,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_i_car(t2);
-t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
-t5=C_i_cadr(t2);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17778,a[2]=t4,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t7=C_i_cddr(t2);
-/* library.scm: 3753 loop */
-t9=t6;
-t10=t7;
-t1=t9;
-t2=t10;
-goto loop;}}
-
-/* k17776 in loop in make-property-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17778,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-
-/* k17748 in make-property-condition in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17750,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[655],((C_word*)t0)[2],t1));}
-
-/* current-exception-handler in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17735(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17735,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[787]+1));}
-
-/* with-exception-handler in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_17721,4,t0,t1,t2,t3);}
-t4=*((C_word*)lf[787]+1);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17727,a[2]=t2,a[3]=((C_word)li605),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17731,a[2]=t4,a[3]=((C_word)li606),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3740 ##sys#dynamic-wind */
-t7=*((C_word*)lf[411]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t1,t5,t3,t6);}
-
-/* a17730 in with-exception-handler in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17731,2,t0,t1);}
-t2=C_mutate((C_word*)lf[787]+1 /* (set! current-exception-handler ...) */,((C_word*)t0)[2]);
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* a17726 in with-exception-handler in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17727(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17727,2,t0,t1);}
-t2=C_mutate((C_word*)lf[787]+1 /* (set! current-exception-handler ...) */,((C_word*)t0)[2]);
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* f_17561 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17561(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[14],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17561,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17565,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_structurep(t2,lf[655]))){
-t4=C_mutate((C_word*)lf[791]+1 /* (set! last-exception ...) */,t2);
-t5=C_slot(t2,C_fix(1));
-if(C_truep(C_i_memq(lf[794],t5))){
-t6=C_slot(t2,C_fix(2));
-t7=C_i_member(lf[795],t6);
-t8=C_i_member(lf[796],t6);
-t9=C_i_member(lf[797],t6);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17604,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17614,a[2]=((C_word*)t0)[2],a[3]=t9,a[4]=t7,a[5]=t10,a[6]=t8,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3708 ##sys#error-handler */
-t12=*((C_word*)lf[743]+1);
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,t11);}
-else{
-t6=C_slot(t5,C_fix(0));
-t7=C_eqp(lf[802],t6);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17675,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3725 ##sys#print */
-t9=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,lf[803],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t8=C_slot(t5,C_fix(0));
-t9=C_eqp(lf[804],t8);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17690,a[2]=t2,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3728 ##sys#error-handler */
-t11=*((C_word*)lf[743]+1);
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,t10);}
-else{
-t10=C_a_i_list(&a,2,lf[807],t2);
-t11=C_a_i_record(&a,3,lf[655],lf[808],t10);
-/* library.scm: 3732 ##sys#abort */
-t12=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t12+1)))(3,t12,t1,t11);}}}}
-else{
-t4=C_a_i_list(&a,2,lf[809],t2);
-t5=C_a_i_record(&a,3,lf[655],lf[810],t4);
-/* library.scm: 3732 ##sys#abort */
-t6=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}}
-
-/* k17688 */
-static void C_ccall f_17690(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17690,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17693,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_slot(((C_word*)t0)[2],C_fix(2));
-t4=C_i_member(lf[805],t3);
-t5=C_i_cadr(t4);
-/* g42724273 */
-t6=t1;
-((C_proc4)C_retrieve_proc(t6))(4,t6,t2,lf[806],t5);}
-
-/* k17691 in k17688 */
-static void C_ccall f_17693(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17693,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17696,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3731 ##sys#reset-handler */
-t3=*((C_word*)lf[7]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k17694 in k17691 in k17688 */
-static void C_ccall f_17696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g42744275 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* k17673 */
-static void C_ccall f_17675(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17675,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17678,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3726 ##sys#reset-handler */
-t3=*((C_word*)lf[7]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k17676 in k17673 */
-static void C_ccall f_17678(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g42694270 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* k17612 */
-static void C_ccall f_17614(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17614,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17618,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[4])){
-t3=C_i_cadr(((C_word*)t0)[4]);
-t4=(C_truep(((C_word*)t0)[3])?C_i_cadr(((C_word*)t0)[3]):C_SCHEME_FALSE);
-t5=(C_truep(t4)?C_i_symbolp(t4):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17644,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3714 ##sys#symbol->qualified-string */
-t7=*((C_word*)lf[331]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t4);}
-else{
-t6=t2;
-f_17618(2,t6,t3);}}
-else{
-t3=t2;
-f_17618(2,t3,lf[801]);}}
-
-/* k17642 in k17612 */
-static void C_ccall f_17644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_symbolp(((C_word*)t0)[4]))){
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 3713 string-append */
-t3=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t3))(6,t3,((C_word*)t0)[2],lf[798],t1,lf[799],t2);}
-else{
-if(C_truep(C_i_stringp(((C_word*)t0)[4]))){
-/* library.scm: 3713 string-append */
-t2=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[2],lf[798],t1,lf[799],((C_word*)t0)[4]);}
-else{
-/* library.scm: 3713 string-append */
-t2=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[2],lf[798],t1,lf[799],lf[800]);}}}
-
-/* k17616 in k17612 */
-static void C_ccall f_17618(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(((C_word*)t0)[4])){
-t2=C_i_cadr(((C_word*)t0)[4]);
-C_apply(5,0,((C_word*)t0)[3],((C_word*)t0)[2],t1,t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],t1);}}
-
-/* k17602 */
-static void C_ccall f_17604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17604,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17607,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3723 ##sys#reset-handler */
-t3=*((C_word*)lf[7]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k17605 in k17602 */
-static void C_ccall f_17607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g42664267 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* k17563 */
-static void C_ccall f_17565(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17565,2,t0,t1);}
-t2=C_a_i_list(&a,2,lf[792],((C_word*)t0)[3]);
-t3=C_a_i_record(&a,3,lf[655],lf[793],t2);
-/* library.scm: 3732 ##sys#abort */
-t4=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* ##sys#signal in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17552(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17552,3,t0,t1,t2);}
-/* library.scm: 3688 ##sys#current-exception-handler */
-t3=*((C_word*)lf[787]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-
-/* ##sys#abort in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17535(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17535,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17539,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3678 ##sys#current-exception-handler */
-t4=*((C_word*)lf[787]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k17537 in ##sys#abort in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17539(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17539,2,t0,t1);}
-t2=C_a_i_list(&a,6,lf[782],lf[783],lf[784],C_SCHEME_END_OF_LIST,lf[785],C_SCHEME_FALSE);
-t3=C_a_i_record(&a,3,lf[655],lf[786],t2);
-/* library.scm: 3679 ##sys#abort */
-t4=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17312(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+12)){
-C_save_and_reclaim((void*)tr4r,(void*)f_17312r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_17312r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_17312r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(12);
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t6=C_dbg_hook(C_SCHEME_FALSE);
-t7=t2;
-t8=C_eqp(t7,lf[740]);
-if(C_truep(t8)){
-t9=C_a_i_record(&a,3,lf[655],lf[753],C_SCHEME_END_OF_LIST);
-/* library.scm: 3631 ##sys#abort */
-t10=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t1,t9);}
-else{
-t9=C_eqp(t7,lf[13]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17335,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3637 ##sys#print */
-t11=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t10,lf[756],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-else{
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17400,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-t11=C_i_symbolp(((C_word*)t5)[1]);
-t12=(C_truep(t11)?C_i_nullp(t4):C_SCHEME_FALSE);
-if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17527,a[2]=t10,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3650 ##sys#symbol->string */
-t14=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t14+1)))(3,t14,t13,((C_word*)t5)[1]);}
-else{
-t13=t10;
-f_17400(t13,C_SCHEME_UNDEFINED);}}}}
-
-/* k17525 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17527(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_17400(t3,t2);}
-
-/* k17398 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17400(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17400,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17403,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_i_not(((C_word*)((C_word*)t0)[5])[1]);
-if(C_truep(t3)){
-t4=t2;
-f_17403(t4,(C_truep(t3)?C_i_pairp(((C_word*)t0)[4]):C_SCHEME_FALSE));}
-else{
-t4=C_i_symbolp(((C_word*)((C_word*)t0)[5])[1]);
-t5=t2;
-f_17403(t5,(C_truep(t4)?C_i_pairp(((C_word*)t0)[4]):C_SCHEME_FALSE));}}
-
-/* k17401 in k17398 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17403(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17403,NULL,2,t0,t1);}
-t2=(C_truep(t1)?((C_word*)((C_word*)t0)[5])[1]:C_SCHEME_FALSE);
-t3=(C_truep(t1)?C_slot(((C_word*)t0)[4],C_fix(0)):((C_word*)((C_word*)t0)[5])[1]);
-t4=(C_truep(t1)?C_slot(((C_word*)t0)[4],C_fix(1)):((C_word*)t0)[4]);
-t5=((C_word*)t0)[3];
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17423,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-t7=C_eqp(t5,lf[56]);
-if(C_truep(t7)){
-t8=t6;
-f_17423(t8,lf[760]);}
-else{
-t8=C_eqp(t5,lf[522]);
-if(C_truep(t8)){
-t9=t6;
-f_17423(t9,lf[761]);}
-else{
-t9=C_eqp(t5,lf[149]);
-if(C_truep(t9)){
-t10=t6;
-f_17423(t10,lf[762]);}
-else{
-t10=C_eqp(t5,lf[763]);
-if(C_truep(t10)){
-t11=t6;
-f_17423(t11,lf[764]);}
-else{
-t11=C_eqp(t5,lf[438]);
-if(C_truep(t11)){
-t12=t6;
-f_17423(t12,lf[765]);}
-else{
-t12=C_eqp(t5,lf[766]);
-if(C_truep(t12)){
-t13=t6;
-f_17423(t13,lf[767]);}
-else{
-t13=C_eqp(t5,lf[80]);
-if(C_truep(t13)){
-t14=t6;
-f_17423(t14,lf[768]);}
-else{
-t14=C_eqp(t5,lf[769]);
-if(C_truep(t14)){
-t15=t6;
-f_17423(t15,lf[770]);}
-else{
-t15=C_eqp(t5,lf[771]);
-if(C_truep(t15)){
-t16=t6;
-f_17423(t16,lf[772]);}
-else{
-t16=C_eqp(t5,lf[773]);
-if(C_truep(t16)){
-t17=t6;
-f_17423(t17,lf[774]);}
-else{
-t17=C_eqp(t5,lf[775]);
-if(C_truep(t17)){
-t18=t6;
-f_17423(t18,lf[776]);}
-else{
-t18=C_eqp(t5,lf[777]);
-if(C_truep(t18)){
-t19=t6;
-f_17423(t19,lf[778]);}
-else{
-t19=C_eqp(t5,lf[779]);
-t20=t6;
-f_17423(t20,(C_truep(t19)?lf[780]:lf[781]));}}}}}}}}}}}}}
-
-/* k17421 in k17401 in k17398 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17423(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17423,NULL,2,t0,t1);}
-t2=C_a_i_list(&a,6,lf[757],((C_word*)t0)[5],lf[758],((C_word*)t0)[4],lf[759],((C_word*)t0)[3]);
-t3=C_a_i_record(&a,3,lf[655],t1,t2);
-/* library.scm: 3655 ##sys#abort */
-t4=*((C_word*)lf[754]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17335,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17338,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3638 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}
-
-/* k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17338,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17341,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=C_i_nullp(((C_word*)t0)[2]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17384,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t3)){
-t5=t4;
-f_17384(t5,t3);}
-else{
-t5=C_i_length(((C_word*)t0)[2]);
-t6=t4;
-f_17384(t6,C_fixnum_greaterp(t5,C_fix(1)));}}
-
-/* k17382 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17384(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 3640 ##sys#write-char-0 */
-t2=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[431]+1));}
-else{
-/* library.scm: 3641 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[755],C_SCHEME_FALSE,*((C_word*)lf[431]+1));}}
-
-/* k17339 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17341(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17341,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17344,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17349,a[2]=t4,a[3]=((C_word)li600),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_17349(t6,t2,((C_word*)t0)[2]);}
-
-/* loop4191 in k17339 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17349(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17349,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17367,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17361,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3644 ##sys#print */
-t6=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,t4,C_SCHEME_TRUE,*((C_word*)lf[431]+1));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17359 in loop4191 in k17339 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17361(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3645 ##sys#write-char-0 */
-t2=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[431]+1));}
-
-/* k17365 in loop4191 in k17339 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_17349(t3,((C_word*)t0)[2],t2);}
-
-/* k17342 in k17339 in k17336 in k17333 in ##sys#signal-hook in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17344(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3647 ##sys#flush-output */
-t2=*((C_word*)lf[481]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[431]+1));}
-
-/* on-exit in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17300(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17300,3,t0,t1,t2);}
-t3=*((C_word*)lf[749]+1);
-t4=C_mutate((C_word*)lf[749]+1 /* (set! cleanup-before-exit ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17303,a[2]=t3,a[3]=t2,a[4]=((C_word)li598),tmp=(C_word)a,a+=5,tmp));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-
-/* ##sys#cleanup-before-exit in on-exit in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17303,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17307,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3622 old */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k17305 in ##sys#cleanup-before-exit in on-exit in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17307(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3622 thunk */
-t2=((C_word*)t0)[3];
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* f_17279 in k17275 in k17268 in k17264 in k17260 in k17256 in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17279(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17279,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17283,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_fudge(C_fix(13)))){
-/* library.scm: 3616 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[751],C_SCHEME_FALSE,*((C_word*)lf[430]+1));}
-else{
-t3=t2;
-f_17283(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k17281 */
-static void C_ccall f_17283(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17283,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17289,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3617 ffp */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k17287 in k17281 */
-static void C_ccall f_17289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 3617 ##sys#force-finalizers */
-t2=*((C_word*)lf[750]+1);
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##sys#user-interrupt-hook in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17231,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17234,a[2]=((C_word)li595),tmp=(C_word)a,a+=3,tmp);
-t3=C_eqp(*((C_word*)lf[730]+1),*((C_word*)lf[741]+1));
-if(C_truep(t3)){
-t4=t1;
-/* library.scm: 3536 ##sys#signal-hook */
-t5=*((C_word*)lf[9]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,lf[740],C_SCHEME_FALSE);}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_setslot(*((C_word*)lf[741]+1),C_fix(1),t2));}}
-
-/* break in ##sys#user-interrupt-hook in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17234(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17234,2,t0,t1);}
-/* library.scm: 3536 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,t1,lf[740],C_SCHEME_FALSE);}
-
-/* print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17117(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+19)){
-C_save_and_reclaim((void*)tr2r,(void*)f_17117r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_17117r(t0,t1,t2);}}
-
-static void C_ccall f_17117r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(19);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17119,a[2]=((C_word)li589),tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17137,a[2]=t3,a[3]=((C_word)li590),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17142,a[2]=t4,a[3]=((C_word)li591),tmp=(C_word)a,a+=4,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17147,a[2]=t5,a[3]=((C_word)li592),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17152,a[2]=t6,a[3]=((C_word)li593),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t2))){
-/* def-port40504075 */
-t8=t7;
-f_17152(t8,t1);}
-else{
-t8=C_i_car(t2);
-t9=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t9))){
-/* def-start40514073 */
-t10=t6;
-f_17147(t10,t1,t8);}
-else{
-t10=C_i_car(t9);
-t11=C_i_cdr(t9);
-if(C_truep(C_i_nullp(t11))){
-/* def-thread40524070 */
-t12=t5;
-f_17142(t12,t1,t8,t10);}
-else{
-t12=C_i_car(t11);
-t13=C_i_cdr(t11);
-if(C_truep(C_i_nullp(t13))){
-/* def-header40534066 */
-t14=t4;
-f_17137(t14,t1,t8,t10,t12);}
-else{
-t14=C_i_car(t13);
-t15=C_i_cdr(t13);
-if(C_truep(C_i_nullp(t15))){
-/* body40484058 */
-f_17119(t1,t8,t10,t12,t14);}
-else{
-/* ##sys#error */
-t16=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t16+1)))(4,t16,t1,lf[0],t15);}}}}}}
-
-/* def-port4050 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17152(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17152,NULL,2,t0,t1);}
-/* def-start40514073 */
-t2=((C_word*)t0)[2];
-f_17147(t2,t1,*((C_word*)lf[430]+1));}
-
-/* def-start4051 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17147(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17147,NULL,3,t0,t1,t2);}
-/* def-thread40524070 */
-t3=((C_word*)t0)[2];
-f_17142(t3,t1,t2,C_fix(0));}
-
-/* def-thread4052 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17142(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17142,NULL,4,t0,t1,t2,t3);}
-/* def-header40534066 */
-t4=((C_word*)t0)[2];
-f_17137(t4,t1,t2,t3,*((C_word*)lf[730]+1));}
-
-/* def-header4053 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17137(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17137,NULL,5,t0,t1,t2,t3,t4);}
-/* body40484058 */
-f_17119(t1,t2,t3,t4,lf[737]);}
-
-/* body4048 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17119(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17119,NULL,5,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17123,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3525 ##sys#check-port */
-t7=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t2,lf[736]);}
-
-/* k17121 in body4048 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17123(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17123,2,t0,t1);}
-t2=C_i_check_exact_2(((C_word*)t0)[6],lf[736]);
-t3=C_i_check_string_2(((C_word*)t0)[5],lf[736]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17136,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3528 ##sys#get-call-chain */
-t5=*((C_word*)lf[728]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[6],((C_word*)t0)[2]);}
-
-/* k17134 in k17121 in body4048 in print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17136(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3528 ##sys#really-print-call-chain */
-t2=*((C_word*)lf[731]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17028(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_17028,5,t0,t1,t2,t3,t4);}
-if(C_truep(C_i_pairp(t3))){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17038,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3501 ##sys#print */
-t6=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,t4,C_SCHEME_FALSE,t2);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17038,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17041,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17046,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li587),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_17046(t6,t2,((C_word*)t0)[2]);}
-
-/* loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17046(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17046,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17054,a[2]=((C_word*)t0)[3],a[3]=((C_word)li586),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17104,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g40134014 */
-t6=t3;
-f_17054(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k17102 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_17046(t3,((C_word*)t0)[2],t2);}
-
-/* g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_17054(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17054,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_slot(t2,C_fix(2));
-t5=C_slot(t2,C_fix(3));
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17067,a[2]=t2,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3507 ##sys#print */
-t7=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[735],C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17067(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17067,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17070,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[2],C_fix(0));
-/* library.scm: 3508 ##sys#print */
-t4=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_FALSE,((C_word*)t0)[5]);}
-
-/* k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17070(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17070,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17073,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3509 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[734],C_SCHEME_FALSE,((C_word*)t0)[4]);}
-
-/* k17071 in k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17073,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17076,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17091,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3511 ##sys#write-char-0 */
-t4=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_make_character(91),((C_word*)t0)[4]);}
-else{
-t3=t2;
-f_17076(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k17089 in k17071 in k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17091(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17091,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17094,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3512 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,((C_word*)t0)[3]);}
-
-/* k17092 in k17089 in k17071 in k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3513 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[733],C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k17074 in k17071 in k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17076(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17076,2,t0,t1);}
-if(C_truep(((C_word*)t0)[4])){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17084,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li585),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3515 ##sys#with-print-length-limit */
-t3=*((C_word*)lf[660]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],C_fix(100),t2);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* a17083 in k17074 in k17071 in k17068 in k17065 in g4013 in loop4006 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17084,2,t0,t1);}
-/* library.scm: 3518 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-
-/* k17039 in k17036 in ##sys#really-print-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_17041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3520 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[732],C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16872(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+11)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16872r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16872r(t0,t1,t2);}}
-
-static void C_ccall f_16872r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(11);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16874,a[2]=((C_word)li581),tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16975,a[2]=t3,a[3]=((C_word)li582),tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16980,a[2]=t4,a[3]=((C_word)li583),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t2))){
-/* def-start39613993 */
-t6=t5;
-f_16980(t6,t1);}
-else{
-t6=C_i_car(t2);
-t7=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t7))){
-/* def-thread39623991 */
-t8=t4;
-f_16975(t8,t1,t6);}
-else{
-t8=C_i_car(t7);
-t9=C_i_cdr(t7);
-if(C_truep(C_i_nullp(t9))){
-/* body39593967 */
-f_16874(t1,t6,t8);}
-else{
-/* ##sys#error */
-t10=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t1,lf[0],t9);}}}}
-
-/* def-start3961 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16980(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16980,NULL,2,t0,t1);}
-/* def-thread39623991 */
-t2=((C_word*)t0)[2];
-f_16975(t2,t1,C_fix(0));}
-
-/* def-thread3962 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16975(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16975,NULL,3,t0,t1,t2);}
-/* body39593967 */
-f_16874(t1,t2,*((C_word*)lf[730]+1));}
-
-/* body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16874(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16874,NULL,3,t1,t2,t3);}
-t4=C_fix((C_word)C_trace_buffer_size);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16878,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=C_fixnum_times(C_fix(4),t4);
-/* library.scm: 3485 ##sys#make-vector */
-t7=*((C_word*)lf[361]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_FALSE);}
-
-/* k16876 in body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16878(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16878,2,t0,t1);}
-t2=C_fetch_trace(((C_word*)t0)[5],t1);
-t3=C_fixnump(t2);
-t4=(C_truep(t3)?t2:C_fixnum_times(C_fix(4),((C_word*)t0)[4]));
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16886,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=t1,a[5]=t4,a[6]=((C_word)li580),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_16886(t8,((C_word*)t0)[2],C_fix(0));}
-
-/* loop in k16876 in body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16886(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16886,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_fixnum_plus(t2,C_fix(3));
-t4=C_slot(((C_word*)t0)[4],t3);
-t5=C_i_not(t4);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16905,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_16905(t7,t5);}
-else{
-t7=C_i_not(((C_word*)t0)[2]);
-t8=t6;
-f_16905(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[2],t4)));}}}
-
-/* k16903 in loop in k16876 in body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16905(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16905,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16924,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[4],((C_word*)t0)[5]);
-t4=C_a_i_bytevector(&a,1,C_fix(3));
-/* ##sys#peek-nonnull-c-string */
-t5=*((C_word*)lf[729]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t2,stub3943(t4,t3),C_fix(0));}
-else{
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(4));
-/* library.scm: 3497 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_16886(t3,((C_word*)t0)[3],t2);}}
-
-/* k16922 in k16903 in loop in k16876 in body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16924,2,t0,t1);}
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=C_slot(((C_word*)t0)[4],t2);
-t4=C_fixnum_plus(((C_word*)t0)[5],C_fix(2));
-t5=C_slot(((C_word*)t0)[4],t4);
-t6=C_a_i_vector(&a,3,t1,t3,t5);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16916,a[2]=t6,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t8=C_fixnum_plus(((C_word*)t0)[5],C_fix(4));
-/* library.scm: 3496 loop */
-t9=((C_word*)((C_word*)t0)[2])[1];
-f_16886(t9,t7,t8);}
-
-/* k16914 in k16922 in k16903 in loop in k16876 in body3959 in ##sys#get-call-chain in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16916(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16916,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ##sys#feature? in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16830(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16830r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16830r(t0,t1,t2);}}
-
-static void C_ccall f_16830r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16836,a[2]=t4,a[3]=((C_word)li578),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_16836(t6,t1,t2);}
-
-/* loop in ##sys#feature? in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16836(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16836,NULL,3,t0,t1,t2);}
-t3=C_i_nullp(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16860,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* library.scm: 3473 ##sys#->feature-id */
-t6=*((C_word*)lf[719]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
-
-/* k16858 in loop in ##sys#feature? in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_memq(t1,*((C_word*)lf[721]+1)))){
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 3474 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_16836(t3,((C_word*)t0)[2],t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* features in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16827(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16827,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[721]+1));}
-
-/* unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16751(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+15)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16751r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16751r(t0,t1,t2);}}
-
-static void C_ccall f_16751r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(15);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16755,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16792,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li575),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_16792(t11,t7,t2);}
-
-/* loop3901 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16792(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16792,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=*((C_word*)lf[719]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16821,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g39173918 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16819 in loop3901 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16821(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16821,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop39013914 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16792(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop39013914 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_16792(t6,((C_word*)t0)[3],t5);}}
-
-/* k16753 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16755,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16759,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16761,a[2]=t4,a[3]=t1,a[4]=((C_word)li574),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_16761(t6,t2,*((C_word*)lf[721]+1));}
-
-/* loop in k16753 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16761(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_16761,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_slot(t2,C_fix(1));
-if(C_truep(C_i_memq(t3,((C_word*)t0)[3]))){
-/* library.scm: 3464 loop */
-t7=t1;
-t8=t4;
-t1=t7;
-t2=t8;
-goto loop;}
-else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16790,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3465 loop */
-t7=t5;
-t8=t4;
-t1=t7;
-t2=t8;
-goto loop;}}}
-
-/* k16788 in loop in k16753 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16790(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16790,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* k16757 in k16753 in unregister-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-
-/* register-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16707(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+9)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16707r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16707r(t0,t1,t2);}}
-
-static void C_ccall f_16707r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(9);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16711,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16713,a[2]=t5,a[3]=((C_word)li572),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_16713(t7,t3,t2);}
-
-/* loop3880 in register-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16713(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16713,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16725,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3450 ##sys#->feature-id */
-t5=*((C_word*)lf[719]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16723 in loop3880 in register-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16725,2,t0,t1);}
-if(C_truep(C_i_memq(t1,*((C_word*)lf[721]+1)))){
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_16713(t3,((C_word*)t0)[2],t2);}
-else{
-t2=C_a_i_cons(&a,2,t1,*((C_word*)lf[721]+1));
-t3=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t2);
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_16713(t5,((C_word*)t0)[2],t4);}}
-
-/* k16709 in register-feature! in k16703 in k16700 in k16697 in k16694 in k16691 in k16688 in k16685 in k16682 in k16679 in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16711(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* check in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16663(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16663,NULL,2,t1,t2);}
-t3=C_eqp(lf[701],t2);
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16678,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3435 ##sys#->feature-id */
-t5=*((C_word*)lf[719]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k16676 in check in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16678(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16678,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,*((C_word*)lf[721]+1));
-t3=C_mutate((C_word*)lf[721]+1 /* (set! features ...) */,t2);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* ##sys#->feature-id in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16629(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16629,3,t0,t1,t2);}
-if(C_truep(C_i_stringp(t2))){
-/* library.scm: 3422 string->keyword */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t1,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16645,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3423 keyword? */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}}
-
-/* k16643 in ##sys#->feature-id in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16645(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16645,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[3]);}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16658,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3424 ##sys#symbol->string */
-t3=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-else{
-t2=((C_word*)t0)[4];
-t3=C_a_i_list(&a,1,((C_word*)t0)[3]);
-C_apply(6,0,t2,*((C_word*)lf[9]+1),lf[56],lf[720],t3);}}}
-
-/* k16656 in k16643 in ##sys#->feature-id in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3424 string->keyword */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16451(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16451r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16451r(t0,t1,t2);}}
-
-static void C_ccall f_16451r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16455,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_16455(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_16455(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16455(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16455,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_fudge(C_fix(38));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16514,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=C_fudge(C_fix(3));
-t5=(C_truep(t4)?lf[704]:lf[705]);
-t6=C_fudge(C_fix(15));
-t7=(C_truep(t6)?lf[706]:lf[707]);
-t8=C_fudge(C_fix(40));
-t9=(C_truep(t8)?lf[708]:lf[709]);
-t10=C_fudge(C_fix(24));
-t11=(C_truep(t10)?lf[710]:lf[711]);
-t12=C_fudge(C_fix(28));
-t13=(C_truep(t12)?lf[712]:lf[713]);
-t14=C_fudge(C_fix(32));
-t15=(C_truep(t14)?lf[714]:lf[715]);
-if(C_truep(C_fudge(C_fix(39)))){
-/* library.scm: 3389 string-append */
-t16=*((C_word*)lf[172]+1);
-((C_proc9)(void*)(*((C_word*)t16+1)))(9,t16,t3,t5,t7,t9,t11,t13,t15,lf[716]);}
-else{
-/* library.scm: 3389 string-append */
-t16=*((C_word*)lf[172]+1);
-((C_proc9)(void*)(*((C_word*)t16+1)))(9,t16,t3,t5,t7,t9,t11,t13,t15,lf[717]);}}
-else{
-t2=lf[2];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[2]);}}
-
-/* k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16514(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16514,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16521,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* ##sys#peek-c-string */
-t3=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_BRANCH_NAME),C_fix(0));}
-
-/* k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16521,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16525,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16461,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3378 build-platform */
-t4=*((C_word*)lf[690]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16461,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16464,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3379 software-type */
-t3=*((C_word*)lf[686]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16464(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16464,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16467,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3380 software-version */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[689]+1)))(2,*((C_word*)lf[689]+1),t2);}
-
-/* k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16467,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16470,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3381 machine-type */
-((C_proc2)C_retrieve_proc(*((C_word*)lf[687]+1)))(2,*((C_word*)lf[687]+1),t2);}
-
-/* k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16470,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16472,a[2]=((C_word)li568),tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16493,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3386 str */
-f_16472(t3,((C_word*)t0)[2]);}
-
-/* k16491 in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16493(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16493,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16497,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3386 str */
-f_16472(t2,((C_word*)t0)[2]);}
-
-/* k16495 in k16491 in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16497,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16501,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3386 str */
-f_16472(t2,((C_word*)t0)[2]);}
-
-/* k16499 in k16495 in k16491 in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16501,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16505,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3386 ##sys#symbol->string */
-t3=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k16503 in k16499 in k16495 in k16491 in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3386 string-append */
-t2=*((C_word*)lf[172]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* str in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16472(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16472,NULL,2,t1,t2);}
-t3=C_eqp(lf[701],t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[702]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16486,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3385 symbol->string */
-t5=*((C_word*)lf[337]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-
-/* k16484 in str in k16468 in k16465 in k16462 in k16459 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16486(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3385 string-append */
-t2=*((C_word*)lf[172]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[703]);}
-
-/* k16523 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16525(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16525,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16529,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_block_size(((C_word*)t0)[2]);
-if(C_truep(C_i_zerop(t3))){
-t4=t2;
-f_16529(2,t4,lf[698]);}
-else{
-/* library.scm: 3402 string-append */
-t4=*((C_word*)lf[172]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[699],((C_word*)t0)[2],lf[700]);}}
-
-/* k16527 in k16523 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16529,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16533,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* ##sys#peek-c-string */
-t3=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_BUILD_TAG),C_fix(0));}
-
-/* k16531 in k16527 in k16523 in k16519 in k16512 in k16453 in chicken-version in k16447 in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3397 string-append */
-t2=*((C_word*)lf[172]+1);
-((C_proc11)(void*)(*((C_word*)t2+1)))(11,t2,((C_word*)t0)[5],lf[694],lf[2],lf[695],((C_word*)t0)[4],lf[696],((C_word*)t0)[3],((C_word*)t0)[2],lf[697],t1);}
-
-/* c-runtime in k16441 in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16444(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16444,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* build-platform in k16435 in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16438(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16438,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* software-version in k16429 in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16432,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* machine-byte-order in k16423 in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16426,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* machine-type in k16417 in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16420(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16420,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* software-type in k16411 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16414,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16348(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16348,3,t0,t1,t2);}
-if(C_truep(C_taggedpointerp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16359,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(t2,C_fix(1));
-if(C_truep(C_i_pairp(t4))){
-t5=C_i_car(t4);
-t6=C_a_i_list(&a,1,t5);
-/* library.scm: 3333 ##sys#print-to-string */
-t7=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t3,t6);}
-else{
-t5=C_a_i_list(&a,1,t4);
-/* library.scm: 3333 ##sys#print-to-string */
-t6=*((C_word*)lf[677]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t3,t5);}}
-else{
-if(C_truep(C_swigpointerp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16394,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16398,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3340 ##sys#pointer->address */
-t5=*((C_word*)lf[681]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16405,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16409,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3342 ##sys#pointer->address */
-t5=*((C_word*)lf[681]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}}
-
-/* k16407 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3342 ##sys#number->string */
-t2=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k16403 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16405(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3342 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[684],t1,lf[685]);}
-
-/* k16396 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16398(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3340 ##sys#number->string */
-t2=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k16392 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16394(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3340 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[682],t1,lf[683]);}
-
-/* k16357 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16363,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16367,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3337 ##sys#pointer->address */
-t4=*((C_word*)lf[681]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k16365 in k16357 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3337 ##sys#number->string */
-t2=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k16361 in k16357 in ##sys#pointer->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16363(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3331 string-append */
-t2=((C_word*)t0)[4];
-((C_proc7)C_retrieve_proc(t2))(7,t2,((C_word*)t0)[3],lf[678],((C_word*)t0)[2],lf[679],t1,lf[680]);}
-
-/* ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16308(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16308,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16312,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3323 open-output-string */
-t4=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-
-/* k16310 in ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16312(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16312,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16315,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16320,a[2]=t4,a[3]=t1,a[4]=((C_word)li559),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_16320(t6,t2,((C_word*)t0)[2]);}
-
-/* loop3779 in k16310 in ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16320(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16320,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16328,a[2]=((C_word*)t0)[3],a[3]=((C_word)li558),tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16335,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g37863787 */
-t6=t3;
-f_16328(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k16333 in loop3779 in k16310 in ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_16320(t3,((C_word*)t0)[2],t2);}
-
-/* g3786 in loop3779 in k16310 in ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16328(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16328,NULL,3,t0,t1,t2);}
-/* library.scm: 3324 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k16313 in k16310 in ##sys#print-to-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16315(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3325 get-output-string */
-t2=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* get-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16271(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16271,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16275,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3312 ##sys#check-port */
-t4=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[675]);}
-
-/* k16273 in get-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16275(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16275,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16278,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3313 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],C_SCHEME_FALSE,lf[675]);}
-
-/* k16276 in k16273 in get-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16278(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=C_slot(((C_word*)t0)[3],C_fix(7));
-t3=C_eqp(lf[173],t2);
-if(C_truep(t3)){
-t4=C_slot(((C_word*)t0)[3],C_fix(12));
-t5=C_slot(((C_word*)t0)[3],C_fix(10));
-/* library.scm: 3317 ##sys#substring */
-t6=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t4,C_fix(0),t5);}
-else{
-/* library.scm: 3315 ##sys#signal-hook */
-t4=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[2],lf[56],lf[675],lf[676],((C_word*)t0)[3]);}}
-
-/* open-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16252(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16252,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16256,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 3305 ##sys#make-port */
-t3=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,C_SCHEME_FALSE,*((C_word*)lf[670]+1),lf[674],lf[173]);}
-
-/* k16254 in open-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16256(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16256,2,t0,t1);}
-t2=C_i_set_i_slot(t1,C_fix(10),C_fix(0));
-t3=C_i_set_i_slot(t1,C_fix(11),C_fix(256));
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16269,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3308 ##sys#make-string */
-t5=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,C_fix(256));}
-
-/* k16267 in k16254 in open-output-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[3],C_fix(12),t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}
-
-/* open-input-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16234(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16234,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[671]);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16241,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3298 ##sys#make-port */
-t5=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t4,C_SCHEME_TRUE,*((C_word*)lf[670]+1),lf[672],lf[173]);}
-
-/* k16239 in open-input-string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_i_set_i_slot(t1,C_fix(11),C_block_size(((C_word*)t0)[3]));
-t3=C_i_set_i_slot(t1,C_fix(10),C_fix(0));
-t4=C_i_setslot(t1,C_fix(12),((C_word*)t0)[3]);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t1);}
-
-/* ##sys#scan-buffer-line in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_16162,6,t0,t1,t2,t3,t4,t5);}
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16168,a[2]=t7,a[3]=t2,a[4]=t5,a[5]=t3,a[6]=((C_word)li553),tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_16168(t9,t1,t4);}
-
-/* loop in ##sys#scan-buffer-line in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16168(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16168,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-/* library.scm: 3269 k */
-t3=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,t2);}
-else{
-t3=C_subchar(((C_word*)t0)[3],t2);
-t4=C_eqp(t3,C_make_character(10));
-if(C_truep(t4)){
-t5=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 3271 k */
-t6=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t6))(4,t6,t1,t2,t5);}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16197,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=C_eqp(t3,C_make_character(13));
-if(C_truep(t6)){
-t7=C_fixnum_plus(t2,C_fix(1));
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[5],t7))){
-t8=C_fixnum_plus(t2,C_fix(1));
-t9=C_subchar(((C_word*)t0)[3],t8);
-t10=t5;
-f_16197(t10,C_eqp(t9,C_make_character(10)));}
-else{
-t8=t5;
-f_16197(t8,C_SCHEME_FALSE);}}
-else{
-t7=t5;
-f_16197(t7,C_SCHEME_FALSE);}}}}
-
-/* k16195 in loop in ##sys#scan-buffer-line in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16197(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(2));
-/* library.scm: 3275 k */
-t3=((C_word*)t0)[4];
-((C_proc4)C_retrieve_proc(t3))(4,t3,((C_word*)t0)[3],((C_word*)t0)[5],t2);}
-else{
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 3276 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_16168(t3,((C_word*)t0)[3],t2);}}
-
-/* a21885 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21886(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21886,4,t0,t1,t2,t3);}
-t4=C_slot(t2,C_fix(10));
-t5=C_slot(t2,C_fix(11));
-t6=C_slot(t2,C_fix(12));
-t7=(C_truep(t3)?C_fixnum_plus(t4,t3):t5);
-if(C_truep(C_fixnum_greater_or_equal_p(t4,t5))){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_END_OF_FILE);}
-else{
-t8=C_fixnum_greaterp(t7,t5);
-t9=(C_truep(t8)?t5:t7);
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21914,a[2]=t2,a[3]=t4,a[4]=t6,a[5]=((C_word)li551),tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3253 ##sys#scan-buffer-line */
-t11=*((C_word*)lf[669]+1);
-((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t1,t6,t9,t4,t10);}}
-
-/* a21913 in a21885 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21914,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21918,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t5=C_eqp(t2,t3);
-if(C_truep(t5)){
-t6=t4;
-f_21918(t6,C_SCHEME_UNDEFINED);}
-else{
-t6=C_slot(((C_word*)t0)[2],C_fix(4));
-t7=C_fixnum_plus(t6,C_fix(1));
-t8=t4;
-f_21918(t8,C_i_set_i_slot(((C_word*)t0)[2],C_fix(4),t7));}}
-
-/* k21916 in a21913 in a21885 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21918(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_21918,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21921,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[6]);
-/* library.scm: 3260 ##sys#make-string */
-t4=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-
-/* k21919 in k21916 in a21913 in a21885 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_substring_copy(((C_word*)t0)[7],t1,((C_word*)t0)[6],((C_word*)t0)[5],C_fix(0));
-t3=C_i_set_i_slot(((C_word*)t0)[4],C_fix(10),((C_word*)t0)[3]);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-
-/* a21844 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21845(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[10],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_21845,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t7=C_slot(t2,C_fix(10));
-t8=C_slot(t2,C_fix(11));
-t9=C_fixnum_difference(t8,t7);
-t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21855,a[2]=t1,a[3]=t5,a[4]=t4,a[5]=t6,a[6]=t7,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t11=C_i_not(((C_word*)t6)[1]);
-if(C_truep(t11)){
-if(C_truep(t11)){
-t12=C_set_block_item(t6,0,t9);
-t13=t10;
-f_21855(t13,t12);}
-else{
-t12=t10;
-f_21855(t12,C_SCHEME_UNDEFINED);}}
-else{
-if(C_truep(C_fixnum_greaterp(((C_word*)t6)[1],t9))){
-t12=C_set_block_item(t6,0,t9);
-t13=t10;
-f_21855(t13,t12);}
-else{
-t12=t10;
-f_21855(t12,C_SCHEME_UNDEFINED);}}}
-
-/* k21853 in a21844 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_21855(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-t2=C_slot(((C_word*)t0)[7],C_fix(12));
-t3=C_fixnum_plus(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
-t4=C_substring_copy(t2,((C_word*)t0)[4],((C_word*)t0)[6],t3,((C_word*)t0)[3]);
-t5=C_fixnum_plus(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
-t6=C_i_set_i_slot(((C_word*)t0)[7],C_fix(10),t5);
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,((C_word*)((C_word*)t0)[5])[1]);}
-
-/* a21830 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21831(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21831,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(10));
-t4=C_slot(t2,C_fix(11));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_fixnum_lessp(t3,t4));}
-
-/* a21827 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21828(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21828,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-
-/* a21817 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21818(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21818,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(11));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_set_i_slot(t2,C_fix(10),t3));}
-
-/* a21798 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21799(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21799,4,t0,t1,t2,t3);}
-t4=C_block_size(t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21803,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3229 check */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_16107(t6,t5,t2,t4);}
-
-/* k21801 in a21798 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=C_slot(((C_word*)t0)[5],C_fix(10));
-t3=C_slot(((C_word*)t0)[5],C_fix(12));
-t4=C_substring_copy(((C_word*)t0)[4],t3,C_fix(0),((C_word*)t0)[3],t2);
-t5=C_fixnum_plus(t2,((C_word*)t0)[3]);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_set_i_slot(((C_word*)t0)[5],C_fix(10),t5));}
-
-/* a21779 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21780(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_21780,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21784,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3222 check */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_16107(t5,t4,t2,C_fix(1));}
-
-/* k21782 in a21779 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21784(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(10));
-t3=C_slot(((C_word*)t0)[4],C_fix(12));
-t4=C_setsubchar(t3,t2,((C_word*)t0)[3]);
-t5=C_fixnum_plus(t2,C_fix(1));
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_set_i_slot(((C_word*)t0)[4],C_fix(10),t5));}
-
-/* a21761 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21762(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21762,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(10));
-t4=C_slot(t2,C_fix(12));
-t5=C_slot(t2,C_fix(11));
-if(C_truep(C_fixnum_greater_or_equal_p(t3,t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_END_OF_FILE);}
-else{
-t6=C_subchar(t4,t3);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* a21736 in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21737(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21737,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(10));
-t4=C_slot(t2,C_fix(12));
-t5=C_slot(t2,C_fix(11));
-if(C_truep(C_i_greater_or_equalp(t3,t5))){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_END_OF_FILE);}
-else{
-t6=C_subchar(t4,t3);
-t7=C_fixnum_plus(t3,C_fix(1));
-t8=C_i_set_i_slot(t2,C_fix(10),t7);
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t6);}}
-
-/* check in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16107(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16107,NULL,4,t0,t1,t2,t3);}
-t4=C_slot(t2,C_fix(10));
-t5=C_slot(t2,C_fix(11));
-t6=C_slot(t2,C_fix(12));
-t7=C_fixnum_plus(t4,t3);
-if(C_truep(C_fixnum_greater_or_equal_p(t7,t5))){
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16129,a[2]=t5,a[3]=t4,a[4]=t6,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[2],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(t7,C_fix(16777215)))){
-/* library.scm: 3197 ##sys#error */
-t9=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,lf[668],t2);}
-else{
-t9=t8;
-f_16129(2,t9,C_SCHEME_UNDEFINED);}}
-else{
-t8=C_SCHEME_UNDEFINED;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-
-/* k16127 in check in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16129(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16129,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16132,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[2],((C_word*)t0)[2]);
-/* library.scm: 3198 fxmin */
-t4=*((C_word*)lf[188]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,C_fix(16777215),t3);}
-
-/* k16130 in k16127 in check in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16132(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16132,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16135,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 3199 ##sys#make-string */
-t3=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-
-/* k16133 in k16130 in k16127 in check in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16135,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16138,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 3200 ##sys#copy-bytes */
-t3=*((C_word*)lf[667]+1);
-((C_proc7)(void*)(*((C_word*)t3+1)))(7,t3,t2,((C_word*)t0)[3],t1,C_fix(0),C_fix(0),((C_word*)t0)[2]);}
-
-/* k16136 in k16133 in k16130 in k16127 in check in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[7],C_fix(12),((C_word*)t0)[6]);
-t3=C_i_set_i_slot(((C_word*)t0)[7],C_fix(11),((C_word*)t0)[5]);
-/* library.scm: 3203 check */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_16107(t4,((C_word*)t0)[3],((C_word*)t0)[7],((C_word*)t0)[2]);}
-
-/* bit-set? in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16103(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_16103,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_bit_setp(t2,t3));}
-
-/* arithmetic-shift in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16100(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_16100,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_arithmetic_shift(&a,2,t2,t3));}
-
-/* bitwise-not in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16097(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16097,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_bitwise_not(&a,1,t2));}
-
-/* bitwise-xor in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16070(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16070r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16070r(t0,t1,t2);}}
-
-static void C_ccall f_16070r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16076,a[2]=t4,a[3]=((C_word)li537),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_16076(t6,t1,C_fix(0),t2);}
-
-/* loop in bitwise-xor in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16076(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_16076,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_slot(t3,C_fix(0));
-t5=C_a_i_bitwise_xor(&a,2,t2,t4);
-t6=C_slot(t3,C_fix(1));
-/* library.scm: 3159 loop */
-t9=t1;
-t10=t5;
-t11=t6;
-t1=t9;
-t2=t10;
-t3=t11;
-goto loop;}}
-
-/* bitwise-ior in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16043(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16043r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16043r(t0,t1,t2);}}
-
-static void C_ccall f_16043r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16049,a[2]=t4,a[3]=((C_word)li535),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_16049(t6,t1,C_fix(0),t2);}
-
-/* loop in bitwise-ior in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16049(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_16049,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_slot(t3,C_fix(0));
-t5=C_a_i_bitwise_ior(&a,2,t2,t4);
-t6=C_slot(t3,C_fix(1));
-/* library.scm: 3152 loop */
-t9=t1;
-t10=t5;
-t11=t6;
-t1=t9;
-t2=t10;
-t3=t11;
-goto loop;}}
-
-/* bitwise-and in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16016(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_16016r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_16016r(t0,t1,t2);}}
-
-static void C_ccall f_16016r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16022,a[2]=t4,a[3]=((C_word)li533),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_16022(t6,t1,C_fix(-1),t2);}
-
-/* loop in bitwise-and in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_16022(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_16022,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_nullp(t3))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_slot(t3,C_fix(0));
-t5=C_a_i_bitwise_and(&a,2,t2,t4);
-t6=C_slot(t3,C_fix(1));
-/* library.scm: 3145 loop */
-t9=t1;
-t10=t5;
-t11=t6;
-t1=t9;
-t2=t10;
-t3=t11;
-goto loop;}}
-
-/* ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15975(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_15975,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15981,a[2]=t3,a[3]=t2,a[4]=((C_word)li531),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3131 call-with-current-continuation */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t1,t4);}
-
-/* a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15981(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[16],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_15981,3,t0,t1,t2);}
-t3=lf[612];
-t4=lf[613];
-t5=lf[611];
-t6=((C_word*)t0)[3];
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=t2;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_fix(0);
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15983,a[2]=t11,a[3]=t9,a[4]=t7,a[5]=((C_word)li529),tmp=(C_word)a,a+=6,tmp);
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16010,a[2]=((C_word*)t0)[2],a[3]=((C_word)li530),tmp=(C_word)a,a+=4,tmp);
-/* ##sys#dynamic-wind */
-t14=*((C_word*)lf[411]+1);
-((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t1,t12,t13,t12);}
-
-/* a16009 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16010,2,t0,t1);}
-/* library.scm: 3136 thunk */
-t2=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t2))(2,t2,t1);}
-
-/* swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15983,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15987,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* g360736083619 */
-((C_proc2)C_retrieve_proc(lf[612]))(2,lf[612],t2);}
-
-/* k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15987,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* g360736083619 */
-((C_proc3)C_retrieve_proc(lf[612]))(3,lf[612],t2,((C_word*)((C_word*)t0)[5])[1]);}
-
-/* k15988 in k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15990(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15990,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15994,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* g360936103620 */
-((C_proc2)C_retrieve_proc(lf[613]))(2,lf[613],t3);}
-
-/* k15992 in k15988 in k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15994,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15997,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* g360936103620 */
-((C_proc3)C_retrieve_proc(lf[613]))(3,lf[613],t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k15995 in k15992 in k15988 in k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15997(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15997,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16001,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* g361136123621 */
-((C_proc2)C_retrieve_proc(lf[611]))(2,lf[611],t3);}
-
-/* k15999 in k15995 in k15992 in k15988 in k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16001(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16001,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16004,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* g361136123621 */
-((C_proc3)C_retrieve_proc(lf[611]))(3,lf[611],t2,((C_word*)((C_word*)t0)[3])[1]);}
-
-/* k16002 in k15999 in k15995 in k15992 in k15988 in k15985 in swap3604 in a15980 in ##sys#with-print-length-limit in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_16004(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15912(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_15912,5,t0,t1,t2,t3,t4);}
-t5=C_slot(t2,C_fix(0));
-t6=C_i_assq(t5,*((C_word*)lf[653]+1));
-if(C_truep(t6)){
-t7=C_slot(t6,C_fix(1));
-/* g35883589 */
-t8=t7;
-((C_proc4)C_retrieve_proc(t8))(4,t8,t1,t2,t4);}
-else{
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15931,a[2]=t2,a[3]=t5,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3117 ##sys#print */
-t8=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,lf[659],C_SCHEME_FALSE,t4);}}
-
-/* k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15931(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15931,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15934,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15973,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3118 ##sys#symbol->string */
-t4=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-
-/* k15971 in k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15973(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3118 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k15932 in k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15934,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15937,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_eqp(((C_word*)t0)[3],lf[655]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15946,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3121 ##sys#print */
-t5=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,lf[656],C_SCHEME_FALSE,((C_word*)t0)[4]);}
-else{
-t4=C_eqp(((C_word*)t0)[3],lf[657]);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15962,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3124 ##sys#print */
-t6=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[658],C_SCHEME_FALSE,((C_word*)t0)[4]);}
-else{
-/* library.scm: 3126 ##sys#print */
-t5=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,((C_word*)t0)[5],C_make_character(62),C_SCHEME_FALSE,((C_word*)t0)[4]);}}}
-
-/* k15960 in k15932 in k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(6));
-/* library.scm: 3125 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k15944 in k15932 in k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15946(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 3122 ##sys#print */
-t3=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k15935 in k15932 in k15929 in ##sys#user-print-hook in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15937(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3126 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],C_make_character(62),C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* ##sys#register-record-printer in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15892(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_15892,4,t0,t1,t2,t3);}
-t4=C_i_assq(t2,*((C_word*)lf[653]+1));
-if(C_truep(t4)){
-t5=C_i_setslot(t4,C_fix(1),t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}
-else{
-t5=C_a_i_cons(&a,2,t2,t3);
-t6=C_a_i_cons(&a,2,t5,*((C_word*)lf[653]+1));
-t7=C_mutate((C_word*)lf[653]+1 /* (set! record-printers ...) */,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_UNDEFINED);}}
-
-/* ##sys#procedure->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15875(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_15875,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15879,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3098 ##sys#lambda-info */
-t4=*((C_word*)lf[652]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k15877 in ##sys#procedure->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15879,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15889,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 3100 ##sys#lambda-info->string */
-t3=*((C_word*)lf[640]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[651]);}}
-
-/* k15887 in k15877 in ##sys#procedure->string in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3100 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[649],t1,lf[650]);}
-
-/* ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14929(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_14929,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14933,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=t4,tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2903 ##sys#check-port-mode */
-t6=*((C_word*)lf[434]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,C_SCHEME_FALSE);}
-
-/* k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14933(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14933,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14936,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2904 csp */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14936(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14936,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14939,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2905 ksp */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14939,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14942,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2906 print-length-limit */
-((C_proc2)C_retrieve_proc(lf[612]))(2,lf[612],t2);}
-
-/* k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word ab[44],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14942,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14944,a[2]=t1,a[3]=((C_word)li513),tmp=(C_word)a,a+=4,tmp));
-t13=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15015,a[2]=t1,a[3]=((C_word)li514),tmp=(C_word)a,a+=4,tmp));
-t14=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15056,a[2]=((C_word)li515),tmp=(C_word)a,a+=3,tmp));
-t15=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15077,a[2]=t5,a[3]=((C_word)li517),tmp=(C_word)a,a+=4,tmp));
-t16=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15126,a[2]=((C_word*)t0)[8],a[3]=t7,a[4]=((C_word)li519),tmp=(C_word)a,a+=5,tmp));
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15251,a[2]=t18,a[3]=t11,a[4]=t9,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t5,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t3,a[11]=((C_word)li524),tmp=(C_word)a,a+=12,tmp));
-t20=((C_word*)t18)[1];
-f_15251(t20,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15251(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15251,NULL,3,t0,t1,t2);}
-switch(t2){
-case C_SCHEME_END_OF_LIST:
-/* library.scm: 2976 outstr */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t3,t1,((C_word*)t0)[9],lf[618]);
-case C_SCHEME_TRUE:
-/* library.scm: 2977 outstr */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t3,t1,((C_word*)t0)[9],lf[619]);
-case C_SCHEME_FALSE:
-/* library.scm: 2978 outstr */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t3,t1,((C_word*)t0)[9],lf[620]);
-default:
-if(C_truep(C_eofp(t2))){
-/* library.scm: 2979 outstr */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t3,t1,((C_word*)t0)[9],lf[621]);}
-else{
-if(C_truep(C_undefinedp(t2))){
-/* library.scm: 2980 outstr */
-t3=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t3,t1,((C_word*)t0)[9],lf[622]);}
-else{
-if(C_truep(C_charp(t2))){
-if(C_truep(((C_word*)t0)[8])){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15300,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2983 outstr */
-t4=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t4,t3,((C_word*)t0)[9],lf[623]);}
-else{
-/* library.scm: 2995 outchr */
-t3=((C_word*)((C_word*)t0)[7])[1];
-f_15015(t3,t1,((C_word*)t0)[9],t2);}}
-else{
-if(C_truep(C_fixnump(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15376,a[2]=((C_word*)t0)[9],a[3]=t1,a[4]=((C_word*)t0)[10],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2996 ##sys#number->string */
-t4=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-else{
-t3=C_slot(lf[624],C_fix(0));
-t4=C_eqp(t2,t3);
-if(C_truep(t4)){
-/* library.scm: 2998 outstr */
-t5=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t5,t1,((C_word*)t0)[9],lf[625]);}
-else{
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_forwardedp(t2))){
-/* library.scm: 3000 outstr */
-t5=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t5,t1,((C_word*)t0)[9],lf[626]);}
-else{
-if(C_truep(C_symbolp(t2))){
-t5=C_slot(t2,C_fix(1));
-t6=C_subbyte(t5,C_fix(0));
-t7=C_eqp(C_fix(0),t6);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15412,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[9],a[4]=t1,a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3003 ##sys#symbol->string */
-t9=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t2);}
-else{
-t8=t2;
-if(C_truep((C_truep(C_eqp(t8,lf[628]))?C_SCHEME_TRUE:(C_truep(C_eqp(t8,lf[629]))?C_SCHEME_TRUE:(C_truep(C_eqp(t8,lf[630]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))){
-t9=C_slot(t2,C_fix(1));
-/* library.scm: 3014 outstr */
-t10=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t10,t1,((C_word*)t0)[9],t9);}
-else{
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15458,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=t1,a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 3016 ##sys#symbol->qualified-string */
-t10=*((C_word*)lf[331]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}}}
-else{
-t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t2,a[6]=((C_word*)t0)[9],a[7]=t1,a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 3020 ##sys#number? */
-t6=*((C_word*)lf[256]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}}
-else{
-/* library.scm: 2999 outstr */
-t5=((C_word*)((C_word*)t0)[10])[1];
-f_14944(t5,t1,((C_word*)t0)[9],lf[648]);}}}}}}}}
-
-/* k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15490(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15490,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15497,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3020 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-if(C_truep(C_anypointerp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15507,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3021 ##sys#pointer->string */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[631]+1)))(3,*((C_word*)lf[631]+1),t2,((C_word*)t0)[5]);}
-else{
-if(C_truep(C_stringp(((C_word*)t0)[5]))){
-if(C_truep(((C_word*)t0)[4])){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15516,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3024 outchr */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t3,t2,((C_word*)t0)[6],C_make_character(34));}
-else{
-/* library.scm: 3048 outstr */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t2,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);}}
-else{
-if(C_truep(C_pairp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15654,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 3050 outchr */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t3,t2,((C_word*)t0)[6],C_make_character(40));}
-else{
-if(C_truep(C_bytevectorp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15725,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_permanentp(((C_word*)t0)[5]))){
-/* library.scm: 3063 outstr */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t3,t2,((C_word*)t0)[6],lf[635]);}
-else{
-/* library.scm: 3064 outstr */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t3,t2,((C_word*)t0)[6],lf[636]);}}
-else{
-if(C_truep(C_structurep(((C_word*)t0)[5]))){
-/* library.scm: 3067 ##sys#user-print-hook */
-t2=*((C_word*)lf[637]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[6]);}
-else{
-if(C_truep(C_closurep(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15757,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3068 ##sys#procedure->string */
-t3=*((C_word*)lf[638]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-else{
-if(C_truep(C_locativep(((C_word*)t0)[5]))){
-/* library.scm: 3069 outstr */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t2,((C_word*)t0)[7],((C_word*)t0)[6],lf[639]);}
-else{
-if(C_truep(C_lambdainfop(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15769,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3071 outstr */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t3,t2,((C_word*)t0)[6],lf[641]);}
-else{
-if(C_truep(C_portp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15785,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_slot(((C_word*)t0)[5],C_fix(1)))){
-/* library.scm: 3076 outstr */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t3,t2,((C_word*)t0)[6],lf[643]);}
-else{
-/* library.scm: 3077 outstr */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t3,t2,((C_word*)t0)[6],lf[644]);}}
-else{
-if(C_truep(C_vectorp(((C_word*)t0)[5]))){
-t2=C_block_size(((C_word*)t0)[5]);
-t3=C_eqp(C_fix(0),t2);
-if(C_truep(t3)){
-/* library.scm: 3083 outstr */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t4,((C_word*)t0)[7],((C_word*)t0)[6],lf[645]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15819,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[3],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 3085 outstr */
-t5=((C_word*)((C_word*)t0)[8])[1];
-f_14944(t5,t4,((C_word*)t0)[6],lf[646]);}}
-else{
-/* library.scm: 3093 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[7],lf[647]);}}}}}}}}}}}}
-
-/* k15817 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15819,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15822,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_slot(((C_word*)t0)[4],C_fix(0));
-/* library.scm: 3086 out */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_15251(t4,t2,t3);}
-
-/* k15820 in k15817 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15822(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15822,2,t0,t1);}
-t2=C_fixnum_difference(((C_word*)t0)[7],C_fix(1));
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15831,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li523),tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_15831(t6,((C_word*)t0)[2],C_fix(1),t2);}
-
-/* doloop3548 in k15820 in k15817 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15831(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15831,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-/* library.scm: 3090 outchr */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t5,t1,((C_word*)t0)[5],C_make_character(41));}
-else{
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15844,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 3091 outchr */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t6,t5,((C_word*)t0)[5],C_make_character(32));}}
-
-/* k15842 in doloop3548 in k15820 in k15817 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15844,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15847,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=C_slot(((C_word*)t0)[3],((C_word*)t0)[7]);
-/* library.scm: 3092 out */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15251(t4,t2,t3);}
-
-/* k15845 in k15842 in doloop3548 in k15820 in k15817 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15847(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_15831(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k15783 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15785,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15788,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_slot(((C_word*)t0)[2],C_fix(3));
-/* library.scm: 3078 outstr */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_14944(t4,t2,((C_word*)t0)[3],t3);}
-
-/* k15786 in k15783 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15788(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3079 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[642]);}
-
-/* k15767 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15769(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15769,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15772,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15779,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3072 ##sys#lambda-info->string */
-t4=*((C_word*)lf[640]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k15777 in k15767 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3072 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15770 in k15767 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15772(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3073 outchr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_15015(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(62));}
-
-/* k15755 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15757(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3068 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15723 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15725,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15728,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15735,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3065 number->string */
-C_number_to_string(3,0,t3,C_block_size(((C_word*)t0)[2]));}
-
-/* k15733 in k15723 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15735(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3065 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15726 in k15723 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3066 outchr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_15015(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(62));}
-
-/* k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15654,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15657,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=C_slot(((C_word*)t0)[7],C_fix(0));
-/* library.scm: 3051 out */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_15251(t4,t2,t3);}
-
-/* k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15657,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[7],C_fix(1));
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15666,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li522),tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_15666(t6,((C_word*)t0)[2],t2);}
-
-/* doloop3518 in k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15666(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15666,NULL,3,t0,t1,t2);}
-t3=C_i_not(C_blockp(t2));
-t4=(C_truep(t3)?t3:C_i_not(C_pairp(t2)));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15679,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t6=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t6)){
-/* library.scm: 3058 outchr */
-t7=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t7,t1,((C_word*)t0)[5],C_make_character(41));}
-else{
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15688,a[2]=t2,a[3]=t5,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3056 outstr */
-t8=((C_word*)((C_word*)t0)[3])[1];
-f_14944(t8,t7,((C_word*)t0)[5],lf[634]);}}
-else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15698,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3059 outchr */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t6,t5,((C_word*)t0)[5],C_make_character(32));}}
-
-/* k15696 in doloop3518 in k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15698(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15698,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15701,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_slot(((C_word*)t0)[5],C_fix(0));
-/* library.scm: 3060 out */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15251(t4,t2,t3);}
-
-/* k15699 in k15696 in doloop3518 in k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15701(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15666(t3,((C_word*)t0)[2],t2);}
-
-/* k15686 in doloop3518 in k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15688(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3057 out */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_15251(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15677 in doloop3518 in k15655 in k15652 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15679(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3058 outchr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_15015(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(41));}
-
-/* k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15516(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15516,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15521,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li521),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_15521(t5,((C_word*)t0)[2],C_fix(0),C_block_size(((C_word*)t0)[4]));}
-
-/* doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15521(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15521,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-/* library.scm: 3028 outchr */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t5,t1,((C_word*)t0)[5],C_make_character(34));}
-else{
-t5=C_subbyte(((C_word*)t0)[4],t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15534,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-switch(t5){
-case C_fix(34):
-/* library.scm: 3031 outstr */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_14944(t7,t6,((C_word*)t0)[5],lf[632]);
-case C_fix(92):
-/* library.scm: 3032 outstr */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_14944(t7,t6,((C_word*)t0)[5],lf[633]);
-default:
-if(C_truep(C_fixnum_lessp(t5,C_fix(32)))){
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15569,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t6,a[5]=((C_word*)t0)[6],a[6]=t5,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3035 outchr */
-t8=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t8,t7,((C_word*)t0)[5],C_make_character(92));}
-else{
-/* library.scm: 3047 outchr */
-t7=((C_word*)((C_word*)t0)[6])[1];
-f_15015(t7,t6,((C_word*)t0)[5],C_fix_to_char(t5));}}}}
-
-/* k15567 in doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15569(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15569,2,t0,t1);}
-switch(((C_word*)t0)[6]){
-case C_fix(9):
-/* library.scm: 3037 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(116));
-case C_fix(10):
-/* library.scm: 3038 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(110));
-case C_fix(13):
-/* library.scm: 3039 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(114));
-case C_fix(11):
-/* library.scm: 3040 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(118));
-case C_fix(12):
-/* library.scm: 3041 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(102));
-case C_fix(8):
-/* library.scm: 3042 outchr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(98));
-default:
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15626,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 3044 outchr */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t3,t2,((C_word*)t0)[3],C_make_character(120));}}
-
-/* k15624 in k15567 in doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15626,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[3],C_fix(16)))){
-/* library.scm: 3045 outchr */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_15015(t3,t2,((C_word*)t0)[4],C_make_character(48));}
-else{
-t3=t2;
-f_15629(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k15627 in k15624 in k15567 in doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15629,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15636,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3046 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k15634 in k15627 in k15624 in k15567 in doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3046 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15532 in doloop3487 in k15514 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_15521(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k15505 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15507(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3021 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15495 in k15488 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3020 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15456 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15458,2,t0,t1);}
-t2=C_i_not(((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15467,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_15467(2,t4,t2);}
-else{
-/* library.scm: 3017 sym-is-readable? */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15126(t4,t3,t1);}}
-
-/* k15465 in k15456 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 3018 outstr */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_14944(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-/* library.scm: 3019 outreadablesym */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_15077(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-
-/* k15410 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15412(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15412,2,t0,t1);}
-t2=C_eqp(((C_word*)t0)[6],lf[568]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15421,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3006 outchr */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15015(t4,t3,((C_word*)t0)[3],C_make_character(58));}
-else{
-t3=C_eqp(((C_word*)t0)[6],lf[567]);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15433,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 3009 outstr */
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_14944(t5,t4,((C_word*)t0)[3],t1);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15439,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 3012 outstr */
-t5=((C_word*)((C_word*)t0)[5])[1];
-f_14944(t5,t4,((C_word*)t0)[3],lf[627]);}}}
-
-/* k15437 in k15410 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3013 outstr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_14944(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15431 in k15410 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3010 outchr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_15015(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(58));}
-
-/* k15419 in k15410 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15421(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 3007 outstr */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_14944(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15374 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15376(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2996 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15300(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15300,2,t0,t1);}
-t2=C_fix(C_character_code(((C_word*)t0)[7]));
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15306,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2985 char-name */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[7]);}
-
-/* k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15306(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15306,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15310,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word)li520),tmp=(C_word)a,a+=5,tmp);
-/* g34543455 */
-t3=t2;
-f_15310(t3,((C_word*)t0)[5],t1);}
-else{
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[4],C_fix(32)))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15330,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2989 outchr */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t3,t2,((C_word*)t0)[6],C_make_character(120));}
-else{
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(255)))){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15346,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(65535)))){
-/* library.scm: 2992 outchr */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t3,t2,((C_word*)t0)[6],C_make_character(85));}
-else{
-/* library.scm: 2992 outchr */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t3,t2,((C_word*)t0)[6],C_make_character(117));}}
-else{
-/* library.scm: 2994 outchr */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_15015(t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[2]);}}}}
-
-/* k15344 in k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15346(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15346,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15353,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2993 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k15351 in k15344 in k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15353(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2993 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k15328 in k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15330(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15330,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15337,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2990 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k15335 in k15328 in k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15337(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2990 outstr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_14944(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* g3454 in k15304 in k15298 in out in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15310(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15310,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-/* library.scm: 2987 outstr */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_14944(t4,t1,((C_word*)t0)[2],t3);}
-
-/* sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15126(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15126,NULL,3,t0,t1,t2);}
-t3=C_block_size(t2);
-if(C_truep(C_fixnum_greaterp(t3,C_fix(0)))){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15142,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t5=C_eqp(t3,C_fix(1));
-if(C_truep(t5)){
-t6=C_subchar(t2,C_fix(0));
-t7=C_eqp(t6,C_make_character(46));
-if(C_truep(t7)){
-t8=t4;
-f_15142(t8,(C_truep(t7)?C_SCHEME_FALSE:C_SCHEME_TRUE));}
-else{
-t8=C_eqp(t6,C_make_character(35));
-t9=t4;
-f_15142(t9,(C_truep(t8)?C_SCHEME_FALSE:C_SCHEME_TRUE));}}
-else{
-t6=t4;
-f_15142(t6,C_SCHEME_UNDEFINED);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k15140 in sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15142(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15142,NULL,2,t0,t1);}
-if(C_truep(t1)){
-if(C_truep(C_substring_compare(lf[617],((C_word*)t0)[6],C_fix(0),C_fix(0),C_fix(2)))){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15157,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word)li518),tmp=(C_word)a,a+=7,tmp));
-t6=((C_word*)t4)[1];
-f_15157(t6,((C_word*)t0)[5],t2);}}
-else{
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* loop in k15140 in sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15157(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15157,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_fix(0));
-if(C_truep(t3)){
-t4=C_subchar(((C_word*)t0)[5],C_fix(0));
-t5=C_u_i_char_numericp(t4);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15173,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_15173(t7,t5);}
-else{
-t7=C_eqp(t4,C_make_character(43));
-if(C_truep(t7)){
-t8=t6;
-f_15173(t8,t7);}
-else{
-t8=C_eqp(t4,C_make_character(45));
-t9=t6;
-f_15173(t9,(C_truep(t8)?t8:C_eqp(t4,C_make_character(46))));}}}
-else{
-t4=C_subchar(((C_word*)t0)[5],t2);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15207,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=t4,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(((C_word*)t0)[2])){
-t6=t5;
-f_15207(t6,((C_word*)t0)[2]);}
-else{
-t6=C_u_i_char_upper_casep(t4);
-t7=t5;
-f_15207(t7,C_i_not(t6));}}}
-
-/* k15205 in loop in k15140 in sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15207(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=f_15056(((C_word*)t0)[5]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 2973 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_15157(t4,((C_word*)t0)[4],t3);}}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k15171 in loop in k15140 in sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15173(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15173,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15180,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2967 ##sys#string->number */
-t3=*((C_word*)lf[318]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-else{
-t2=f_15056(((C_word*)t0)[2]);
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_SCHEME_FALSE:C_SCHEME_TRUE));}}
-
-/* k15178 in k15171 in loop in k15140 in sym-is-readable? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15180(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_not(t1));}
-
-/* outreadablesym in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15077(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15077,NULL,4,t0,t1,t2,t3);}
-t4=C_block_size(t3);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15084,a[2]=t1,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2943 outchr */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_15015(t6,t5,t2,C_make_character(124));}
-
-/* k15082 in outreadablesym in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15084,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15089,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li516),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_15089(t5,((C_word*)t0)[2],C_fix(0));}
-
-/* loop in k15082 in outreadablesym in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15089(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15089,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
-/* library.scm: 2946 outchr */
-t3=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t3,t1,((C_word*)t0)[4],C_make_character(124));}
-else{
-t3=C_subchar(((C_word*)t0)[3],t2);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15102,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[2],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t5=C_eqp(t3,C_make_character(124));
-if(C_truep(t5)){
-if(C_truep(t5)){
-/* library.scm: 2948 outchr */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t6,t4,((C_word*)t0)[4],C_make_character(92));}
-else{
-t6=t4;
-f_15102(2,t6,C_SCHEME_UNDEFINED);}}
-else{
-t6=C_eqp(t3,C_make_character(92));
-if(C_truep(t6)){
-/* library.scm: 2948 outchr */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_15015(t7,t4,((C_word*)t0)[4],C_make_character(92));}
-else{
-t7=t4;
-f_15102(2,t7,C_SCHEME_UNDEFINED);}}}}
-
-/* k15100 in loop in k15082 in outreadablesym in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15102(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15102,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15105,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2949 outchr */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_15015(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k15103 in k15100 in loop in k15082 in outreadablesym in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 2950 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_15089(t3,((C_word*)t0)[2],t2);}
-
-/* specialchar? in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_15056(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_stack_check;
-t2=C_fix(C_character_code(t1));
-t3=C_fixnum_less_or_equal_p(t2,C_fix(32));
-if(C_truep(t3)){
-return(t3);}
-else{
-t4=C_fixnum_greater_or_equal_p(t2,C_fix(128));
-return((C_truep(t4)?t4:C_i_memq(t1,lf[616])));}}
-
-/* outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_15015(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15015,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15019,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2928 cpp */
-((C_proc2)C_retrieve_proc(lf[611]))(2,lf[611],t4);}
-
-/* k15017 in outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15019(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15019,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15022,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t3=C_fixnum_plus(t1,C_fix(1));
-/* library.scm: 2929 cpp */
-((C_proc3)C_retrieve_proc(lf[611]))(3,lf[611],t2,t3);}
-
-/* k15020 in k15017 in outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15022(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15022,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15025,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(C_truep(((C_word*)t0)[3])?C_fixnum_greater_or_equal_p(((C_word*)t0)[2],((C_word*)t0)[3]):C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15041,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t5=((C_word*)t0)[6];
-t6=C_slot(t5,C_fix(2));
-t7=C_slot(t6,C_fix(3));
-/* g33333334 */
-t8=t7;
-((C_proc4)C_retrieve_proc(t8))(4,t8,t4,t5,lf[615]);}
-else{
-t4=C_slot(((C_word*)t0)[6],C_fix(2));
-t5=C_slot(t4,C_fix(2));
-/* g33453346 */
-t6=t5;
-((C_proc4)C_retrieve_proc(t6))(4,t6,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[4]);}}
-
-/* k15039 in k15020 in k15017 in outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15041(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15041,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15044,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2932 ##sys#print-exit */
-((C_proc2)C_retrieve_proc(lf[613]))(2,lf[613],t2);}
-
-/* k15042 in k15039 in k15020 in k15017 in outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15044(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g33423343 */
-t2=t1;
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_TRUE);}
-
-/* k15023 in k15020 in k15017 in outchr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_15025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(2));
-t3=C_slot(t2,C_fix(2));
-/* g33453346 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* outstr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_14944(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14944,NULL,4,t0,t1,t2,t3);}
-if(C_truep(((C_word*)t0)[2])){
-t4=C_block_size(t3);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14954,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2912 cpp */
-((C_proc2)C_retrieve_proc(lf[611]))(2,lf[611],t5);}
-else{
-t4=t1;
-t5=t2;
-t6=t3;
-t7=C_slot(t5,C_fix(2));
-t8=C_slot(t7,C_fix(3));
-/* g33333334 */
-t9=t8;
-((C_proc4)C_retrieve_proc(t9))(4,t9,t4,t5,t6);}}
-
-/* k14952 in outstr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14954,2,t0,t1);}
-t2=C_fixnum_plus(t1,((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14960,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
-if(C_truep(C_fixnum_greaterp(((C_word*)t0)[6],C_fix(3)))){
-t4=C_fixnum_difference(((C_word*)t0)[4],t1);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14978,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_fixnum_greaterp(t4,C_fix(0)))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14991,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2917 ##sys#substring */
-t7=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,((C_word*)t0)[2],C_fix(0),t4);}
-else{
-t6=((C_word*)t0)[3];
-t7=C_slot(t6,C_fix(2));
-t8=C_slot(t7,C_fix(3));
-/* g33333334 */
-t9=t8;
-((C_proc4)C_retrieve_proc(t9))(4,t9,t3,t6,lf[614]);}}
-else{
-t4=((C_word*)t0)[3];
-t5=((C_word*)t0)[2];
-t6=C_slot(t4,C_fix(2));
-t7=C_slot(t6,C_fix(3));
-/* g33333334 */
-t8=t7;
-((C_proc4)C_retrieve_proc(t8))(4,t8,t3,t4,t5);}}
-else{
-t4=((C_word*)t0)[3];
-t5=((C_word*)t0)[2];
-t6=C_slot(t4,C_fix(2));
-t7=C_slot(t6,C_fix(3));
-/* g33333334 */
-t8=t7;
-((C_proc4)C_retrieve_proc(t8))(4,t8,t3,t4,t5);}}
-
-/* k14989 in k14952 in outstr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=C_slot(t2,C_fix(2));
-t4=C_slot(t3,C_fix(3));
-/* g33333334 */
-t5=t4;
-((C_proc4)C_retrieve_proc(t5))(4,t5,((C_word*)t0)[2],t2,t1);}
-
-/* k14976 in k14952 in outstr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14978(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=C_slot(t2,C_fix(2));
-t4=C_slot(t3,C_fix(3));
-/* g33333334 */
-t5=t4;
-((C_proc4)C_retrieve_proc(t5))(4,t5,((C_word*)t0)[2],t2,lf[614]);}
-
-/* k14958 in k14952 in outstr in k14940 in k14937 in k14934 in k14931 in ##sys#print in k14925 in k14921 in k14917 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2921 cpp */
-((C_proc3)C_retrieve_proc(lf[611]))(3,lf[611],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* print* in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14894(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_14894r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_14894r(t0,t1,t2);}}
-
-static void C_ccall f_14894r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(6);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14909,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14902,a[2]=((C_word)li511),tmp=(C_word)a,a+=3,tmp);
-/* for-each */
-t5=*((C_word*)lf[404]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,t2);}
-
-/* a14901 in print* in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14902(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14902,3,t0,t1,t2);}
-t3=*((C_word*)lf[607]+1);
-/* g32923293 */
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,t2,C_SCHEME_FALSE,*((C_word*)lf[430]+1));}
-
-/* k14907 in print* in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14909(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14909,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14912,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2889 ##sys#flush-output */
-t3=*((C_word*)lf[481]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[430]+1));}
-
-/* k14910 in k14907 in print* in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14912(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[46]+1));}
-
-/* print in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14871(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_14871r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_14871r(t0,t1,t2);}}
-
-static void C_ccall f_14871r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(6);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14886,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14879,a[2]=((C_word)li509),tmp=(C_word)a,a+=3,tmp);
-/* for-each */
-t5=*((C_word*)lf[404]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,t2);}
-
-/* a14878 in print in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14879(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14879,3,t0,t1,t2);}
-t3=*((C_word*)lf[607]+1);
-/* g32643265 */
-t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,t2,C_SCHEME_FALSE,*((C_word*)lf[430]+1));}
-
-/* k14884 in print in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14886,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14889,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2884 ##sys#write-char-0 */
-t3=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),*((C_word*)lf[430]+1));}
-
-/* k14887 in k14884 in print in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14889(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[46]+1));}
-
-/* display in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14840(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_14840r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_14840r(t0,t1,t2,t3);}}
-
-static void C_ccall f_14840r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14844,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_14844(2,t5,*((C_word*)lf[430]+1));}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_14844(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k14842 in display in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14844,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14847,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2876 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[608]);}
-
-/* k14845 in k14842 in display in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14847(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2877 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* write in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14809(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_14809r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_14809r(t0,t1,t2,t3);}}
-
-static void C_ccall f_14809r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14813,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_14813(2,t5,*((C_word*)lf[430]+1));}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_14813(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k14811 in write in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14813,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14816,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2872 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[606]);}
-
-/* k14814 in k14811 in write in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2873 ##sys#print */
-t2=*((C_word*)lf[607]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-
-/* newline in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14781(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_14781r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_14781r(t0,t1,t2);}}
-
-static void C_ccall f_14781r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14785,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=*((C_word*)lf[430]+1);
-/* library.scm: 2869 ##sys#write-char/port */
-t5=*((C_word*)lf[603]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,C_make_character(10),t4);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=C_i_car(t2);
-/* library.scm: 2869 ##sys#write-char/port */
-t6=*((C_word*)lf[603]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,C_make_character(10),t5);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k14783 in newline in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14785(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2869 ##sys#write-char/port */
-t2=*((C_word*)lf[603]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),t1);}
-
-/* write-char in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14744(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_14744r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_14744r(t0,t1,t2,t3);}}
-
-static void C_ccall f_14744r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14748,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_14748(2,t5,*((C_word*)lf[430]+1));}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_14748(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k14746 in write-char in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14748,2,t0,t1);}
-t2=C_i_check_char_2(((C_word*)t0)[3],lf[604]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14754,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2864 ##sys#check-port* */
-t4=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,lf[604]);}
-
-/* k14752 in k14746 in write-char in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14754(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14754,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14757,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2865 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,lf[604]);}
-
-/* k14755 in k14752 in k14746 in write-char in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14757(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2866 ##sys#write-char-0 */
-t2=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#write-char/port in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14732(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14732,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14736,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2858 ##sys#check-port* */
-t5=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[604]);}
-
-/* k14734 in ##sys#write-char/port in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_check_char_2(((C_word*)t0)[4],lf[604]);
-/* library.scm: 2860 ##sys#write-char-0 */
-t3=*((C_word*)lf[602]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2]);}
-
-/* ##sys#write-char-0 in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14719(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14719,4,t0,t1,t2,t3);}
-t4=C_slot(t3,C_fix(2));
-t5=C_slot(t4,C_fix(2));
-/* g31723173 */
-t6=t5;
-((C_proc4)C_retrieve_proc(t6))(4,t6,t1,t3,t2);}
-
-/* copy-read-table in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14668(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14668,3,t0,t1,t2);}
-t3=C_i_check_structure_2(t2,lf[601],lf[600]);
-t4=C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14682,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(t4)){
-t6=C_block_size(t4);
-/* library.scm: 2845 ##sys#grow-vector */
-f_9617(t5,t4,t6,C_SCHEME_FALSE);}
-else{
-t6=t5;
-f_14682(2,t6,C_SCHEME_FALSE);}}
-
-/* k14680 in copy-read-table in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14682(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14682,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[3],C_fix(2));
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14689,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t2)){
-t4=C_block_size(t2);
-/* library.scm: 2847 ##sys#grow-vector */
-f_9617(t3,t2,t4,C_SCHEME_FALSE);}
-else{
-t4=t3;
-f_14689(2,t4,C_SCHEME_FALSE);}}
-
-/* k14687 in k14680 in copy-read-table in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14689,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[4],C_fix(3));
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14696,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t2)){
-t4=C_block_size(t2);
-/* library.scm: 2849 ##sys#grow-vector */
-f_9617(t3,t2,t4,C_SCHEME_FALSE);}
-else{
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[601],((C_word*)t0)[2],t1,C_SCHEME_FALSE));}}
-
-/* k14694 in k14687 in k14680 in copy-read-table in k14664 in k14660 in k14656 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14696,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,4,lf[601],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* syntax-setter in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_14606(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14606,NULL,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14608,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t3,a[5]=t2,a[6]=((C_word)li500),tmp=(C_word)a,a+=7,tmp));}
-
-/* f_14608 in syntax-setter in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14608(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14608,4,t0,t1,t2,t3);}
-if(C_truep(C_i_symbolp(t2))){
-/* library.scm: 2803 ##sys#set-read-mark! */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[596]+1)))(4,*((C_word*)lf[596]+1),t1,t2,t3);}
-else{
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14621,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2805 crt */
-t5=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}}
-
-/* k14619 */
-static void C_ccall f_14621(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14621,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14624,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(C_slot(t1,((C_word*)t0)[5]))){
-t3=t2;
-f_14624(t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14654,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2807 ##sys#make-vector */
-t4=*((C_word*)lf[361]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_fix(256),C_SCHEME_FALSE);}}
-
-/* k14652 in k14619 */
-static void C_ccall f_14654(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-f_14624(t2,C_i_setslot(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* k14622 in k14619 */
-static void C_fcall f_14624(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14624,NULL,2,t0,t1);}
-t2=C_i_check_char_2(((C_word*)t0)[8],((C_word*)t0)[7]);
-t3=C_fix(C_character_code(((C_word*)t0)[8]));
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2810 ##sys#check-range */
-t5=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t4,t3,C_fix(0),C_fix(256),((C_word*)t0)[7]);}
-
-/* k14631 in k14622 in k14619 */
-static void C_ccall f_14633(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14633,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[7],((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14644,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2811 wrap */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k14642 in k14631 in k14622 in k14619 */
-static void C_ccall f_14644(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-
-/* ##sys#set-read-mark! in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14583,4,t0,t1,t2,t3);}
-t4=C_i_assq(t2,lf[591]);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_setslot(t4,C_fix(1),t3));}
-else{
-t5=C_a_i_cons(&a,2,t2,t3);
-t6=C_a_i_cons(&a,2,t5,lf[591]);
-t7=C_mutate(&lf[591] /* (set! read-marks ...) */,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}}
-
-/* f_14546 in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14546,4,t0,t1,t2,t3);}
-t4=t2;
-t5=C_eqp(t4,C_make_character(102));
-t6=(C_truep(t5)?t5:C_eqp(t4,C_make_character(70)));
-if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14559,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2778 ##sys#read-char-0 */
-t8=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}
-else{
-t7=C_eqp(t4,C_make_character(116));
-t8=(C_truep(t7)?t7:C_eqp(t4,C_make_character(84)));
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14571,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2779 ##sys#read-char-0 */
-t10=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t3);}
-else{
-/* library.scm: 2780 ##sys#read-error */
-t9=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t1,t3,lf[595],t2);}}}
-
-/* k14569 */
-static void C_ccall f_14571(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* k14557 */
-static void C_ccall f_14559(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* ##sys#surrogates->codepoint in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14484(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14484,4,t0,t1,t2,t3);}
-if(C_truep(C_fixnum_less_or_equal_p(C_fix(55296),t2))){
-if(C_truep(C_fixnum_less_or_equal_p(t2,C_fix(56319)))){
-if(C_truep(C_fixnum_less_or_equal_p(C_fix(56320),t3))){
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(57343)))){
-t4=C_fixnum_shift_right(t2,C_fix(6));
-t5=C_fixnum_and(t4,C_fix(31));
-t6=C_fixnum_plus(C_fix(1),t5);
-t7=C_fixnum_shift_left(t6,C_fix(16));
-t8=C_fixnum_and(t2,C_fix(63));
-t9=C_fixnum_shift_left(t8,C_fix(10));
-t10=C_fixnum_and(t3,C_fix(1023));
-t11=C_fixnum_or(t9,t10);
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_fixnum_or(t7,t11));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* ##sys#unicode-surrogate? in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14472(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14472,3,t0,t1,t2);}
-t3=C_fixnum_less_or_equal_p(C_fix(55296),t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?C_fixnum_less_or_equal_p(t2,C_fix(57343)):C_SCHEME_FALSE));}
-
-/* ##sys#char->utf8-string in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14307(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14307,3,t0,t1,t2);}
-t3=C_fix(C_character_code(t2));
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(127)))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_string(&a,1,t2));}
-else{
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(2047)))){
-t4=C_fixnum_shift_right(t3,C_fix(6));
-t5=C_fixnum_or(C_fix(192),t4);
-t6=C_make_character(C_unfix(t5));
-t7=C_fixnum_and(t3,C_fix(63));
-t8=C_fixnum_or(C_fix(128),t7);
-t9=C_make_character(C_unfix(t8));
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_string(&a,2,t6,t9));}
-else{
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(65535)))){
-t4=C_fixnum_shift_right(t3,C_fix(12));
-t5=C_fixnum_or(C_fix(224),t4);
-t6=C_make_character(C_unfix(t5));
-t7=C_fixnum_shift_right(t3,C_fix(6));
-t8=C_fixnum_and(t7,C_fix(63));
-t9=C_fixnum_or(C_fix(128),t8);
-t10=C_make_character(C_unfix(t9));
-t11=C_fixnum_and(t3,C_fix(63));
-t12=C_fixnum_or(C_fix(128),t11);
-t13=C_make_character(C_unfix(t12));
-t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_a_i_string(&a,3,t6,t10,t13));}
-else{
-if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(2097151)))){
-t4=C_fixnum_shift_right(t3,C_fix(18));
-t5=C_fixnum_or(C_fix(240),t4);
-t6=C_make_character(C_unfix(t5));
-t7=C_fixnum_shift_right(t3,C_fix(12));
-t8=C_fixnum_and(t7,C_fix(63));
-t9=C_fixnum_or(C_fix(128),t8);
-t10=C_make_character(C_unfix(t9));
-t11=C_fixnum_shift_right(t3,C_fix(6));
-t12=C_fixnum_and(t11,C_fix(63));
-t13=C_fixnum_or(C_fix(128),t12);
-t14=C_make_character(C_unfix(t13));
-t15=C_fixnum_and(t3,C_fix(63));
-t16=C_fixnum_or(C_fix(128),t15);
-t17=C_make_character(C_unfix(t16));
-t18=t1;
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,C_a_i_string(&a,4,t6,t10,t14,t17));}
-else{
-/* library.scm: 2756 error */
-t4=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[594],t3);}}}}}
-
-/* ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11914,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11918,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t3,a[13]=t2,tmp=(C_word)a,a+=14,tmp);
-/* library.scm: 2264 csp */
-t5=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-
-/* k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11918,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11921,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t3,a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* library.scm: 2265 ksp */
-t5=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-
-/* k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11921,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11924,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* library.scm: 2266 psp */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11924(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11924,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11927,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* library.scm: 2267 sep */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11927(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11927,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11930,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
-/* library.scm: 2268 crt */
-t3=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-
-/* k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11930(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word ab[60],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11930,2,t0,t1);}
-t2=C_SCHEME_FALSE;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=lf[524];
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_SCHEME_UNDEFINED;
-t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_SCHEME_UNDEFINED;
-t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
-t19=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11932,a[2]=((C_word*)t0)[13],a[3]=((C_word)li454),tmp=(C_word)a,a+=4,tmp));
-t20=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11938,a[2]=((C_word*)t0)[12],a[3]=((C_word)li455),tmp=(C_word)a,a+=4,tmp));
-t21=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11947,a[2]=((C_word*)t0)[13],a[3]=((C_word)li457),tmp=(C_word)a,a+=4,tmp));
-t22=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11983,a[2]=((C_word*)t0)[13],a[3]=((C_word)li458),tmp=(C_word)a,a+=4,tmp));
-t23=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11992,a[2]=t14,a[3]=t6,a[4]=((C_word)li459),tmp=(C_word)a,a+=5,tmp));
-t24=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_12007,a[2]=t14,a[3]=t1,a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t4,a[11]=t16,a[12]=((C_word*)t0)[8],a[13]=t3,a[14]=((C_word*)t0)[9],a[15]=t18,a[16]=t10,a[17]=t8,a[18]=((C_word*)t0)[10],a[19]=((C_word*)t0)[11],a[20]=t12,a[21]=((C_word*)t0)[13],a[22]=((C_word)li493),tmp=(C_word)a,a+=23,tmp));
-/* library.scm: 2734 readrec */
-t25=((C_word*)t18)[1];
-f_12007(t25,((C_word*)t0)[2]);}
-
-/* readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12007(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word ab[165],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12007,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_UNDEFINED;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_UNDEFINED;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_SCHEME_UNDEFINED;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_SCHEME_UNDEFINED;
-t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
-t26=C_SCHEME_UNDEFINED;
-t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
-t28=C_SCHEME_UNDEFINED;
-t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
-t30=C_SCHEME_UNDEFINED;
-t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
-t32=C_SCHEME_UNDEFINED;
-t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
-t34=C_SCHEME_UNDEFINED;
-t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
-t36=C_SCHEME_UNDEFINED;
-t37=(*a=C_VECTOR_TYPE|1,a[1]=t36,tmp=(C_word)a,a+=2,tmp);
-t38=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12010,a[2]=((C_word*)t0)[20],a[3]=((C_word*)t0)[21],a[4]=((C_word)li461),tmp=(C_word)a,a+=5,tmp));
-t39=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12058,a[2]=((C_word*)t0)[19],a[3]=((C_word*)t0)[21],a[4]=((C_word)li463),tmp=(C_word)a,a+=5,tmp));
-t40=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12118,a[2]=((C_word)li465),tmp=(C_word)a,a+=3,tmp));
-t41=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12154,a[2]=((C_word*)t0)[18],a[3]=((C_word*)t0)[19],a[4]=t7,a[5]=t5,a[6]=((C_word*)t0)[21],a[7]=((C_word)li467),tmp=(C_word)a,a+=8,tmp));
-t42=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12527,a[2]=t21,a[3]=t35,a[4]=((C_word*)t0)[15],a[5]=t3,a[6]=((C_word*)t0)[21],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[17],a[9]=((C_word)li471),tmp=(C_word)a,a+=10,tmp));
-t43=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12738,a[2]=t11,a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[21],a[5]=((C_word)li472),tmp=(C_word)a,a+=6,tmp));
-t44=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12756,a[2]=t21,a[3]=t35,a[4]=((C_word*)t0)[21],a[5]=((C_word*)t0)[13],a[6]=((C_word)li473),tmp=(C_word)a,a+=7,tmp));
-t45=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12803,a[2]=t15,a[3]=((C_word*)t0)[21],a[4]=((C_word)li474),tmp=(C_word)a,a+=5,tmp));
-t46=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12863,a[2]=t15,a[3]=((C_word*)t0)[21],a[4]=((C_word)li475),tmp=(C_word)a,a+=5,tmp));
-t47=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12933,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[21],a[6]=((C_word*)t0)[12],a[7]=((C_word)li477),tmp=(C_word)a,a+=8,tmp));
-t48=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12995,a[2]=((C_word*)t0)[21],a[3]=((C_word)li479),tmp=(C_word)a,a+=4,tmp));
-t49=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13050,a[2]=t21,a[3]=t27,a[4]=t35,a[5]=((C_word*)t0)[21],a[6]=((C_word*)t0)[16],a[7]=((C_word)li480),tmp=(C_word)a,a+=8,tmp));
-t50=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13080,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[21],a[4]=((C_word)li482),tmp=(C_word)a,a+=5,tmp));
-t51=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13155,a[2]=t21,a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[21],a[6]=((C_word)li483),tmp=(C_word)a,a+=7,tmp));
-t52=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13371,a[2]=((C_word*)t0)[21],a[3]=((C_word)li485),tmp=(C_word)a,a+=4,tmp));
-t53=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13454,a[2]=t21,a[3]=((C_word*)t0)[19],a[4]=((C_word*)t0)[21],a[5]=((C_word)li487),tmp=(C_word)a,a+=6,tmp));
-t54=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13540,a[2]=((C_word*)t0)[8],a[3]=t37,a[4]=((C_word)li488),tmp=(C_word)a,a+=5,tmp));
-t55=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13609,a[2]=((C_word*)t0)[7],a[3]=((C_word)li489),tmp=(C_word)a,a+=4,tmp));
-t56=(C_truep(((C_word*)t0)[6])?(C_truep(((C_word*)t0)[5])?C_SCHEME_END_OF_LIST:lf[569]):(C_truep(((C_word*)t0)[5])?lf[570]:lf[571]));
-t57=C_mutate(((C_word *)((C_word*)t0)[4])+1,t56);
-t58=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_13624,a[2]=t25,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=t15,a[6]=t9,a[7]=((C_word*)t0)[17],a[8]=t11,a[9]=((C_word*)t0)[20],a[10]=t21,a[11]=t37,a[12]=t33,a[13]=t31,a[14]=t29,a[15]=t13,a[16]=((C_word*)t0)[12],a[17]=t19,a[18]=t17,a[19]=t23,a[20]=((C_word*)t0)[15],a[21]=((C_word*)t0)[21],a[22]=t1,a[23]=((C_word*)t0)[3],tmp=(C_word)a,a+=24,tmp);
-/* library.scm: 2613 r-spaces */
-t59=((C_word*)t3)[1];
-f_12010(t59,t58);}
-
-/* k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13624(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13624,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_13627,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
-/* library.scm: 2614 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[21]);}
-
-/* k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13627(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13627,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[23],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_13633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[23],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=t1,a[24]=((C_word*)t0)[22],tmp=(C_word)a,a+=25,tmp);
-if(C_truep(t2)){
-t4=C_fix(C_character_code(t1));
-t5=t3;
-f_13633(t5,C_slot(t2,t4));}
-else{
-t4=t3;
-f_13633(t4,C_SCHEME_FALSE);}}
-
-/* k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13633(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13633,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* library.scm: 2619 h */
-t2=t1;
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[24],((C_word*)t0)[23],((C_word*)t0)[22]);}
-else{
-switch(((C_word*)t0)[23]){
-case C_make_character(39):
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13648,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[24],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2623 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
-case C_make_character(96):
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13664,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[24],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2626 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
-case C_make_character(44):
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13680,a[2]=((C_word*)t0)[22],a[3]=((C_word*)t0)[21],a[4]=((C_word*)t0)[24],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2629 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
-case C_make_character(35):
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_13716,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[21],a[10]=((C_word*)t0)[16],a[11]=((C_word*)t0)[17],a[12]=((C_word*)t0)[18],a[13]=((C_word*)t0)[19],a[14]=((C_word*)t0)[22],a[15]=((C_word*)t0)[24],a[16]=((C_word*)t0)[20],tmp=(C_word)a,a+=17,tmp);
-/* library.scm: 2635 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
-case C_make_character(40):
-/* library.scm: 2717 r-list */
-t2=((C_word*)((C_word*)t0)[8])[1];
-f_12527(t2,((C_word*)t0)[24],C_make_character(40),C_make_character(41));
-case C_make_character(41):
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14190,a[2]=((C_word*)t0)[23],a[3]=((C_word*)t0)[24],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2718 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
-case C_make_character(34):
-/* library.scm: 2719 r-string */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_12154(t2,((C_word*)t0)[24],C_make_character(34));
-case C_make_character(46):
-/* library.scm: 2720 r-number */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_12756(t2,((C_word*)t0)[24],C_SCHEME_FALSE);
-default:
-t2=C_eqp(((C_word*)t0)[23],C_make_character(45));
-t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[23],C_make_character(43)));
-if(C_truep(t3)){
-/* library.scm: 2721 r-number */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_12756(t4,((C_word*)t0)[24],C_SCHEME_FALSE);}
-else{
-if(C_truep(C_eofp(((C_word*)t0)[23]))){
-t4=((C_word*)t0)[23];
-t5=((C_word*)t0)[24];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_u_i_char_numericp(((C_word*)t0)[23]))){
-/* library.scm: 2724 r-number */
-t4=((C_word*)((C_word*)t0)[5])[1];
-f_12756(t4,((C_word*)t0)[24],C_SCHEME_FALSE);}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[23],((C_word*)((C_word*)t0)[4])[1]))){
-/* library.scm: 2726 reserved-character */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11983(t4,((C_word*)t0)[24],((C_word*)t0)[23]);}
-else{
-switch(((C_word*)t0)[23]){
-case C_make_character(91):
-/* library.scm: 2729 r-list */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_12527(t4,((C_word*)t0)[24],C_make_character(91),C_make_character(93));
-case C_make_character(123):
-/* library.scm: 2730 r-list */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_12527(t4,((C_word*)t0)[24],C_make_character(123),C_make_character(125));
-default:
-t4=C_eqp(((C_word*)t0)[23],C_make_character(93));
-t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[23],C_make_character(125)));
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14277,a[2]=((C_word*)t0)[23],a[3]=((C_word*)t0)[24],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2731 ##sys#read-char-0 */
-t7=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[22]);}
-else{
-/* library.scm: 2732 r-symbol */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_13050(t6,((C_word*)t0)[24]);}}}}}}}}}
-
-/* k14275 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2731 container */
-t2=((C_word*)((C_word*)t0)[4])[1];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14188 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2718 container */
-t2=((C_word*)((C_word*)t0)[4])[1];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13716(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[17],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13716,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_13719,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
-/* library.scm: 2636 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[14]);}
-
-/* k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13719(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13719,2,t0,t1);}
-if(C_truep(C_u_i_char_numericp(t1))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13728,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[16],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13772,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2638 r-digits */
-t4=((C_word*)((C_word*)t0)[13])[1];
-f_12995(t4,t3);}
-else{
-t2=C_slot(((C_word*)t0)[16],C_fix(2));
-t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_13778,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[14],a[14]=t1,a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
-if(C_truep(t2)){
-t4=C_fix(C_character_code(t1));
-t5=t3;
-f_13778(t5,C_slot(t2,t4));}
-else{
-t4=t3;
-f_13778(t4,C_SCHEME_FALSE);}}}
-
-/* k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13778(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13778,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* library.scm: 2651 h */
-t2=t1;
-((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[15],((C_word*)t0)[14],((C_word*)t0)[13]);}
-else{
-t2=C_u_i_char_downcase(((C_word*)t0)[14]);
-switch(t2){
-case C_make_character(120):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13796,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2654 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(100):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13808,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2655 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(111):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13820,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2656 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(98):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13832,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2657 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(105):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13844,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2658 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(101):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13860,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2659 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(99):
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13876,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2661 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(40):
-/* library.scm: 2670 r-vector */
-t3=((C_word*)((C_word*)t0)[8])[1];
-f_12738(t3,((C_word*)t0)[15]);
-case C_make_character(92):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13940,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2671 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(124):
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13952,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2673 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(35):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13967,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2676 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(59):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13979,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2679 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(96):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13994,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2682 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(36):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14010,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2685 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(58):
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14026,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2688 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(37):
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14046,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14050,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2691 r-token */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_12933(t5,t4);
-case C_make_character(43):
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14059,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2693 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-case C_make_character(33):
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14082,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2697 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
-default:
-/* library.scm: 2716 ##sys#user-read-hook */
-t3=*((C_word*)lf[593]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[15],((C_word*)t0)[14],((C_word*)t0)[13]);}}}
-
-/* k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14082(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14082,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2698 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k14083 in k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14085(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14085,2,t0,t1);}
-t2=C_u_i_char_whitespacep(t1);
-t3=(C_truep(t2)?t2:C_eqp(C_make_character(47),t1));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14097,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2700 skip-to-eol */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_11947(t5,t4);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14103,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2703 r-token */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t5,t4);}}
-
-/* k14101 in k14083 in k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14103(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14103,2,t0,t1);}
-if(C_truep(C_i_string_equal_p(lf[584],t1))){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_FILE);}
-else{
-t2=t1;
-if(C_truep((C_truep(C_i_equalp(t2,lf[585]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(t2,lf[586]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(t2,lf[587]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14122,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2706 ##sys#string-append */
-t4=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[588],t1);}
-else{
-if(C_truep(C_i_string_equal_p(lf[589],t1))){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_slot(((C_word*)t0)[2],C_fix(4)));}
-else{
-if(C_truep(C_i_string_equal_p(lf[590],t1))){
-/* library.scm: 2710 port-name */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[483]+1)))(3,*((C_word*)lf[483]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14159,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2712 string->symbol */
-t4=*((C_word*)lf[338]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}}}}}
-
-/* k14157 in k14101 in k14083 in k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_assq(t1,lf[591]);
-if(C_truep(t2)){
-t3=C_slot(t2,C_fix(1));
-/* g30173018 */
-t4=t3;
-((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-/* library.scm: 2715 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[4],((C_word*)t0)[3],lf[592],((C_word*)t0)[2]);}}
-
-/* k14120 in k14101 in k14083 in k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[2];
-/* library.scm: 2598 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t2,t1);}
-
-/* k14095 in k14083 in k14080 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14097(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2701 readrec */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12007(t2,((C_word*)t0)[2]);}
-
-/* k14057 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14059(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14059,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14062,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2694 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k14060 in k14057 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14062(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14062,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14073,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2695 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k14071 in k14060 in k14057 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14073,2,t0,t1);}
-t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_list(&a,3,lf[582],t2,lf[583]));}
-
-/* k14048 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14050(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2691 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[581],t1);}
-
-/* k14044 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14046(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[2];
-/* library.scm: 2598 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t2,t1);}
-
-/* k14024 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14026(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14026,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14033,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2689 r-token */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t3,t2);}
-
-/* k14031 in k14024 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2689 build-keyword */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13609(t2,((C_word*)t0)[2],t1);}
-
-/* k14008 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14010,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14017,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2686 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k14015 in k14008 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14017(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14017,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[580],t1));}
-
-/* k13992 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13994(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13994,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14001,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2683 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k13999 in k13992 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_14001(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14001,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[579],t1));}
-
-/* k13977 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13979(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13979,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13982,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2680 readrec */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12007(t3,t2);}
-
-/* k13980 in k13977 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13982(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2680 readrec */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12007(t2,((C_word*)t0)[2]);}
-
-/* k13965 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13967(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2677 r-ext-symbol */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13454(t2,((C_word*)t0)[2]);}
-
-/* k13950 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13952(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13952,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13955,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2674 r-comment */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_13371(t3,t2);}
-
-/* k13953 in k13950 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13955(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2674 readrec */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12007(t2,((C_word*)t0)[2]);}
-
-/* k13938 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13940(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2671 r-char */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13155(t2,((C_word*)t0)[2]);}
-
-/* k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13876,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13879,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2662 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13877 in k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13879,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13882,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_eofp(t1))){
-/* library.scm: 2665 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[577]);}
-else{
-switch(t1){
-case C_make_character(105):
-t3=t2;
-f_13882(2,t3,C_SCHEME_FALSE);
-case C_make_character(115):
-t3=t2;
-f_13882(2,t3,C_SCHEME_TRUE);
-default:
-/* library.scm: 2668 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],lf[578],t1);}}}
-
-/* k13880 in k13877 in k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13882(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13882,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13887,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word)li490),tmp=(C_word)a,a+=6,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13892,a[2]=((C_word*)t0)[3],a[3]=((C_word)li491),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13898,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li492),tmp=(C_word)a,a+=6,tmp);
-/* ##sys#dynamic-wind */
-t9=*((C_word*)lf[411]+1);
-((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,((C_word*)t0)[2],t6,t7,t8);}
-
-/* a13897 in k13880 in k13877 in k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13898(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13898,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* a13891 in k13880 in k13877 in k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13892,2,t0,t1);}
-/* library.scm: 2669 readrec */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t2,t1);}
-
-/* a13886 in k13880 in k13877 in k13874 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13887,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,((C_word*)((C_word*)t0)[3])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,((C_word*)((C_word*)t0)[2])[1]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-
-/* k13858 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13860,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13867,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2659 r-number-with-radix */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12863(t3,t2);}
-
-/* k13865 in k13858 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13867(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2659 ##sys#inexact->exact */
-t2=*((C_word*)lf[293]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13842 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13844,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13851,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2658 r-number-with-radix */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12863(t3,t2);}
-
-/* k13849 in k13842 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2658 ##sys#exact->inexact */
-t2=*((C_word*)lf[291]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13830 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13832(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2657 r-number-with-exactness */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12803(t2,((C_word*)t0)[2],C_fix(2));}
-
-/* k13818 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13820(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2656 r-number-with-exactness */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12803(t2,((C_word*)t0)[2],C_fix(8));}
-
-/* k13806 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2655 r-number-with-exactness */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12803(t2,((C_word*)t0)[2],C_fix(10));}
-
-/* k13794 in k13776 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13796(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2654 r-number-with-exactness */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12803(t2,((C_word*)t0)[2],C_fix(16));}
-
-/* k13770 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13772(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2638 string->number */
-C_string_to_number(3,0,((C_word*)t0)[2],t1);}
-
-/* k13726 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13728(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13728,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13731,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2639 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13729 in k13726 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13731(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13731,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[5],C_fix(3));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13737,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t2)){
-t4=C_fix(C_character_code(t1));
-t5=t3;
-f_13737(t5,C_slot(t2,t4));}
-else{
-t4=t3;
-f_13737(t4,C_SCHEME_FALSE);}}
-
-/* k13735 in k13729 in k13726 in k13717 in k13714 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13737(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 2643 h */
-t2=t1;
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=C_eqp(((C_word*)t0)[4],C_make_character(41));
-t3=(C_truep(t2)?t2:C_u_i_char_whitespacep(((C_word*)t0)[4]));
-if(C_truep(t3)){
-/* library.scm: 2645 ##sys#sharp-number-hook */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[512]+1)))(4,*((C_word*)lf[512]+1),((C_word*)t0)[5],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-/* library.scm: 2646 ##sys#read-error */
-t4=*((C_word*)lf[513]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[5],((C_word*)t0)[3],lf[576],((C_word*)t0)[4],((C_word*)t0)[2]);}}}
-
-/* k13678 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13680(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13680,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13707,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2630 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13705 in k13678 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13707(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13707,2,t0,t1);}
-t2=C_eqp(t1,C_make_character(64));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13689,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2631 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13703,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2633 readrec */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12007(t4,t3);}}
-
-/* k13701 in k13705 in k13678 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13703(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13703,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[575],t1));}
-
-/* k13687 in k13705 in k13678 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13689(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13689,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13696,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2632 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k13694 in k13687 in k13705 in k13678 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13696(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13696,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[574],t1));}
-
-/* k13662 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13664(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13664,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13671,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2627 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k13669 in k13662 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13671,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[573],t1));}
-
-/* k13646 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13648(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13648,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13655,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2624 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k13653 in k13646 in k13631 in k13625 in k13622 in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13655,2,t0,t1);}
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_list(&a,2,lf[572],t1));}
-
-/* build-keyword in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13609(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13609,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13617,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2601 ##sys#string-append */
-t4=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t2);}
-
-/* k13615 in build-keyword in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2601 ##sys#intern-symbol */
-C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* resolve-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13540(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13540,NULL,3,t0,t1,t2);}
-t3=C_block_size(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13547,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_fixnum_greaterp(t3,C_fix(1)))){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13562,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-t6=C_eqp(((C_word*)t0)[2],lf[568]);
-if(C_truep(t6)){
-t7=C_eqp(C_make_character(58),C_subchar(t2,C_fix(0)));
-if(C_truep(t7)){
-/* library.scm: 2590 ##sys#substring */
-t8=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t5,t2,C_fix(1),t3);}
-else{
-t8=t5;
-f_13562(2,t8,C_SCHEME_FALSE);}}
-else{
-t7=t5;
-f_13562(2,t7,C_SCHEME_FALSE);}}
-else{
-t5=t4;
-f_13547(2,t5,C_SCHEME_FALSE);}}
-
-/* k13560 in resolve-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13562(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[5];
-f_13547(2,t3,t2);}
-else{
-t2=C_eqp(((C_word*)t0)[4],lf[567]);
-if(C_truep(t2)){
-t3=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-t4=C_subchar(((C_word*)t0)[2],t3);
-t5=C_eqp(C_make_character(58),t4);
-if(C_truep(t5)){
-t6=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 2593 ##sys#substring */
-t7=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,((C_word*)t0)[5],((C_word*)t0)[2],C_fix(0),t6);}
-else{
-t6=((C_word*)t0)[5];
-f_13547(2,t6,C_SCHEME_FALSE);}}
-else{
-t3=((C_word*)t0)[5];
-f_13547(2,t3,C_SCHEME_FALSE);}}}
-
-/* k13545 in resolve-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-/* build-keyword2535 */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_13609(t2,((C_word*)t0)[3],t1);}
-else{
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-/* library.scm: 2598 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t2,t3);}}
-
-/* r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13454(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13454,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13458,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2569 ##sys#make-string */
-t3=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_fix(1));}
-
-/* k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13458(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13458,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13461,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2570 r-token */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t3,t2);}
-
-/* k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13461(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13461,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_block_size(((C_word*)t3)[1]);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13467,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=((C_word*)t0)[5],a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-if(C_truep(*((C_word*)lf[509]+1))){
-t6=t5;
-f_13467(2,t6,C_SCHEME_UNDEFINED);}
-else{
-/* library.scm: 2573 ##sys#read-error */
-t6=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[5],lf[566],((C_word*)t3)[1]);}}
-
-/* k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13467(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13467,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13472,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li486),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_13472(t5,((C_word*)t0)[2],C_fix(0));}
-
-/* loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13472(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(12);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_13472,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[7]))){
-/* library.scm: 2576 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,((C_word*)t0)[6],lf[565],((C_word*)((C_word*)t0)[5])[1]);}
-else{
-t3=C_subbyte(((C_word*)((C_word*)t0)[5])[1],t2);
-t4=C_eqp(t3,C_fix(35));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13491,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_fixnum_greaterp(t2,C_fix(31)))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13520,a[2]=t5,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2579 ##sys#substring */
-t7=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,((C_word*)((C_word*)t0)[5])[1],C_fix(0),C_fix(31));}
-else{
-t6=t5;
-f_13491(t6,C_SCHEME_UNDEFINED);}}
-else{
-t5=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 2583 loop */
-t9=t1;
-t10=t5;
-t1=t9;
-t2=t10;
-goto loop;}}}
-
-/* k13518 in loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13520(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_13491(t3,t2);}
-
-/* k13489 in loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13491(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13491,NULL,2,t0,t1);}
-t2=C_setbyte(((C_word*)t0)[7],C_fix(0),((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13501,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13505,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t3,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2582 ##sys#substring */
-t5=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,((C_word*)((C_word*)t0)[3])[1],C_fix(0),((C_word*)t0)[6]);}
-
-/* k13503 in k13489 in loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13505(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13505,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13509,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 2582 ##sys#substring */
-t4=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,((C_word*)((C_word*)t0)[3])[1],t3,((C_word*)t0)[2]);}
-
-/* k13507 in k13503 in k13489 in loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13509(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2582 string-append */
-t2=((C_word*)t0)[5];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k13499 in k13489 in loop in k13465 in k13459 in k13456 in r-ext-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13501(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2581 ##sys#intern-symbol */
-C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* r-comment in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13371(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13371,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13377,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li484),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_13377(t5,t1,C_fix(0));}
-
-/* loop in r-comment in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13377(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13377,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13381,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2555 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k13379 in loop in r-comment in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13381(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13381,2,t0,t1);}
-switch(t1){
-case C_make_character(124):
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13417,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2557 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);
-case C_make_character(35):
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13440,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2561 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);
-default:
-if(C_truep(C_eofp(t1))){
-/* library.scm: 2565 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[564]);}
-else{
-/* library.scm: 2566 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13377(t2,((C_word*)t0)[4],((C_word*)t0)[5]);}}}
-
-/* k13438 in k13379 in loop in r-comment in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13440(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_eqp(C_make_character(124),t1);
-if(C_truep(t2)){
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 2561 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_13377(t4,((C_word*)t0)[2],t3);}
-else{
-t3=((C_word*)t0)[4];
-/* library.scm: 2561 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_13377(t4,((C_word*)t0)[2],t3);}}
-
-/* k13415 in k13379 in loop in r-comment in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=C_eqp(C_make_character(35),t1);
-if(C_truep(t2)){
-t3=C_eqp(((C_word*)t0)[4],C_fix(0));
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 2559 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_13377(t5,((C_word*)t0)[3],t4);}}
-else{
-/* library.scm: 2560 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_13377(t3,((C_word*)t0)[3],((C_word*)t0)[4]);}}
-
-/* r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13155(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13155,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13159,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2520 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13159,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13162,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2521 r-token */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t3,t2);}
-
-/* k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13162(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13162,2,t0,t1);}
-t2=C_block_size(t1);
-if(C_truep(C_fixnum_greaterp(t2,C_fix(1)))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13174,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t4=C_eqp(C_make_character(120),((C_word*)t0)[3]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13344,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_13344(t6,t4);}
-else{
-t6=C_eqp(C_make_character(117),((C_word*)t0)[3]);
-t7=t5;
-f_13344(t7,(C_truep(t6)?t6:C_eqp(C_make_character(85),((C_word*)t0)[3])));}}
-else{
-if(C_truep(C_i_memq(((C_word*)t0)[3],((C_word*)t0)[2]))){
-/* library.scm: 2550 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[6],((C_word*)t0)[5]);}
-else{
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}}}
-
-/* k13342 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13344(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13344,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13351,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2525 ##sys#substring */
-t3=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[4];
-f_13174(2,t2,C_SCHEME_FALSE);}}
-
-/* k13349 in k13342 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2525 ##sys#string->number */
-t2=*((C_word*)lf[318]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
-
-/* k13172 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13174(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13174,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-t3=t1;
-t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_make_character(C_unfix(t3)));}
-else{
-t2=C_fix(C_character_code(C_subchar(((C_word*)t0)[5],C_fix(0))));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13191,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t2)){
-if(C_truep(C_fixnum_less_or_equal_p(C_fix(192),t2))){
-if(C_truep(C_fixnum_less_or_equal_p(t2,C_fix(247)))){
-t4=C_fixnum_shift_right(t2,C_fix(4));
-t5=C_fixnum_and(t4,C_fix(3));
-if(C_truep(t5)){
-t6=C_fixnum_shift_right(t5,C_fix(1));
-t7=C_fixnum_or(t5,t6);
-t8=C_fixnum_difference(t5,C_fix(1));
-t9=C_fixnum_and(t7,t8);
-t10=C_fixnum_plus(C_fix(2),t9);
-if(C_truep(t10)){
-t11=C_eqp(((C_word*)t0)[2],t10);
-if(C_truep(t11)){
-t12=C_fixnum_difference(C_fix(8),t10);
-t13=C_fixnum_shift_left(C_fix(1),t12);
-t14=C_fixnum_difference(t13,C_fix(1));
-t15=C_fixnum_and(t2,t14);
-t16=C_fixnum_shift_left(t15,C_fix(6));
-t17=C_fix(C_character_code(C_subchar(((C_word*)t0)[5],C_fix(1))));
-t18=C_fixnum_and(t17,C_fix(63));
-t19=C_fixnum_plus(t16,t18);
-t20=t19;
-if(C_truep(t20)){
-if(C_truep(C_fixnum_greater_or_equal_p(t10,C_fix(3)))){
-t21=C_fixnum_shift_left(t20,C_fix(6));
-t22=C_fix(C_character_code(C_subchar(((C_word*)t0)[5],C_fix(2))));
-t23=C_fixnum_and(t22,C_fix(63));
-t24=C_fixnum_plus(t21,t23);
-t25=t20=t24;
-t26=C_eqp(t10,C_fix(4));
-if(C_truep(t26)){
-t27=C_fixnum_shift_left(t20,C_fix(6));
-t28=C_fix(C_character_code(C_subchar(((C_word*)t0)[5],C_fix(3))));
-t29=C_fixnum_and(t28,C_fix(63));
-t30=C_fixnum_plus(t27,t29);
-t31=t20=t30;
-t32=t3;
-f_13191(t32,C_make_character(C_unfix(t20)));}
-else{
-t27=t3;
-f_13191(t27,C_make_character(C_unfix(t20)));}}
-else{
-t21=t3;
-f_13191(t21,C_make_character(C_unfix(t20)));}}
-else{
-t21=t3;
-f_13191(t21,C_SCHEME_FALSE);}}
-else{
-t12=t3;
-f_13191(t12,C_SCHEME_FALSE);}}
-else{
-t11=t3;
-f_13191(t11,C_SCHEME_FALSE);}}
-else{
-t6=t3;
-f_13191(t6,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_13191(t4,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_13191(t4,C_SCHEME_FALSE);}}
-else{
-t4=t3;
-f_13191(t4,C_SCHEME_FALSE);}}}
-
-/* k13189 in k13172 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13191(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13191,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13197,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13207,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2548 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t3,((C_word*)t0)[3]);}}
-
-/* k13205 in k13189 in k13172 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2548 char-name */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k13195 in k13189 in k13172 in k13160 in k13157 in r-char in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13197(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-/* library.scm: 2549 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[563],((C_word*)t0)[2]);}}
-
-/* r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13080(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13080,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13153,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2507 read-unreserved-char-0 */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_11992(t3,t2,((C_word*)t0)[3]);}
-
-/* k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13153(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13153,2,t0,t1);}
-t2=C_eqp(C_make_character(124),t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13094,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2508 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-else{
-/* library.scm: 2516 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],((C_word*)t0)[3],lf[562]);}}
-
-/* k13092 in k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13094,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13096,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li481),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_13096(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in k13092 in k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13096(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13096,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_eofp(t2))){
-/* library.scm: 2509 ##sys#read-error */
-t4=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[3],lf[561]);}
-else{
-switch(t2){
-case C_make_character(92):
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13115,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2511 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[3]);
-case C_make_character(124):
-/* library.scm: 2514 ##sys#reverse-list->string */
-t4=*((C_word*)lf[155]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);
-default:
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13142,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2515 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[3]);}}}
-
-/* k13140 in loop in k13092 in k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13142,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-/* library.scm: 2515 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13096(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k13113 in loop in k13092 in k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13115(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13115,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13122,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2512 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13120 in k13113 in loop in k13092 in k13151 in r-xtoken in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13122,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-/* library.scm: 2512 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13096(t3,((C_word*)t0)[2],t1,t2);}
-
-/* r-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13050(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13050,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13054,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13065,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13078,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2501 ##sys#peek-char-0 */
-t5=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}
-
-/* k13076 in r-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_eqp(t1,C_make_character(124));
-if(C_truep(t2)){
-/* library.scm: 2502 r-xtoken */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_13080(t3,((C_word*)t0)[3]);}
-else{
-/* library.scm: 2503 r-token */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t3,((C_word*)t0)[3]);}}
-
-/* k13063 in r-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13065(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2500 resolve-symbol */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_13540(t2,((C_word*)t0)[2],t1);}
-
-/* k13052 in r-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13054(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13054,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13061,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2504 ##sys#port-line */
-t3=*((C_word*)lf[485]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13059 in k13052 in r-symbol in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2504 info */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11938(t2,((C_word*)t0)[3],lf[560],((C_word*)t0)[2],t1);}
-
-/* r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12995(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12995,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13003,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2488 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13001 in r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13003(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13003,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13005,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li478),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_13005(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in k13001 in r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13005(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13005,NULL,4,t0,t1,t2,t3);}
-t4=C_eofp(t2);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13015,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_13015(t6,t4);}
-else{
-t6=C_u_i_char_numericp(t2);
-t7=t5;
-f_13015(t7,C_i_not(t6));}}
-
-/* k13013 in loop in k13001 in r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_13015(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13015,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* library.scm: 2490 ##sys#reverse-list->string */
-t2=*((C_word*)lf[155]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[6],((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13021,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2492 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
-
-/* k13019 in k13013 in loop in k13001 in r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13021,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13028,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2493 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k13026 in k13019 in k13013 in loop in k13001 in r-digits in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_13028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13028,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-/* library.scm: 2493 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13005(t3,((C_word*)t0)[2],t1,t2);}
-
-/* r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12933(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12933,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12941,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2476 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-
-/* k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12941,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12943,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=((C_word*)t0)[7],a[8]=((C_word)li476),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_12943(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12943(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12943,NULL,4,t0,t1,t2,t3);}
-t4=C_eofp(t2);
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12953,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=t3,a[9]=t1,tmp=(C_word)a,a+=10,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_12953(t6,t4);}
-else{
-t6=C_u_i_char_whitespacep(t2);
-t7=t5;
-f_12953(t7,(C_truep(t6)?t6:C_i_memq(t2,((C_word*)t0)[2])));}}
-
-/* k12951 in loop in k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12953(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12953,NULL,2,t0,t1);}
-if(C_truep(t1)){
-/* library.scm: 2480 ##sys#reverse-list->string */
-t2=*((C_word*)lf[155]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[9],((C_word*)t0)[8]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12959,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-t3=C_eqp(((C_word*)t0)[6],C_make_character(47));
-if(C_truep(t3)){
-t4=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t5=t2;
-f_12959(t5,t4);}
-else{
-t4=t2;
-f_12959(t4,C_SCHEME_UNDEFINED);}}}
-
-/* k12957 in k12951 in loop in k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12959(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12959,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12962,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2483 read-unreserved-char-0 */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_11992(t3,t2,((C_word*)t0)[3]);}
-
-/* k12960 in k12957 in k12951 in loop in k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12962(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12962,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12969,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2484 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12967 in k12960 in k12957 in k12951 in loop in k12939 in r-token in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12969(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12969,2,t0,t1);}
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=((C_word*)t0)[5];
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-/* library.scm: 2484 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12943(t4,((C_word*)t0)[2],t1,t3);}
-else{
-t2=C_u_i_char_downcase(((C_word*)t0)[5]);
-t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
-/* library.scm: 2484 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12943(t4,((C_word*)t0)[2],t1,t3);}}
-
-/* r-number-with-radix in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12863(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12863,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12931,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2464 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k12929 in r-number-with-radix in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12931(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12931,2,t0,t1);}
-t2=C_eqp(C_make_character(35),t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12873,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2465 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-else{
-/* library.scm: 2473 r-number */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12756(t3,((C_word*)t0)[4],C_fix(10));}}
-
-/* k12871 in k12929 in r-number-with-radix in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12873,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12876,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2466 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k12874 in k12871 in k12929 in r-number-with-radix in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(C_eofp(t1))){
-/* library.scm: 2467 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[558]);}
-else{
-switch(t1){
-case C_make_character(120):
-/* library.scm: 2468 r-number */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_12756(t2,((C_word*)t0)[4],C_fix(16));
-case C_make_character(100):
-/* library.scm: 2469 r-number */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_12756(t2,((C_word*)t0)[4],C_fix(10));
-case C_make_character(111):
-/* library.scm: 2470 r-number */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_12756(t2,((C_word*)t0)[4],C_fix(8));
-case C_make_character(98):
-/* library.scm: 2471 r-number */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_12756(t2,((C_word*)t0)[4],C_fix(2));
-default:
-/* library.scm: 2472 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[559],t1);}}}
-
-/* r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12803(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12803,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12861,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2454 ##sys#peek-char-0 */
-t4=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
-
-/* k12859 in r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12861(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12861,2,t0,t1);}
-t2=C_eqp(C_make_character(35),t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12813,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2455 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-else{
-/* library.scm: 2461 r-number */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12756(t3,((C_word*)t0)[5],((C_word*)t0)[2]);}}
-
-/* k12811 in k12859 in r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12813,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12816,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2456 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k12814 in k12811 in k12859 in r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12816(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12816,2,t0,t1);}
-if(C_truep(C_eofp(t1))){
-/* library.scm: 2457 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[556]);}
-else{
-switch(t1){
-case C_make_character(105):
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12838,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2458 r-number */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12756(t3,t2,((C_word*)t0)[2]);
-case C_make_character(101):
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12851,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2459 r-number */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12756(t3,t2,((C_word*)t0)[2]);
-default:
-/* library.scm: 2460 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[557],t1);}}}
-
-/* k12849 in k12814 in k12811 in k12859 in r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12851(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2459 ##sys#inexact->exact */
-t2=*((C_word*)lf[293]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k12836 in k12814 in k12811 in k12859 in r-number-with-exactness in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12838(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2458 ##sys#exact->inexact */
-t2=*((C_word*)lf[291]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* r-number in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12756(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12756,NULL,3,t0,t1,t2);}
-t3=C_set_block_item(((C_word*)t0)[5],0,C_SCHEME_FALSE);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12761,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2442 r-token */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t5,t4);}
-
-/* k12759 in r-number in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12761,2,t0,t1);}
-if(C_truep(C_i_string_equal_p(t1,lf[552]))){
-/* library.scm: 2444 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[6],((C_word*)t0)[5],lf[553]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12773,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=((C_word*)t0)[3];
-if(C_truep(t3)){
-/* library.scm: 2445 ##sys#string->number */
-t4=*((C_word*)lf[318]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t1,t3);}
-else{
-/* library.scm: 2445 ##sys#string->number */
-t4=*((C_word*)lf[318]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t1,C_fix(10));}}}
-
-/* k12771 in k12759 in r-number in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12773(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12773,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12779,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12788,a[2]=t1,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2447 ##sys#inexact? */
-t4=*((C_word*)lf[265]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
-else{
-if(C_truep(((C_word*)t0)[3])){
-/* library.scm: 2450 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[5],lf[555],((C_word*)t0)[4]);}
-else{
-/* library.scm: 2451 resolve-symbol */
-t2=((C_word*)((C_word*)t0)[2])[1];
-f_13540(t2,((C_word*)t0)[7],((C_word*)t0)[4]);}}}
-
-/* k12786 in k12771 in k12759 in r-number in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12788(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)((C_word*)t0)[7])[1];
-if(C_truep(t2)){
-/* library.scm: 2448 ##sys#read-warning */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[520]+1)))(5,*((C_word*)lf[520]+1),((C_word*)t0)[6],((C_word*)t0)[5],lf[554],((C_word*)t0)[4]);}
-else{
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}
-
-/* k12777 in k12771 in k12759 in r-number in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* r-vector in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12738(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12738,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2435 r-list */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12527(t3,t2,C_make_character(40),C_make_character(41));}
-
-/* k12740 in r-vector in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12742,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12748,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2436 list? */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}
-
-/* k12746 in k12740 in r-vector in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 2437 ##sys#list->vector */
-t2=*((C_word*)lf[367]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-/* library.scm: 2438 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[551],((C_word*)t0)[3]);}}
-
-/* r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12527(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12527,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12736,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=t1,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t2,tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 2378 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[6]);}
-
-/* k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[24],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12736,2,t0,t1);}
-t2=C_eqp(t1,((C_word*)t0)[11]);
-if(C_truep(t2)){
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=((C_word*)((C_word*)t0)[10])[1];
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12537,a[2]=t6,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t4,a[6]=t7,a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
-t9=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12550,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[10],a[11]=((C_word)li470),tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 2382 ##sys#call-with-current-continuation */
-C_call_cc(3,0,t8,t9);}
-else{
-/* library.scm: 2432 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[8],((C_word*)t0)[6],lf[550],((C_word*)t0)[11]);}}
-
-/* a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12550(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[20],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12550,3,t0,t1,t2);}
-t3=C_mutate(((C_word *)((C_word*)t0)[10])+1,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12553,a[2]=((C_word*)t0)[8],a[3]=t2,a[4]=((C_word*)t0)[9],a[5]=((C_word)li468),tmp=(C_word)a,a+=6,tmp));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12571,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[8],a[11]=((C_word)li469),tmp=(C_word)a,a+=12,tmp));
-t7=((C_word*)t5)[1];
-f_12571(t7,t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12571(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12571,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12575,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t1,tmp=(C_word)a,a+=13,tmp);
-/* library.scm: 2390 r-spaces */
-t4=((C_word*)((C_word*)t0)[8])[1];
-f_12010(t4,t3);}
-
-/* k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12575(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12575,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12578,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=t2;
-f_12578(t3,C_SCHEME_UNDEFINED);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12729,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2391 ##sys#port-line */
-t4=*((C_word*)lf[485]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[11]);}}
-
-/* k12727 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12729(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_12578(t3,t2);}
-
-/* k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12578(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12578,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12581,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 2392 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[10]);}
-
-/* k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12581(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12581,2,t0,t1);}
-if(C_truep(C_eofp(t1))){
-/* library.scm: 2394 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[11],((C_word*)t0)[10],lf[546]);}
-else{
-t2=C_eqp(t1,((C_word*)t0)[9]);
-if(C_truep(t2)){
-/* library.scm: 2396 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[11],((C_word*)t0)[10]);}
-else{
-t3=C_eqp(t1,C_make_character(46));
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12605,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 2398 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[10]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12725,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2423 readrec */
-t5=((C_word*)((C_word*)t0)[6])[1];
-f_12007(t5,t4);}}}}
-
-/* k12723 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12725(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12725,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t3=C_i_setslot(((C_word*)t0)[4],C_fix(1),t2);
-/* library.scm: 2427 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12571(t4,((C_word*)t0)[2],t2);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-/* library.scm: 2427 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12571(t4,((C_word*)t0)[2],t2);}}
-
-/* k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12605(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12605,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12608,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-/* library.scm: 2399 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[8]);}
-
-/* k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12608,2,t0,t1);}
-t2=C_u_i_char_whitespacep(t1);
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12617,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_12617(t4,t2);}
-else{
-t4=C_eqp(t1,C_make_character(40));
-if(C_truep(t4)){
-t5=t3;
-f_12617(t5,t4);}
-else{
-t5=C_eqp(t1,C_make_character(41));
-if(C_truep(t5)){
-t6=t3;
-f_12617(t6,t5);}
-else{
-t6=C_eqp(t1,C_make_character(34));
-t7=t3;
-f_12617(t7,(C_truep(t6)?t6:C_eqp(t1,C_make_character(59))));}}}}
-
-/* k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12617(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12617,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12620,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[12]))){
-t3=t2;
-f_12620(2,t3,C_SCHEME_UNDEFINED);}
-else{
-/* library.scm: 2406 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[9],lf[548]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12655,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12687,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2413 r-token */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_12933(t4,t3);}}
-
-/* k12685 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12687(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2413 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[549],t1);}
-
-/* k12653 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12655(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12655,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12658,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_u_i_char_numericp(((C_word*)t0)[2]))){
-/* library.scm: 2415 ##sys#string->number */
-t3=*((C_word*)lf[318]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-else{
-t3=t2;
-f_12658(2,t3,C_SCHEME_FALSE);}}
-
-/* k12656 in k12653 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12658,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12661,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t1)){
-t3=t2;
-f_12661(2,t3,t1);}
-else{
-/* library.scm: 2416 resolve-symbol */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13540(t3,t2,((C_word*)t0)[2]);}}
-
-/* k12659 in k12656 in k12653 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12661(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12661,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t3=C_i_setslot(((C_word*)t0)[4],C_fix(1),t2);
-/* library.scm: 2421 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12571(t4,((C_word*)t0)[2],t2);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-/* library.scm: 2421 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12571(t4,((C_word*)t0)[2],t2);}}
-
-/* k12618 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12620(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12620,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12623,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2407 r-spaces */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12010(t3,t2);}
-
-/* k12621 in k12618 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12623(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12623,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12646,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2408 readrec */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12007(t3,t2);}
-
-/* k12644 in k12621 in k12618 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12646(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12646,2,t0,t1);}
-t2=C_i_setslot(((C_word*)t0)[6],C_fix(1),t1);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2409 r-spaces */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_12010(t4,t3);}
-
-/* k12627 in k12644 in k12621 in k12618 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12629(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12629,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12642,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2410 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12640 in k12627 in k12644 in k12621 in k12618 in k12615 in k12606 in k12603 in k12579 in k12576 in k12573 in loop in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_eqp(t1,((C_word*)t0)[4]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-/* library.scm: 2411 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],lf[547],((C_word*)t0)[4]);}}
-
-/* f_12553 in a12549 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12553(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12553,3,t0,t1,t2);}
-t3=C_eqp(t2,((C_word*)t0)[4]);
-if(C_truep(t3)){
-/* library.scm: 2387 return */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,C_SCHEME_FALSE);}
-else{
-/* library.scm: 2388 ##sys#read-error */
-t4=*((C_word*)lf[513]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,((C_word*)t0)[2],lf[545],t2,((C_word*)t0)[4]);}}
-
-/* k12535 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12537(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12537,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12548,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2430 ##sys#infix-list-hook */
-t4=*((C_word*)lf[511]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)((C_word*)t0)[5])[1]);}
-else{
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}}
-
-/* k12546 in k12535 in k12734 in r-list in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12548(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2430 info */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11938(t2,((C_word*)t0)[3],lf[544],t1,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12154(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12154,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12525,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2330 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
-
-/* k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12525(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12525,2,t0,t1);}
-t2=C_eqp(t1,((C_word*)t0)[8]);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12168,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2331 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[7]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12517,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12521,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2375 string */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[8]);}}
-
-/* k12519 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12521(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2375 string-append */
-t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[542],t1,lf[543]);}
-
-/* k12515 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12517(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2375 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12168,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12170,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=((C_word*)t0)[7],a[8]=((C_word)li466),tmp=(C_word)a,a+=9,tmp));
-t5=((C_word*)t3)[1];
-f_12170(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-
-/* loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12170(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12170,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-if(C_truep(C_eofp(((C_word*)t4)[1]))){
-/* library.scm: 2333 ##sys#read-error */
-t5=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,((C_word*)t0)[7],lf[531]);}
-else{
-t5=C_eqp(C_make_character(92),((C_word*)t4)[1]);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12187,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=t3,a[9]=t4,tmp=(C_word)a,a+=10,tmp);
-/* library.scm: 2335 ##sys#read-char-0 */
-t7=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[7]);}
-else{
-t6=C_eqp(((C_word*)t0)[2],((C_word*)t4)[1]);
-if(C_truep(t6)){
-/* library.scm: 2373 ##sys#reverse-list->string */
-t7=*((C_word*)lf[155]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t1,t3);}
-else{
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12506,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2374 ##sys#read-char-0 */
-t8=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[7]);}}}}
-
-/* k12504 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12506(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12506,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
-/* library.scm: 2374 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12187(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12187,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,t1);
-t3=((C_word*)((C_word*)t0)[9])[1];
-switch(t3){
-case C_make_character(116):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12200,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2337 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(114):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12217,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2338 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(98):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12234,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2339 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(110):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12251,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2340 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(97):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12268,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2341 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(118):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12289,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2342 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(102):
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12310,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2343 ##sys#read-char-0 */
-t5=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);
-case C_make_character(120):
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12342,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2345 r-usequence */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12058(t5,t4,lf[532],C_fix(2));
-case C_make_character(117):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12351,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2348 r-usequence */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12058(t5,t4,lf[538],C_fix(4));
-case C_make_character(85):
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12423,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2361 r-usequence */
-t5=((C_word*)((C_word*)t0)[4])[1];
-f_12058(t5,t4,lf[540],C_fix(8));
-default:
-t4=C_eqp(t3,C_make_character(92));
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12456,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t4)){
-t6=t5;
-f_12456(t6,t4);}
-else{
-t6=C_eqp(t3,C_make_character(39));
-t7=t5;
-f_12456(t7,(C_truep(t6)?t6:C_eqp(t3,C_make_character(34))));}}}
-
-/* k12454 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12456(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12456,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12463,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2366 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12470,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2368 ##sys#read-warning */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[520]+1)))(5,*((C_word*)lf[520]+1),t2,((C_word*)t0)[2],lf[541],((C_word*)((C_word*)t0)[6])[1]);}}
-
-/* k12468 in k12454 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12470(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12470,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12477,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2372 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12475 in k12468 in k12454 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12477(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12477,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
-/* library.scm: 2372 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12461 in k12454 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12463(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12463,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
-/* library.scm: 2366 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12421 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12423(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12423,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2362 ##sys#unicode-surrogate? */
-t3=*((C_word*)lf[537]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-
-/* k12427 in k12421 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12429,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12436,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2363 string-append */
-t3=((C_word*)t0)[6];
-((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[539],((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12443,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2364 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}}
-
-/* k12441 in k12427 in k12421 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12443,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12447,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2364 r-cons-codepoint */
-f_12118(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k12445 in k12441 in k12427 in k12421 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12447(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2364 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_12170(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12434 in k12427 in k12421 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12436(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2363 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12351,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12357,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2349 ##sys#unicode-surrogate? */
-t3=*((C_word*)lf[537]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-
-/* k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12357(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12357,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12363,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12403,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2350 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12410,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2359 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}}
-
-/* k12408 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12410(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12410,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12414,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2359 r-cons-codepoint */
-f_12118(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k12412 in k12408 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12414(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2359 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_12170(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12401 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12403(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12403,2,t0,t1);}
-t2=C_eqp(C_make_character(92),t1);
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12399,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2351 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-else{
-t3=((C_word*)t0)[3];
-f_12363(t3,C_SCHEME_FALSE);}}
-
-/* k12397 in k12401 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12399(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_12363(t2,C_eqp(C_make_character(117),t1));}
-
-/* k12361 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12363(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12363,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12366,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 2352 r-usequence */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12058(t3,t2,lf[535],C_fix(4));}
-else{
-/* library.scm: 2358 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[4],lf[536],((C_word*)t0)[3]);}}
-
-/* k12364 in k12361 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12366(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12366,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12369,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
-/* library.scm: 2353 ##sys#surrogates->codepoint */
-t3=*((C_word*)lf[534]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-
-/* k12367 in k12364 in k12361 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12369(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12369,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12379,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2355 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-else{
-/* library.scm: 2357 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[7],((C_word*)t0)[4],lf[533],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* k12377 in k12367 in k12364 in k12361 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12379,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12383,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2356 r-cons-codepoint */
-f_12118(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k12381 in k12377 in k12367 in k12364 in k12361 in k12355 in k12349 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12383(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2355 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_12170(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12340 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12342(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12342,2,t0,t1);}
-t2=C_make_character(C_unfix(t1));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12334,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2346 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k12332 in k12340 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12334,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-/* library.scm: 2346 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12308 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12310(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12310,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(12),((C_word*)t0)[4]);
-/* library.scm: 2343 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12287 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12289(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12289,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(11),((C_word*)t0)[4]);
-/* library.scm: 2342 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12266 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12268(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12268,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(7),((C_word*)t0)[4]);
-/* library.scm: 2341 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12249 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12251,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(10),((C_word*)t0)[4]);
-/* library.scm: 2340 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12232 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12234(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12234,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(8),((C_word*)t0)[4]);
-/* library.scm: 2339 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12215 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12217(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12217,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(13),((C_word*)t0)[4]);
-/* library.scm: 2338 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* k12198 in k12185 in loop in k12166 in k12523 in r-string in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12200,2,t0,t1);}
-t2=C_a_i_cons(&a,2,C_make_character(9),((C_word*)t0)[4]);
-/* library.scm: 2337 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12170(t3,((C_word*)t0)[2],t1,t2);}
-
-/* r-cons-codepoint in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12118(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12118,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12122,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=C_make_character(C_unfix(t2));
-/* library.scm: 2322 ##sys#char->utf8-string */
-t6=*((C_word*)lf[530]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-
-/* k12120 in r-cons-codepoint in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12122,2,t0,t1);}
-t2=C_block_size(t1);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12130,a[2]=t4,a[3]=t1,a[4]=t2,a[5]=((C_word)li464),tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_12130(t6,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
-
-/* lp in k12120 in r-cons-codepoint in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12130(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12130,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
-t4=t3;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_fixnum_plus(t2,C_fix(1));
-t5=C_a_i_cons(&a,2,C_subchar(((C_word*)t0)[3],t2),t3);
-/* library.scm: 2327 lp */
-t8=t1;
-t9=t4;
-t10=t5;
-t1=t8;
-t2=t9;
-t3=t10;
-goto loop;}}
-
-/* r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12058(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12058,NULL,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12064,a[2]=t5,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word)li462),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_12064(t7,t1,C_SCHEME_END_OF_LIST,t3);}
-
-/* loop in r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12064(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12064,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_fix(0));
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12074,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2312 ##sys#reverse-list->string */
-t6=*((C_word*)lf[155]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-else{
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12090,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2316 ##sys#read-char-0 */
-t6=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[5]);}}
-
-/* k12088 in loop in r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12090,2,t0,t1);}
-t2=C_eofp(t1);
-t3=(C_truep(t2)?t2:C_eqp(C_make_character(34),t1));
-if(C_truep(t3)){
-/* library.scm: 2318 ##sys#read-error */
-t4=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[6],((C_word*)t0)[5],lf[529]);}
-else{
-t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
-t5=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 2319 loop */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_12064(t6,((C_word*)t0)[6],t4,t5);}}
-
-/* k12072 in loop in r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12074,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12077,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2313 string->number */
-C_string_to_number(4,0,t2,t1,C_fix(16));}
-
-/* k12075 in k12072 in loop in r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12077,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12087,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2315 string-append */
-t3=((C_word*)t0)[4];
-((C_proc6)C_retrieve_proc(t3))(6,t3,t2,lf[527],((C_word*)t0)[3],((C_word*)t0)[2],lf[528]);}}
-
-/* k12085 in k12075 in k12072 in loop in r-usequence in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12087(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2315 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12010(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12010,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12018,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2300 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-
-/* k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12018(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12018,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12020,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li460),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_12020(t5,((C_word*)t0)[2],t1);}
-
-/* loop in k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_12020(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12020,NULL,3,t0,t1,t2);}
-t3=C_eofp(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t4=C_eqp(C_make_character(59),t2);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12033,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2303 skip-to-eol */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_11947(t6,t5);}
-else{
-if(C_truep(C_u_i_char_whitespacep(t2))){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12049,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2306 ##sys#read-char-0 */
-t6=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[3]);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}}}
-
-/* k12047 in loop in k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12049,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12056,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2307 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12054 in k12047 in loop in k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12056(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2307 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12020(t2,((C_word*)t0)[2],t1);}
-
-/* k12031 in loop in k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12033(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12033,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12040,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2304 ##sys#peek-char-0 */
-t3=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k12038 in k12031 in loop in k12016 in r-spaces in readrec in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_12040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2304 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_12020(t2,((C_word*)t0)[2],t1);}
-
-/* read-unreserved-char-0 in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11992(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11992,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11996,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2292 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k11994 in read-unreserved-char-0 in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_memq(t1,((C_word*)((C_word*)t0)[4])[1]))){
-/* library.scm: 2294 reserved-character */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_11983(t2,((C_word*)t0)[2],t1);}
-else{
-t2=t1;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* reserved-character in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11983(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11983,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11987,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2288 ##sys#read-char-0 */
-t4=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k11985 in reserved-character in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2289 ##sys#read-error */
-t2=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[526],((C_word*)t0)[2]);}
-
-/* skip-to-eol in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11947(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11947,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11955,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2283 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k11953 in skip-to-eol in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11955(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11955,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11957,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li456),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_11957(t5,((C_word*)t0)[2],t1);}
-
-/* skip in k11953 in skip-to-eol in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11957(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11957,NULL,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11964,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_eofp(t2))){
-t4=t3;
-f_11964(t4,C_SCHEME_FALSE);}
-else{
-t4=C_eqp(C_make_character(10),t2);
-t5=t3;
-f_11964(t5,C_i_not(t4));}}
-
-/* k11962 in skip in k11953 in skip-to-eol in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11964(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11964,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11971,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2285 ##sys#read-char-0 */
-t3=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k11969 in k11962 in skip in k11953 in skip-to-eol in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2285 skip */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_11957(t2,((C_word*)t0)[2],t1);}
-
-/* info in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11938(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11938,NULL,5,t0,t1,t2,t3,t4);}
-if(C_truep(((C_word*)t0)[2])){
-/* library.scm: 2279 infohandler */
-t5=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t5))(5,t5,t1,t2,t3,t4);}
-else{
-t5=t3;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* f_11932 in k11928 in k11925 in k11922 in k11919 in k11916 in ##sys#read in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11932(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11932,3,t0,t1,t2);}
-/* library.scm: 2275 ##sys#read-error */
-t3=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,((C_word*)t0)[2],lf[525],t2);}
-
-/* ##sys#read-error in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11888r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11888r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11888r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11896,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2245 ##sys#port-line */
-t6=*((C_word*)lf[485]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-
-/* k11894 in ##sys#read-error in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11899,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_truep(*((C_word*)lf[508]+1))?t1:C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11909,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2247 ##sys#number->string */
-t5=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t1);}
-else{
-t4=((C_word*)t0)[2];
-C_apply(6,0,((C_word*)t0)[5],*((C_word*)lf[9]+1),lf[522],t4,((C_word*)t0)[4]);}}
-
-/* k11907 in k11894 in ##sys#read-error in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11909(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2247 string-append */
-t2=((C_word*)t0)[4];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[523],t1);}
-
-/* k11897 in k11894 in ##sys#read-error in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(6,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[522],t1,((C_word*)t0)[2]);}
-
-/* ##sys#read-warning in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11865(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11865r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11865r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11865r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11873,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2233 ##sys#port-line */
-t6=*((C_word*)lf[485]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
-
-/* k11871 in ##sys#read-warning in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11873(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11873,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11876,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(C_truep(*((C_word*)lf[508]+1))?t1:C_SCHEME_FALSE);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11886,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2235 ##sys#number->string */
-t5=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t1);}
-else{
-t4=((C_word*)t0)[2];
-C_apply(5,0,((C_word*)t0)[5],*((C_word*)lf[12]+1),t4,((C_word*)t0)[4]);}}
-
-/* k11884 in k11871 in ##sys#read-warning in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2235 string-append */
-t2=((C_word*)t0)[4];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[521],t1);}
-
-/* k11874 in k11871 in ##sys#read-warning in k11861 in k11857 in k11853 in k11849 in k11845 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11876(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(5,0,((C_word*)t0)[3],*((C_word*)lf[12]+1),t1,((C_word*)t0)[2]);}
-
-/* ##sys#sharp-number-hook in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11839(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11839,4,t0,t1,t2,t3);}
-/* library.scm: 2219 ##sys#read-error */
-t4=*((C_word*)lf[513]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,t2,lf[514],t3);}
-
-/* ##sys#infix-list-hook in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11836(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11836,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* ##sys#read-prompt-hook in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11833(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11833,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-
-/* read in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11796(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11796r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11796r(t0,t1,t2);}}
-
-static void C_ccall f_11796r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11800,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_11800(2,t4,*((C_word*)lf[429]+1));}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_11800(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11798 in read in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11800(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11800,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11803,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2208 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[505]);}
-
-/* k11801 in k11798 in read in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11803,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11806,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2209 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[505]);}
-
-/* k11804 in k11801 in k11798 in read in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11806(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2210 ##sys#read */
-t2=*((C_word*)lf[506]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],*((C_word*)lf[507]+1));}
-
-/* peek-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11762(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11762r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11762r(t0,t1,t2);}}
-
-static void C_ccall f_11762r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11766,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_11766(2,t4,*((C_word*)lf[429]+1));}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_11766(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11764 in peek-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11766(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11766,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11769,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2203 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[504]);}
-
-/* k11767 in k11764 in peek-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11769(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11769,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11772,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2204 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[504]);}
-
-/* k11770 in k11767 in k11764 in peek-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11772(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2205 ##sys#peek-char-0 */
-t2=*((C_word*)lf[503]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#peek-char-0 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11737(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11737,3,t0,t1,t2);}
-if(C_truep(C_slot(t2,C_fix(6)))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_FILE);}
-else{
-t3=C_slot(t2,C_fix(2));
-t4=C_slot(t3,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11750,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* g24212422 */
-t6=t4;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
-
-/* k11748 in ##sys#peek-char-0 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11750(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(C_eofp(t1))){
-t2=C_i_set_i_slot(((C_word*)t0)[3],C_fix(6),C_SCHEME_TRUE);
-t3=t1;
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t2=t1;
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* ##sys#read-char/port in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11725(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11725,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11729,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2190 ##sys#check-port* */
-t4=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[500]);}
-
-/* k11727 in ##sys#read-char/port in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11729(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11729,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11732,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2191 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[500]);}
-
-/* k11730 in k11727 in ##sys#read-char/port in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11732(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2192 ##sys#read-char-0 */
-t2=*((C_word*)lf[502]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#read-char-0 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11666(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11666,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11670,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_slot(t2,C_fix(6)))){
-t4=C_i_set_i_slot(t2,C_fix(6),C_SCHEME_FALSE);
-t5=t3;
-f_11670(2,t5,C_SCHEME_END_OF_FILE);}
-else{
-t4=C_slot(t2,C_fix(2));
-t5=C_slot(t4,C_fix(0));
-/* g24042405 */
-t6=t5;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t3,t2);}}
-
-/* k11668 in ##sys#read-char-0 in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11670(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-t2=C_eqp(t1,C_make_character(10));
-if(C_truep(t2)){
-t3=C_slot(((C_word*)t0)[3],C_fix(4));
-t4=C_fixnum_plus(t3,C_fix(1));
-t5=C_i_set_i_slot(((C_word*)t0)[3],C_fix(4),t4);
-t6=C_i_set_i_slot(((C_word*)t0)[3],C_fix(5),C_fix(0));
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t1);}
-else{
-if(C_truep(C_eofp(t1))){
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-else{
-t3=C_slot(((C_word*)t0)[3],C_fix(5));
-t4=C_fixnum_plus(t3,C_fix(1));
-t5=C_i_set_i_slot(((C_word*)t0)[3],C_fix(5),t4);
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}}}
-
-/* read-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11638(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11638r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11638r(t0,t1,t2);}}
-
-static void C_ccall f_11638r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11642,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=*((C_word*)lf[429]+1);
-/* library.scm: 2174 ##sys#read-char/port */
-t5=*((C_word*)lf[501]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=C_i_car(t2);
-/* library.scm: 2174 ##sys#read-char/port */
-t6=*((C_word*)lf[501]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11640 in read-char in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11642(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2174 ##sys#read-char/port */
-t2=*((C_word*)lf[501]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* char-ready? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11597(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11597r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11597r(t0,t1,t2);}}
-
-static void C_ccall f_11597r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11601,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_11601(2,t4,*((C_word*)lf[429]+1));}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_11601(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11599 in char-ready? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11601(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11601,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11604,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2169 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[499]);}
-
-/* k11602 in k11599 in char-ready? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11604(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11604,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2170 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],C_SCHEME_TRUE,lf[499]);}
-
-/* k11605 in k11602 in k11599 in char-ready? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_slot(((C_word*)t0)[3],C_fix(2));
-t3=C_slot(t2,C_fix(6));
-/* g23832384 */
-t4=t3;
-((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[2],((C_word*)t0)[3]);}
-
-/* eof-object? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11594(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11594,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_eofp(t2));}
-
-/* make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11495(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_11495r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_11495r(t0,t1,t2,t3);}}
-
-static void C_ccall f_11495r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(8);
-t4=C_i_pairp(t3);
-t5=(C_truep(t4)?C_i_car(t3):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11591,a[2]=((C_word)li438),tmp=(C_word)a,a+=3,tmp));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11502,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2140 guard */
-t7=t5;
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
-
-/* k11500 in make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11502(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11502,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[4])[1];
-t3=C_fixnum_plus(((C_word*)((C_word*)t0)[4])[1],C_fix(1));
-t4=C_mutate(((C_word *)((C_word*)t0)[4])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11509,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=C_block_size(lf[494]);
-if(C_truep(C_fixnum_greater_or_equal_p(t2,t6))){
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11576,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t8=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 2145 ##sys#grow-vector */
-f_9617(t7,lf[494],t8,C_SCHEME_UNDEFINED);}
-else{
-t7=t5;
-f_11509(t7,C_SCHEME_UNDEFINED);}}
-
-/* k11574 in k11500 in make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11576(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(&lf[494] /* (set! default-parameter-vector ...) */,t1);
-t3=((C_word*)t0)[2];
-f_11509(t3,t2);}
-
-/* k11507 in k11500 in make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11509(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11509,NULL,2,t0,t1);}
-t2=C_i_setslot(lf[494],((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11513,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word)li439),tmp=(C_word)a,a+=5,tmp));}
-
-/* f_11513 in k11507 in k11500 in make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11513(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+9)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11513r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11513r(t0,t1,t2);}}
-
-static void C_ccall f_11513r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(9);
-t3=C_block_size(*((C_word*)lf[495]+1));
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11526,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[3],t3))){
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11544,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-t6=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 2152 ##sys#grow-vector */
-f_9617(t5,*((C_word*)lf[495]+1),t6,*((C_word*)lf[325]+1));}
-else{
-t5=t4;
-f_11526(t5,C_SCHEME_UNDEFINED);}}
-else{
-if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[3],t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_slot(lf[494],((C_word*)t0)[3]));}
-else{
-t4=C_slot(*((C_word*)lf[495]+1),((C_word*)t0)[3]);
-t5=C_eqp(t4,*((C_word*)lf[325]+1));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_slot(lf[494],((C_word*)t0)[3]):t4));}}}
-
-/* k11542 */
-static void C_ccall f_11544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[495]+1 /* (set! current-parameter-vector ...) */,t1);
-t3=((C_word*)t0)[2];
-f_11526(t3,t2);}
-
-/* k11524 */
-static void C_fcall f_11526(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11526,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11533,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(0));
-/* library.scm: 2153 guard */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
-
-/* k11531 in k11524 */
-static void C_ccall f_11533(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_setslot(*((C_word*)lf[495]+1),((C_word*)t0)[3],t1);
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* f_11591 in make-parameter in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11591(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11591,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11440(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11440,4,t0,t1,t2,t3);}
-t4=C_i_check_string_2(t2,lf[491]);
-t5=C_i_check_string_2(t3,lf[491]);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11452,a[2]=t3,a[3]=((C_word)li436),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2116 ##sys#pathname-resolution */
-t7=*((C_word*)lf[449]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,lf[493],t3);}
-
-/* a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11452(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11452,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11458,a[2]=t2,a[3]=((C_word)li435),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2119 ##sys#pathname-resolution */
-t4=*((C_word*)lf[449]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[2],t3);}
-
-/* a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11458(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11458,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11462,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11484,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2122 ##sys#make-c-string */
-t5=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}
-
-/* k11482 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11484(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11484,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11488,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 2122 ##sys#make-c-string */
-t3=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-
-/* k11486 in k11482 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11488,2,t0,t1);}
-t2=C_rename_file(((C_word*)t0)[6],t1);
-t3=C_eqp(C_fix(0),t2);
-if(C_truep(t3)){
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[4]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11468,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2123 ##sys#update-errno */
-t5=*((C_word*)lf[82]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k11466 in k11486 in k11482 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11468,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11475,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11479,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#peek-c-string */
-t4=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
-
-/* k11477 in k11466 in k11486 in k11482 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11479(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2126 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[492],t1);}
-
-/* k11473 in k11466 in k11486 in k11482 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11475(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2124 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[4],lf[438],lf[491],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k11460 in a11457 in a11451 in rename-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11462(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11403(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11403,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[488]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11412,a[2]=((C_word)li433),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2102 ##sys#pathname-resolution */
-t5=*((C_word*)lf[449]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[490]);}
-
-/* a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11412(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11412,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11416,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11438,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2105 ##sys#make-c-string */
-t5=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k11436 in a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11438(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11438,2,t0,t1);}
-t2=C_delete_file(t1);
-t3=C_eqp(C_fix(0),t2);
-if(C_truep(t3)){
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[3]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11422,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2106 ##sys#update-errno */
-t5=*((C_word*)lf[82]+1);
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k11420 in k11436 in a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11422(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11422,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11433,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#peek-c-string */
-t4=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
-
-/* k11431 in k11420 in k11436 in a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11433(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2109 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[489],t1);}
-
-/* k11427 in k11420 in k11436 in a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2107 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[438],lf[488],t1,((C_word*)t0)[2]);}
-
-/* k11414 in a11411 in delete-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11416(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* port-position in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11355(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11355r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11355r(t0,t1,t2);}}
-
-static void C_ccall f_11355r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11359,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_11359(2,t4,*((C_word*)lf[429]+1));}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_11359(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11357 in port-position in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11359(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11359,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11362,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2095 ##sys#check-port */
-t3=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[486]);}
-
-/* k11360 in k11357 in port-position in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(C_slot(((C_word*)t0)[3],C_fix(1)))){
-t2=C_slot(((C_word*)t0)[3],C_fix(4));
-t3=C_slot(((C_word*)t0)[3],C_fix(5));
-/* library.scm: 2097 ##sys#values */
-C_values(4,0,((C_word*)t0)[2],t2,t3);}
-else{
-/* library.scm: 2098 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[486],lf[487],((C_word*)t0)[3]);}}
-
-/* ##sys#port-line in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11343(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11343,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?C_slot(t2,C_fix(4)):C_SCHEME_FALSE));}
-
-/* set-port-name! in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11331(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_11331,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11335,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2086 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[484]);}
-
-/* k11333 in set-port-name! in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11335(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_check_string_2(((C_word*)t0)[4],lf[484]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_setslot(((C_word*)t0)[2],C_fix(3),((C_word*)t0)[4]));}
-
-/* port-name in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11300(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11300r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11300r(t0,t1,t2);}}
-
-static void C_ccall f_11300r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(7);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11304,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=*((C_word*)lf[429]+1);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f23942,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2082 ##sys#check-port */
-t6=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,lf[483]);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=C_i_car(t2);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f25047,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2082 ##sys#check-port */
-t7=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t5,lf[483]);}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* f25047 in port-name in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f25047(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(3)));}
-
-/* f23942 in port-name in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f23942(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(3)));}
-
-/* k11302 in port-name in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11304(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11304,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11307,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2082 ##sys#check-port */
-t3=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[483]);}
-
-/* k11305 in k11302 in port-name in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11307(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(3)));}
-
-/* flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11266(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11266r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11266r(t0,t1,t2);}}
-
-static void C_ccall f_11266r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11270,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_11270(2,t4,*((C_word*)lf[430]+1));}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_11270(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k11268 in flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11270(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11270,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11273,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2077 ##sys#check-port* */
-t3=*((C_word*)lf[437]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[482]);}
-
-/* k11271 in k11268 in flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11273(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11273,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11276,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2078 ##sys#check-port-mode */
-t3=*((C_word*)lf[434]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,lf[482]);}
-
-/* k11274 in k11271 in k11268 in flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11276(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2079 ##sys#flush-output */
-t2=*((C_word*)lf[481]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11253(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11253,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(2));
-t4=C_slot(t3,C_fix(5));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11260,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* g22682269 */
-t6=t4;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
-
-/* k11258 in ##sys#flush-output in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11260(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* directory-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11224(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11224,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[480]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11233,a[2]=((C_word)li425),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2064 ##sys#pathname-resolution */
-t5=*((C_word*)lf[449]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[479]);}
-
-/* a11232 in directory-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11233(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11233,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11237,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11251,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2067 ##sys#platform-fixup-pathname */
-t5=*((C_word*)lf[448]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k11249 in a11232 in directory-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2067 ##sys#file-info */
-t2=*((C_word*)lf[29]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k11235 in a11232 in directory-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11237(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_vector_ref(t1,C_fix(4));
-t3=C_eqp(C_fix(1),t2);
-t4=((C_word*)t0)[3];
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* file-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11202(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11202,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[478]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11211,a[2]=((C_word)li423),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2056 ##sys#pathname-resolution */
-t5=*((C_word*)lf[449]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[479]);}
-
-/* a11210 in file-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11211(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11211,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11218,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11222,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 2059 ##sys#platform-fixup-pathname */
-t5=*((C_word*)lf[448]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k11220 in a11210 in file-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 2059 ##sys#file-info */
-t2=*((C_word*)lf[29]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k11216 in a11210 in file-exists? in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11218(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* with-output-to-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11182r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11182r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11182r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(6);
-t5=*((C_word*)lf[430]+1);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11186,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-C_apply(5,0,t6,((C_word*)t0)[2],t2,t4);}
-
-/* k11184 in with-output-to-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11186(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11186,2,t0,t1);}
-t2=C_mutate((C_word*)lf[430]+1 /* (set! standard-output ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11192,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li421),tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2048 ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
-
-/* a11191 in k11184 in with-output-to-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11192(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11192r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11192r(t0,t1,t2);}}
-
-static void C_ccall f_11192r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(5);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11196,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2050 close-output-port */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k11194 in a11191 in k11184 in with-output-to-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11196(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[430]+1 /* (set! standard-output ...) */,((C_word*)t0)[4]);
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* with-input-from-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11162r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11162r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11162r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(6);
-t5=*((C_word*)lf[429]+1);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11166,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-C_apply(5,0,t6,((C_word*)t0)[2],t2,t4);}
-
-/* k11164 in with-input-from-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11166,2,t0,t1);}
-t2=C_mutate((C_word*)lf[429]+1 /* (set! standard-input ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11172,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li419),tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 2035 ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
-
-/* a11171 in k11164 in with-input-from-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11172(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11172r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11172r(t0,t1,t2);}}
-
-static void C_ccall f_11172r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(5);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11176,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2037 close-input-port */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k11174 in a11171 in k11164 in with-input-from-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[429]+1 /* (set! standard-input ...) */,((C_word*)t0)[4]);
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* call-with-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11138(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11138r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11138r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11138r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11142,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_apply(5,0,t5,((C_word*)t0)[2],t2,t4);}
-
-/* k11140 in call-with-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11142(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11142,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11147,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li416),tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11153,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li417),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2022 ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-
-/* a11152 in k11140 in call-with-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11153(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11153r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11153r(t0,t1,t2);}}
-
-static void C_ccall f_11153r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11157,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2025 close-output-port */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k11155 in a11152 in k11140 in call-with-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a11146 in k11140 in call-with-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11147(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11147,2,t0,t1);}
-/* library.scm: 2023 p */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* call-with-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11114(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_11114r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_11114r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_11114r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11118,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_apply(5,0,t5,((C_word*)t0)[2],t2,t4);}
-
-/* k11116 in call-with-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11118(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11118,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11123,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li413),tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11129,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li414),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 2011 ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-
-/* a11128 in k11116 in call-with-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11129(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_11129r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_11129r(t0,t1,t2);}}
-
-static void C_ccall f_11129r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11133,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 2014 close-input-port */
-t4=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k11131 in a11128 in k11116 in call-with-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11133(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* a11122 in k11116 in call-with-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11123(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11123,2,t0,t1);}
-/* library.scm: 2012 p */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-
-/* close-output-port in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11108(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11108,3,t0,t1,t2);}
-/* library.scm: 2004 close */
-f_11065(t1,t2,lf[458]);}
-
-/* close-input-port in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11102(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11102,3,t0,t1,t2);}
-/* library.scm: 2003 close */
-f_11065(t1,t2,lf[457]);}
-
-/* open-output-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11096(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_11096r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_11096r(t0,t1,t2,t3);}}
-
-static void C_ccall f_11096r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* library.scm: 2002 open */
-f_10967(t1,t2,C_SCHEME_FALSE,t3,lf[456]);}
-
-/* open-input-file in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11090(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_11090r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_11090r(t0,t1,t2,t3);}}
-
-static void C_ccall f_11090r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* library.scm: 2001 open */
-f_10967(t1,t2,C_SCHEME_TRUE,t3,lf[455]);}
-
-/* close in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11065(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11065,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11069,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1995 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,t3);}
-
-/* k11067 in close in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11069(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11069,2,t0,t1);}
-if(C_truep(C_slot(((C_word*)t0)[3],C_fix(8)))){
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-else{
-t2=C_slot(((C_word*)t0)[3],C_fix(2));
-t3=C_slot(t2,C_fix(4));
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11081,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* g21972198 */
-t5=t3;
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[3]);}}
-
-/* k11079 in k11067 in close in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_set_i_slot(((C_word*)t0)[3],C_fix(8),C_SCHEME_TRUE);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
-
-/* open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10967(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10967,NULL,5,t1,t2,t3,t4,t5);}
-t6=C_i_check_string_2(t2,t5);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10976,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=((C_word)li406),tmp=(C_word)a,a+=6,tmp);
-t8=C_i_not(t3);
-/* library.scm: 1971 ##sys#pathname-resolution */
-t9=*((C_word*)lf[449]+1);
-((C_proc7)(void*)(*((C_word*)t9+1)))(7,t9,t1,t2,t7,lf[473],t8,t4);}
-
-/* a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10976(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[22],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10976,3,t0,t1,t2);}
-t3=(C_truep(((C_word*)t0)[4])?lf[459]:lf[460]);
-t4=t3;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=lf[461];
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10983,a[2]=((C_word*)t0)[4],a[3]=t7,a[4]=t5,a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11012,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t7,a[6]=t10,a[7]=((C_word)li405),tmp=(C_word)a,a+=8,tmp));
-t12=((C_word*)t10)[1];
-f_11012(t12,t8,((C_word*)t0)[2]);}
-
-/* doloop2173 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_11012(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(5);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_11012,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11025,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_eqp(t3,lf[465]);
-if(C_truep(t5)){
-t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,lf[466]);
-t7=C_slot(t2,C_fix(1));
-t16=t1;
-t17=t7;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t6=C_eqp(t3,lf[467]);
-if(C_truep(t6)){
-t7=C_mutate(((C_word *)((C_word*)t0)[5])+1,lf[468]);
-t8=C_slot(t2,C_fix(1));
-t16=t1;
-t17=t8;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t7=C_eqp(t3,lf[469]);
-if(C_truep(t7)){
-if(C_truep(((C_word*)t0)[4])){
-/* library.scm: 1984 ##sys#error */
-t8=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t4,((C_word*)t0)[3],lf[470]);}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,lf[471]);
-t9=C_slot(t2,C_fix(1));
-t16=t1;
-t17=t9;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-/* library.scm: 1986 ##sys#error */
-t8=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t4,((C_word*)t0)[3],lf[472],t3);}}}}}
-
-/* k11023 in doloop2173 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11025(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11012(t3,((C_word*)t0)[2],t2);}
-
-/* k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10983,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10986,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1987 ##sys#make-port */
-t3=*((C_word*)lf[424]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,((C_word*)t0)[2],*((C_word*)lf[427]+1),((C_word*)t0)[5],lf[464]);}
-
-/* k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10986(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10986,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10989,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10992,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11010,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1988 ##sys#string-append */
-t5=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k11008 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1988 ##sys#open-file-port */
-t2=*((C_word*)lf[428]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10990 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10992(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10992,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[5]);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10995,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1989 ##sys#update-errno */
-t3=*((C_word*)lf[82]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k10993 in k10990 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10995(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10995,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11006,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#peek-c-string */
-t4=*((C_word*)lf[463]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
-
-/* k11004 in k10993 in k10990 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11006(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1990 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[462],t1);}
-
-/* k11000 in k10993 in k10990 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_11002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1990 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[438],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k10987 in k10984 in k10981 in a10975 in open in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10989(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10877(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[9],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10877,3,t0,t1,t2);}
-t3=C_block_size(t2);
-if(C_truep(C_fixnum_greaterp(t3,C_fix(0)))){
-t4=C_subchar(t2,C_fix(0));
-switch(t4){
-case C_make_character(126):
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10896,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1947 ##sys#substring */
-t6=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,t2,C_fix(1),t3);
-case C_make_character(36):
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10917,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,a[6]=((C_word)li403),tmp=(C_word)a,a+=7,tmp));
-t8=((C_word*)t6)[1];
-f_10917(t8,t1,C_fix(1));
-default:
-t5=t2;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[454]);}}
-
-/* loop in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10917(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(10);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_10917,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=((C_word*)t0)[4];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_subchar(((C_word*)t0)[4],t2);
-t4=C_eqp(t3,C_make_character(47));
-t5=(C_truep(t4)?t4:C_eqp(t3,C_make_character(92)));
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10940,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10951,a[2]=t6,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1956 ##sys#substring */
-t8=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,((C_word*)t0)[4],C_fix(1),t2);}
-else{
-t6=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 1958 loop */
-t11=t1;
-t12=t6;
-t1=t11;
-t2=t12;
-goto loop;}}}
-
-/* k10949 in loop in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1956 get-environment-variable */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k10938 in loop in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10940(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10940,2,t0,t1);}
-t2=(C_truep(t1)?t1:lf[453]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10947,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1957 ##sys#substring */
-t4=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k10945 in k10938 in loop in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10947(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1955 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10894 in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10896,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10903,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1948 get-environment-variable */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[452]);}
-
-/* k10901 in k10894 in ##sys#expand-home-path in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10903(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=t1;
-/* library.scm: 1948 ##sys#string-append */
-t3=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-else{
-/* library.scm: 1948 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[451],((C_word*)t0)[2]);}}
-
-/* ##sys#pathname-resolution in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10867(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10867,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10875,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1938 ##sys#expand-home-path */
-t5=*((C_word*)lf[450]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k10873 in ##sys#pathname-resolution in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10875(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1938 thunk */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* ##sys#platform-fixup-pathname in k10827 in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10833(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10833,3,t0,t1,t2);}
-if(C_truep(((C_word*)t0)[2])){
-t3=C_block_size(t2);
-t4=C_fixnum_difference(t3,C_fix(1));
-if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(0)))){
-t5=C_subchar(t2,t4);
-t6=C_eqp(t5,C_make_character(92));
-t7=(C_truep(t6)?t6:C_eqp(t5,C_make_character(47)));
-if(C_truep(t7)){
-/* library.scm: 1932 ##sys#substring */
-t8=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,t2,C_fix(0),t4);}
-else{
-t8=t2;
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* ##sys#set-port-data! in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10821(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10821,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_setslot(t2,C_fix(9),t3));}
-
-/* ##sys#port-data in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10815(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10815,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_slot(t2,C_fix(9)));}
-
-/* ##sys#tty-port? in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10798(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10798,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10813,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1917 ##sys#peek-unsigned-integer */
-t4=*((C_word*)lf[444]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,C_fix(0));}
-
-/* k10811 in ##sys#tty-port? in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10813(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(C_i_zerop(t1))){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=C_tty_portp(((C_word*)t0)[2]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* current-error-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10782(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10782r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10782r(t0,t1,t2);}}
-
-static void C_ccall f_10782r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-if(C_truep(C_i_pairp(t2))){
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10795,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1912 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[442]);}
-else{
-t3=*((C_word*)lf[431]+1);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10793 in current-error-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[431]+1 /* (set! standard-error ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* current-output-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10766(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10766r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10766r(t0,t1,t2);}}
-
-static void C_ccall f_10766r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-if(C_truep(C_i_pairp(t2))){
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10779,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1905 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[441]);}
-else{
-t3=*((C_word*)lf[430]+1);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10777 in current-output-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[430]+1 /* (set! standard-output ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* current-input-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10750(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10750r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10750r(t0,t1,t2);}}
-
-static void C_ccall f_10750r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-if(C_truep(C_i_pairp(t2))){
-t3=C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10763,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1898 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[440]);}
-else{
-t3=*((C_word*)lf[429]+1);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10761 in current-input-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10763(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[429]+1 /* (set! standard-input ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* ##sys#check-port* in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10735(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10735,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10739,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1890 ##sys#check-port */
-t5=*((C_word*)lf[432]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k10737 in ##sys#check-port* in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10739(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10739,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_slot(((C_word*)t0)[3],C_fix(8)))){
-/* library.scm: 1892 ##sys#signal-hook */
-t3=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,lf[438],((C_word*)t0)[2],lf[439],((C_word*)t0)[3]);}
-else{
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}}
-
-/* k10740 in k10737 in ##sys#check-port* in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* ##sys#check-port-mode in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10705(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr4r,(void*)f_10705r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_10705r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_10705r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-t5=C_slot(t2,C_fix(1));
-t6=C_eqp(t3,t5);
-if(C_truep(t6)){
-t7=C_SCHEME_UNDEFINED;
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-else{
-t7=C_i_pairp(t4);
-t8=(C_truep(t7)?C_i_car(t4):C_SCHEME_FALSE);
-if(C_truep(t3)){
-/* library.scm: 1885 ##sys#signal-hook */
-t9=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t8,lf[435],t2);}
-else{
-/* library.scm: 1885 ##sys#signal-hook */
-t9=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t8,lf[436],t2);}}}
-
-/* ##sys#check-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10678(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_10678r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_10678r(t0,t1,t2,t3);}}
-
-static void C_ccall f_10678r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10690,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-if(C_truep(C_blockp(t5))){
-t6=C_portp(t5);
-t7=t4;
-f_10690(t7,t6);}
-else{
-t6=t4;
-f_10690(t6,C_SCHEME_FALSE);}}
-
-/* k10688 in ##sys#check-port in k10674 in k10671 in k10668 in k10665 in k10661 in k10657 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10690(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t2=C_i_car(((C_word*)t0)[3]);
-/* library.scm: 1881 ##sys#signal-hook */
-t3=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],lf[56],t2,lf[433],((C_word*)t0)[2]);}
-else{
-/* library.scm: 1881 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[56],C_SCHEME_FALSE,lf[433],((C_word*)t0)[2]);}}}
-
-/* a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22079(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_22079,4,t0,t1,t2,t3);}
-t4=(C_truep(t3)?C_i_check_exact_2(t3,lf[425]):C_SCHEME_UNDEFINED);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22086,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_slot(t2,C_fix(12)))){
-t6=t5;
-f_22086(t6,C_SCHEME_UNDEFINED);}
-else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22200,a[2]=t2,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1845 ##sys#make-string */
-t7=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,C_fix(1024));}}
-
-/* k22198 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-f_22086(t2,C_i_setslot(((C_word*)t0)[2],C_fix(12),t1));}
-
-/* k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_22086(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_22086,NULL,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=(C_truep(t2)?t2:C_fix(16777215));
-t4=C_slot(((C_word*)t0)[3],C_fix(12));
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22099,a[2]=t6,a[3]=((C_word*)t0)[3],a[4]=((C_word)li389),tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_22099(t8,((C_word*)t0)[2],C_fix(1024),t3,t4,lf[426],C_SCHEME_FALSE);}
-
-/* loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_22099(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_22099,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22104,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t5,a[6]=t6,a[7]=t1,a[8]=((C_word*)t0)[3],a[9]=t4,tmp=(C_word)a,a+=10,tmp);
-/* library.scm: 1852 fxmin */
-t8=*((C_word*)lf[188]+1);
-((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t3,t2);}
-
-/* k22102 in loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_22104,2,t0,t1);}
-t2=fast_read_line_from_file(((C_word*)t0)[9],((C_word*)t0)[8],t1);
-if(C_truep(C_eofp(t2))){
-t3=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(((C_word*)t0)[6])?((C_word*)t0)[5]:C_SCHEME_END_OF_FILE));}
-else{
-if(C_truep(t2)){
-if(C_truep(((C_word*)t0)[6])){
-t3=C_slot(((C_word*)t0)[8],C_fix(4));
-t4=C_fixnum_plus(t3,C_fix(1));
-t5=C_i_set_i_slot(((C_word*)t0)[8],C_fix(4),t4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22168,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1863 ##sys#substring */
-t7=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,((C_word*)t0)[9],C_fix(0),t2);}
-else{
-t3=C_slot(((C_word*)t0)[8],C_fix(4));
-t4=C_fixnum_plus(t3,C_fix(1));
-t5=C_i_set_i_slot(((C_word*)t0)[8],C_fix(4),t4);
-/* library.scm: 1866 ##sys#substring */
-t6=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[7],((C_word*)t0)[9],C_fix(0),t2);}}
-else{
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[4],((C_word*)t0)[3]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22132,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1856 ##sys#substring */
-t4=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[9],C_fix(0),((C_word*)t0)[4]);}
-else{
-t3=C_fixnum_times(((C_word*)t0)[3],C_fix(2));
-t4=C_fixnum_difference(((C_word*)t0)[4],((C_word*)t0)[3]);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_22147,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[5],a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
-t6=C_fixnum_times(((C_word*)t0)[3],C_fix(2));
-/* library.scm: 1859 ##sys#make-string */
-t7=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}}}}
-
-/* k22145 in k22102 in loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22147(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_22147,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22151,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1860 ##sys#string-append */
-t3=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k22149 in k22145 in k22102 in loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22151(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1857 loop */
-t2=((C_word*)((C_word*)t0)[6])[1];
-f_22099(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-
-/* k22130 in k22102 in loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22132(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1856 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k22166 in k22102 in loop in k22084 in a22078 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1863 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a22022 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22023(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_22023,6,t0,t1,t2,t3,t4,t5);}
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22031,a[2]=t5,a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-t7=t6;
-f_22031(t7,t3);}
-else{
-t7=C_block_size(t4);
-t8=t6;
-f_22031(t8,C_fixnum_difference(t7,t5));}}
-
-/* k22029 in a22022 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_22031(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_22031,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22033,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li387),tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_22033(t2,t1,C_fix(0),((C_word*)t0)[2]));}
-
-/* loop in k22029 in a22022 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_22033(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-loop:
-C_stack_check;
-t4=fast_read_string_from_file(((C_word*)t0)[3],((C_word*)t0)[2],t1,t3);
-t5=C_i_not(t4);
-t6=(C_truep(t5)?t5:C_eofp(t4));
-if(C_truep(t6)){
-t7=t2;
-return(t7);}
-else{
-if(C_truep(C_fixnum_lessp(t4,t1))){
-t7=C_fixnum_difference(t1,t4);
-t8=C_fixnum_plus(t2,t4);
-t9=C_fixnum_plus(t3,t4);
-t12=t7;
-t13=t8;
-t14=t9;
-t1=t12;
-t2=t13;
-t3=t14;
-goto loop;}
-else{
-return(C_fixnum_plus(t2,t4));}}}
-
-/* a22019 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22020(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_22020,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_char_ready_p(t2));}
-
-/* a22016 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22017(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_22017,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_flush_output(t2));}
-
-/* a22010 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22011(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_22011,3,t0,t1,t2);}
-t3=C_close_file(t2);
-/* library.scm: 1826 ##sys#update-errno */
-t4=*((C_word*)lf[82]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-
-/* a22007 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22008(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_22008,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_display_string(t2,t3));}
-
-/* a22004 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22005(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_22005,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_display_char(t2,t3));}
-
-/* a22001 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_22002(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_22002,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_peek_char(t2));}
-
-/* a21998 in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_21999(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_21999,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_read_char(t2));}
-
-/* ##sys#make-port in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10631(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[17],*a=ab;
-if(c!=6) C_bad_argc_2(c,6,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_10631,6,t0,t1,t2,t3,t4,t5);}
-t6=C_a_i_port(&a,0);
-t7=C_i_set_i_slot(t6,C_fix(1),t2);
-t8=C_i_setslot(t6,C_fix(2),t3);
-t9=C_i_setslot(t6,C_fix(3),t4);
-t10=C_i_set_i_slot(t6,C_fix(4),C_fix(1));
-t11=C_i_set_i_slot(t6,C_fix(5),C_fix(0));
-t12=C_i_setslot(t6,C_fix(7),t5);
-t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,t6);}
-
-/* output-port? in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10610(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10610,3,t0,t1,t2);}
-t3=t2;
-if(C_truep(C_blockp(t3))){
-if(C_truep(C_portp(t3))){
-t4=C_slot(t2,C_fix(1));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_not(t4));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* input-port? in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10593(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10593,3,t0,t1,t2);}
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(C_blockp(t3))?(C_truep(C_portp(t3))?C_slot(t2,C_fix(1)):C_SCHEME_FALSE):C_SCHEME_FALSE));}
-
-/* port? in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10590(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10590,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_portp(t2));}
-
-/* continuation-return in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10575(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_10575r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_10575r(t0,t1,t2,t3);}}
-
-static void C_ccall f_10575r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=C_i_check_structure_2(t2,lf[416],lf[420]);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10584,a[2]=t3,a[3]=((C_word)li374),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1756 continuation-graft */
-t6=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t6))(4,t6,t1,t2,t5);}
-
-/* a10583 in continuation-return in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10584(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10584,2,t0,t1);}
-C_apply_values(3,0,t1,((C_word*)t0)[2]);}
-
-/* continuation-graft in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10542(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10542,4,t0,t1,t2,t3);}
-t4=C_i_check_structure_2(t2,lf[416],lf[419]);
-t5=C_slot(t2,C_fix(2));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10552,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t7=C_eqp(*((C_word*)lf[409]+1),t5);
-if(C_truep(t7)){
-/* library.scm: 1750 ##sys#continuation-graft */
-C_continuation_graft(4,0,t1,t2,t3);}
-else{
-t8=C_i_length(*((C_word*)lf[409]+1));
-t9=C_i_length(t5);
-t10=C_fixnum_difference(t8,t9);
-/* library.scm: 1749 ##sys#dynamic-unwind */
-f_10467(t6,t5,t10);}}
-
-/* k10550 in continuation-graft in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10552(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1750 ##sys#continuation-graft */
-C_continuation_graft(4,0,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* continuation? in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10535(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10535,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[416]));}
-
-/* continuation-capture in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10525(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10525,3,t0,t1,t2);}
-t3=*((C_word*)lf[409]+1);
-t4=C_direct_continuation(C_SCHEME_FALSE);
-t5=C_a_i_record(&a,3,lf[416],t4,t3);
-/* library.scm: 1738 proc */
-t6=t2;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t1,t5);}
-
-/* ##sys#dynamic-unwind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10467(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(5);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_10467,NULL,3,t1,t2,t3);}
-t4=C_eqp(*((C_word*)lf[409]+1),t2);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_fixnum_lessp(t3,C_fix(0)))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10483,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-t6=C_slot(t2,C_fix(1));
-t7=C_fixnum_plus(t3,C_fix(1));
-/* library.scm: 1726 ##sys#dynamic-unwind */
-t14=t5;
-t15=t6;
-t16=t7;
-t1=t14;
-t2=t15;
-t3=t16;
-goto loop;}
-else{
-t5=C_slot(*((C_word*)lf[409]+1),C_fix(0));
-t6=C_slot(t5,C_fix(1));
-t7=C_slot(*((C_word*)lf[409]+1),C_fix(1));
-t8=C_mutate((C_word*)lf[409]+1 /* (set! dynamic-winds ...) */,t7);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10512,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1732 after */
-t10=t6;
-((C_proc2)C_retrieve_proc(t10))(2,t10,t9);}}}
-
-/* k10510 in ##sys#dynamic-unwind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10512(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 1733 ##sys#dynamic-unwind */
-f_10467(((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k10481 in ##sys#dynamic-unwind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10483(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10483,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[3],C_fix(0));
-t3=C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10489,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* g19491950 */
-t5=t3;
-((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-
-/* k10487 in k10481 in ##sys#dynamic-unwind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10489(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[409]+1 /* (set! dynamic-winds ...) */,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* call-with-current-continuation in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10427(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10427,3,t0,t1,t2);}
-t3=*((C_word*)lf[409]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10433,a[2]=t2,a[3]=t3,a[4]=((C_word)li367),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1713 ##sys#call-with-current-continuation */
-C_call_cc(3,0,t1,t4);}
-
-/* a10432 in call-with-current-continuation in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10433(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10433,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10439,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li366),tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1715 proc */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-
-/* a10438 in a10432 in call-with-current-continuation in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10439(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10439r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10439r(t0,t1,t2);}}
-
-static void C_ccall f_10439r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(5);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10443,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=C_eqp(*((C_word*)lf[409]+1),((C_word*)t0)[2]);
-if(C_truep(t4)){
-C_apply(4,0,t1,((C_word*)t0)[3],t2);}
-else{
-t5=C_i_length(*((C_word*)lf[409]+1));
-t6=C_i_length(((C_word*)t0)[2]);
-t7=C_fixnum_difference(t5,t6);
-/* library.scm: 1718 ##sys#dynamic-unwind */
-f_10467(t3,((C_word*)t0)[2],t7);}}
-
-/* k10441 in a10438 in a10432 in call-with-current-continuation in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10443(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* dynamic-wind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10396,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10400,a[2]=t3,a[3]=t1,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 1700 before */
-t6=t2;
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k10398 in dynamic-wind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10400(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10400,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[409]+1));
-t4=C_mutate((C_word*)lf[409]+1 /* (set! dynamic-winds ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10409,a[2]=((C_word*)t0)[4],a[3]=((C_word)li364),tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1702 ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
-
-/* a10408 in k10398 in dynamic-wind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10409(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_10409r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_10409r(t0,t1,t2);}}
-
-static void C_ccall f_10409r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t3=C_slot(*((C_word*)lf[409]+1),C_fix(1));
-t4=C_mutate((C_word*)lf[409]+1 /* (set! dynamic-winds ...) */,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10417,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1706 after */
-t6=((C_word*)t0)[2];
-((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
-
-/* k10415 in a10408 in k10398 in dynamic-wind in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10417(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+14)){
-C_save_and_reclaim((void*)tr4r,(void*)f_10307r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_10307r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_10307r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a=C_alloc(14);
-if(C_truep(C_i_nullp(t4))){
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_FALSE;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10319,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t2,a[6]=((C_word)li361),tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_10319(t12,t1,t3);}
-else{
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10361,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t7,a[8]=((C_word)li362),tmp=(C_word)a,a+=9,tmp));
-t9=((C_word*)t7)[1];
-f_10361(t9,t1,t5);}}
-
-/* loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10361(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10361,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-if(C_truep(C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10378,a[2]=t2,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10390,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1679 mapsafe */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_10139(t6,t5,((C_word*)t0)[3],t2,C_SCHEME_TRUE,lf[407]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10393,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1681 check */
-f_10184(t4,C_i_cdr(t2),C_SCHEME_TRUE,lf[407]);}}
-
-/* k10391 in loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}
-
-/* k10388 in loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10390(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10376 in loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10378,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10382,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10386,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1680 mapsafe */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_10139(t4,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,lf[407]);}
-
-/* k10384 in k10376 in loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10386(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1680 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_10361(t2,((C_word*)t0)[2],t1);}
-
-/* k10380 in k10376 in loop in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10382(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10382,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* loop1883 in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10319(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10319,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=((C_word*)t0)[5];
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10348,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g18991900 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10346 in loop1883 in map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10348(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10348,2,t0,t1);}
-t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18831896 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10319(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18831896 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_10319(t6,((C_word*)t0)[3],t5);}}
-
-/* for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10236(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+14)){
-C_save_and_reclaim((void*)tr4r,(void*)f_10236r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_10236r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_10236r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a=C_alloc(14);
-if(C_truep(C_i_nullp(t4))){
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10248,a[2]=t6,a[3]=t2,a[4]=((C_word)li358),tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_10248(t8,t1,t3);}
-else{
-t5=C_a_i_cons(&a,2,t3,t4);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10278,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t7,a[8]=((C_word)li359),tmp=(C_word)a,a+=9,tmp));
-t9=((C_word*)t7)[1];
-f_10278(t9,t1,t5);}}
-
-/* loop in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10278(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10278,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(0));
-if(C_truep(C_i_pairp(t3))){
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10291,a[2]=t2,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10302,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1668 mapsafe */
-t6=((C_word*)((C_word*)t0)[6])[1];
-f_10139(t6,t5,((C_word*)t0)[3],t2,C_SCHEME_TRUE,lf[405]);}
-else{
-/* library.scm: 1670 check */
-f_10184(t1,t2,C_SCHEME_TRUE,lf[405]);}}
-
-/* k10300 in loop in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10302(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10289 in loop in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10291(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10291,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10298,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1669 mapsafe */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_10139(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,lf[405]);}
-
-/* k10296 in k10289 in loop in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1669 loop */
-t2=((C_word*)((C_word*)t0)[3])[1];
-f_10278(t2,((C_word*)t0)[2],t1);}
-
-/* loop1856 in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10248(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10248,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=((C_word*)t0)[3];
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10258,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* g18631864 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10256 in loop1856 in for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10248(t3,((C_word*)t0)[2],t2);}
-
-/* check in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10184(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10184,NULL,4,t1,t2,t3,t4);}
-t5=C_i_not(t3);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10194,a[2]=t2,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t5)){
-t7=t6;
-f_10194(t7,t5);}
-else{
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10202,a[2]=((C_word)li356),tmp=(C_word)a,a+=3,tmp);
-t8=t6;
-f_10194(t8,f_10202(t2));}}
-
-/* loop in check in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static C_word C_fcall f_10202(C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-t2=C_eqp(t1,C_SCHEME_END_OF_LIST);
-if(C_truep(t2)){
-return(C_SCHEME_FALSE);}
-else{
-t3=C_slot(t1,C_fix(0));
-t4=C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-return(C_SCHEME_FALSE);}
-else{
-t5=C_slot(t1,C_fix(1));
-t7=t5;
-t1=t7;
-goto loop;}}}
-
-/* k10192 in check in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10194(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 1659 ##sys#error */
-t2=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[408],((C_word*)t0)[2]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* mapsafe in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10139(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10139,NULL,6,t0,t1,t2,t3,t4,t5);}
-t6=C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t6)){
-t7=t3;
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-else{
-t7=C_slot(t3,C_fix(0));
-t8=C_eqp(t7,C_SCHEME_END_OF_LIST);
-if(C_truep(t8)){
-/* library.scm: 1648 check */
-f_10184(t1,t3,t4,t5);}
-else{
-if(C_truep(C_i_pairp(t7))){
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10171,a[2]=t5,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1650 p */
-t10=t2;
-((C_proc3)C_retrieve_proc(t10))(3,t10,t9,t7);}
-else{
-/* library.scm: 1651 ##sys#error-not-a-proper-list */
-t9=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t1,t7,t5);}}}}
-
-/* k10169 in mapsafe in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10171,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10175,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 1650 mapsafe */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_10139(t4,t2,((C_word*)t0)[3],t3,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-
-/* k10173 in k10169 in mapsafe in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10175,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ##sys#map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10094(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10094,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10100,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=((C_word)li353),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_10100(t7,t1,t3);}
-
-/* loop in ##sys#map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10100(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10100,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10120,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* library.scm: 1633 p */
-t6=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-/* library.scm: 1634 ##sys#error-not-a-proper-list */
-t4=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[2],lf[407]);}}}
-
-/* k10118 in loop in ##sys#map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10120(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10120,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10124,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t3=C_slot(((C_word*)t0)[3],C_fix(1));
-/* library.scm: 1633 loop */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_10100(t4,t2,t3);}
-
-/* k10122 in k10118 in loop in ##sys#map in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10124(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10124,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ##sys#for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10056(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10056,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10062,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=((C_word)li351),tmp=(C_word)a,a+=6,tmp));
-t7=((C_word*)t5)[1];
-f_10062(t7,t1,t3);}
-
-/* loop in ##sys#for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_fcall f_10062(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10062,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_i_pairp(t2))){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10078,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=C_slot(t2,C_fix(0));
-/* library.scm: 1619 p */
-t6=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-/* library.scm: 1621 ##sys#error-not-a-proper-list */
-t4=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[2],lf[405]);}}}
-
-/* k10076 in loop in ##sys#for-each in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 1620 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10062(t3,((C_word*)t0)[2],t2);}
-
-/* ##sys#direct-return in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10050(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10050,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_direct_return(t2,t3));}
-
-/* ##sys#call-with-direct-continuation in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10043(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10043,3,t0,t1,t2);}
-t3=t2;
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,C_direct_continuation(C_SCHEME_FALSE));}
-
-/* procedure? in k10034 in k10031 in k10028 in k10025 in k10022 in k10019 in k10016 in k10013 in k10010 in k10007 in k10004 in k10001 in k9839 */
-static void C_ccall f_10038(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10038,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_closurep(t2));}
-
-/* char-name in k9839 */
-static void C_ccall f_9884(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9884r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9884r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9884r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word *a=C_alloc(8);
-t4=C_i_pairp(t3);
-t5=(C_truep(t4)?C_i_car(t3):C_SCHEME_FALSE);
-if(C_truep(C_charp(t2))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9897,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1557 lookup-char */
-t7=((C_word*)t0)[4];
-f_9843(t7,t6,t2);}
-else{
-if(C_truep(t5)){
-t6=C_i_check_symbol_2(t2,lf[393]);
-t7=C_i_check_char_2(t5,lf[393]);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9915,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-t9=C_slot(t2,C_fix(1));
-t10=C_block_size(t9);
-if(C_truep(C_fixnum_lessp(t10,C_fix(2)))){
-/* library.scm: 1563 ##sys#signal-hook */
-t11=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t8,lf[56],lf[393],lf[394],t2);}
-else{
-t11=t8;
-f_9915(2,t11,C_SCHEME_UNDEFINED);}}
-else{
-t6=C_i_check_symbol_2(t2,lf[393]);
-t7=C_i_assq(t2,((C_word*)((C_word*)t0)[3])[1]);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_truep(t7)?C_slot(t7,C_fix(1)):C_SCHEME_FALSE));}}}
-
-/* k9913 in char-name in k9839 */
-static void C_ccall f_9915(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9915,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9918,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1564 lookup-char */
-t3=((C_word*)t0)[2];
-f_9843(t3,t2,((C_word*)t0)[4]);}
-
-/* k9916 in k9913 in char-name in k9839 */
-static void C_ccall f_9918(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9918,2,t0,t1);}
-if(C_truep(t1)){
-t2=C_i_assq(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
-t3=C_i_setslot(t1,C_fix(1),((C_word*)t0)[6]);
-if(C_truep(t2)){
-t4=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_set_i_slot(t2,C_fix(1),((C_word*)t0)[3]));}
-else{
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[3]);
-t5=C_a_i_cons(&a,2,t4,((C_word*)((C_word*)t0)[5])[1]);
-t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,t5);
-t7=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-else{
-t2=C_fix(C_character_code(((C_word*)t0)[3]));
-t3=C_fixnum_modulo(t2,C_fix(37));
-t4=C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[3]);
-t5=C_a_i_cons(&a,2,t4,((C_word*)((C_word*)t0)[5])[1]);
-t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,t5);
-t7=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[6]);
-t8=C_slot(((C_word*)t0)[2],t3);
-t9=C_a_i_cons(&a,2,t7,t8);
-t10=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_i_setslot(((C_word*)t0)[2],t3,t9));}}
-
-/* k9895 in char-name in k9839 */
-static void C_ccall f_9897(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_slot(t1,C_fix(1)):C_SCHEME_FALSE));}
-
-/* lookup-char in k9839 */
-static void C_fcall f_9843(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9843,NULL,3,t0,t1,t2);}
-t3=C_fix(C_character_code(t2));
-t4=C_fixnum_modulo(t3,C_fix(37));
-t5=C_slot(((C_word*)t0)[2],t4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9856,a[2]=t2,a[3]=((C_word)li340),tmp=(C_word)a,a+=4,tmp);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_9856(t6,t5));}
-
-/* loop in lookup-char in k9839 */
-static C_word C_fcall f_9856(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep(C_i_pairp(t1))){
-t2=C_slot(t1,C_fix(0));
-t3=C_slot(t2,C_fix(0));
-t4=C_eqp(t3,((C_word*)t0)[2]);
-if(C_truep(t4)){
-return(t2);}
-else{
-t5=C_slot(t1,C_fix(1));
-t7=t5;
-t1=t7;
-goto loop;}}
-else{
-return(C_SCHEME_FALSE);}}
-
-/* char-alphabetic? */
-static void C_ccall f_9833(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9833,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[392]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_alphabeticp(t2));}
-
-/* char-whitespace? */
-static void C_ccall f_9827(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9827,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[391]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_whitespacep(t2));}
-
-/* char-numeric? */
-static void C_ccall f_9821(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9821,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[390]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_numericp(t2));}
-
-/* char-lower-case? */
-static void C_ccall f_9815(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9815,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[389]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_lower_casep(t2));}
-
-/* char-upper-case? */
-static void C_ccall f_9809(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9809,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[388]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_upper_casep(t2));}
-
-/* char-ci<=? */
-static void C_ccall f_9795(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9795,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9803,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1520 char-downcase */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9801 in char-ci<=? */
-static void C_ccall f_9803(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9803,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9807,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1520 char-downcase */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k9805 in k9801 in char-ci<=? */
-static void C_ccall f_9807(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_less_or_equal_p(((C_word*)t0)[2],t1));}
-
-/* char-ci>=? */
-static void C_ccall f_9781(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9781,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9789,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1519 char-downcase */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9787 in char-ci>=? */
-static void C_ccall f_9789(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9789,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9793,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1519 char-downcase */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k9791 in k9787 in char-ci>=? */
-static void C_ccall f_9793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_greater_or_equal_p(((C_word*)t0)[2],t1));}
-
-/* char-ci<? */
-static void C_ccall f_9767(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9767,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9775,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1518 char-downcase */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9773 in char-ci<? */
-static void C_ccall f_9775(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9775,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9779,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1518 char-downcase */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k9777 in k9773 in char-ci<? */
-static void C_ccall f_9779(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_lessp(((C_word*)t0)[2],t1));}
-
-/* char-ci>? */
-static void C_ccall f_9753(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9753,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9761,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1517 char-downcase */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9759 in char-ci>? */
-static void C_ccall f_9761(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9761,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9765,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1517 char-downcase */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k9763 in k9759 in char-ci>? */
-static void C_ccall f_9765(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_greaterp(((C_word*)t0)[2],t1));}
-
-/* char-ci=? */
-static void C_ccall f_9739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9739,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9747,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1516 char-downcase */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9745 in char-ci=? */
-static void C_ccall f_9747(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9747,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9751,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1516 char-downcase */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k9749 in k9745 in char-ci=? */
-static void C_ccall f_9751(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_eqp(((C_word*)t0)[2],t1));}
-
-/* char-downcase */
-static void C_ccall f_9733(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9733,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[382]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_downcase(t2));}
-
-/* char-upcase */
-static void C_ccall f_9727(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9727,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[381]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_u_i_char_upcase(t2));}
-
-/* char<=? */
-static void C_ccall f_9715(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9715,4,t0,t1,t2,t3);}
-t4=C_i_check_char_2(t2,lf[380]);
-t5=C_i_check_char_2(t3,lf[380]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_fixnum_less_or_equal_p(t2,t3));}
-
-/* char>=? */
-static void C_ccall f_9703(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9703,4,t0,t1,t2,t3);}
-t4=C_i_check_char_2(t2,lf[379]);
-t5=C_i_check_char_2(t3,lf[379]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_fixnum_greater_or_equal_p(t2,t3));}
-
-/* char<? */
-static void C_ccall f_9691(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9691,4,t0,t1,t2,t3);}
-t4=C_i_check_char_2(t2,lf[378]);
-t5=C_i_check_char_2(t3,lf[378]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_fixnum_lessp(t2,t3));}
-
-/* char>? */
-static void C_ccall f_9679(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9679,4,t0,t1,t2,t3);}
-t4=C_i_check_char_2(t2,lf[377]);
-t5=C_i_check_char_2(t3,lf[377]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_fixnum_greaterp(t2,t3));}
-
-/* char=? */
-static void C_ccall f_9667(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9667,4,t0,t1,t2,t3);}
-t4=C_i_check_char_2(t2,lf[376]);
-t5=C_i_check_char_2(t3,lf[376]);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_eqp(t2,t3));}
-
-/* integer->char */
-static void C_ccall f_9661(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9661,3,t0,t1,t2);}
-t3=C_i_check_exact_2(t2,lf[375]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_make_character(C_unfix(t2)));}
-
-/* char->integer */
-static void C_ccall f_9655(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9655,3,t0,t1,t2);}
-t3=C_i_check_char_2(t2,lf[374]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(C_character_code(t2)));}
-
-/* char? */
-static void C_ccall f_9652(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9652,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_charp(t2));}
-
-/* ##sys#grow-vector */
-static void C_fcall f_9617(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9617,NULL,4,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9621,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1457 ##sys#make-vector */
-t6=*((C_word*)lf[361]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,t4);}
-
-/* k9619 in ##sys#grow-vector */
-static void C_ccall f_9621(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9621,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9629,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word)li318),tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_9629(t3,C_fix(0)));}
-
-/* doloop1659 in k9619 in ##sys#grow-vector */
-static C_word C_fcall f_9629(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-t2=((C_word*)t0)[3];
-return(t2);}
-else{
-t2=C_slot(((C_word*)t0)[2],t1);
-t3=C_i_setslot(((C_word*)t0)[3],t1,t2);
-t4=C_fixnum_plus(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}}
-
-/* vector-resize */
-static void C_ccall f_9583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_9583r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_9583r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_9583r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9587,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_nullp(t4))){
-t6=t5;
-f_9587(2,t6,C_SCHEME_FALSE);}
-else{
-t6=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t6))){
-t7=t5;
-f_9587(2,t7,C_i_car(t4));}
-else{
-/* ##sys#error */
-t7=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
-
-/* k9585 in vector-resize */
-static void C_ccall f_9587(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_check_vector_2(((C_word*)t0)[4],lf[371]);
-t3=C_i_check_exact_2(((C_word*)t0)[3],lf[371]);
-/* library.scm: 1454 ##sys#grow-vector */
-f_9617(((C_word*)t0)[2],((C_word*)t0)[4],((C_word*)t0)[3],t1);}
-
-/* vector-copy! */
-static void C_ccall f_9512(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+7)){
-C_save_and_reclaim((void*)tr4r,(void*)f_9512r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_9512r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_9512r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(7);
-t5=C_i_check_vector_2(t2,lf[369]);
-t6=C_i_check_vector_2(t3,lf[369]);
-t7=C_block_size(t2);
-t8=C_block_size(t3);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9528,a[2]=t7,a[3]=t8,a[4]=t1,a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_i_pairp(t4))){
-t10=t9;
-f_9528(2,t10,C_i_car(t4));}
-else{
-/* library.scm: 1438 fxmin */
-t10=*((C_word*)lf[188]+1);
-((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,t8,t7);}}
-
-/* k9526 in vector-copy! */
-static void C_ccall f_9528(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9528,2,t0,t1);}
-t2=C_i_check_exact_2(t1,lf[369]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9534,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=C_fixnum_greaterp(t1,((C_word*)t0)[3]);
-t5=(C_truep(t4)?t4:C_fixnum_greaterp(t1,((C_word*)t0)[2]));
-if(C_truep(t5)){
-/* library.scm: 1443 ##sys#signal-hook */
-t6=*((C_word*)lf[9]+1);
-((C_proc8)(void*)(*((C_word*)t6+1)))(8,t6,t3,lf[149],lf[369],lf[370],((C_word*)t0)[6],((C_word*)t0)[5],t1);}
-else{
-t6=t3;
-f_9534(2,t6,C_SCHEME_UNDEFINED);}}
-
-/* k9532 in k9526 in vector-copy! */
-static void C_ccall f_9534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9534,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9539,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li315),tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_9539(t2,C_fix(0)));}
-
-/* doloop1625 in k9532 in k9526 in vector-copy! */
-static C_word C_fcall f_9539(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-t2=C_SCHEME_UNDEFINED;
-return(t2);}
-else{
-t2=C_slot(((C_word*)t0)[3],t1);
-t3=C_i_setslot(((C_word*)t0)[2],t1,t2);
-t4=C_fixnum_plus(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}}
-
-/* vector-fill! */
-static void C_ccall f_9484(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9484,4,t0,t1,t2,t3);}
-t4=C_i_check_vector_2(t2,lf[368]);
-t5=C_block_size(t2);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9493,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=((C_word)li313),tmp=(C_word)a,a+=6,tmp);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_9493(t6,C_fix(0)));}
-
-/* doloop1598 in vector-fill! */
-static C_word C_fcall f_9493(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-t2=C_SCHEME_UNDEFINED;
-return(t2);}
-else{
-t2=C_i_setslot(((C_word*)t0)[3],t1,((C_word*)t0)[2]);
-t3=C_fixnum_plus(t1,C_fix(1));
-t6=t3;
-t1=t6;
-goto loop;}}
-
-/* vector */
-static void C_ccall f_9478(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_9478r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_9478r(t0,t1,t2);}}
-
-static void C_ccall f_9478r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-/* library.scm: 1424 ##sys#list->vector */
-t3=*((C_word*)lf[367]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
-
-/* vector->list */
-static void C_ccall f_9445(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9445,3,t0,t1,t2);}
-t3=C_i_check_vector_2(t2,lf[365]);
-t4=C_block_size(t2);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9454,a[2]=t6,a[3]=t2,a[4]=t4,a[5]=((C_word)li310),tmp=(C_word)a,a+=6,tmp));
-t8=((C_word*)t6)[1];
-f_9454(t8,t1,C_fix(0));}
-
-/* loop in vector->list */
-static void C_fcall f_9454(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_9454,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=C_slot(((C_word*)t0)[3],t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9472,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 1421 loop */
-t7=t4;
-t8=t5;
-t1=t7;
-t2=t8;
-goto loop;}}
-
-/* k9470 in loop in vector->list */
-static void C_ccall f_9472(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9472,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* list->vector */
-static void C_ccall f_9393(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9393,3,t0,t1,t2);}
-if(C_truep(C_i_listp(t2))){
-t3=C_i_length(t2);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9409,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1404 ##sys#make-vector */
-t5=*((C_word*)lf[361]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-/* library.scm: 1402 ##sys#error-not-a-proper-list */
-t3=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[364]);}}
-
-/* k9407 in list->vector */
-static void C_ccall f_9409(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9409,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9414,a[2]=t1,a[3]=((C_word)li308),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_9414(t2,((C_word*)t0)[2],C_fix(0)));}
-
-/* loop in k9407 in list->vector */
-static C_word C_fcall f_9414(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-loop:
-C_stack_check;
-if(C_truep(C_i_nullp(t1))){
-t3=((C_word*)t0)[2];
-return(t3);}
-else{
-t3=C_slot(t1,C_fix(0));
-t4=C_i_setslot(((C_word*)t0)[2],t2,t3);
-t5=C_slot(t1,C_fix(1));
-t6=C_fixnum_plus(t2,C_fix(1));
-t9=t5;
-t10=t6;
-t1=t9;
-t2=t10;
-goto loop;}}
-
-/* ##sys#make-vector */
-static void C_ccall f_9364(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_9364r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_9364r(t0,t1,t2,t3);}}
-
-static void C_ccall f_9364r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t4=C_i_check_exact_2(t2,lf[362]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9371,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
-/* library.scm: 1378 ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[362],lf[363],t2);}
-else{
-t6=t5;
-f_9371(2,t6,C_SCHEME_UNDEFINED);}}
-
-/* k9369 in ##sys#make-vector */
-static void C_ccall f_9371(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
-t2=C_SCHEME_UNDEFINED;
-/* library.scm: 1379 ##sys#allocate-vector */
-t3=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,t2,C_SCHEME_FALSE);}
-else{
-t2=C_i_car(((C_word*)t0)[4]);
-/* library.scm: 1379 ##sys#allocate-vector */
-t3=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,t2,C_SCHEME_FALSE);}}
-
-/* vector-set! */
-static void C_ccall f_9361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_9361,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_vector_set(t2,t3,t4));}
-
-/* f_9358 */
-static void C_ccall f_9358(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9358,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_vector_ref(t2,t3));}
-
-/* vector-length */
-static void C_ccall f_9355(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9355,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_vector_length(t2));}
-
-/* vector? */
-static void C_ccall f_9352(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9352,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_vectorp(t2));}
-
-/* blob=? */
-static void C_ccall f_9327(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9327,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9331,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1362 ##sys#check-blob */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t4,t2,lf[356]);}
-
-/* k9329 in blob=? */
-static void C_ccall f_9331(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9331,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9334,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1363 ##sys#check-blob */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,((C_word*)t0)[3],lf[356]);}
-
-/* k9332 in k9329 in blob=? */
-static void C_ccall f_9334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_block_size(((C_word*)t0)[4]);
-t3=C_block_size(((C_word*)t0)[3]);
-t4=C_eqp(t3,t2);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?C_i_zerop(C_string_compare(((C_word*)t0)[4],((C_word*)t0)[3],t2)):C_SCHEME_FALSE));}
-
-/* blob->string */
-static void C_ccall f_9315(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9315,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9319,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1355 ##sys#check-blob */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t3,t2,lf[355]);}
-
-/* k9317 in blob->string */
-static void C_ccall f_9319(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9319,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1357 ##sys#make-string */
-t4=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k9323 in k9317 in blob->string */
-static void C_ccall f_9325(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* string->blob */
-static void C_ccall f_9303(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9303,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[354]);
-t4=C_block_size(t2);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9313,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1350 ##sys#make-blob */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[350]+1)))(3,*((C_word*)lf[350]+1),t5,t4);}
-
-/* k9311 in string->blob */
-static void C_ccall f_9313(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* blob-size */
-static void C_ccall f_9294(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9294,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9298,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1344 ##sys#check-blob */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t3,t2,lf[353]);}
-
-/* k9296 in blob-size */
-static void C_ccall f_9298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_block_size(((C_word*)t0)[2]));}
-
-/* blob? */
-static void C_ccall f_9288(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9288,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=C_bytevectorp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* make-blob */
-static void C_ccall f_9279(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9279,3,t0,t1,t2);}
-t3=C_i_check_exact_2(t2,lf[351]);
-/* library.scm: 1337 ##sys#make-blob */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[350]+1)))(3,*((C_word*)lf[350]+1),t1,t2);}
-
-/* ##sys#make-blob */
-static void C_ccall f_9273(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9273,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9277,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1331 ##sys#allocate-vector */
-t4=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,t2,C_SCHEME_TRUE,C_SCHEME_FALSE,C_SCHEME_TRUE);}
-
-/* k9275 in ##sys#make-blob */
-static void C_ccall f_9277(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_string_to_bytevector(t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* ##sys#get-keyword */
-static void C_ccall f_9233(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr4r,(void*)f_9233r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_9233r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_9233r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-t5=C_i_check_list_2(t3,lf[348]);
-t6=C_i_memq(t2,t3);
-if(C_truep(t6)){
-t7=C_slot(t6,C_fix(1));
-if(C_truep(C_i_pairp(t7))){
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_slot(t7,C_fix(0)));}
-else{
-/* library.scm: 1322 ##sys#error */
-t8=*((C_word*)lf[8]+1);
-((C_proc6)(void*)(*((C_word*)t8+1)))(6,t8,t1,lf[348],lf[349],t3,t2);}}
-else{
-if(C_truep(C_i_pairp(t4))){
-t7=C_i_car(t4);
-/* g15101511 */
-t8=t7;
-((C_proc2)C_retrieve_proc(t8))(2,t8,t1);}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}}
-
-/* keyword->string */
-static void C_ccall f_9218(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9218,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9225,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1311 keyword? */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-
-/* k9223 in keyword->string */
-static void C_ccall f_9225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 1312 ##sys#symbol->string */
-t2=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-/* library.scm: 1313 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[56],lf[345],lf[346],((C_word*)t0)[2]);}}
-
-/* string->keyword */
-static void C_ccall f_9197(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9197,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[344]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9208,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9212,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1306 string */
-t6=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,C_make_character(0));}
-
-/* k9210 in string->keyword */
-static void C_ccall f_9212(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1306 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k9206 in string->keyword */
-static void C_ccall f_9208(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1306 ##sys#intern-symbol */
-C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* keyword? */
-static void C_ccall f_9177(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9177,3,t0,t1,t2);}
-if(C_truep(C_i_symbolp(t2))){
-t3=C_slot(t2,C_fix(1));
-t4=C_subbyte(t3,C_fix(0));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_eqp(C_fix(0),t4));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* gensym */
-static void C_ccall f_9123(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr2r,(void*)f_9123r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_9123r(t0,t1,t2);}}
-
-static void C_ccall f_9123r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(13);
-t3=C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],C_fix(1));
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9140,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9144,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t7=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f23888,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1294 ##sys#number->string */
-t9=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t8=C_i_car(t2);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9157,a[2]=t8,a[3]=t6,a[4]=((C_word*)t0)[2],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_blockp(t8))){
-if(C_truep(C_stringp(t8))){
-t10=t9;
-f_9157(2,t10,t8);}
-else{
-if(C_truep(C_symbolp(t8))){
-/* library.scm: 1291 ##sys#symbol->string */
-t10=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t8);}
-else{
-/* library.scm: 1282 ##sys#signal-hook */
-t10=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t10+1)))(6,t10,t9,lf[56],lf[340],lf[342],t8);}}}
-else{
-t10=t9;
-f_9157(2,t10,C_SCHEME_FALSE);}}}
-
-/* k9155 in gensym */
-static void C_ccall f_9157(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9157,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f23892,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1294 ##sys#number->string */
-t4=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-/* library.scm: 1282 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[56],lf[340],lf[342],((C_word*)t0)[2]);}}
-
-/* f23892 in k9155 in gensym */
-static void C_ccall f23892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1285 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* f23888 in gensym */
-static void C_ccall f23888(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1285 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[341],t1);}
-
-/* k9142 in gensym */
-static void C_ccall f_9144(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9144,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9148,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1294 ##sys#number->string */
-t3=*((C_word*)lf[320]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k9146 in k9142 in gensym */
-static void C_ccall f_9148(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1285 ##sys#string-append */
-t2=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k9138 in gensym */
-static void C_ccall f_9140(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1284 ##sys#make-symbol */
-C_make_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* string->uninterned-symbol */
-static void C_ccall f_9110(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9110,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[339]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9121,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1277 string-copy */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9119 in string->uninterned-symbol */
-static void C_ccall f_9121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1277 ##sys#make-symbol */
-C_make_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* string->symbol */
-static void C_ccall f_9097(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9097,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[338]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9108,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1271 string-copy */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k9106 in string->symbol */
-static void C_ccall f_9108(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1271 ##sys#intern-symbol */
-C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
-
-/* symbol->string */
-static void C_ccall f_9084(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9084,3,t0,t1,t2);}
-t3=C_i_check_symbol_2(t2,lf[337]);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9095,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1265 ##sys#symbol->string */
-t5=*((C_word*)lf[330]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k9093 in symbol->string */
-static void C_ccall f_9095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1265 string-copy */
-t2=*((C_word*)lf[158]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* ##sys#string->qualified-symbol */
-static void C_ccall f_9071(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9071,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9079,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(t2)){
-/* library.scm: 1260 ##sys#string-append */
-t5=*((C_word*)lf[171]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,t3);}
-else{
-t5=t3;
-/* library.scm: 1258 ##sys#string->symbol */
-t6=*((C_word*)lf[329]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}}
-
-/* k9077 in ##sys#string->qualified-symbol */
-static void C_ccall f_9079(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1258 ##sys#string->symbol */
-t2=*((C_word*)lf[329]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* ##sys#qualified-symbol? */
-static void C_ccall f_9048(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9048,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_block_size(t3);
-if(C_truep(C_fixnum_greaterp(t4,C_fix(0)))){
-t5=C_subbyte(t3,C_fix(0));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_fixnum_less_or_equal_p(t5,C_fix(31)));}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-
-/* ##sys#qualified-symbol-prefix */
-static void C_ccall f_9030(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9030,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_block_size(t3);
-t5=f_8959(t3,t4);
-if(C_truep(t5)){
-/* library.scm: 1249 ##sys#substring */
-t6=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t1,t3,C_fix(0),t5);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-
-/* ##sys#symbol->qualified-string */
-static void C_ccall f_9004(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_9004,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_block_size(t3);
-t5=f_8959(t3,t4);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9024,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1241 ##sys#substring */
-t7=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,t3,C_fix(1),t5);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t3);}}
-
-/* k9022 in ##sys#symbol->qualified-string */
-static void C_ccall f_9024(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9024,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9028,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1241 ##sys#substring */
-t3=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k9026 in k9022 in ##sys#symbol->qualified-string */
-static void C_ccall f_9028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1241 string-append */
-t2=((C_word*)t0)[4];
-((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[333],((C_word*)t0)[2],lf[334],t1);}
-
-/* ##sys#symbol->string */
-static void C_ccall f_8986(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8986,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_block_size(t3);
-t5=f_8959(t3,t4);
-if(C_truep(t5)){
-/* library.scm: 1233 ##sys#substring */
-t6=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t1,t3,t5,t4);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t3);}}
-
-/* split */
-static C_word C_fcall f_8959(C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_stack_check;
-t3=C_subbyte(t1,C_fix(0));
-if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
-if(C_truep(C_fixnum_lessp(t3,t2))){
-t4=C_fixnum_less_or_equal_p(t3,C_fix(31));
-return((C_truep(t4)?C_fixnum_plus(t3,C_fix(1)):C_SCHEME_FALSE));}
-else{
-return(C_SCHEME_FALSE);}}
-else{
-return(C_SCHEME_FALSE);}}
-
-/* ##sys#string->symbol */
-static void C_ccall f_8947(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8947,3,t0,t1,t2);}
-t3=C_i_check_string(t2);
-/* library.scm: 1213 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t1,t2);}
-
-/* ##sys#interned-symbol? */
-static void C_ccall f_8944(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8944,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_lookup_symbol(t2));}
-
-/* symbol? */
-static void C_ccall f_8939(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8939,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_symbolp(t2));}
-
-/* flonum-print-precision */
-static void C_ccall f_8907(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_8907r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_8907r(t0,t1,t2);}}
-
-static void C_ccall f_8907r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8911,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_i_nullp(t2))){
-t4=t3;
-f_8911(2,t4,C_SCHEME_FALSE);}
-else{
-t4=C_i_cdr(t2);
-if(C_truep(C_i_nullp(t4))){
-t5=t3;
-f_8911(2,t5,C_i_car(t2));}
-else{
-/* ##sys#error */
-t5=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
-
-/* k8909 in flonum-print-precision */
-static void C_ccall f_8911(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_get_print_precision();
-if(C_truep(t1)){
-t3=C_i_check_exact_2(t1,lf[322]);
-t4=C_set_print_precision(t1);
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}
-else{
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* lcm */
-static void C_ccall f_8842(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_8842r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_8842r(t0,t1,t2);}}
-
-static void C_ccall f_8842r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-if(C_truep(C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fix(1));}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8854,a[2]=t4,a[3]=((C_word)li272),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_8854(t6,t1,t2,C_SCHEME_TRUE);}}
-
-/* loop in lcm */
-static void C_fcall f_8854(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8854,NULL,4,t0,t1,t2,t3);}
-t4=C_slot(t2,C_fix(0));
-t5=C_slot(t2,C_fix(1));
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8864,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-/* library.scm: 1183 ##sys#check-integer */
-t7=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t4,lf[317]);}
-else{
-t7=t6;
-f_8864(2,t7,C_SCHEME_UNDEFINED);}}
-
-/* k8862 in loop in lcm */
-static void C_ccall f_8864(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8864,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)t0)[5]))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_abs(&a,1,((C_word*)t0)[3]));}
-else{
-t2=C_slot(((C_word*)t0)[5],C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8879,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* library.scm: 1187 ##sys#check-integer */
-t4=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[317]);}}
-
-/* k8877 in k8862 in loop in lcm */
-static void C_ccall f_8879(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8879,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8890,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_slot(((C_word*)t0)[5],C_fix(0));
-/* library.scm: 1188 ##sys#lcm */
-t4=*((C_word*)lf[316]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
-
-/* k8888 in k8877 in k8862 in loop in lcm */
-static void C_ccall f_8890(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8890,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=C_a_i_cons(&a,2,t1,t2);
-/* library.scm: 1188 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_8854(t4,((C_word*)t0)[2],t3,C_SCHEME_FALSE);}
-
-/* ##sys#lcm */
-static void C_ccall f_8828(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8828,4,t0,t1,t2,t3);}
-t4=C_a_i_times(&a,2,t2,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8840,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 1175 ##sys#gcd */
-t6=*((C_word*)lf[314]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,t3);}
-
-/* k8838 in ##sys#lcm */
-static void C_ccall f_8840(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_quotient(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* gcd */
-static void C_ccall f_8771(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_8771r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_8771r(t0,t1,t2);}}
-
-static void C_ccall f_8771r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(6);
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(0));}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8783,a[2]=t5,a[3]=((C_word)li269),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_8783(t7,t1,t2,C_SCHEME_TRUE);}}
-
-/* loop in gcd */
-static void C_fcall f_8783(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8783,NULL,4,t0,t1,t2,t3);}
-t4=C_slot(t2,C_fix(0));
-t5=C_slot(t2,C_fix(1));
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8793,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t3)){
-/* library.scm: 1167 ##sys#check-integer */
-t7=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t4,lf[315]);}
-else{
-t7=t6;
-f_8793(2,t7,C_SCHEME_UNDEFINED);}}
-
-/* k8791 in loop in gcd */
-static void C_ccall f_8793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8793,2,t0,t1);}
-if(C_truep(C_i_nullp(((C_word*)t0)[5]))){
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_abs(&a,1,((C_word*)t0)[3]));}
-else{
-t2=C_slot(((C_word*)t0)[5],C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8808,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* library.scm: 1171 ##sys#check-integer */
-t4=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[315]);}}
-
-/* k8806 in k8791 in loop in gcd */
-static void C_ccall f_8808(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8808,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8819,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1172 ##sys#gcd */
-t3=*((C_word*)lf[314]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k8817 in k8806 in k8791 in loop in gcd */
-static void C_ccall f_8819(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8819,2,t0,t1);}
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-t3=C_a_i_cons(&a,2,t1,t2);
-/* library.scm: 1172 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_8783(t4,((C_word*)t0)[2],t3,C_SCHEME_FALSE);}
-
-/* ##sys#gcd */
-static void C_ccall f_8746(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8746,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8752,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word)li267),tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_8752(t7,t1,t2,t3);}
-
-/* loop in ##sys#gcd */
-static void C_fcall f_8752(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8752,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_i_zerop(t3))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_abs(&a,1,t2));}
-else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8769,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1159 remainder */
-t5=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,t3);}}
-
-/* k8767 in loop in ##sys#gcd */
-static void C_ccall f_8769(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 1159 loop */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_8752(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* atan */
-static void C_ccall f_8734(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_8734r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_8734r(t0,t1,t2,t3);}}
-
-static void C_ccall f_8734r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-if(C_truep(C_i_nullp(t3))){
-t4=C_a_i_atan(&a,1,t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_i_car(t3);
-t5=C_a_i_atan2(&a,2,t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* sqrt */
-static void C_ccall f_8731(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8731,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_sqrt(&a,1,t2));}
-
-/* acos */
-static void C_ccall f_8728(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8728,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_acos(&a,1,t2));}
-
-/* asin */
-static void C_ccall f_8725(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8725,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_asin(&a,1,t2));}
-
-/* tan */
-static void C_ccall f_8722(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8722,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_tan(&a,1,t2));}
-
-/* cos */
-static void C_ccall f_8719(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8719,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cos(&a,1,t2));}
-
-/* sin */
-static void C_ccall f_8716(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8716,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_sin(&a,1,t2));}
-
-/* log */
-static void C_ccall f_8713(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8713,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_log(&a,1,t2));}
-
-/* exp */
-static void C_ccall f_8710(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8710,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_exp(&a,1,t2));}
-
-/* min */
-static void C_ccall f_8704(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_8704r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_8704r(t0,t1,t2,t3);}}
-
-static void C_ccall f_8704r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* library.scm: 1121 maxmin */
-f_8651(t1,t2,t3,((C_word*)t0)[2]);}
-
-/* max */
-static void C_ccall f_8698(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_8698r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_8698r(t0,t1,t2,t3);}}
-
-static void C_ccall f_8698r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-/* library.scm: 1120 maxmin */
-f_8651(t1,t2,t3,((C_word*)t0)[2]);}
-
-/* maxmin */
-static void C_fcall f_8651(C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8651,NULL,4,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8657,a[2]=t4,a[3]=t6,a[4]=((C_word)li254),tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_8657(t8,t1,t2,t3);}
-
-/* loop in maxmin */
-static void C_fcall f_8657(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8657,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=t2;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=C_slot(t3,C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8674,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8681,a[2]=t6,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t5,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
-/* library.scm: 1111 pred */
-t8=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t8))(4,t8,t7,t5,t2);}}
-
-/* k8679 in loop in maxmin */
-static void C_ccall f_8681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(C_truep(t1)){
-if(C_truep(C_blockp(((C_word*)t0)[7]))){
-if(C_truep(C_flonump(((C_word*)t0)[7]))){
-if(C_truep(C_blockp(((C_word*)t0)[6]))){
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 1111 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8657(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}
-else{
-/* library.scm: 1115 exact->inexact */
-C_exact_to_inexact(3,0,((C_word*)t0)[2],((C_word*)t0)[6]);}}
-else{
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 1111 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8657(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}}
-else{
-t2=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 1111 loop */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_8657(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}}
-else{
-t2=((C_word*)t0)[7];
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-/* library.scm: 1111 loop */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_8657(t4,((C_word*)t0)[3],t2,t3);}}
-
-/* k8672 in loop in maxmin */
-static void C_ccall f_8674(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 1111 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_8657(t3,((C_word*)t0)[2],t1,t2);}
-
-/* odd? */
-static void C_ccall f_8646(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8646,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_oddp(t2));}
-
-/* even? */
-static void C_ccall f_8643(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8643,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_evenp(t2));}
-
-/* modulo */
-static void C_ccall f_8614(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8614,4,t0,t1,t2,t3);}
-t4=C_a_i_divide(&a,2,t2,t3);
-if(C_truep(C_i_integerp(t4))){
-t5=C_a_i_times(&a,2,t4,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_minus(&a,2,t2,t5));}
-else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8635,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 1090 floor */
-t6=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t4);}}
-
-/* k8633 in modulo */
-static void C_ccall f_8635(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8635,2,t0,t1);}
-t2=C_quickflonumtruncate(t1);
-if(C_truep(C_i_nequalp(t1,t2))){
-t3=C_a_i_times(&a,2,t2,((C_word*)t0)[4]);
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_minus(&a,2,((C_word*)t0)[2],t3));}
-else{
-t3=t1;
-t4=C_a_i_times(&a,2,t3,((C_word*)t0)[4]);
-t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_minus(&a,2,((C_word*)t0)[2],t4));}}
-
-/* remainder */
-static void C_ccall f_8600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8600,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8612,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-C_quotient(4,0,t4,t2,t3);}
-
-/* k8610 in remainder */
-static void C_ccall f_8612(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8612,2,t0,t1);}
-t2=C_a_i_times(&a,2,t1,((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_minus(&a,2,((C_word*)t0)[2],t2));}
-
-/* round */
-static void C_ccall f_8591(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8591,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[298]);
-if(C_truep(C_fixnump(t2))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_a_i_flonum_round_proper(&a,1,t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* truncate */
-static void C_ccall f_8579(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8579,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[297]);
-if(C_truep(C_fixnump(t2))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-/* library.scm: 1073 fptruncate */
-t4=*((C_word*)lf[224]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t2);}}
-
-/* ceiling */
-static void C_ccall f_8567(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8567,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[296]);
-if(C_truep(C_fixnump(t2))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-/* library.scm: 1067 fpceiling */
-t4=*((C_word*)lf[226]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t2);}}
-
-/* floor */
-static void C_ccall f_8555(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8555,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[295]);
-if(C_truep(C_fixnump(t2))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-/* library.scm: 1061 fpfloor */
-t4=*((C_word*)lf[223]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t2);}}
-
-/* ##sys#inexact->exact */
-static void C_ccall f_8551(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8551,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_inexact_to_exact(t2));}
-
-/* signum */
-static void C_ccall f_8516(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8516,3,t0,t1,t2);}
-if(C_truep(C_i_greaterp(t2,C_fix(0)))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8529,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1048 ##sys#exact? */
-t4=*((C_word*)lf[264]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-else{
-if(C_truep(C_i_lessp(t2,C_fix(0)))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8541,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1049 ##sys#exact? */
-t4=*((C_word*)lf[264]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8547,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 1050 ##sys#exact? */
-t4=*((C_word*)lf[264]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}}
-
-/* k8545 in signum */
-static void C_ccall f_8547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_fix(0):lf[290]));}
-
-/* k8539 in signum */
-static void C_ccall f_8541(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_fix(-1):lf[289]));}
-
-/* k8527 in signum */
-static void C_ccall f_8529(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_fix(1):lf[288]));}
-
-/* denominator */
-static void C_ccall f_8503(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8503,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[284]);
-if(C_truep(C_i_integerp(t2))){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(1));}
-else{
-/* library.scm: 1043 ##sys#signal-hook */
-t4=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[56],lf[282],lf[285],t2);}}
-
-/* numerator */
-static void C_ccall f_8491(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8491,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[282]);
-if(C_truep(C_i_integerp(t2))){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-/* library.scm: 1037 ##sys#signal-hook */
-t4=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[56],lf[282],lf[283],t2);}}
-
-/* imag-part */
-static void C_ccall f_8485(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8485,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[281]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(0));}
-
-/* real-part */
-static void C_ccall f_8479(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8479,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[280]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-
-/* angle */
-static void C_ccall f_8460(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8460,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[277]);
-t4=C_i_lessp(t2,C_fix(0));
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?lf[278]:lf[279]));}
-
-/* abs */
-static void C_ccall f_8457(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8457,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_abs(&a,1,t2));}
-
-/* negative? */
-static void C_ccall f_8454(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8454,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_negativep(t2));}
-
-/* positive? */
-static void C_ccall f_8451(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8451,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_positivep(t2));}
-
-/* zero? */
-static void C_ccall f_8448(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8448,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_zerop(t2));}
-
-/* ##sys#double->number */
-static void C_ccall f_8445(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8445,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_double_to_number(t2));}
-
-/* ##sys#flonum-in-fixnum-range? */
-static void C_ccall f_8442(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8442,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_flonum_in_fixnum_range_p(t2));}
-
-/* ##sys#fits-in-unsigned-int? */
-static void C_ccall f_8439(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8439,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fits_in_unsigned_int_p(t2));}
-
-/* ##sys#fits-in-int? */
-static void C_ccall f_8436(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8436,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fits_in_int_p(t2));}
-
-/* ##sys#inexact? */
-static void C_ccall f_8430(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8430,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_inexactp(t2));}
-
-/* ##sys#exact? */
-static void C_ccall f_8427(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8427,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_exactp(t2));}
-
-/* ##sys#integer? */
-static void C_ccall f_8423(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8423,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_integerp(t2));}
-
-/* rational? */
-static void C_ccall f_8419(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8419,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_rationalp(t2));}
-
-/* ##sys#number? */
-static void C_ccall f_8413(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8413,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_numberp(t2));}
-
-/* sub1 */
-static void C_ccall f_8406(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8406,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_minus(&a,2,t2,C_fix(1)));}
-
-/* add1 */
-static void C_ccall f_8400(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8400,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_plus(&a,2,t2,C_fix(1)));}
-
-/* fpinteger? */
-static void C_ccall f_8374(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8374,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8389,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_u_i_fpintegerp(t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[243],t4);}}
-
-/* k8387 in fpinteger? */
-static void C_ccall f_8389(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_u_i_fpintegerp(((C_word*)t0)[2]));}
-
-/* fpabs */
-static void C_ccall f_8357(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8357,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8372,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_abs(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[242],t4);}}
-
-/* k8370 in fpabs */
-static void C_ccall f_8372(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8372,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_abs(&a,1,((C_word*)t0)[2]));}
-
-/* fpsqrt */
-static void C_ccall f_8340(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8340,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8355,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_sqrt(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[241],t4);}}
-
-/* k8353 in fpsqrt */
-static void C_ccall f_8355(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8355,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_sqrt(&a,1,((C_word*)t0)[2]));}
-
-/* fplog */
-static void C_ccall f_8323(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8323,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8338,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_log(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[240],t4);}}
-
-/* k8336 in fplog */
-static void C_ccall f_8338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8338,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_log(&a,1,((C_word*)t0)[2]));}
-
-/* fpexpt */
-static void C_ccall f_8300(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8300,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8321,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_expt(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[239],t5,t6);}}
-
-/* k8319 in fpexpt */
-static void C_ccall f_8321(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8321,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_expt(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fpexp */
-static void C_ccall f_8283(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8283,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8298,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_exp(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[238],t4);}}
-
-/* k8296 in fpexp */
-static void C_ccall f_8298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8298,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_exp(&a,1,((C_word*)t0)[2]));}
-
-/* fpatan2 */
-static void C_ccall f_8260(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8260,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8281,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_atan2(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[237],t5,t6);}}
-
-/* k8279 in fpatan2 */
-static void C_ccall f_8281(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8281,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_atan2(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fpatan */
-static void C_ccall f_8243(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8243,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8258,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_atan(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[236],t4);}}
-
-/* k8256 in fpatan */
-static void C_ccall f_8258(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8258,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_atan(&a,1,((C_word*)t0)[2]));}
-
-/* fpacos */
-static void C_ccall f_8226(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8226,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8241,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_acos(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[235],t4);}}
-
-/* k8239 in fpacos */
-static void C_ccall f_8241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8241,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_acos(&a,1,((C_word*)t0)[2]));}
-
-/* fpasin */
-static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8209,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8224,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_asin(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[234],t4);}}
-
-/* k8222 in fpasin */
-static void C_ccall f_8224(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8224,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_asin(&a,1,((C_word*)t0)[2]));}
-
-/* fptan */
-static void C_ccall f_8192(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8192,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8207,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_tan(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[233],t4);}}
-
-/* k8205 in fptan */
-static void C_ccall f_8207(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8207,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_tan(&a,1,((C_word*)t0)[2]));}
-
-/* fpcos */
-static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8175,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8190,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_cos(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[232],t4);}}
-
-/* k8188 in fpcos */
-static void C_ccall f_8190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8190,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_cos(&a,1,((C_word*)t0)[2]));}
-
-/* fpsin */
-static void C_ccall f_8158(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8158,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8173,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_sin(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[231],t4);}}
-
-/* k8171 in fpsin */
-static void C_ccall f_8173(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8173,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_sin(&a,1,((C_word*)t0)[2]));}
-
-/* fpceiling */
-static void C_ccall f_8137(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8137,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8152,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_ceiling(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[226],t4);}}
-
-/* k8150 in fpceiling */
-static void C_ccall f_8152(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8152,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_ceiling(&a,1,((C_word*)t0)[2]));}
-
-/* fpround */
-static void C_ccall f_8120(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8120,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8135,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_round(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[225],t4);}}
-
-/* k8133 in fpround */
-static void C_ccall f_8135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8135,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_round(&a,1,((C_word*)t0)[2]));}
-
-/* fptruncate */
-static void C_ccall f_8103(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8103,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8118,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_truncate(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[224],t4);}}
-
-/* k8116 in fptruncate */
-static void C_ccall f_8118(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8118,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_truncate(&a,1,((C_word*)t0)[2]));}
-
-/* fpfloor */
-static void C_ccall f_8086(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8086,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8101,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_floor(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[223],t4);}}
-
-/* k8099 in fpfloor */
-static void C_ccall f_8101(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8101,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_floor(&a,1,((C_word*)t0)[2]));}
-
-/* fpmin */
-static void C_ccall f_8063(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8063,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8084,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_i_flonum_min(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[222],t5,t6);}}
-
-/* k8082 in fpmin */
-static void C_ccall f_8084(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_flonum_min(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fpmax */
-static void C_ccall f_8040(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8040,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8061,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_i_flonum_max(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[221],t5,t6);}}
-
-/* k8059 in fpmax */
-static void C_ccall f_8061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_flonum_max(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fpneg */
-static void C_ccall f_8023(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8023,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8038,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_i_flonump(t4))){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_flonum_negate(&a,1,t2));}
-else{
-/* library.scm: 805 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[220],t4);}}
-
-/* k8036 in fpneg */
-static void C_ccall f_8038(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8038,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_negate(&a,1,((C_word*)t0)[2]));}
-
-/* fp<= */
-static void C_ccall f_8000(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_8000,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8021,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_flonum_less_or_equal_p(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[219],t5,t6);}}
-
-/* k8019 in fp<= */
-static void C_ccall f_8021(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_flonum_less_or_equal_p(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp>= */
-static void C_ccall f_7977(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7977,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7998,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_flonum_greater_or_equal_p(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[218],t5,t6);}}
-
-/* k7996 in fp>= */
-static void C_ccall f_7998(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_flonum_greater_or_equal_p(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp< */
-static void C_ccall f_7954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7954,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7975,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_flonum_lessp(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[217],t5,t6);}}
-
-/* k7973 in fp< */
-static void C_ccall f_7975(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_flonum_lessp(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp> */
-static void C_ccall f_7931(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7931,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7952,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_flonum_greaterp(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[216],t5,t6);}}
-
-/* k7950 in fp> */
-static void C_ccall f_7952(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_flonum_greaterp(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp= */
-static void C_ccall f_7908(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7908,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7929,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_flonum_equalp(t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[215],t5,t6);}}
-
-/* k7927 in fp= */
-static void C_ccall f_7929(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_flonum_equalp(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp/ */
-static void C_ccall f_7885(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7885,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7906,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_quotient(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[214],t5,t6);}}
-
-/* k7904 in fp/ */
-static void C_ccall f_7906(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7906,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_quotient(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp* */
-static void C_ccall f_7862(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7862,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7883,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_times(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[213],t5,t6);}}
-
-/* k7881 in fp* */
-static void C_ccall f_7883(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7883,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_times(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp- */
-static void C_ccall f_7839(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7839,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7860,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_difference(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[212],t5,t6);}}
-
-/* k7858 in fp- */
-static void C_ccall f_7860(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7860,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_difference(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fp+ */
-static void C_ccall f_7816(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7816,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7837,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_i_flonump(t5);
-t8=(C_truep(t7)?C_i_flonump(t6):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_flonum_plus(&a,2,t2,t3));}
-else{
-/* library.scm: 809 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_FLONUM_ERROR),lf[211],t5,t6);}}
-
-/* k7835 in fp+ */
-static void C_ccall f_7837(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7837,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_flonum_plus(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* finite? */
-static void C_ccall f_7810(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7810,3,t0,t1,t2);}
-t3=C_i_check_number_2(t2,lf[210]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_finitep(t2));}
-
-/* flonum? */
-static void C_ccall f_7807(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7807,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_flonump(t2));}
-
-/* fxmod */
-static void C_ccall f_7780(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7780,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7795,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_eqp(C_fix(0),t6);
-if(C_truep(t7)){
-/* library.scm: 770 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_DIVISION_BY_ZERO_ERROR),lf[198],t5,t6);}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_fixnum_modulo(t2,t3));}}
-
-/* k7793 in fxmod */
-static void C_ccall f_7795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_modulo(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fx/ */
-static void C_ccall f_7763(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7763,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7778,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-t6=t3;
-t7=C_eqp(C_fix(0),t6);
-if(C_truep(t7)){
-/* library.scm: 770 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),t4,C_fix((C_word)C_DIVISION_BY_ZERO_ERROR),lf[197],t5,t6);}
-else{
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_fixnum_divide(t2,t3));}}
-
-/* k7776 in fx/ */
-static void C_ccall f_7778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_divide(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* fxshr */
-static void C_ccall f_7760(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7760,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_shift_right(t2,t3));}
-
-/* fxshl */
-static void C_ccall f_7757(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7757,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_shift_left(t2,t3));}
-
-/* fxnot */
-static void C_ccall f_7754(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7754,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fixnum_not(t2));}
-
-/* fxxor */
-static void C_ccall f_7751(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7751,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_xor(t2,t3));}
-
-/* fxior */
-static void C_ccall f_7748(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7748,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_or(t2,t3));}
-
-/* fxand */
-static void C_ccall f_7745(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7745,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_and(t2,t3));}
-
-/* fxneg */
-static void C_ccall f_7742(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7742,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fixnum_negate(t2));}
-
-/* fxmax */
-static void C_ccall f_7739(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7739,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_fixnum_max(t2,t3));}
-
-/* fxmin */
-static void C_ccall f_7736(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7736,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_fixnum_min(t2,t3));}
-
-/* fx<= */
-static void C_ccall f_7733(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7733,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_less_or_equal_p(t2,t3));}
-
-/* fx>= */
-static void C_ccall f_7730(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7730,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_greater_or_equal_p(t2,t3));}
-
-/* fx< */
-static void C_ccall f_7727(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7727,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_lessp(t2,t3));}
-
-/* fx> */
-static void C_ccall f_7724(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7724,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_greaterp(t2,t3));}
-
-/* fx= */
-static void C_ccall f_7718(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7718,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(t2,t3));}
-
-/* fx* */
-static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7715,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_times(t2,t3));}
-
-/* fx- */
-static void C_ccall f_7712(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7712,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_difference(t2,t3));}
-
-/* fx+ */
-static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7709,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fixnum_plus(t2,t3));}
-
-/* fixnum? */
-static void C_ccall f_7706(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7706,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fixnump(t2));}
-
-/* ##sys#fragments->string */
-static void C_ccall f_7667(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7667,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7671,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 732 ##sys#make-string */
-t5=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-
-/* k7669 in ##sys#fragments->string */
-static void C_ccall f_7671(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7671,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7676,a[2]=t1,a[3]=((C_word)li158),tmp=(C_word)a,a+=4,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_7676(t2,((C_word*)t0)[2],C_fix(0)));}
-
-/* loop in k7669 in ##sys#fragments->string */
-static C_word C_fcall f_7676(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-loop:
-C_stack_check;
-if(C_truep(C_i_nullp(t1))){
-t3=((C_word*)t0)[2];
-return(t3);}
-else{
-t3=C_slot(t1,C_fix(0));
-t4=C_block_size(t3);
-t5=C_substring_copy(t3,((C_word*)t0)[2],C_fix(0),t4,t2);
-t6=C_slot(t1,C_fix(1));
-t7=C_fixnum_plus(t2,t4);
-t10=t6;
-t11=t7;
-t1=t10;
-t2=t11;
-goto loop;}}
-
-/* string */
-static void C_ccall f_7661(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7661r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7661r(t0,t1,t2);}}
-
-static void C_ccall f_7661r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-/* library.scm: 729 list->string */
-t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t1,t2);}
-
-/* string-append */
-static void C_ccall f_7622(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7622r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_7622r(t0,t1,t2);}}
-
-static void C_ccall f_7622r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a=C_alloc(13);
-t3=C_SCHEME_FALSE;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7626,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7628,a[2]=t7,a[3]=t4,a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_7628(t9,t5,t2,C_fix(0));}
-
-/* loop in string-append */
-static void C_fcall f_7628(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(7);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7628,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7639,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 719 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-else{
-t5=C_slot(t2,C_fix(0));
-t6=C_i_check_string_2(t5,lf[172]);
-t7=C_block_size(t5);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7651,a[2]=t1,a[3]=t3,a[4]=t7,a[5]=((C_word*)t0)[3],a[6]=t5,tmp=(C_word)a,a+=7,tmp);
-t9=C_slot(t2,C_fix(1));
-t10=C_fixnum_plus(t3,t7);
-/* library.scm: 723 loop */
-t13=t8;
-t14=t9;
-t15=t10;
-t1=t13;
-t2=t14;
-t3=t15;
-goto loop;}}
-
-/* k7649 in loop in string-append */
-static void C_ccall f_7651(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_substring_copy(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1],C_fix(0),((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k7637 in loop in string-append */
-static void C_ccall f_7639(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k7624 in string-append */
-static void C_ccall f_7626(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* ##sys#string-append */
-static void C_ccall f_7606(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7606,4,t0,t1,t2,t3);}
-t4=C_block_size(t2);
-t5=C_block_size(t3);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7616,a[2]=t1,a[3]=t5,a[4]=t3,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t7=C_fixnum_plus(t4,t5);
-/* library.scm: 710 ##sys#make-string */
-t8=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}
-
-/* k7614 in ##sys#string-append */
-static void C_ccall f_7616(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_substring_copy(((C_word*)t0)[6],t1,C_fix(0),((C_word*)t0)[5],C_fix(0));
-t3=C_substring_copy(((C_word*)t0)[4],t1,C_fix(0),((C_word*)t0)[3],((C_word*)t0)[5]);
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-
-/* string-ci>=? */
-static void C_ccall f_7585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7585,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7591,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 700 compare */
-f_7496(t1,t2,t3,lf[170],t4);}
-
-/* a7590 in string-ci>=? */
-static void C_ccall f_7591(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7591,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t4,C_fix(0));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_fixnum_less_or_equal_p(t2,t3):C_fixnum_greaterp(t4,C_fix(0))));}
-
-/* string-ci<=? */
-static void C_ccall f_7564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7564,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7570,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 693 compare */
-f_7496(t1,t2,t3,lf[169],t4);}
-
-/* a7569 in string-ci<=? */
-static void C_ccall f_7570(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7570,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t4,C_fix(0));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_fixnum_greater_or_equal_p(t2,t3):C_fixnum_lessp(t4,C_fix(0))));}
-
-/* string-ci>? */
-static void C_ccall f_7540(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7540,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7546,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 686 compare */
-f_7496(t1,t2,t3,lf[168],t4);}
-
-/* a7545 in string-ci>? */
-static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7546,5,t0,t1,t2,t3,t4);}
-t5=C_fixnum_greaterp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=C_fixnum_lessp(t3,t2);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
-
-/* string-ci<? */
-static void C_ccall f_7516(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7516,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7522,a[2]=((C_word)li146),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 679 compare */
-f_7496(t1,t2,t3,lf[167],t4);}
-
-/* a7521 in string-ci<? */
-static void C_ccall f_7522(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7522,5,t0,t1,t2,t3,t4);}
-t5=C_fixnum_lessp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=C_fixnum_lessp(t2,t3);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
-
-/* compare */
-static void C_fcall f_7496(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7496,NULL,5,t1,t2,t3,t4,t5);}
-t6=C_i_check_string_2(t2,t4);
-t7=C_i_check_string_2(t3,t4);
-t8=C_block_size(t2);
-t9=C_block_size(t3);
-if(C_truep(C_fixnum_lessp(t8,t9))){
-t10=C_string_compare_case_insensitive(t2,t3,t8);
-/* library.scm: 671 k */
-t11=t5;
-((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}
-else{
-t10=C_string_compare_case_insensitive(t2,t3,t9);
-/* library.scm: 671 k */
-t11=t5;
-((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}}
-
-/* string>=? */
-static void C_ccall f_7475(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7475,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7481,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 658 compare */
-f_7386(t1,t2,t3,lf[166],t4);}
-
-/* a7480 in string>=? */
-static void C_ccall f_7481(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7481,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t4,C_fix(0));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_fixnum_greater_or_equal_p(t2,t3):C_fixnum_greaterp(t4,C_fix(0))));}
-
-/* string<=? */
-static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7454,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7460,a[2]=((C_word)li141),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 651 compare */
-f_7386(t1,t2,t3,lf[165],t4);}
-
-/* a7459 in string<=? */
-static void C_ccall f_7460(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7460,5,t0,t1,t2,t3,t4);}
-t5=C_eqp(t4,C_fix(0));
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?C_fixnum_less_or_equal_p(t2,t3):C_fixnum_lessp(t4,C_fix(0))));}
-
-/* string>? */
-static void C_ccall f_7430(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7430,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7436,a[2]=((C_word)li139),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 644 compare */
-f_7386(t1,t2,t3,lf[164],t4);}
-
-/* a7435 in string>? */
-static void C_ccall f_7436(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7436,5,t0,t1,t2,t3,t4);}
-t5=C_fixnum_greaterp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=C_fixnum_lessp(t3,t2);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
-
-/* string<? */
-static void C_ccall f_7406(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7406,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7412,a[2]=((C_word)li137),tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 637 compare */
-f_7386(t1,t2,t3,lf[163],t4);}
-
-/* a7411 in string<? */
-static void C_ccall f_7412(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7412,5,t0,t1,t2,t3,t4);}
-t5=C_fixnum_lessp(t4,C_fix(0));
-if(C_truep(t5)){
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t6=C_fixnum_lessp(t2,t3);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
-
-/* compare */
-static void C_fcall f_7386(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7386,NULL,5,t1,t2,t3,t4,t5);}
-t6=C_i_check_string_2(t2,t4);
-t7=C_i_check_string_2(t3,t4);
-t8=C_block_size(t2);
-t9=C_block_size(t3);
-if(C_truep(C_fixnum_lessp(t8,t9))){
-t10=C_string_compare(t2,t3,t8);
-/* library.scm: 629 k */
-t11=t5;
-((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}
-else{
-t10=C_string_compare(t2,t3,t9);
-/* library.scm: 629 k */
-t11=t5;
-((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}}
-
-/* string-ci=? */
-static void C_ccall f_7383(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7383,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_string_ci_equal_p(t2,t3));}
-
-/* string=? */
-static void C_ccall f_7380(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7380,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_string_equal_p(t2,t3));}
-
-/* ##sys#substring */
-static void C_ccall f_7370(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7370,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7374,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=C_fixnum_difference(t4,t3);
-/* library.scm: 613 ##sys#make-string */
-t7=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-
-/* k7372 in ##sys#substring */
-static void C_ccall f_7374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_substring_copy(((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],C_fix(0));
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* substring */
-static void C_ccall f_7319(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr4r,(void*)f_7319r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_7319r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_7319r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word *a=C_alloc(5);
-t5=C_i_check_string_2(t2,lf[159]);
-t6=C_i_check_exact_2(t3,lf[159]);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7329,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(t4))){
-t8=C_i_car(t4);
-t9=C_i_check_exact_2(t8,lf[159]);
-t10=t7;
-f_7329(t10,t8);}
-else{
-t8=t7;
-f_7329(t8,C_block_size(t2));}}
-
-/* k7327 in substring */
-static void C_fcall f_7329(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7329,NULL,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7338,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(C_fixnum_less_or_equal_p(((C_word*)t0)[2],t1))){
-t4=C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(0));
-t5=t3;
-f_7338(t5,(C_truep(t4)?C_fixnum_less_or_equal_p(t1,t2):C_SCHEME_FALSE));}
-else{
-t4=t3;
-f_7338(t4,C_SCHEME_FALSE);}}
-
-/* k7336 in k7327 in substring */
-static void C_fcall f_7338(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* library.scm: 609 ##sys#substring */
-t2=*((C_word*)lf[160]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-/* library.scm: 610 ##sys#error-hook */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[72]+1)))(6,*((C_word*)lf[72]+1),((C_word*)t0)[5],C_fix((C_word)C_OUT_OF_RANGE_ERROR),lf[159],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-
-/* string-copy */
-static void C_ccall f_7307(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7307,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[158]);
-t4=C_block_size(t2);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7317,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 590 ##sys#make-string */
-t6=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
-
-/* k7315 in string-copy */
-static void C_ccall f_7317(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
-
-/* string-fill! */
-static void C_ccall f_7294(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7294,4,t0,t1,t2,t3);}
-t4=C_i_check_string_2(t2,lf[157]);
-t5=C_i_check_char_2(t3,lf[157]);
-t6=C_block_size(t2);
-t7=C_set_memory(t2,t3,t6);
-t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_UNDEFINED);}
-
-/* ##sys#reverse-list->string */
-static void C_ccall f_7242(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7242,3,t0,t1,t2);}
-if(C_truep(C_i_listp(t2))){
-t3=C_i_length(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7255,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 567 ##sys#make-string */
-t5=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-/* library.scm: 575 ##sys#error-not-a-proper-list */
-t3=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[156]);}}
-
-/* k7253 in ##sys#reverse-list->string */
-static void C_ccall f_7255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7255,2,t0,t1);}
-t2=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7264,a[2]=t1,a[3]=((C_word)li128),tmp=(C_word)a,a+=4,tmp);
-t4=f_7264(t3,((C_word*)t0)[3],t2);
-t5=t1;
-t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-
-/* iter in k7253 in ##sys#reverse-list->string */
-static C_word C_fcall f_7264(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t2,C_fix(0)))){
-t3=C_slot(t1,C_fix(0));
-t4=C_i_check_char_2(t3,lf[156]);
-t5=C_setsubchar(((C_word*)t0)[2],t2,t3);
-t6=C_slot(t1,C_fix(1));
-t7=C_fixnum_difference(t2,C_fix(1));
-t10=t6;
-t11=t7;
-t1=t10;
-t2=t11;
-goto loop;}
-else{
-t3=C_SCHEME_UNDEFINED;
-return(t3);}}
-
-/* ##sys#list->string */
-static void C_ccall f_7190(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7190,3,t0,t1,t2);}
-if(C_truep(C_i_listp(t2))){
-t3=C_i_length(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7206,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* library.scm: 541 ##sys#make-string */
-t5=*((C_word*)lf[147]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-else{
-/* library.scm: 539 ##sys#error-not-a-proper-list */
-t3=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[154]);}}
-
-/* k7204 in ##sys#list->string */
-static void C_ccall f_7206(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7206,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7211,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_7211(t2,C_fix(0),((C_word*)t0)[2]));}
-
-/* doloop414 in k7204 in ##sys#list->string */
-static C_word C_fcall f_7211(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
-t3=((C_word*)t0)[2];
-return(t3);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_i_check_char_2(t3,lf[154]);
-t5=C_setsubchar(((C_word*)t0)[2],t1,t3);
-t6=C_fixnum_plus(t1,C_fix(1));
-t7=C_slot(t2,C_fix(1));
-t10=t6;
-t11=t7;
-t1=t10;
-t2=t11;
-goto loop;}}
-
-/* ##sys#string->list */
-static void C_ccall f_7160(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7160,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[152]);
-t4=C_block_size(t2);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7169,a[2]=t6,a[3]=t2,a[4]=t4,a[5]=((C_word)li124),tmp=(C_word)a,a+=6,tmp));
-t8=((C_word*)t6)[1];
-f_7169(t8,t1,C_fix(0));}
-
-/* loop in ##sys#string->list */
-static void C_fcall f_7169(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-loop:
-a=C_alloc(5);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7169,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7183,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t4=C_fixnum_plus(t2,C_fix(1));
-/* library.scm: 524 loop */
-t6=t3;
-t7=t4;
-t1=t6;
-t2=t7;
-goto loop;}}
-
-/* k7181 in loop in ##sys#string->list */
-static void C_ccall f_7183(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7183,2,t0,t1);}
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,C_subchar(((C_word*)t0)[3],((C_word*)t0)[2]),t1));}
-
-/* make-string */
-static void C_ccall f_7124(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7124r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7124r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7124r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(5);
-t4=C_i_check_exact_2(t2,lf[148]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7131,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
-/* library.scm: 508 ##sys#signal-hook */
-t6=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t5,lf[149],lf[148],lf[150],t2);}
-else{
-t6=t5;
-f_7131(2,t6,C_SCHEME_UNDEFINED);}}
-
-/* k7129 in make-string */
-static void C_ccall f_7131(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a;
-if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-/* library.scm: 499 ##sys#allocate-vector */
-t4=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t2,t3,C_SCHEME_TRUE,C_make_character(32),C_SCHEME_FALSE);}
-else{
-t2=C_i_car(((C_word*)t0)[4]);
-t3=C_i_check_char_2(t2,lf[148]);
-t4=((C_word*)t0)[3];
-t5=((C_word*)t0)[2];
-/* library.scm: 499 ##sys#allocate-vector */
-t6=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t4,t5,C_SCHEME_TRUE,t2,C_SCHEME_FALSE);}}
-
-/* ##sys#make-string */
-static void C_ccall f_7091(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_7091r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_7091r(t0,t1,t2,t3);}}
-
-static void C_ccall f_7091r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7095,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t1;
-t6=t2;
-/* library.scm: 499 ##sys#allocate-vector */
-t7=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t5,t6,C_SCHEME_TRUE,C_make_character(32),C_SCHEME_FALSE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-t7=t1;
-t8=t2;
-/* library.scm: 499 ##sys#allocate-vector */
-t9=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t7,t8,C_SCHEME_TRUE,t6,C_SCHEME_FALSE);}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k7093 in ##sys#make-string */
-static void C_ccall f_7095(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-/* library.scm: 499 ##sys#allocate-vector */
-t4=*((C_word*)lf[21]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t2,t3,C_SCHEME_TRUE,t1,C_SCHEME_FALSE);}
-
-/* string-set! */
-static void C_ccall f_7088(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_7088,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_string_set(t2,t3,t4));}
-
-/* f_7085 */
-static void C_ccall f_7085(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7085,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_string_ref(t2,t3));}
-
-/* string-length */
-static void C_ccall f_7082(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7082,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_string_length(t2));}
-
-/* string? */
-static void C_ccall f_7079(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7079,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_stringp(t2));}
-
-/* list? */
-static void C_ccall f_7076(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7076,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_listp(t2));}
-
-/* assoc */
-static void C_ccall f_7073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7073,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_assoc(t2,t3));}
-
-/* assv */
-static void C_ccall f_7070(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7070,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_assv(t2,t3));}
-
-/* assq */
-static void C_ccall f_7067(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7067,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_assq(t2,t3));}
-
-/* member */
-static void C_ccall f_7064(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7064,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_member(t2,t3));}
-
-/* memv */
-static void C_ccall f_7061(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7061,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_memv(t2,t3));}
-
-/* memq */
-static void C_ccall f_7058(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_7058,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_memq(t2,t3));}
-
-/* reverse */
-static void C_ccall f_7019(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7019,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7025,a[2]=t2,a[3]=t4,a[4]=((C_word)li109),tmp=(C_word)a,a+=5,tmp));
-t6=((C_word*)t4)[1];
-f_7025(t6,t1,t2,C_SCHEME_END_OF_LIST);}
-
-/* loop in reverse */
-static void C_fcall f_7025(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_7025,NULL,4,t0,t1,t2,t3);}
-t4=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=t3;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-if(C_truep(C_i_pairp(t2))){
-t5=C_slot(t2,C_fix(1));
-t6=C_slot(t2,C_fix(0));
-t7=C_a_i_cons(&a,2,t6,t3);
-/* library.scm: 478 loop */
-t10=t1;
-t11=t5;
-t12=t7;
-t1=t10;
-t2=t11;
-t3=t12;
-goto loop;}
-else{
-/* library.scm: 479 ##sys#error-not-a-proper-list */
-t5=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,((C_word*)t0)[2],lf[135]);}}}
-
-/* append */
-static void C_ccall f_6940(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6940r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6940r(t0,t1,t2);}}
-
-static void C_ccall f_6940r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word *a=C_alloc(6);
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=t2;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6952,a[2]=t5,a[3]=((C_word)li107),tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_6952(t7,t1,t2);}}
-
-/* loop in append */
-static void C_fcall f_6952(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6952,NULL,3,t0,t1,t2);}
-t3=C_slot(t2,C_fix(1));
-t4=C_eqp(t3,C_SCHEME_END_OF_LIST);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_slot(t2,C_fix(0)));}
-else{
-t5=C_slot(t2,C_fix(0));
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6971,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_6971(t9,t1,t5);}}
-
-/* copy in loop in append */
-static void C_fcall f_6971(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6971,NULL,3,t0,t1,t2);}
-t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
-if(C_truep(t3)){
-t4=C_slot(((C_word*)t0)[4],C_fix(1));
-/* library.scm: 463 loop */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_6952(t5,t1,t4);}
-else{
-if(C_truep(C_i_pairp(t2))){
-t4=C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7002,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_slot(t2,C_fix(1));
-/* library.scm: 465 copy */
-t10=t5;
-t11=t6;
-t1=t10;
-t2=t11;
-goto loop;}
-else{
-t4=C_slot(((C_word*)t0)[4],C_fix(0));
-/* library.scm: 466 ##sys#error-not-a-proper-list */
-t5=*((C_word*)lf[132]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,t4,lf[134]);}}}
-
-/* k7000 in copy in loop in append */
-static void C_ccall f_7002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7002,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* ##sys#error-not-a-proper-list */
-static void C_ccall f_6923(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6923r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6923r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6923r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-/* library.scm: 446 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_NOT_A_PROPER_LIST_ERROR),t4,t2);}
-else{
-/* library.scm: 446 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_NOT_A_PROPER_LIST_ERROR),C_SCHEME_FALSE,t2);}}
-
-/* ##sys#delq */
-static void C_ccall f_6880(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6880,4,t0,t1,t2,t3);}
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6886,a[2]=t5,a[3]=t2,a[4]=((C_word)li103),tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_6886(t7,t1,t3);}
-
-/* loop in ##sys#delq */
-static void C_fcall f_6886(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a;
-loop:
-a=C_alloc(4);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_6886,NULL,3,t0,t1,t2);}
-if(C_truep(C_i_nullp(t2))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_slot(t2,C_fix(0));
-t4=C_eqp(((C_word*)t0)[3],t3);
-if(C_truep(t4)){
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_slot(t2,C_fix(1)));}
-else{
-t5=C_slot(t2,C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6913,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t7=C_slot(t2,C_fix(1));
-/* library.scm: 443 loop */
-t10=t6;
-t11=t7;
-t1=t10;
-t2=t11;
-goto loop;}}}
-
-/* k6911 in loop in ##sys#delq */
-static void C_ccall f_6913(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6913,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* list-ref */
-static void C_ccall f_6877(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6877,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_list_ref(t2,t3));}
-
-/* list-tail */
-static void C_ccall f_6874(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6874,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_list_tail(t2,t3));}
-
-/* length */
-static void C_ccall f_6871(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6871,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_length(t2));}
-
-/* list */
-static void C_ccall f_6868(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6868r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6868r(t0,t1,t2);}}
-
-static void C_ccall f_6868r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* null? */
-static void C_ccall f_6862(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6862,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_eqp(t2,C_SCHEME_END_OF_LIST));}
-
-/* cdddar */
-static void C_ccall f_6844(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6844,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_cdr(t3);
-t5=C_i_cdr(t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_cdr(t5));}
-
-/* cddadr */
-static void C_ccall f_6834(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6834,3,t0,t1,t2);}
-t3=C_i_cdr(C_i_cadr(t2));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cdr(t3));}
-
-/* cddaar */
-static void C_ccall f_6816(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6816,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=C_i_cdr(t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_cdr(t5));}
-
-/* cdaddr */
-static void C_ccall f_6810(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6810,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cdr(C_i_caddr(t2)));}
-
-/* cdadar */
-static void C_ccall f_6799(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6799,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_cadr(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cdr(t4));}
-
-/* cdaadr */
-static void C_ccall f_6789(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6789,3,t0,t1,t2);}
-t3=C_i_car(C_i_cadr(t2));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cdr(t3));}
-
-/* cdaaar */
-static void C_ccall f_6771(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6771,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=C_i_car(t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_cdr(t5));}
-
-/* caddar */
-static void C_ccall f_6764(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6764,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_caddr(t3));}
-
-/* cadadr */
-static void C_ccall f_6761(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6761,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cadr(C_i_cadr(t2)));}
-
-/* cadaar */
-static void C_ccall f_6750(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6750,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cadr(t4));}
-
-/* caaddr */
-static void C_ccall f_6744(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6744,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_car(C_i_caddr(t2)));}
-
-/* caadar */
-static void C_ccall f_6733(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6733,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_cadr(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_car(t4));}
-
-/* caaadr */
-static void C_ccall f_6723(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6723,3,t0,t1,t2);}
-t3=C_i_car(C_i_cadr(t2));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_car(t3));}
-
-/* caaaar */
-static void C_ccall f_6705(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6705,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=C_i_car(t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_i_car(t5));}
-
-/* f_6691 */
-static void C_ccall f_6691(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6691,3,t0,t1,t2);}
-t3=C_i_cdr(t2);
-t4=C_i_cdr(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cdr(t4));}
-
-/* f_6677 */
-static void C_ccall f_6677(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6677,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_cdr(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cdr(t4));}
-
-/* f_6671 */
-static void C_ccall f_6671(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6671,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cdr(C_i_cadr(t2)));}
-
-/* f_6657 */
-static void C_ccall f_6657(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6657,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cdr(t4));}
-
-/* f_6650 */
-static void C_ccall f_6650(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6650,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cadr(t3));}
-
-/* f_6644 */
-static void C_ccall f_6644(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6644,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_car(C_i_cadr(t2)));}
-
-/* f_6630 */
-static void C_ccall f_6630(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6630,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=C_i_car(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_car(t4));}
-
-/* f_6620 */
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6620,3,t0,t1,t2);}
-t3=C_i_cdr(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cdr(t3));}
-
-/* f_6610 */
-static void C_ccall f_6610(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6610,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_cdr(t3));}
-
-/* f_6600 */
-static void C_ccall f_6600(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6600,3,t0,t1,t2);}
-t3=C_i_car(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_car(t3));}
-
-/* cddddr */
-static void C_ccall f_6597(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6597,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cddddr(t2));}
-
-/* cadddr */
-static void C_ccall f_6594(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6594,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cadddr(t2));}
-
-/* f_6591 */
-static void C_ccall f_6591(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6591,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_caddr(t2));}
-
-/* f_6588 */
-static void C_ccall f_6588(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6588,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cadr(t2));}
-
-/* set-cdr! */
-static void C_ccall f_6585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6585,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_set_cdr(t2,t3));}
-
-/* set-car! */
-static void C_ccall f_6582(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6582,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_set_car(t2,t3));}
-
-/* f_6579 */
-static void C_ccall f_6579(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6579,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cdr(t2));}
-
-/* f_6576 */
-static void C_ccall f_6576(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6576,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_car(t2));}
-
-/* cons */
-static void C_ccall f_6573(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6573,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,t2,t3));}
-
-/* pair? */
-static void C_ccall f_6570(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6570,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_pairp(t2));}
-
-/* equal? */
-static void C_ccall f_6567(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6567,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_equalp(t2,t3));}
-
-/* eqv? */
-static void C_ccall f_6564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6564,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_eqvp(t2,t3));}
-
-/* eq? */
-static void C_ccall f_6561(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6561,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(t2,t3));}
-
-/* boolean? */
-static void C_ccall f_6558(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6558,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_booleanp(t2));}
-
-/* not */
-static void C_ccall f_6555(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6555,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_not(t2));}
-
-/* ##sys#dunload */
-static void C_ccall f_6542(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6542,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6547,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 376 ##sys#make-c-string */
-t4=*((C_word*)lf[86]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k6545 in ##sys#dunload */
-static void C_ccall f_6547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6547,2,t0,t1);}
-if(C_truep(C_dunload(t1))){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6553,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 377 ##sys#gc */
-t3=*((C_word*)lf[18]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_SCHEME_TRUE);}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k6551 in k6545 in ##sys#dunload */
-static void C_ccall f_6553(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-
-/* system */
-static void C_ccall f_6522(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6522,3,t0,t1,t2);}
-t3=C_i_check_string_2(t2,lf[79]);
-t4=C_execute_shell_command(t2);
-if(C_truep(C_fixnum_lessp(t4,C_fix(0)))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6535,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 364 ##sys#update-errno */
-t6=*((C_word*)lf[82]+1);
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* k6533 in system */
-static void C_ccall f_6535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* library.scm: 365 ##sys#signal-hook */
-t2=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[80],lf[79],lf[81],((C_word*)t0)[2]);}
-
-/* ##sys#force */
-static void C_ccall f_6506(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6506,3,t0,t1,t2);}
-if(C_truep(C_i_structurep(t2,lf[77]))){
-t3=C_slot(t2,C_fix(1));
-/* g162163 */
-t4=t3;
-((C_proc2)C_retrieve_proc(t4))(2,t4,t1);}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* ##sys#check-closure */
-static void C_ccall f_6493(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6493r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6493r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6493r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_closure_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_closure(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-special */
-static void C_ccall f_6471(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6471r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6471r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6471r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-t4=(C_truep(C_blockp(t2))?C_specialp(t2):C_SCHEME_FALSE);
-if(C_truep(t4)){
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-if(C_truep(C_i_pairp(t3))){
-t5=C_i_car(t3);
-/* library.scm: 344 ##sys#signal-hook */
-t6=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,lf[56],t5,lf[74],t2);}
-else{
-/* library.scm: 344 ##sys#signal-hook */
-t5=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,lf[56],C_SCHEME_FALSE,lf[74],t2);}}}
-
-/* ##sys#check-range */
-static void C_ccall f_6440(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
-C_word tmp;
-C_word t5;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t4,c2,5);
-if(c<5) C_bad_min_argc_2(c,5,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr5r,(void*)f_6440r,5,t0,t1,t2,t3,t4);}
-else{
-a=C_alloc((c-5)*3);
-t5=C_restore_rest(a,C_rest_count(0));
-f_6440r(t0,t1,t2,t3,t4,t5);}}
-
-static void C_ccall f_6440r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
-C_word tmp;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-t6=C_i_check_exact_2(t2,t5);
-t7=C_fixnum_less_or_equal_p(t3,t2);
-t8=(C_truep(t7)?C_fixnum_lessp(t2,t4):C_SCHEME_FALSE);
-if(C_truep(t8)){
-t9=C_SCHEME_UNDEFINED;
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}
-else{
-if(C_truep(C_i_pairp(t5))){
-t9=C_i_car(t5);
-/* library.scm: 339 ##sys#error-hook */
-((C_proc7)C_retrieve_proc(*((C_word*)lf[72]+1)))(7,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_OUT_OF_RANGE_ERROR),t9,t2,t3,t4);}
-else{
-/* library.scm: 339 ##sys#error-hook */
-((C_proc7)C_retrieve_proc(*((C_word*)lf[72]+1)))(7,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_OUT_OF_RANGE_ERROR),C_SCHEME_FALSE,t2,t3,t4);}}}
-
-/* ##sys#check-integer */
-static void C_ccall f_6421(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6421r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6421r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6421r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-if(C_truep(C_i_integerp(t2))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-/* library.scm: 333 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_INTEGER_ERROR),t4,t2);}
-else{
-/* library.scm: 333 ##sys#error-hook */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[72]+1)))(5,*((C_word*)lf[72]+1),t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_INTEGER_ERROR),C_SCHEME_FALSE,t2);}}}
-
-/* ##sys#check-char */
-static void C_ccall f_6408(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6408r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6408r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6408r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_char_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_char(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-vector */
-static void C_ccall f_6395(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6395r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6395r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6395r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_vector_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_vector(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-symbol */
-static void C_ccall f_6382(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6382r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6382r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6382r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_symbol_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_symbol(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-inexact */
-static void C_ccall f_6369(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6369r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6369r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6369r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_inexact_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_inexact(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-exact */
-static void C_ccall f_6356(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6356r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6356r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6356r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_exact_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_exact(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-number */
-static void C_ccall f_6343(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6343r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6343r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6343r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_number_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_number(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-string */
-static void C_ccall f_6330(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6330r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6330r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6330r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_string_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_string(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-list */
-static void C_ccall f_6317(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6317r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6317r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6317r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_list_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_list(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-pair */
-static void C_ccall f_6304(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6304r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6304r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6304r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_pair_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_pair(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-blob */
-static void C_ccall f_6290(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6290r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6290r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6290r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-t5=C_i_check_bytevector_2(t2,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-t4=C_i_check_bytevector(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#check-structure */
-static void C_ccall f_6277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr4r,(void*)f_6277r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_6277r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_6277r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-if(C_truep(C_i_pairp(t4))){
-t5=C_i_car(t4);
-t6=C_i_check_structure_2(t2,t3,t5);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-t5=C_i_check_structure(t2,t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* current-seconds */
-static void C_ccall f_6274(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[4],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6274,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_get_current_seconds(&a,1,C_SCHEME_FALSE));}
-
-/* ##sys#block-set! */
-static void C_ccall f_6240(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6240,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6244,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t6=C_i_not(C_blockp(t2));
-if(C_truep(t6)){
-if(C_truep(t6)){
-/* library.scm: 266 ##sys#signal-hook */
-t7=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t5,lf[56],lf[54],lf[57],t2);}
-else{
-t7=t5;
-f_6244(2,t7,C_SCHEME_UNDEFINED);}}
-else{
-t7=(C_truep(C_specialp(t2))?C_eqp(t3,C_fix(0)):C_SCHEME_FALSE);
-if(C_truep(t7)){
-if(C_truep(t7)){
-/* library.scm: 266 ##sys#signal-hook */
-t8=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t8+1)))(6,t8,t5,lf[56],lf[54],lf[57],t2);}
-else{
-t8=t5;
-f_6244(2,t8,C_SCHEME_UNDEFINED);}}
-else{
-if(C_truep(C_byteblockp(t2))){
-/* library.scm: 266 ##sys#signal-hook */
-t8=*((C_word*)lf[9]+1);
-((C_proc6)(void*)(*((C_word*)t8+1)))(6,t8,t5,lf[56],lf[54],lf[57],t2);}
-else{
-t8=t5;
-f_6244(2,t8,C_SCHEME_UNDEFINED);}}}}
-
-/* k6242 in ##sys#block-set! */
-static void C_ccall f_6244(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6244,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6247,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_block_size(((C_word*)t0)[4]);
-/* library.scm: 267 ##sys#check-range */
-t4=*((C_word*)lf[55]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t2,((C_word*)t0)[3],C_fix(0),t3,lf[54]);}
-
-/* k6245 in k6242 in ##sys#block-set! */
-static void C_ccall f_6247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* ##sys#block-ref */
-static void C_ccall f_6231(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6231,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,t3));}
-
-/* ##sys#flo2fix */
-static void C_ccall f_6227(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6227,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_quickflonumtruncate(t2));}
-
-/* ##sys#halt */
-static void C_ccall f_6224(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6224,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_halt(C_SCHEME_FALSE));}
-
-/* ##sys#void */
-static void C_ccall f_6219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6219,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-
-/* ##sys#setbyte */
-static void C_ccall f_6216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6216,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_setbyte(t2,t3,t4));}
-
-/* ##sys#byte */
-static void C_ccall f_6213(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_6213,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_subbyte(t2,t3));}
-
-/* ##sys#message */
-static void C_ccall f_6210(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6210,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_message(t2));}
-
-/* ##sys#immediate? */
-static void C_ccall f_6204(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6204,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_not(C_blockp(t2)));}
-
-/* ##sys#start-timer */
-static void C_ccall f_6200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6200,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_start_timer());}
-
-/* current-gc-milliseconds */
-static void C_ccall f_6190(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6190,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fudge(C_fix(31)));}
-
-/* current-milliseconds */
-static void C_ccall f_6184(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6184,2,t0,t1);}
-t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fudge(C_fix(16)));}
-
-/* ##sys#fudge */
-static void C_ccall f_6176(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6176,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fudge(t2));}
-
-/* argc+argv */
-static void C_ccall f_6168(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6168,2,t0,t1);}
-/* library.scm: 228 ##sys#values */
-C_values(4,0,t1,C_fix((C_word)C_main_argc),C_mpointer_or_false(&a,(void*)C_main_argv));}
-
-/* ##sys#setislot */
-static void C_ccall f_6163(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6163,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_set_i_slot(t2,t3,t4));}
-
-/* ##sys#setslot */
-static void C_ccall f_6160(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_6160,5,t0,t1,t2,t3,t4);}
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_setslot(t2,t3,t4));}
-
-/* set-gc-report! */
-static void C_ccall f_6156(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6156,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_set_gc_report(t2));}
-
-/* enable-warnings */
-static void C_ccall f_6141(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6141r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6141r(t0,t1,t2);}}
-
-static void C_ccall f_6141r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-if(C_truep(C_i_pairp(t2))){
-t3=C_i_car(t2);
-t4=C_mutate((C_word*)lf[11]+1 /* (set! warnings-enabled ...) */,t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-t3=*((C_word*)lf[11]+1);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* ##sys#warn */
-static void C_ccall f_6132(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_6132r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_6132r(t0,t1,t2,t3);}}
-
-static void C_ccall f_6132r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-if(C_truep(*((C_word*)lf[11]+1))){
-C_apply(6,0,t1,*((C_word*)lf[9]+1),lf[13],t2,t3);}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-
-/* ##sys#error */
-static void C_ccall f_6116(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6116r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6116r(t0,t1,t2);}}
-
-static void C_ccall f_6116r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-if(C_truep(C_i_pairp(t2))){
-C_apply(5,0,t1,*((C_word*)lf[9]+1),lf[10],t2);}
-else{
-/* library.scm: 202 ##sys#signal-hook */
-t3=*((C_word*)lf[9]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[10],C_SCHEME_FALSE);}}
-
-/* reset */
-static void C_ccall f_6107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6107,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6111,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* library.scm: 197 ##sys#reset-handler */
-t3=*((C_word*)lf[7]+1);
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k6109 in reset */
-static void C_ccall f_6111(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* g1617 */
-t2=t1;
-((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-
-/* exit */
-static void C_ccall f_6097(C_word c,C_word t0,C_word t1,...){
-C_word tmp;
-C_word t2;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t1,c2,2);
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr2r,(void*)f_6097r,2,t0,t1);}
-else{
-a=C_alloc((c-2)*3);
-t2=C_restore_rest(a,C_rest_count(0));
-f_6097r(t0,t1,t2);}}
-
-static void C_ccall f_6097r(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6105,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* library.scm: 196 ##sys#exit-handler */
-t4=*((C_word*)lf[5]+1);
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-
-/* k6103 in exit */
-static void C_ccall f_6105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_apply(4,0,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[1619] = {
-{"toplevel:library_scm",(void*)C_library_toplevel},
-{"f_9841:library_scm",(void*)f_9841},
-{"f_10003:library_scm",(void*)f_10003},
-{"f_10006:library_scm",(void*)f_10006},
-{"f_10009:library_scm",(void*)f_10009},
-{"f_10012:library_scm",(void*)f_10012},
-{"f_10015:library_scm",(void*)f_10015},
-{"f_10018:library_scm",(void*)f_10018},
-{"f_10021:library_scm",(void*)f_10021},
-{"f_10024:library_scm",(void*)f_10024},
-{"f_10027:library_scm",(void*)f_10027},
-{"f_10030:library_scm",(void*)f_10030},
-{"f_10033:library_scm",(void*)f_10033},
-{"f_10036:library_scm",(void*)f_10036},
-{"f_10659:library_scm",(void*)f_10659},
-{"f_10663:library_scm",(void*)f_10663},
-{"f_10667:library_scm",(void*)f_10667},
-{"f_10670:library_scm",(void*)f_10670},
-{"f_10673:library_scm",(void*)f_10673},
-{"f_10676:library_scm",(void*)f_10676},
-{"f_21997:library_scm",(void*)f_21997},
-{"f_10829:library_scm",(void*)f_10829},
-{"f_11847:library_scm",(void*)f_11847},
-{"f_11851:library_scm",(void*)f_11851},
-{"f_11855:library_scm",(void*)f_11855},
-{"f_11859:library_scm",(void*)f_11859},
-{"f_11863:library_scm",(void*)f_11863},
-{"f_21976:library_scm",(void*)f_21976},
-{"f_21978:library_scm",(void*)f_21978},
-{"f_21982:library_scm",(void*)f_21982},
-{"f_14658:library_scm",(void*)f_14658},
-{"f_21965:library_scm",(void*)f_21965},
-{"f_21967:library_scm",(void*)f_21967},
-{"f_21971:library_scm",(void*)f_21971},
-{"f_14662:library_scm",(void*)f_14662},
-{"f_21954:library_scm",(void*)f_21954},
-{"f_21956:library_scm",(void*)f_21956},
-{"f_21960:library_scm",(void*)f_21960},
-{"f_14666:library_scm",(void*)f_14666},
-{"f_14919:library_scm",(void*)f_14919},
-{"f_14923:library_scm",(void*)f_14923},
-{"f_14927:library_scm",(void*)f_14927},
-{"f_21735:library_scm",(void*)f_21735},
-{"f_16413:library_scm",(void*)f_16413},
-{"f_21731:library_scm",(void*)f_21731},
-{"f_16419:library_scm",(void*)f_16419},
-{"f_21727:library_scm",(void*)f_21727},
-{"f_16425:library_scm",(void*)f_16425},
-{"f_21723:library_scm",(void*)f_21723},
-{"f_16431:library_scm",(void*)f_16431},
-{"f_21719:library_scm",(void*)f_21719},
-{"f_16437:library_scm",(void*)f_16437},
-{"f_21715:library_scm",(void*)f_21715},
-{"f_16443:library_scm",(void*)f_16443},
-{"f_21711:library_scm",(void*)f_21711},
-{"f_21707:library_scm",(void*)f_21707},
-{"f_16449:library_scm",(void*)f_16449},
-{"f_21693:library_scm",(void*)f_21693},
-{"f_16681:library_scm",(void*)f_16681},
-{"f_21689:library_scm",(void*)f_21689},
-{"f_16684:library_scm",(void*)f_16684},
-{"f_21685:library_scm",(void*)f_21685},
-{"f_16687:library_scm",(void*)f_16687},
-{"f_21681:library_scm",(void*)f_21681},
-{"f_16690:library_scm",(void*)f_16690},
-{"f_21677:library_scm",(void*)f_21677},
-{"f_16693:library_scm",(void*)f_16693},
-{"f_16696:library_scm",(void*)f_16696},
-{"f_16699:library_scm",(void*)f_16699},
-{"f_16702:library_scm",(void*)f_16702},
-{"f_16705:library_scm",(void*)f_16705},
-{"f_21495:library_scm",(void*)f_21495},
-{"f_21644:library_scm",(void*)f_21644},
-{"f_21499:library_scm",(void*)f_21499},
-{"f_21595:library_scm",(void*)f_21595},
-{"f_21598:library_scm",(void*)f_21598},
-{"f_21601:library_scm",(void*)f_21601},
-{"f_21610:library_scm",(void*)f_21610},
-{"f_21628:library_scm",(void*)f_21628},
-{"f_21618:library_scm",(void*)f_21618},
-{"f_21622:library_scm",(void*)f_21622},
-{"f_21604:library_scm",(void*)f_21604},
-{"f_21608:library_scm",(void*)f_21608},
-{"f_21508:library_scm",(void*)f_21508},
-{"f_21589:library_scm",(void*)f_21589},
-{"f_21511:library_scm",(void*)f_21511},
-{"f_21553:library_scm",(void*)f_21553},
-{"f_21565:library_scm",(void*)f_21565},
-{"f_21571:library_scm",(void*)f_21571},
-{"f_21541:library_scm",(void*)f_21541},
-{"f_21514:library_scm",(void*)f_21514},
-{"f_21517:library_scm",(void*)f_21517},
-{"f_21520:library_scm",(void*)f_21520},
-{"f_21526:library_scm",(void*)f_21526},
-{"f_21529:library_scm",(void*)f_21529},
-{"f_21532:library_scm",(void*)f_21532},
-{"f_17258:library_scm",(void*)f_17258},
-{"f_21486:library_scm",(void*)f_21486},
-{"f_21490:library_scm",(void*)f_21490},
-{"f_17262:library_scm",(void*)f_17262},
-{"f_21467:library_scm",(void*)f_21467},
-{"f_21471:library_scm",(void*)f_21471},
-{"f_17266:library_scm",(void*)f_17266},
-{"f_21461:library_scm",(void*)f_21461},
-{"f_17270:library_scm",(void*)f_17270},
-{"f_17277:library_scm",(void*)f_17277},
-{"f_18754:library_scm",(void*)f_18754},
-{"f_21444:library_scm",(void*)f_21444},
-{"f_21449:library_scm",(void*)f_21449},
-{"f_19439:library_scm",(void*)f_19439},
-{"f_21376:library_scm",(void*)f_21376},
-{"f25451:library_scm",(void*)f25451},
-{"f_21397:library_scm",(void*)f_21397},
-{"f_21436:library_scm",(void*)f_21436},
-{"f_21416:library_scm",(void*)f_21416},
-{"f_21426:library_scm",(void*)f_21426},
-{"f_21379:library_scm",(void*)f_21379},
-{"f_21381:library_scm",(void*)f_21381},
-{"f_19443:library_scm",(void*)f_19443},
-{"f_19447:library_scm",(void*)f_19447},
-{"f_19722:library_scm",(void*)f_19722},
-{"f_19725:library_scm",(void*)f_19725},
-{"f_19728:library_scm",(void*)f_19728},
-{"f_21298:library_scm",(void*)f_21298},
-{"f_21308:library_scm",(void*)f_21308},
-{"f_21353:library_scm",(void*)f_21353},
-{"f_21337:library_scm",(void*)f_21337},
-{"f_21318:library_scm",(void*)f_21318},
-{"f_21282:library_scm",(void*)f_21282},
-{"f_21242:library_scm",(void*)f_21242},
-{"f_21266:library_scm",(void*)f_21266},
-{"f_21258:library_scm",(void*)f_21258},
-{"f_20736:library_scm",(void*)f_20736},
-{"f_20773:library_scm",(void*)f_20773},
-{"f_20777:library_scm",(void*)f_20777},
-{"f_21232:library_scm",(void*)f_21232},
-{"f_20781:library_scm",(void*)f_20781},
-{"f_21222:library_scm",(void*)f_21222},
-{"f_20785:library_scm",(void*)f_20785},
-{"f_21212:library_scm",(void*)f_21212},
-{"f_20789:library_scm",(void*)f_20789},
-{"f_21202:library_scm",(void*)f_21202},
-{"f_20793:library_scm",(void*)f_20793},
-{"f_21192:library_scm",(void*)f_21192},
-{"f_21200:library_scm",(void*)f_21200},
-{"f_20797:library_scm",(void*)f_20797},
-{"f_21182:library_scm",(void*)f_21182},
-{"f_20801:library_scm",(void*)f_20801},
-{"f_21172:library_scm",(void*)f_21172},
-{"f_21180:library_scm",(void*)f_21180},
-{"f_20805:library_scm",(void*)f_20805},
-{"f_21162:library_scm",(void*)f_21162},
-{"f_20809:library_scm",(void*)f_20809},
-{"f_21152:library_scm",(void*)f_21152},
-{"f_21160:library_scm",(void*)f_21160},
-{"f_20813:library_scm",(void*)f_20813},
-{"f_21142:library_scm",(void*)f_21142},
-{"f_20817:library_scm",(void*)f_20817},
-{"f_21132:library_scm",(void*)f_21132},
-{"f_21140:library_scm",(void*)f_21140},
-{"f_20821:library_scm",(void*)f_20821},
-{"f_21122:library_scm",(void*)f_21122},
-{"f_20825:library_scm",(void*)f_20825},
-{"f_20829:library_scm",(void*)f_20829},
-{"f_20833:library_scm",(void*)f_20833},
-{"f_20975:library_scm",(void*)f_20975},
-{"f_21110:library_scm",(void*)f_21110},
-{"f_21101:library_scm",(void*)f_21101},
-{"f_21036:library_scm",(void*)f_21036},
-{"f_21038:library_scm",(void*)f_21038},
-{"f_21045:library_scm",(void*)f_21045},
-{"f_21057:library_scm",(void*)f_21057},
-{"f_20977:library_scm",(void*)f_20977},
-{"f_20990:library_scm",(void*)f_20990},
-{"f_20901:library_scm",(void*)f_20901},
-{"f_20914:library_scm",(void*)f_20914},
-{"f_20835:library_scm",(void*)f_20835},
-{"f_20848:library_scm",(void*)f_20848},
-{"f_20842:library_scm",(void*)f_20842},
-{"f_20739:library_scm",(void*)f_20739},
-{"f_20761:library_scm",(void*)f_20761},
-{"f_20745:library_scm",(void*)f_20745},
-{"f_20707:library_scm",(void*)f_20707},
-{"f_20711:library_scm",(void*)f_20711},
-{"f_20714:library_scm",(void*)f_20714},
-{"f_20728:library_scm",(void*)f_20728},
-{"f_20724:library_scm",(void*)f_20724},
-{"f_20698:library_scm",(void*)f_20698},
-{"f_20705:library_scm",(void*)f_20705},
-{"f_20679:library_scm",(void*)f_20679},
-{"f_20685:library_scm",(void*)f_20685},
-{"f_20640:library_scm",(void*)f_20640},
-{"f_20650:library_scm",(void*)f_20650},
-{"f_20666:library_scm",(void*)f_20666},
-{"f_20563:library_scm",(void*)f_20563},
-{"f_20576:library_scm",(void*)f_20576},
-{"f_20628:library_scm",(void*)f_20628},
-{"f_20586:library_scm",(void*)f_20586},
-{"f_20591:library_scm",(void*)f_20591},
-{"f_20540:library_scm",(void*)f_20540},
-{"f_20544:library_scm",(void*)f_20544},
-{"f_20547:library_scm",(void*)f_20547},
-{"f_20489:library_scm",(void*)f_20489},
-{"f_20496:library_scm",(void*)f_20496},
-{"f_20511:library_scm",(void*)f_20511},
-{"f_20516:library_scm",(void*)f_20516},
-{"f_20520:library_scm",(void*)f_20520},
-{"f_20526:library_scm",(void*)f_20526},
-{"f_20437:library_scm",(void*)f_20437},
-{"f_20460:library_scm",(void*)f_20460},
-{"f_20468:library_scm",(void*)f_20468},
-{"f_20464:library_scm",(void*)f_20464},
-{"f_20441:library_scm",(void*)f_20441},
-{"f_20214:library_scm",(void*)f_20214},
-{"f_20389:library_scm",(void*)f_20389},
-{"f_20384:library_scm",(void*)f_20384},
-{"f_20216:library_scm",(void*)f_20216},
-{"f_20220:library_scm",(void*)f_20220},
-{"f_20361:library_scm",(void*)f_20361},
-{"f_20223:library_scm",(void*)f_20223},
-{"f_20246:library_scm",(void*)f_20246},
-{"f_20282:library_scm",(void*)f_20282},
-{"f_20343:library_scm",(void*)f_20343},
-{"f_20290:library_scm",(void*)f_20290},
-{"f_20316:library_scm",(void*)f_20316},
-{"f_20294:library_scm",(void*)f_20294},
-{"f_20300:library_scm",(void*)f_20300},
-{"f_20303:library_scm",(void*)f_20303},
-{"f_20260:library_scm",(void*)f_20260},
-{"f_20264:library_scm",(void*)f_20264},
-{"f_20270:library_scm",(void*)f_20270},
-{"f_20225:library_scm",(void*)f_20225},
-{"f_20240:library_scm",(void*)f_20240},
-{"f_20229:library_scm",(void*)f_20229},
-{"f_20191:library_scm",(void*)f_20191},
-{"f_20196:library_scm",(void*)f_20196},
-{"f_19969:library_scm",(void*)f_19969},
-{"f_20169:library_scm",(void*)f_20169},
-{"f_20148:library_scm",(void*)f_20148},
-{"f_20141:library_scm",(void*)f_20141},
-{"f_20125:library_scm",(void*)f_20125},
-{"f_20109:library_scm",(void*)f_20109},
-{"f_20093:library_scm",(void*)f_20093},
-{"f_20077:library_scm",(void*)f_20077},
-{"f_20061:library_scm",(void*)f_20061},
-{"f_20045:library_scm",(void*)f_20045},
-{"f_20029:library_scm",(void*)f_20029},
-{"f_20004:library_scm",(void*)f_20004},
-{"f_19991:library_scm",(void*)f_19991},
-{"f_19771:library_scm",(void*)f_19771},
-{"f_19921:library_scm",(void*)f_19921},
-{"f_19916:library_scm",(void*)f_19916},
-{"f_19773:library_scm",(void*)f_19773},
-{"f_19777:library_scm",(void*)f_19777},
-{"f_19780:library_scm",(void*)f_19780},
-{"f_19786:library_scm",(void*)f_19786},
-{"f_19894:library_scm",(void*)f_19894},
-{"f_19885:library_scm",(void*)f_19885},
-{"f_19888:library_scm",(void*)f_19888},
-{"f_19789:library_scm",(void*)f_19789},
-{"f_19869:library_scm",(void*)f_19869},
-{"f_19821:library_scm",(void*)f_19821},
-{"f_19825:library_scm",(void*)f_19825},
-{"f_19828:library_scm",(void*)f_19828},
-{"f_19848:library_scm",(void*)f_19848},
-{"f_19844:library_scm",(void*)f_19844},
-{"f_19831:library_scm",(void*)f_19831},
-{"f_19792:library_scm",(void*)f_19792},
-{"f_19795:library_scm",(void*)f_19795},
-{"f_19813:library_scm",(void*)f_19813},
-{"f_19807:library_scm",(void*)f_19807},
-{"f_19729:library_scm",(void*)f_19729},
-{"f_19735:library_scm",(void*)f_19735},
-{"f_19759:library_scm",(void*)f_19759},
-{"f_19743:library_scm",(void*)f_19743},
-{"f_19752:library_scm",(void*)f_19752},
-{"f_19747:library_scm",(void*)f_19747},
-{"f_19711:library_scm",(void*)f_19711},
-{"f_19715:library_scm",(void*)f_19715},
-{"f_19705:library_scm",(void*)f_19705},
-{"f_19673:library_scm",(void*)f_19673},
-{"f_19679:library_scm",(void*)f_19679},
-{"f_19691:library_scm",(void*)f_19691},
-{"f_19628:library_scm",(void*)f_19628},
-{"f_19600:library_scm",(void*)f_19600},
-{"f_19606:library_scm",(void*)f_19606},
-{"f_19610:library_scm",(void*)f_19610},
-{"f_19619:library_scm",(void*)f_19619},
-{"f_19517:library_scm",(void*)f_19517},
-{"f_19537:library_scm",(void*)f_19537},
-{"f_19549:library_scm",(void*)f_19549},
-{"f_19565:library_scm",(void*)f_19565},
-{"f_19540:library_scm",(void*)f_19540},
-{"f_19543:library_scm",(void*)f_19543},
-{"f_19453:library_scm",(void*)f_19453},
-{"f_19498:library_scm",(void*)f_19498},
-{"f_19474:library_scm",(void*)f_19474},
-{"f_19457:library_scm",(void*)f_19457},
-{"f_18983:library_scm",(void*)f_18983},
-{"f_18996:library_scm",(void*)f_18996},
-{"f_18999:library_scm",(void*)f_18999},
-{"f_19121:library_scm",(void*)f_19121},
-{"f_19124:library_scm",(void*)f_19124},
-{"f_19127:library_scm",(void*)f_19127},
-{"f_19143:library_scm",(void*)f_19143},
-{"f_19148:library_scm",(void*)f_19148},
-{"f_19152:library_scm",(void*)f_19152},
-{"f_19385:library_scm",(void*)f_19385},
-{"f_19322:library_scm",(void*)f_19322},
-{"f_19374:library_scm",(void*)f_19374},
-{"f_19382:library_scm",(void*)f_19382},
-{"f_19355:library_scm",(void*)f_19355},
-{"f_19363:library_scm",(void*)f_19363},
-{"f_19338:library_scm",(void*)f_19338},
-{"f_19331:library_scm",(void*)f_19331},
-{"f_19164:library_scm",(void*)f_19164},
-{"f_19299:library_scm",(void*)f_19299},
-{"f_19176:library_scm",(void*)f_19176},
-{"f_19193:library_scm",(void*)f_19193},
-{"f_19224:library_scm",(void*)f_19224},
-{"f_19274:library_scm",(void*)f_19274},
-{"f_19211:library_scm",(void*)f_19211},
-{"f_19187:library_scm",(void*)f_19187},
-{"f_19129:library_scm",(void*)f_19129},
-{"f_19133:library_scm",(void*)f_19133},
-{"f_19137:library_scm",(void*)f_19137},
-{"f_19008:library_scm",(void*)f_19008},
-{"f_19011:library_scm",(void*)f_19011},
-{"f_19014:library_scm",(void*)f_19014},
-{"f_19020:library_scm",(void*)f_19020},
-{"f_19027:library_scm",(void*)f_19027},
-{"f_19029:library_scm",(void*)f_19029},
-{"f_19058:library_scm",(void*)f_19058},
-{"f_19061:library_scm",(void*)f_19061},
-{"f_19068:library_scm",(void*)f_19068},
-{"f_19055:library_scm",(void*)f_19055},
-{"f_19042:library_scm",(void*)f_19042},
-{"f_18938:library_scm",(void*)f_18938},
-{"f_18942:library_scm",(void*)f_18942},
-{"f_18945:library_scm",(void*)f_18945},
-{"f_18953:library_scm",(void*)f_18953},
-{"f_18957:library_scm",(void*)f_18957},
-{"f_18948:library_scm",(void*)f_18948},
-{"f_18891:library_scm",(void*)f_18891},
-{"f_18895:library_scm",(void*)f_18895},
-{"f_18902:library_scm",(void*)f_18902},
-{"f_18904:library_scm",(void*)f_18904},
-{"f_18926:library_scm",(void*)f_18926},
-{"f_18933:library_scm",(void*)f_18933},
-{"f_18869:library_scm",(void*)f_18869},
-{"f_18865:library_scm",(void*)f_18865},
-{"f_18846:library_scm",(void*)f_18846},
-{"f_18824:library_scm",(void*)f_18824},
-{"f_18830:library_scm",(void*)f_18830},
-{"f_18839:library_scm",(void*)f_18839},
-{"f_18815:library_scm",(void*)f_18815},
-{"f_18763:library_scm",(void*)f_18763},
-{"f_18778:library_scm",(void*)f_18778},
-{"f_18757:library_scm",(void*)f_18757},
-{"f_18734:library_scm",(void*)f_18734},
-{"f_18746:library_scm",(void*)f_18746},
-{"f_18731:library_scm",(void*)f_18731},
-{"f_18727:library_scm",(void*)f_18727},
-{"f_18724:library_scm",(void*)f_18724},
-{"f_18721:library_scm",(void*)f_18721},
-{"f_18718:library_scm",(void*)f_18718},
-{"f_18715:library_scm",(void*)f_18715},
-{"f_18712:library_scm",(void*)f_18712},
-{"f_18709:library_scm",(void*)f_18709},
-{"f_18706:library_scm",(void*)f_18706},
-{"f_18703:library_scm",(void*)f_18703},
-{"f_18700:library_scm",(void*)f_18700},
-{"f_18697:library_scm",(void*)f_18697},
-{"f_18691:library_scm",(void*)f_18691},
-{"f_18695:library_scm",(void*)f_18695},
-{"f_18688:library_scm",(void*)f_18688},
-{"f_18685:library_scm",(void*)f_18685},
-{"f_18678:library_scm",(void*)f_18678},
-{"f_18671:library_scm",(void*)f_18671},
-{"f_18653:library_scm",(void*)f_18653},
-{"f_18650:library_scm",(void*)f_18650},
-{"f_18612:library_scm",(void*)f_18612},
-{"f_18621:library_scm",(void*)f_18621},
-{"f_18631:library_scm",(void*)f_18631},
-{"f_18641:library_scm",(void*)f_18641},
-{"f_18616:library_scm",(void*)f_18616},
-{"f_18551:library_scm",(void*)f_18551},
-{"f_18557:library_scm",(void*)f_18557},
-{"f_18567:library_scm",(void*)f_18567},
-{"f_18577:library_scm",(void*)f_18577},
-{"f_18531:library_scm",(void*)f_18531},
-{"f_18528:library_scm",(void*)f_18528},
-{"f_18521:library_scm",(void*)f_18521},
-{"f_18526:library_scm",(void*)f_18526},
-{"f_18515:library_scm",(void*)f_18515},
-{"f_18519:library_scm",(void*)f_18519},
-{"f_18499:library_scm",(void*)f_18499},
-{"f_18509:library_scm",(void*)f_18509},
-{"f_18493:library_scm",(void*)f_18493},
-{"f_18497:library_scm",(void*)f_18497},
-{"f_18477:library_scm",(void*)f_18477},
-{"f_18487:library_scm",(void*)f_18487},
-{"f_18474:library_scm",(void*)f_18474},
-{"f_18471:library_scm",(void*)f_18471},
-{"f_18468:library_scm",(void*)f_18468},
-{"f_18465:library_scm",(void*)f_18465},
-{"f_18453:library_scm",(void*)f_18453},
-{"f_18446:library_scm",(void*)f_18446},
-{"f_18440:library_scm",(void*)f_18440},
-{"f_18444:library_scm",(void*)f_18444},
-{"f_18430:library_scm",(void*)f_18430},
-{"f_18438:library_scm",(void*)f_18438},
-{"f_18424:library_scm",(void*)f_18424},
-{"f_18428:library_scm",(void*)f_18428},
-{"f_18421:library_scm",(void*)f_18421},
-{"f_18418:library_scm",(void*)f_18418},
-{"f_18415:library_scm",(void*)f_18415},
-{"f_18412:library_scm",(void*)f_18412},
-{"f_18409:library_scm",(void*)f_18409},
-{"f_18406:library_scm",(void*)f_18406},
-{"f_18403:library_scm",(void*)f_18403},
-{"f_18398:library_scm",(void*)f_18398},
-{"f_18395:library_scm",(void*)f_18395},
-{"f_18392:library_scm",(void*)f_18392},
-{"f_18389:library_scm",(void*)f_18389},
-{"f_18003:library_scm",(void*)f_18003},
-{"f_18074:library_scm",(void*)f_18074},
-{"f_18078:library_scm",(void*)f_18078},
-{"f_18063:library_scm",(void*)f_18063},
-{"f_18037:library_scm",(void*)f_18037},
-{"f_18041:library_scm",(void*)f_18041},
-{"f_18026:library_scm",(void*)f_18026},
-{"f_17994:library_scm",(void*)f_17994},
-{"f_17998:library_scm",(void*)f_17998},
-{"f_17948:library_scm",(void*)f_17948},
-{"f_17956:library_scm",(void*)f_17956},
-{"f_17930:library_scm",(void*)f_17930},
-{"f_17932:library_scm",(void*)f_17932},
-{"f_17924:library_scm",(void*)f_17924},
-{"f_17788:library_scm",(void*)f_17788},
-{"f_17856:library_scm",(void*)f_17856},
-{"f_17854:library_scm",(void*)f_17854},
-{"f_17802:library_scm",(void*)f_17802},
-{"f_17812:library_scm",(void*)f_17812},
-{"f_17810:library_scm",(void*)f_17810},
-{"f_17806:library_scm",(void*)f_17806},
-{"f_17896:library_scm",(void*)f_17896},
-{"f_17738:library_scm",(void*)f_17738},
-{"f_17752:library_scm",(void*)f_17752},
-{"f_17778:library_scm",(void*)f_17778},
-{"f_17750:library_scm",(void*)f_17750},
-{"f_17735:library_scm",(void*)f_17735},
-{"f_17721:library_scm",(void*)f_17721},
-{"f_17731:library_scm",(void*)f_17731},
-{"f_17727:library_scm",(void*)f_17727},
-{"f_17561:library_scm",(void*)f_17561},
-{"f_17690:library_scm",(void*)f_17690},
-{"f_17693:library_scm",(void*)f_17693},
-{"f_17696:library_scm",(void*)f_17696},
-{"f_17675:library_scm",(void*)f_17675},
-{"f_17678:library_scm",(void*)f_17678},
-{"f_17614:library_scm",(void*)f_17614},
-{"f_17644:library_scm",(void*)f_17644},
-{"f_17618:library_scm",(void*)f_17618},
-{"f_17604:library_scm",(void*)f_17604},
-{"f_17607:library_scm",(void*)f_17607},
-{"f_17565:library_scm",(void*)f_17565},
-{"f_17552:library_scm",(void*)f_17552},
-{"f_17535:library_scm",(void*)f_17535},
-{"f_17539:library_scm",(void*)f_17539},
-{"f_17312:library_scm",(void*)f_17312},
-{"f_17527:library_scm",(void*)f_17527},
-{"f_17400:library_scm",(void*)f_17400},
-{"f_17403:library_scm",(void*)f_17403},
-{"f_17423:library_scm",(void*)f_17423},
-{"f_17335:library_scm",(void*)f_17335},
-{"f_17338:library_scm",(void*)f_17338},
-{"f_17384:library_scm",(void*)f_17384},
-{"f_17341:library_scm",(void*)f_17341},
-{"f_17349:library_scm",(void*)f_17349},
-{"f_17361:library_scm",(void*)f_17361},
-{"f_17367:library_scm",(void*)f_17367},
-{"f_17344:library_scm",(void*)f_17344},
-{"f_17300:library_scm",(void*)f_17300},
-{"f_17303:library_scm",(void*)f_17303},
-{"f_17307:library_scm",(void*)f_17307},
-{"f_17279:library_scm",(void*)f_17279},
-{"f_17283:library_scm",(void*)f_17283},
-{"f_17289:library_scm",(void*)f_17289},
-{"f_17231:library_scm",(void*)f_17231},
-{"f_17234:library_scm",(void*)f_17234},
-{"f_17117:library_scm",(void*)f_17117},
-{"f_17152:library_scm",(void*)f_17152},
-{"f_17147:library_scm",(void*)f_17147},
-{"f_17142:library_scm",(void*)f_17142},
-{"f_17137:library_scm",(void*)f_17137},
-{"f_17119:library_scm",(void*)f_17119},
-{"f_17123:library_scm",(void*)f_17123},
-{"f_17136:library_scm",(void*)f_17136},
-{"f_17028:library_scm",(void*)f_17028},
-{"f_17038:library_scm",(void*)f_17038},
-{"f_17046:library_scm",(void*)f_17046},
-{"f_17104:library_scm",(void*)f_17104},
-{"f_17054:library_scm",(void*)f_17054},
-{"f_17067:library_scm",(void*)f_17067},
-{"f_17070:library_scm",(void*)f_17070},
-{"f_17073:library_scm",(void*)f_17073},
-{"f_17091:library_scm",(void*)f_17091},
-{"f_17094:library_scm",(void*)f_17094},
-{"f_17076:library_scm",(void*)f_17076},
-{"f_17084:library_scm",(void*)f_17084},
-{"f_17041:library_scm",(void*)f_17041},
-{"f_16872:library_scm",(void*)f_16872},
-{"f_16980:library_scm",(void*)f_16980},
-{"f_16975:library_scm",(void*)f_16975},
-{"f_16874:library_scm",(void*)f_16874},
-{"f_16878:library_scm",(void*)f_16878},
-{"f_16886:library_scm",(void*)f_16886},
-{"f_16905:library_scm",(void*)f_16905},
-{"f_16924:library_scm",(void*)f_16924},
-{"f_16916:library_scm",(void*)f_16916},
-{"f_16830:library_scm",(void*)f_16830},
-{"f_16836:library_scm",(void*)f_16836},
-{"f_16860:library_scm",(void*)f_16860},
-{"f_16827:library_scm",(void*)f_16827},
-{"f_16751:library_scm",(void*)f_16751},
-{"f_16792:library_scm",(void*)f_16792},
-{"f_16821:library_scm",(void*)f_16821},
-{"f_16755:library_scm",(void*)f_16755},
-{"f_16761:library_scm",(void*)f_16761},
-{"f_16790:library_scm",(void*)f_16790},
-{"f_16759:library_scm",(void*)f_16759},
-{"f_16707:library_scm",(void*)f_16707},
-{"f_16713:library_scm",(void*)f_16713},
-{"f_16725:library_scm",(void*)f_16725},
-{"f_16711:library_scm",(void*)f_16711},
-{"f_16663:library_scm",(void*)f_16663},
-{"f_16678:library_scm",(void*)f_16678},
-{"f_16629:library_scm",(void*)f_16629},
-{"f_16645:library_scm",(void*)f_16645},
-{"f_16658:library_scm",(void*)f_16658},
-{"f_16451:library_scm",(void*)f_16451},
-{"f_16455:library_scm",(void*)f_16455},
-{"f_16514:library_scm",(void*)f_16514},
-{"f_16521:library_scm",(void*)f_16521},
-{"f_16461:library_scm",(void*)f_16461},
-{"f_16464:library_scm",(void*)f_16464},
-{"f_16467:library_scm",(void*)f_16467},
-{"f_16470:library_scm",(void*)f_16470},
-{"f_16493:library_scm",(void*)f_16493},
-{"f_16497:library_scm",(void*)f_16497},
-{"f_16501:library_scm",(void*)f_16501},
-{"f_16505:library_scm",(void*)f_16505},
-{"f_16472:library_scm",(void*)f_16472},
-{"f_16486:library_scm",(void*)f_16486},
-{"f_16525:library_scm",(void*)f_16525},
-{"f_16529:library_scm",(void*)f_16529},
-{"f_16533:library_scm",(void*)f_16533},
-{"f_16444:library_scm",(void*)f_16444},
-{"f_16438:library_scm",(void*)f_16438},
-{"f_16432:library_scm",(void*)f_16432},
-{"f_16426:library_scm",(void*)f_16426},
-{"f_16420:library_scm",(void*)f_16420},
-{"f_16414:library_scm",(void*)f_16414},
-{"f_16348:library_scm",(void*)f_16348},
-{"f_16409:library_scm",(void*)f_16409},
-{"f_16405:library_scm",(void*)f_16405},
-{"f_16398:library_scm",(void*)f_16398},
-{"f_16394:library_scm",(void*)f_16394},
-{"f_16359:library_scm",(void*)f_16359},
-{"f_16367:library_scm",(void*)f_16367},
-{"f_16363:library_scm",(void*)f_16363},
-{"f_16308:library_scm",(void*)f_16308},
-{"f_16312:library_scm",(void*)f_16312},
-{"f_16320:library_scm",(void*)f_16320},
-{"f_16335:library_scm",(void*)f_16335},
-{"f_16328:library_scm",(void*)f_16328},
-{"f_16315:library_scm",(void*)f_16315},
-{"f_16271:library_scm",(void*)f_16271},
-{"f_16275:library_scm",(void*)f_16275},
-{"f_16278:library_scm",(void*)f_16278},
-{"f_16252:library_scm",(void*)f_16252},
-{"f_16256:library_scm",(void*)f_16256},
-{"f_16269:library_scm",(void*)f_16269},
-{"f_16234:library_scm",(void*)f_16234},
-{"f_16241:library_scm",(void*)f_16241},
-{"f_16162:library_scm",(void*)f_16162},
-{"f_16168:library_scm",(void*)f_16168},
-{"f_16197:library_scm",(void*)f_16197},
-{"f_21886:library_scm",(void*)f_21886},
-{"f_21914:library_scm",(void*)f_21914},
-{"f_21918:library_scm",(void*)f_21918},
-{"f_21921:library_scm",(void*)f_21921},
-{"f_21845:library_scm",(void*)f_21845},
-{"f_21855:library_scm",(void*)f_21855},
-{"f_21831:library_scm",(void*)f_21831},
-{"f_21828:library_scm",(void*)f_21828},
-{"f_21818:library_scm",(void*)f_21818},
-{"f_21799:library_scm",(void*)f_21799},
-{"f_21803:library_scm",(void*)f_21803},
-{"f_21780:library_scm",(void*)f_21780},
-{"f_21784:library_scm",(void*)f_21784},
-{"f_21762:library_scm",(void*)f_21762},
-{"f_21737:library_scm",(void*)f_21737},
-{"f_16107:library_scm",(void*)f_16107},
-{"f_16129:library_scm",(void*)f_16129},
-{"f_16132:library_scm",(void*)f_16132},
-{"f_16135:library_scm",(void*)f_16135},
-{"f_16138:library_scm",(void*)f_16138},
-{"f_16103:library_scm",(void*)f_16103},
-{"f_16100:library_scm",(void*)f_16100},
-{"f_16097:library_scm",(void*)f_16097},
-{"f_16070:library_scm",(void*)f_16070},
-{"f_16076:library_scm",(void*)f_16076},
-{"f_16043:library_scm",(void*)f_16043},
-{"f_16049:library_scm",(void*)f_16049},
-{"f_16016:library_scm",(void*)f_16016},
-{"f_16022:library_scm",(void*)f_16022},
-{"f_15975:library_scm",(void*)f_15975},
-{"f_15981:library_scm",(void*)f_15981},
-{"f_16010:library_scm",(void*)f_16010},
-{"f_15983:library_scm",(void*)f_15983},
-{"f_15987:library_scm",(void*)f_15987},
-{"f_15990:library_scm",(void*)f_15990},
-{"f_15994:library_scm",(void*)f_15994},
-{"f_15997:library_scm",(void*)f_15997},
-{"f_16001:library_scm",(void*)f_16001},
-{"f_16004:library_scm",(void*)f_16004},
-{"f_15912:library_scm",(void*)f_15912},
-{"f_15931:library_scm",(void*)f_15931},
-{"f_15973:library_scm",(void*)f_15973},
-{"f_15934:library_scm",(void*)f_15934},
-{"f_15962:library_scm",(void*)f_15962},
-{"f_15946:library_scm",(void*)f_15946},
-{"f_15937:library_scm",(void*)f_15937},
-{"f_15892:library_scm",(void*)f_15892},
-{"f_15875:library_scm",(void*)f_15875},
-{"f_15879:library_scm",(void*)f_15879},
-{"f_15889:library_scm",(void*)f_15889},
-{"f_14929:library_scm",(void*)f_14929},
-{"f_14933:library_scm",(void*)f_14933},
-{"f_14936:library_scm",(void*)f_14936},
-{"f_14939:library_scm",(void*)f_14939},
-{"f_14942:library_scm",(void*)f_14942},
-{"f_15251:library_scm",(void*)f_15251},
-{"f_15490:library_scm",(void*)f_15490},
-{"f_15819:library_scm",(void*)f_15819},
-{"f_15822:library_scm",(void*)f_15822},
-{"f_15831:library_scm",(void*)f_15831},
-{"f_15844:library_scm",(void*)f_15844},
-{"f_15847:library_scm",(void*)f_15847},
-{"f_15785:library_scm",(void*)f_15785},
-{"f_15788:library_scm",(void*)f_15788},
-{"f_15769:library_scm",(void*)f_15769},
-{"f_15779:library_scm",(void*)f_15779},
-{"f_15772:library_scm",(void*)f_15772},
-{"f_15757:library_scm",(void*)f_15757},
-{"f_15725:library_scm",(void*)f_15725},
-{"f_15735:library_scm",(void*)f_15735},
-{"f_15728:library_scm",(void*)f_15728},
-{"f_15654:library_scm",(void*)f_15654},
-{"f_15657:library_scm",(void*)f_15657},
-{"f_15666:library_scm",(void*)f_15666},
-{"f_15698:library_scm",(void*)f_15698},
-{"f_15701:library_scm",(void*)f_15701},
-{"f_15688:library_scm",(void*)f_15688},
-{"f_15679:library_scm",(void*)f_15679},
-{"f_15516:library_scm",(void*)f_15516},
-{"f_15521:library_scm",(void*)f_15521},
-{"f_15569:library_scm",(void*)f_15569},
-{"f_15626:library_scm",(void*)f_15626},
-{"f_15629:library_scm",(void*)f_15629},
-{"f_15636:library_scm",(void*)f_15636},
-{"f_15534:library_scm",(void*)f_15534},
-{"f_15507:library_scm",(void*)f_15507},
-{"f_15497:library_scm",(void*)f_15497},
-{"f_15458:library_scm",(void*)f_15458},
-{"f_15467:library_scm",(void*)f_15467},
-{"f_15412:library_scm",(void*)f_15412},
-{"f_15439:library_scm",(void*)f_15439},
-{"f_15433:library_scm",(void*)f_15433},
-{"f_15421:library_scm",(void*)f_15421},
-{"f_15376:library_scm",(void*)f_15376},
-{"f_15300:library_scm",(void*)f_15300},
-{"f_15306:library_scm",(void*)f_15306},
-{"f_15346:library_scm",(void*)f_15346},
-{"f_15353:library_scm",(void*)f_15353},
-{"f_15330:library_scm",(void*)f_15330},
-{"f_15337:library_scm",(void*)f_15337},
-{"f_15310:library_scm",(void*)f_15310},
-{"f_15126:library_scm",(void*)f_15126},
-{"f_15142:library_scm",(void*)f_15142},
-{"f_15157:library_scm",(void*)f_15157},
-{"f_15207:library_scm",(void*)f_15207},
-{"f_15173:library_scm",(void*)f_15173},
-{"f_15180:library_scm",(void*)f_15180},
-{"f_15077:library_scm",(void*)f_15077},
-{"f_15084:library_scm",(void*)f_15084},
-{"f_15089:library_scm",(void*)f_15089},
-{"f_15102:library_scm",(void*)f_15102},
-{"f_15105:library_scm",(void*)f_15105},
-{"f_15056:library_scm",(void*)f_15056},
-{"f_15015:library_scm",(void*)f_15015},
-{"f_15019:library_scm",(void*)f_15019},
-{"f_15022:library_scm",(void*)f_15022},
-{"f_15041:library_scm",(void*)f_15041},
-{"f_15044:library_scm",(void*)f_15044},
-{"f_15025:library_scm",(void*)f_15025},
-{"f_14944:library_scm",(void*)f_14944},
-{"f_14954:library_scm",(void*)f_14954},
-{"f_14991:library_scm",(void*)f_14991},
-{"f_14978:library_scm",(void*)f_14978},
-{"f_14960:library_scm",(void*)f_14960},
-{"f_14894:library_scm",(void*)f_14894},
-{"f_14902:library_scm",(void*)f_14902},
-{"f_14909:library_scm",(void*)f_14909},
-{"f_14912:library_scm",(void*)f_14912},
-{"f_14871:library_scm",(void*)f_14871},
-{"f_14879:library_scm",(void*)f_14879},
-{"f_14886:library_scm",(void*)f_14886},
-{"f_14889:library_scm",(void*)f_14889},
-{"f_14840:library_scm",(void*)f_14840},
-{"f_14844:library_scm",(void*)f_14844},
-{"f_14847:library_scm",(void*)f_14847},
-{"f_14809:library_scm",(void*)f_14809},
-{"f_14813:library_scm",(void*)f_14813},
-{"f_14816:library_scm",(void*)f_14816},
-{"f_14781:library_scm",(void*)f_14781},
-{"f_14785:library_scm",(void*)f_14785},
-{"f_14744:library_scm",(void*)f_14744},
-{"f_14748:library_scm",(void*)f_14748},
-{"f_14754:library_scm",(void*)f_14754},
-{"f_14757:library_scm",(void*)f_14757},
-{"f_14732:library_scm",(void*)f_14732},
-{"f_14736:library_scm",(void*)f_14736},
-{"f_14719:library_scm",(void*)f_14719},
-{"f_14668:library_scm",(void*)f_14668},
-{"f_14682:library_scm",(void*)f_14682},
-{"f_14689:library_scm",(void*)f_14689},
-{"f_14696:library_scm",(void*)f_14696},
-{"f_14606:library_scm",(void*)f_14606},
-{"f_14608:library_scm",(void*)f_14608},
-{"f_14621:library_scm",(void*)f_14621},
-{"f_14654:library_scm",(void*)f_14654},
-{"f_14624:library_scm",(void*)f_14624},
-{"f_14633:library_scm",(void*)f_14633},
-{"f_14644:library_scm",(void*)f_14644},
-{"f_14583:library_scm",(void*)f_14583},
-{"f_14546:library_scm",(void*)f_14546},
-{"f_14571:library_scm",(void*)f_14571},
-{"f_14559:library_scm",(void*)f_14559},
-{"f_14484:library_scm",(void*)f_14484},
-{"f_14472:library_scm",(void*)f_14472},
-{"f_14307:library_scm",(void*)f_14307},
-{"f_11914:library_scm",(void*)f_11914},
-{"f_11918:library_scm",(void*)f_11918},
-{"f_11921:library_scm",(void*)f_11921},
-{"f_11924:library_scm",(void*)f_11924},
-{"f_11927:library_scm",(void*)f_11927},
-{"f_11930:library_scm",(void*)f_11930},
-{"f_12007:library_scm",(void*)f_12007},
-{"f_13624:library_scm",(void*)f_13624},
-{"f_13627:library_scm",(void*)f_13627},
-{"f_13633:library_scm",(void*)f_13633},
-{"f_14277:library_scm",(void*)f_14277},
-{"f_14190:library_scm",(void*)f_14190},
-{"f_13716:library_scm",(void*)f_13716},
-{"f_13719:library_scm",(void*)f_13719},
-{"f_13778:library_scm",(void*)f_13778},
-{"f_14082:library_scm",(void*)f_14082},
-{"f_14085:library_scm",(void*)f_14085},
-{"f_14103:library_scm",(void*)f_14103},
-{"f_14159:library_scm",(void*)f_14159},
-{"f_14122:library_scm",(void*)f_14122},
-{"f_14097:library_scm",(void*)f_14097},
-{"f_14059:library_scm",(void*)f_14059},
-{"f_14062:library_scm",(void*)f_14062},
-{"f_14073:library_scm",(void*)f_14073},
-{"f_14050:library_scm",(void*)f_14050},
-{"f_14046:library_scm",(void*)f_14046},
-{"f_14026:library_scm",(void*)f_14026},
-{"f_14033:library_scm",(void*)f_14033},
-{"f_14010:library_scm",(void*)f_14010},
-{"f_14017:library_scm",(void*)f_14017},
-{"f_13994:library_scm",(void*)f_13994},
-{"f_14001:library_scm",(void*)f_14001},
-{"f_13979:library_scm",(void*)f_13979},
-{"f_13982:library_scm",(void*)f_13982},
-{"f_13967:library_scm",(void*)f_13967},
-{"f_13952:library_scm",(void*)f_13952},
-{"f_13955:library_scm",(void*)f_13955},
-{"f_13940:library_scm",(void*)f_13940},
-{"f_13876:library_scm",(void*)f_13876},
-{"f_13879:library_scm",(void*)f_13879},
-{"f_13882:library_scm",(void*)f_13882},
-{"f_13898:library_scm",(void*)f_13898},
-{"f_13892:library_scm",(void*)f_13892},
-{"f_13887:library_scm",(void*)f_13887},
-{"f_13860:library_scm",(void*)f_13860},
-{"f_13867:library_scm",(void*)f_13867},
-{"f_13844:library_scm",(void*)f_13844},
-{"f_13851:library_scm",(void*)f_13851},
-{"f_13832:library_scm",(void*)f_13832},
-{"f_13820:library_scm",(void*)f_13820},
-{"f_13808:library_scm",(void*)f_13808},
-{"f_13796:library_scm",(void*)f_13796},
-{"f_13772:library_scm",(void*)f_13772},
-{"f_13728:library_scm",(void*)f_13728},
-{"f_13731:library_scm",(void*)f_13731},
-{"f_13737:library_scm",(void*)f_13737},
-{"f_13680:library_scm",(void*)f_13680},
-{"f_13707:library_scm",(void*)f_13707},
-{"f_13703:library_scm",(void*)f_13703},
-{"f_13689:library_scm",(void*)f_13689},
-{"f_13696:library_scm",(void*)f_13696},
-{"f_13664:library_scm",(void*)f_13664},
-{"f_13671:library_scm",(void*)f_13671},
-{"f_13648:library_scm",(void*)f_13648},
-{"f_13655:library_scm",(void*)f_13655},
-{"f_13609:library_scm",(void*)f_13609},
-{"f_13617:library_scm",(void*)f_13617},
-{"f_13540:library_scm",(void*)f_13540},
-{"f_13562:library_scm",(void*)f_13562},
-{"f_13547:library_scm",(void*)f_13547},
-{"f_13454:library_scm",(void*)f_13454},
-{"f_13458:library_scm",(void*)f_13458},
-{"f_13461:library_scm",(void*)f_13461},
-{"f_13467:library_scm",(void*)f_13467},
-{"f_13472:library_scm",(void*)f_13472},
-{"f_13520:library_scm",(void*)f_13520},
-{"f_13491:library_scm",(void*)f_13491},
-{"f_13505:library_scm",(void*)f_13505},
-{"f_13509:library_scm",(void*)f_13509},
-{"f_13501:library_scm",(void*)f_13501},
-{"f_13371:library_scm",(void*)f_13371},
-{"f_13377:library_scm",(void*)f_13377},
-{"f_13381:library_scm",(void*)f_13381},
-{"f_13440:library_scm",(void*)f_13440},
-{"f_13417:library_scm",(void*)f_13417},
-{"f_13155:library_scm",(void*)f_13155},
-{"f_13159:library_scm",(void*)f_13159},
-{"f_13162:library_scm",(void*)f_13162},
-{"f_13344:library_scm",(void*)f_13344},
-{"f_13351:library_scm",(void*)f_13351},
-{"f_13174:library_scm",(void*)f_13174},
-{"f_13191:library_scm",(void*)f_13191},
-{"f_13207:library_scm",(void*)f_13207},
-{"f_13197:library_scm",(void*)f_13197},
-{"f_13080:library_scm",(void*)f_13080},
-{"f_13153:library_scm",(void*)f_13153},
-{"f_13094:library_scm",(void*)f_13094},
-{"f_13096:library_scm",(void*)f_13096},
-{"f_13142:library_scm",(void*)f_13142},
-{"f_13115:library_scm",(void*)f_13115},
-{"f_13122:library_scm",(void*)f_13122},
-{"f_13050:library_scm",(void*)f_13050},
-{"f_13078:library_scm",(void*)f_13078},
-{"f_13065:library_scm",(void*)f_13065},
-{"f_13054:library_scm",(void*)f_13054},
-{"f_13061:library_scm",(void*)f_13061},
-{"f_12995:library_scm",(void*)f_12995},
-{"f_13003:library_scm",(void*)f_13003},
-{"f_13005:library_scm",(void*)f_13005},
-{"f_13015:library_scm",(void*)f_13015},
-{"f_13021:library_scm",(void*)f_13021},
-{"f_13028:library_scm",(void*)f_13028},
-{"f_12933:library_scm",(void*)f_12933},
-{"f_12941:library_scm",(void*)f_12941},
-{"f_12943:library_scm",(void*)f_12943},
-{"f_12953:library_scm",(void*)f_12953},
-{"f_12959:library_scm",(void*)f_12959},
-{"f_12962:library_scm",(void*)f_12962},
-{"f_12969:library_scm",(void*)f_12969},
-{"f_12863:library_scm",(void*)f_12863},
-{"f_12931:library_scm",(void*)f_12931},
-{"f_12873:library_scm",(void*)f_12873},
-{"f_12876:library_scm",(void*)f_12876},
-{"f_12803:library_scm",(void*)f_12803},
-{"f_12861:library_scm",(void*)f_12861},
-{"f_12813:library_scm",(void*)f_12813},
-{"f_12816:library_scm",(void*)f_12816},
-{"f_12851:library_scm",(void*)f_12851},
-{"f_12838:library_scm",(void*)f_12838},
-{"f_12756:library_scm",(void*)f_12756},
-{"f_12761:library_scm",(void*)f_12761},
-{"f_12773:library_scm",(void*)f_12773},
-{"f_12788:library_scm",(void*)f_12788},
-{"f_12779:library_scm",(void*)f_12779},
-{"f_12738:library_scm",(void*)f_12738},
-{"f_12742:library_scm",(void*)f_12742},
-{"f_12748:library_scm",(void*)f_12748},
-{"f_12527:library_scm",(void*)f_12527},
-{"f_12736:library_scm",(void*)f_12736},
-{"f_12550:library_scm",(void*)f_12550},
-{"f_12571:library_scm",(void*)f_12571},
-{"f_12575:library_scm",(void*)f_12575},
-{"f_12729:library_scm",(void*)f_12729},
-{"f_12578:library_scm",(void*)f_12578},
-{"f_12581:library_scm",(void*)f_12581},
-{"f_12725:library_scm",(void*)f_12725},
-{"f_12605:library_scm",(void*)f_12605},
-{"f_12608:library_scm",(void*)f_12608},
-{"f_12617:library_scm",(void*)f_12617},
-{"f_12687:library_scm",(void*)f_12687},
-{"f_12655:library_scm",(void*)f_12655},
-{"f_12658:library_scm",(void*)f_12658},
-{"f_12661:library_scm",(void*)f_12661},
-{"f_12620:library_scm",(void*)f_12620},
-{"f_12623:library_scm",(void*)f_12623},
-{"f_12646:library_scm",(void*)f_12646},
-{"f_12629:library_scm",(void*)f_12629},
-{"f_12642:library_scm",(void*)f_12642},
-{"f_12553:library_scm",(void*)f_12553},
-{"f_12537:library_scm",(void*)f_12537},
-{"f_12548:library_scm",(void*)f_12548},
-{"f_12154:library_scm",(void*)f_12154},
-{"f_12525:library_scm",(void*)f_12525},
-{"f_12521:library_scm",(void*)f_12521},
-{"f_12517:library_scm",(void*)f_12517},
-{"f_12168:library_scm",(void*)f_12168},
-{"f_12170:library_scm",(void*)f_12170},
-{"f_12506:library_scm",(void*)f_12506},
-{"f_12187:library_scm",(void*)f_12187},
-{"f_12456:library_scm",(void*)f_12456},
-{"f_12470:library_scm",(void*)f_12470},
-{"f_12477:library_scm",(void*)f_12477},
-{"f_12463:library_scm",(void*)f_12463},
-{"f_12423:library_scm",(void*)f_12423},
-{"f_12429:library_scm",(void*)f_12429},
-{"f_12443:library_scm",(void*)f_12443},
-{"f_12447:library_scm",(void*)f_12447},
-{"f_12436:library_scm",(void*)f_12436},
-{"f_12351:library_scm",(void*)f_12351},
-{"f_12357:library_scm",(void*)f_12357},
-{"f_12410:library_scm",(void*)f_12410},
-{"f_12414:library_scm",(void*)f_12414},
-{"f_12403:library_scm",(void*)f_12403},
-{"f_12399:library_scm",(void*)f_12399},
-{"f_12363:library_scm",(void*)f_12363},
-{"f_12366:library_scm",(void*)f_12366},
-{"f_12369:library_scm",(void*)f_12369},
-{"f_12379:library_scm",(void*)f_12379},
-{"f_12383:library_scm",(void*)f_12383},
-{"f_12342:library_scm",(void*)f_12342},
-{"f_12334:library_scm",(void*)f_12334},
-{"f_12310:library_scm",(void*)f_12310},
-{"f_12289:library_scm",(void*)f_12289},
-{"f_12268:library_scm",(void*)f_12268},
-{"f_12251:library_scm",(void*)f_12251},
-{"f_12234:library_scm",(void*)f_12234},
-{"f_12217:library_scm",(void*)f_12217},
-{"f_12200:library_scm",(void*)f_12200},
-{"f_12118:library_scm",(void*)f_12118},
-{"f_12122:library_scm",(void*)f_12122},
-{"f_12130:library_scm",(void*)f_12130},
-{"f_12058:library_scm",(void*)f_12058},
-{"f_12064:library_scm",(void*)f_12064},
-{"f_12090:library_scm",(void*)f_12090},
-{"f_12074:library_scm",(void*)f_12074},
-{"f_12077:library_scm",(void*)f_12077},
-{"f_12087:library_scm",(void*)f_12087},
-{"f_12010:library_scm",(void*)f_12010},
-{"f_12018:library_scm",(void*)f_12018},
-{"f_12020:library_scm",(void*)f_12020},
-{"f_12049:library_scm",(void*)f_12049},
-{"f_12056:library_scm",(void*)f_12056},
-{"f_12033:library_scm",(void*)f_12033},
-{"f_12040:library_scm",(void*)f_12040},
-{"f_11992:library_scm",(void*)f_11992},
-{"f_11996:library_scm",(void*)f_11996},
-{"f_11983:library_scm",(void*)f_11983},
-{"f_11987:library_scm",(void*)f_11987},
-{"f_11947:library_scm",(void*)f_11947},
-{"f_11955:library_scm",(void*)f_11955},
-{"f_11957:library_scm",(void*)f_11957},
-{"f_11964:library_scm",(void*)f_11964},
-{"f_11971:library_scm",(void*)f_11971},
-{"f_11938:library_scm",(void*)f_11938},
-{"f_11932:library_scm",(void*)f_11932},
-{"f_11888:library_scm",(void*)f_11888},
-{"f_11896:library_scm",(void*)f_11896},
-{"f_11909:library_scm",(void*)f_11909},
-{"f_11899:library_scm",(void*)f_11899},
-{"f_11865:library_scm",(void*)f_11865},
-{"f_11873:library_scm",(void*)f_11873},
-{"f_11886:library_scm",(void*)f_11886},
-{"f_11876:library_scm",(void*)f_11876},
-{"f_11839:library_scm",(void*)f_11839},
-{"f_11836:library_scm",(void*)f_11836},
-{"f_11833:library_scm",(void*)f_11833},
-{"f_11796:library_scm",(void*)f_11796},
-{"f_11800:library_scm",(void*)f_11800},
-{"f_11803:library_scm",(void*)f_11803},
-{"f_11806:library_scm",(void*)f_11806},
-{"f_11762:library_scm",(void*)f_11762},
-{"f_11766:library_scm",(void*)f_11766},
-{"f_11769:library_scm",(void*)f_11769},
-{"f_11772:library_scm",(void*)f_11772},
-{"f_11737:library_scm",(void*)f_11737},
-{"f_11750:library_scm",(void*)f_11750},
-{"f_11725:library_scm",(void*)f_11725},
-{"f_11729:library_scm",(void*)f_11729},
-{"f_11732:library_scm",(void*)f_11732},
-{"f_11666:library_scm",(void*)f_11666},
-{"f_11670:library_scm",(void*)f_11670},
-{"f_11638:library_scm",(void*)f_11638},
-{"f_11642:library_scm",(void*)f_11642},
-{"f_11597:library_scm",(void*)f_11597},
-{"f_11601:library_scm",(void*)f_11601},
-{"f_11604:library_scm",(void*)f_11604},
-{"f_11607:library_scm",(void*)f_11607},
-{"f_11594:library_scm",(void*)f_11594},
-{"f_11495:library_scm",(void*)f_11495},
-{"f_11502:library_scm",(void*)f_11502},
-{"f_11576:library_scm",(void*)f_11576},
-{"f_11509:library_scm",(void*)f_11509},
-{"f_11513:library_scm",(void*)f_11513},
-{"f_11544:library_scm",(void*)f_11544},
-{"f_11526:library_scm",(void*)f_11526},
-{"f_11533:library_scm",(void*)f_11533},
-{"f_11591:library_scm",(void*)f_11591},
-{"f_11440:library_scm",(void*)f_11440},
-{"f_11452:library_scm",(void*)f_11452},
-{"f_11458:library_scm",(void*)f_11458},
-{"f_11484:library_scm",(void*)f_11484},
-{"f_11488:library_scm",(void*)f_11488},
-{"f_11468:library_scm",(void*)f_11468},
-{"f_11479:library_scm",(void*)f_11479},
-{"f_11475:library_scm",(void*)f_11475},
-{"f_11462:library_scm",(void*)f_11462},
-{"f_11403:library_scm",(void*)f_11403},
-{"f_11412:library_scm",(void*)f_11412},
-{"f_11438:library_scm",(void*)f_11438},
-{"f_11422:library_scm",(void*)f_11422},
-{"f_11433:library_scm",(void*)f_11433},
-{"f_11429:library_scm",(void*)f_11429},
-{"f_11416:library_scm",(void*)f_11416},
-{"f_11355:library_scm",(void*)f_11355},
-{"f_11359:library_scm",(void*)f_11359},
-{"f_11362:library_scm",(void*)f_11362},
-{"f_11343:library_scm",(void*)f_11343},
-{"f_11331:library_scm",(void*)f_11331},
-{"f_11335:library_scm",(void*)f_11335},
-{"f_11300:library_scm",(void*)f_11300},
-{"f25047:library_scm",(void*)f25047},
-{"f23942:library_scm",(void*)f23942},
-{"f_11304:library_scm",(void*)f_11304},
-{"f_11307:library_scm",(void*)f_11307},
-{"f_11266:library_scm",(void*)f_11266},
-{"f_11270:library_scm",(void*)f_11270},
-{"f_11273:library_scm",(void*)f_11273},
-{"f_11276:library_scm",(void*)f_11276},
-{"f_11253:library_scm",(void*)f_11253},
-{"f_11260:library_scm",(void*)f_11260},
-{"f_11224:library_scm",(void*)f_11224},
-{"f_11233:library_scm",(void*)f_11233},
-{"f_11251:library_scm",(void*)f_11251},
-{"f_11237:library_scm",(void*)f_11237},
-{"f_11202:library_scm",(void*)f_11202},
-{"f_11211:library_scm",(void*)f_11211},
-{"f_11222:library_scm",(void*)f_11222},
-{"f_11218:library_scm",(void*)f_11218},
-{"f_11182:library_scm",(void*)f_11182},
-{"f_11186:library_scm",(void*)f_11186},
-{"f_11192:library_scm",(void*)f_11192},
-{"f_11196:library_scm",(void*)f_11196},
-{"f_11162:library_scm",(void*)f_11162},
-{"f_11166:library_scm",(void*)f_11166},
-{"f_11172:library_scm",(void*)f_11172},
-{"f_11176:library_scm",(void*)f_11176},
-{"f_11138:library_scm",(void*)f_11138},
-{"f_11142:library_scm",(void*)f_11142},
-{"f_11153:library_scm",(void*)f_11153},
-{"f_11157:library_scm",(void*)f_11157},
-{"f_11147:library_scm",(void*)f_11147},
-{"f_11114:library_scm",(void*)f_11114},
-{"f_11118:library_scm",(void*)f_11118},
-{"f_11129:library_scm",(void*)f_11129},
-{"f_11133:library_scm",(void*)f_11133},
-{"f_11123:library_scm",(void*)f_11123},
-{"f_11108:library_scm",(void*)f_11108},
-{"f_11102:library_scm",(void*)f_11102},
-{"f_11096:library_scm",(void*)f_11096},
-{"f_11090:library_scm",(void*)f_11090},
-{"f_11065:library_scm",(void*)f_11065},
-{"f_11069:library_scm",(void*)f_11069},
-{"f_11081:library_scm",(void*)f_11081},
-{"f_10967:library_scm",(void*)f_10967},
-{"f_10976:library_scm",(void*)f_10976},
-{"f_11012:library_scm",(void*)f_11012},
-{"f_11025:library_scm",(void*)f_11025},
-{"f_10983:library_scm",(void*)f_10983},
-{"f_10986:library_scm",(void*)f_10986},
-{"f_11010:library_scm",(void*)f_11010},
-{"f_10992:library_scm",(void*)f_10992},
-{"f_10995:library_scm",(void*)f_10995},
-{"f_11006:library_scm",(void*)f_11006},
-{"f_11002:library_scm",(void*)f_11002},
-{"f_10989:library_scm",(void*)f_10989},
-{"f_10877:library_scm",(void*)f_10877},
-{"f_10917:library_scm",(void*)f_10917},
-{"f_10951:library_scm",(void*)f_10951},
-{"f_10940:library_scm",(void*)f_10940},
-{"f_10947:library_scm",(void*)f_10947},
-{"f_10896:library_scm",(void*)f_10896},
-{"f_10903:library_scm",(void*)f_10903},
-{"f_10867:library_scm",(void*)f_10867},
-{"f_10875:library_scm",(void*)f_10875},
-{"f_10833:library_scm",(void*)f_10833},
-{"f_10821:library_scm",(void*)f_10821},
-{"f_10815:library_scm",(void*)f_10815},
-{"f_10798:library_scm",(void*)f_10798},
-{"f_10813:library_scm",(void*)f_10813},
-{"f_10782:library_scm",(void*)f_10782},
-{"f_10795:library_scm",(void*)f_10795},
-{"f_10766:library_scm",(void*)f_10766},
-{"f_10779:library_scm",(void*)f_10779},
-{"f_10750:library_scm",(void*)f_10750},
-{"f_10763:library_scm",(void*)f_10763},
-{"f_10735:library_scm",(void*)f_10735},
-{"f_10739:library_scm",(void*)f_10739},
-{"f_10742:library_scm",(void*)f_10742},
-{"f_10705:library_scm",(void*)f_10705},
-{"f_10678:library_scm",(void*)f_10678},
-{"f_10690:library_scm",(void*)f_10690},
-{"f_22079:library_scm",(void*)f_22079},
-{"f_22200:library_scm",(void*)f_22200},
-{"f_22086:library_scm",(void*)f_22086},
-{"f_22099:library_scm",(void*)f_22099},
-{"f_22104:library_scm",(void*)f_22104},
-{"f_22147:library_scm",(void*)f_22147},
-{"f_22151:library_scm",(void*)f_22151},
-{"f_22132:library_scm",(void*)f_22132},
-{"f_22168:library_scm",(void*)f_22168},
-{"f_22023:library_scm",(void*)f_22023},
-{"f_22031:library_scm",(void*)f_22031},
-{"f_22033:library_scm",(void*)f_22033},
-{"f_22020:library_scm",(void*)f_22020},
-{"f_22017:library_scm",(void*)f_22017},
-{"f_22011:library_scm",(void*)f_22011},
-{"f_22008:library_scm",(void*)f_22008},
-{"f_22005:library_scm",(void*)f_22005},
-{"f_22002:library_scm",(void*)f_22002},
-{"f_21999:library_scm",(void*)f_21999},
-{"f_10631:library_scm",(void*)f_10631},
-{"f_10610:library_scm",(void*)f_10610},
-{"f_10593:library_scm",(void*)f_10593},
-{"f_10590:library_scm",(void*)f_10590},
-{"f_10575:library_scm",(void*)f_10575},
-{"f_10584:library_scm",(void*)f_10584},
-{"f_10542:library_scm",(void*)f_10542},
-{"f_10552:library_scm",(void*)f_10552},
-{"f_10535:library_scm",(void*)f_10535},
-{"f_10525:library_scm",(void*)f_10525},
-{"f_10467:library_scm",(void*)f_10467},
-{"f_10512:library_scm",(void*)f_10512},
-{"f_10483:library_scm",(void*)f_10483},
-{"f_10489:library_scm",(void*)f_10489},
-{"f_10427:library_scm",(void*)f_10427},
-{"f_10433:library_scm",(void*)f_10433},
-{"f_10439:library_scm",(void*)f_10439},
-{"f_10443:library_scm",(void*)f_10443},
-{"f_10396:library_scm",(void*)f_10396},
-{"f_10400:library_scm",(void*)f_10400},
-{"f_10409:library_scm",(void*)f_10409},
-{"f_10417:library_scm",(void*)f_10417},
-{"f_10307:library_scm",(void*)f_10307},
-{"f_10361:library_scm",(void*)f_10361},
-{"f_10393:library_scm",(void*)f_10393},
-{"f_10390:library_scm",(void*)f_10390},
-{"f_10378:library_scm",(void*)f_10378},
-{"f_10386:library_scm",(void*)f_10386},
-{"f_10382:library_scm",(void*)f_10382},
-{"f_10319:library_scm",(void*)f_10319},
-{"f_10348:library_scm",(void*)f_10348},
-{"f_10236:library_scm",(void*)f_10236},
-{"f_10278:library_scm",(void*)f_10278},
-{"f_10302:library_scm",(void*)f_10302},
-{"f_10291:library_scm",(void*)f_10291},
-{"f_10298:library_scm",(void*)f_10298},
-{"f_10248:library_scm",(void*)f_10248},
-{"f_10258:library_scm",(void*)f_10258},
-{"f_10184:library_scm",(void*)f_10184},
-{"f_10202:library_scm",(void*)f_10202},
-{"f_10194:library_scm",(void*)f_10194},
-{"f_10139:library_scm",(void*)f_10139},
-{"f_10171:library_scm",(void*)f_10171},
-{"f_10175:library_scm",(void*)f_10175},
-{"f_10094:library_scm",(void*)f_10094},
-{"f_10100:library_scm",(void*)f_10100},
-{"f_10120:library_scm",(void*)f_10120},
-{"f_10124:library_scm",(void*)f_10124},
-{"f_10056:library_scm",(void*)f_10056},
-{"f_10062:library_scm",(void*)f_10062},
-{"f_10078:library_scm",(void*)f_10078},
-{"f_10050:library_scm",(void*)f_10050},
-{"f_10043:library_scm",(void*)f_10043},
-{"f_10038:library_scm",(void*)f_10038},
-{"f_9884:library_scm",(void*)f_9884},
-{"f_9915:library_scm",(void*)f_9915},
-{"f_9918:library_scm",(void*)f_9918},
-{"f_9897:library_scm",(void*)f_9897},
-{"f_9843:library_scm",(void*)f_9843},
-{"f_9856:library_scm",(void*)f_9856},
-{"f_9833:library_scm",(void*)f_9833},
-{"f_9827:library_scm",(void*)f_9827},
-{"f_9821:library_scm",(void*)f_9821},
-{"f_9815:library_scm",(void*)f_9815},
-{"f_9809:library_scm",(void*)f_9809},
-{"f_9795:library_scm",(void*)f_9795},
-{"f_9803:library_scm",(void*)f_9803},
-{"f_9807:library_scm",(void*)f_9807},
-{"f_9781:library_scm",(void*)f_9781},
-{"f_9789:library_scm",(void*)f_9789},
-{"f_9793:library_scm",(void*)f_9793},
-{"f_9767:library_scm",(void*)f_9767},
-{"f_9775:library_scm",(void*)f_9775},
-{"f_9779:library_scm",(void*)f_9779},
-{"f_9753:library_scm",(void*)f_9753},
-{"f_9761:library_scm",(void*)f_9761},
-{"f_9765:library_scm",(void*)f_9765},
-{"f_9739:library_scm",(void*)f_9739},
-{"f_9747:library_scm",(void*)f_9747},
-{"f_9751:library_scm",(void*)f_9751},
-{"f_9733:library_scm",(void*)f_9733},
-{"f_9727:library_scm",(void*)f_9727},
-{"f_9715:library_scm",(void*)f_9715},
-{"f_9703:library_scm",(void*)f_9703},
-{"f_9691:library_scm",(void*)f_9691},
-{"f_9679:library_scm",(void*)f_9679},
-{"f_9667:library_scm",(void*)f_9667},
-{"f_9661:library_scm",(void*)f_9661},
-{"f_9655:library_scm",(void*)f_9655},
-{"f_9652:library_scm",(void*)f_9652},
-{"f_9617:library_scm",(void*)f_9617},
-{"f_9621:library_scm",(void*)f_9621},
-{"f_9629:library_scm",(void*)f_9629},
-{"f_9583:library_scm",(void*)f_9583},
-{"f_9587:library_scm",(void*)f_9587},
-{"f_9512:library_scm",(void*)f_9512},
-{"f_9528:library_scm",(void*)f_9528},
-{"f_9534:library_scm",(void*)f_9534},
-{"f_9539:library_scm",(void*)f_9539},
-{"f_9484:library_scm",(void*)f_9484},
-{"f_9493:library_scm",(void*)f_9493},
-{"f_9478:library_scm",(void*)f_9478},
-{"f_9445:library_scm",(void*)f_9445},
-{"f_9454:library_scm",(void*)f_9454},
-{"f_9472:library_scm",(void*)f_9472},
-{"f_9393:library_scm",(void*)f_9393},
-{"f_9409:library_scm",(void*)f_9409},
-{"f_9414:library_scm",(void*)f_9414},
-{"f_9364:library_scm",(void*)f_9364},
-{"f_9371:library_scm",(void*)f_9371},
-{"f_9361:library_scm",(void*)f_9361},
-{"f_9358:library_scm",(void*)f_9358},
-{"f_9355:library_scm",(void*)f_9355},
-{"f_9352:library_scm",(void*)f_9352},
-{"f_9327:library_scm",(void*)f_9327},
-{"f_9331:library_scm",(void*)f_9331},
-{"f_9334:library_scm",(void*)f_9334},
-{"f_9315:library_scm",(void*)f_9315},
-{"f_9319:library_scm",(void*)f_9319},
-{"f_9325:library_scm",(void*)f_9325},
-{"f_9303:library_scm",(void*)f_9303},
-{"f_9313:library_scm",(void*)f_9313},
-{"f_9294:library_scm",(void*)f_9294},
-{"f_9298:library_scm",(void*)f_9298},
-{"f_9288:library_scm",(void*)f_9288},
-{"f_9279:library_scm",(void*)f_9279},
-{"f_9273:library_scm",(void*)f_9273},
-{"f_9277:library_scm",(void*)f_9277},
-{"f_9233:library_scm",(void*)f_9233},
-{"f_9218:library_scm",(void*)f_9218},
-{"f_9225:library_scm",(void*)f_9225},
-{"f_9197:library_scm",(void*)f_9197},
-{"f_9212:library_scm",(void*)f_9212},
-{"f_9208:library_scm",(void*)f_9208},
-{"f_9177:library_scm",(void*)f_9177},
-{"f_9123:library_scm",(void*)f_9123},
-{"f_9157:library_scm",(void*)f_9157},
-{"f23892:library_scm",(void*)f23892},
-{"f23888:library_scm",(void*)f23888},
-{"f_9144:library_scm",(void*)f_9144},
-{"f_9148:library_scm",(void*)f_9148},
-{"f_9140:library_scm",(void*)f_9140},
-{"f_9110:library_scm",(void*)f_9110},
-{"f_9121:library_scm",(void*)f_9121},
-{"f_9097:library_scm",(void*)f_9097},
-{"f_9108:library_scm",(void*)f_9108},
-{"f_9084:library_scm",(void*)f_9084},
-{"f_9095:library_scm",(void*)f_9095},
-{"f_9071:library_scm",(void*)f_9071},
-{"f_9079:library_scm",(void*)f_9079},
-{"f_9048:library_scm",(void*)f_9048},
-{"f_9030:library_scm",(void*)f_9030},
-{"f_9004:library_scm",(void*)f_9004},
-{"f_9024:library_scm",(void*)f_9024},
-{"f_9028:library_scm",(void*)f_9028},
-{"f_8986:library_scm",(void*)f_8986},
-{"f_8959:library_scm",(void*)f_8959},
-{"f_8947:library_scm",(void*)f_8947},
-{"f_8944:library_scm",(void*)f_8944},
-{"f_8939:library_scm",(void*)f_8939},
-{"f_8907:library_scm",(void*)f_8907},
-{"f_8911:library_scm",(void*)f_8911},
-{"f_8842:library_scm",(void*)f_8842},
-{"f_8854:library_scm",(void*)f_8854},
-{"f_8864:library_scm",(void*)f_8864},
-{"f_8879:library_scm",(void*)f_8879},
-{"f_8890:library_scm",(void*)f_8890},
-{"f_8828:library_scm",(void*)f_8828},
-{"f_8840:library_scm",(void*)f_8840},
-{"f_8771:library_scm",(void*)f_8771},
-{"f_8783:library_scm",(void*)f_8783},
-{"f_8793:library_scm",(void*)f_8793},
-{"f_8808:library_scm",(void*)f_8808},
-{"f_8819:library_scm",(void*)f_8819},
-{"f_8746:library_scm",(void*)f_8746},
-{"f_8752:library_scm",(void*)f_8752},
-{"f_8769:library_scm",(void*)f_8769},
-{"f_8734:library_scm",(void*)f_8734},
-{"f_8731:library_scm",(void*)f_8731},
-{"f_8728:library_scm",(void*)f_8728},
-{"f_8725:library_scm",(void*)f_8725},
-{"f_8722:library_scm",(void*)f_8722},
-{"f_8719:library_scm",(void*)f_8719},
-{"f_8716:library_scm",(void*)f_8716},
-{"f_8713:library_scm",(void*)f_8713},
-{"f_8710:library_scm",(void*)f_8710},
-{"f_8704:library_scm",(void*)f_8704},
-{"f_8698:library_scm",(void*)f_8698},
-{"f_8651:library_scm",(void*)f_8651},
-{"f_8657:library_scm",(void*)f_8657},
-{"f_8681:library_scm",(void*)f_8681},
-{"f_8674:library_scm",(void*)f_8674},
-{"f_8646:library_scm",(void*)f_8646},
-{"f_8643:library_scm",(void*)f_8643},
-{"f_8614:library_scm",(void*)f_8614},
-{"f_8635:library_scm",(void*)f_8635},
-{"f_8600:library_scm",(void*)f_8600},
-{"f_8612:library_scm",(void*)f_8612},
-{"f_8591:library_scm",(void*)f_8591},
-{"f_8579:library_scm",(void*)f_8579},
-{"f_8567:library_scm",(void*)f_8567},
-{"f_8555:library_scm",(void*)f_8555},
-{"f_8551:library_scm",(void*)f_8551},
-{"f_8516:library_scm",(void*)f_8516},
-{"f_8547:library_scm",(void*)f_8547},
-{"f_8541:library_scm",(void*)f_8541},
-{"f_8529:library_scm",(void*)f_8529},
-{"f_8503:library_scm",(void*)f_8503},
-{"f_8491:library_scm",(void*)f_8491},
-{"f_8485:library_scm",(void*)f_8485},
-{"f_8479:library_scm",(void*)f_8479},
-{"f_8460:library_scm",(void*)f_8460},
-{"f_8457:library_scm",(void*)f_8457},
-{"f_8454:library_scm",(void*)f_8454},
-{"f_8451:library_scm",(void*)f_8451},
-{"f_8448:library_scm",(void*)f_8448},
-{"f_8445:library_scm",(void*)f_8445},
-{"f_8442:library_scm",(void*)f_8442},
-{"f_8439:library_scm",(void*)f_8439},
-{"f_8436:library_scm",(void*)f_8436},
-{"f_8430:library_scm",(void*)f_8430},
-{"f_8427:library_scm",(void*)f_8427},
-{"f_8423:library_scm",(void*)f_8423},
-{"f_8419:library_scm",(void*)f_8419},
-{"f_8413:library_scm",(void*)f_8413},
-{"f_8406:library_scm",(void*)f_8406},
-{"f_8400:library_scm",(void*)f_8400},
-{"f_8374:library_scm",(void*)f_8374},
-{"f_8389:library_scm",(void*)f_8389},
-{"f_8357:library_scm",(void*)f_8357},
-{"f_8372:library_scm",(void*)f_8372},
-{"f_8340:library_scm",(void*)f_8340},
-{"f_8355:library_scm",(void*)f_8355},
-{"f_8323:library_scm",(void*)f_8323},
-{"f_8338:library_scm",(void*)f_8338},
-{"f_8300:library_scm",(void*)f_8300},
-{"f_8321:library_scm",(void*)f_8321},
-{"f_8283:library_scm",(void*)f_8283},
-{"f_8298:library_scm",(void*)f_8298},
-{"f_8260:library_scm",(void*)f_8260},
-{"f_8281:library_scm",(void*)f_8281},
-{"f_8243:library_scm",(void*)f_8243},
-{"f_8258:library_scm",(void*)f_8258},
-{"f_8226:library_scm",(void*)f_8226},
-{"f_8241:library_scm",(void*)f_8241},
-{"f_8209:library_scm",(void*)f_8209},
-{"f_8224:library_scm",(void*)f_8224},
-{"f_8192:library_scm",(void*)f_8192},
-{"f_8207:library_scm",(void*)f_8207},
-{"f_8175:library_scm",(void*)f_8175},
-{"f_8190:library_scm",(void*)f_8190},
-{"f_8158:library_scm",(void*)f_8158},
-{"f_8173:library_scm",(void*)f_8173},
-{"f_8137:library_scm",(void*)f_8137},
-{"f_8152:library_scm",(void*)f_8152},
-{"f_8120:library_scm",(void*)f_8120},
-{"f_8135:library_scm",(void*)f_8135},
-{"f_8103:library_scm",(void*)f_8103},
-{"f_8118:library_scm",(void*)f_8118},
-{"f_8086:library_scm",(void*)f_8086},
-{"f_8101:library_scm",(void*)f_8101},
-{"f_8063:library_scm",(void*)f_8063},
-{"f_8084:library_scm",(void*)f_8084},
-{"f_8040:library_scm",(void*)f_8040},
-{"f_8061:library_scm",(void*)f_8061},
-{"f_8023:library_scm",(void*)f_8023},
-{"f_8038:library_scm",(void*)f_8038},
-{"f_8000:library_scm",(void*)f_8000},
-{"f_8021:library_scm",(void*)f_8021},
-{"f_7977:library_scm",(void*)f_7977},
-{"f_7998:library_scm",(void*)f_7998},
-{"f_7954:library_scm",(void*)f_7954},
-{"f_7975:library_scm",(void*)f_7975},
-{"f_7931:library_scm",(void*)f_7931},
-{"f_7952:library_scm",(void*)f_7952},
-{"f_7908:library_scm",(void*)f_7908},
-{"f_7929:library_scm",(void*)f_7929},
-{"f_7885:library_scm",(void*)f_7885},
-{"f_7906:library_scm",(void*)f_7906},
-{"f_7862:library_scm",(void*)f_7862},
-{"f_7883:library_scm",(void*)f_7883},
-{"f_7839:library_scm",(void*)f_7839},
-{"f_7860:library_scm",(void*)f_7860},
-{"f_7816:library_scm",(void*)f_7816},
-{"f_7837:library_scm",(void*)f_7837},
-{"f_7810:library_scm",(void*)f_7810},
-{"f_7807:library_scm",(void*)f_7807},
-{"f_7780:library_scm",(void*)f_7780},
-{"f_7795:library_scm",(void*)f_7795},
-{"f_7763:library_scm",(void*)f_7763},
-{"f_7778:library_scm",(void*)f_7778},
-{"f_7760:library_scm",(void*)f_7760},
-{"f_7757:library_scm",(void*)f_7757},
-{"f_7754:library_scm",(void*)f_7754},
-{"f_7751:library_scm",(void*)f_7751},
-{"f_7748:library_scm",(void*)f_7748},
-{"f_7745:library_scm",(void*)f_7745},
-{"f_7742:library_scm",(void*)f_7742},
-{"f_7739:library_scm",(void*)f_7739},
-{"f_7736:library_scm",(void*)f_7736},
-{"f_7733:library_scm",(void*)f_7733},
-{"f_7730:library_scm",(void*)f_7730},
-{"f_7727:library_scm",(void*)f_7727},
-{"f_7724:library_scm",(void*)f_7724},
-{"f_7718:library_scm",(void*)f_7718},
-{"f_7715:library_scm",(void*)f_7715},
-{"f_7712:library_scm",(void*)f_7712},
-{"f_7709:library_scm",(void*)f_7709},
-{"f_7706:library_scm",(void*)f_7706},
-{"f_7667:library_scm",(void*)f_7667},
-{"f_7671:library_scm",(void*)f_7671},
-{"f_7676:library_scm",(void*)f_7676},
-{"f_7661:library_scm",(void*)f_7661},
-{"f_7622:library_scm",(void*)f_7622},
-{"f_7628:library_scm",(void*)f_7628},
-{"f_7651:library_scm",(void*)f_7651},
-{"f_7639:library_scm",(void*)f_7639},
-{"f_7626:library_scm",(void*)f_7626},
-{"f_7606:library_scm",(void*)f_7606},
-{"f_7616:library_scm",(void*)f_7616},
-{"f_7585:library_scm",(void*)f_7585},
-{"f_7591:library_scm",(void*)f_7591},
-{"f_7564:library_scm",(void*)f_7564},
-{"f_7570:library_scm",(void*)f_7570},
-{"f_7540:library_scm",(void*)f_7540},
-{"f_7546:library_scm",(void*)f_7546},
-{"f_7516:library_scm",(void*)f_7516},
-{"f_7522:library_scm",(void*)f_7522},
-{"f_7496:library_scm",(void*)f_7496},
-{"f_7475:library_scm",(void*)f_7475},
-{"f_7481:library_scm",(void*)f_7481},
-{"f_7454:library_scm",(void*)f_7454},
-{"f_7460:library_scm",(void*)f_7460},
-{"f_7430:library_scm",(void*)f_7430},
-{"f_7436:library_scm",(void*)f_7436},
-{"f_7406:library_scm",(void*)f_7406},
-{"f_7412:library_scm",(void*)f_7412},
-{"f_7386:library_scm",(void*)f_7386},
-{"f_7383:library_scm",(void*)f_7383},
-{"f_7380:library_scm",(void*)f_7380},
-{"f_7370:library_scm",(void*)f_7370},
-{"f_7374:library_scm",(void*)f_7374},
-{"f_7319:library_scm",(void*)f_7319},
-{"f_7329:library_scm",(void*)f_7329},
-{"f_7338:library_scm",(void*)f_7338},
-{"f_7307:library_scm",(void*)f_7307},
-{"f_7317:library_scm",(void*)f_7317},
-{"f_7294:library_scm",(void*)f_7294},
-{"f_7242:library_scm",(void*)f_7242},
-{"f_7255:library_scm",(void*)f_7255},
-{"f_7264:library_scm",(void*)f_7264},
-{"f_7190:library_scm",(void*)f_7190},
-{"f_7206:library_scm",(void*)f_7206},
-{"f_7211:library_scm",(void*)f_7211},
-{"f_7160:library_scm",(void*)f_7160},
-{"f_7169:library_scm",(void*)f_7169},
-{"f_7183:library_scm",(void*)f_7183},
-{"f_7124:library_scm",(void*)f_7124},
-{"f_7131:library_scm",(void*)f_7131},
-{"f_7091:library_scm",(void*)f_7091},
-{"f_7095:library_scm",(void*)f_7095},
-{"f_7088:library_scm",(void*)f_7088},
-{"f_7085:library_scm",(void*)f_7085},
-{"f_7082:library_scm",(void*)f_7082},
-{"f_7079:library_scm",(void*)f_7079},
-{"f_7076:library_scm",(void*)f_7076},
-{"f_7073:library_scm",(void*)f_7073},
-{"f_7070:library_scm",(void*)f_7070},
-{"f_7067:library_scm",(void*)f_7067},
-{"f_7064:library_scm",(void*)f_7064},
-{"f_7061:library_scm",(void*)f_7061},
-{"f_7058:library_scm",(void*)f_7058},
-{"f_7019:library_scm",(void*)f_7019},
-{"f_7025:library_scm",(void*)f_7025},
-{"f_6940:library_scm",(void*)f_6940},
-{"f_6952:library_scm",(void*)f_6952},
-{"f_6971:library_scm",(void*)f_6971},
-{"f_7002:library_scm",(void*)f_7002},
-{"f_6923:library_scm",(void*)f_6923},
-{"f_6880:library_scm",(void*)f_6880},
-{"f_6886:library_scm",(void*)f_6886},
-{"f_6913:library_scm",(void*)f_6913},
-{"f_6877:library_scm",(void*)f_6877},
-{"f_6874:library_scm",(void*)f_6874},
-{"f_6871:library_scm",(void*)f_6871},
-{"f_6868:library_scm",(void*)f_6868},
-{"f_6862:library_scm",(void*)f_6862},
-{"f_6844:library_scm",(void*)f_6844},
-{"f_6834:library_scm",(void*)f_6834},
-{"f_6816:library_scm",(void*)f_6816},
-{"f_6810:library_scm",(void*)f_6810},
-{"f_6799:library_scm",(void*)f_6799},
-{"f_6789:library_scm",(void*)f_6789},
-{"f_6771:library_scm",(void*)f_6771},
-{"f_6764:library_scm",(void*)f_6764},
-{"f_6761:library_scm",(void*)f_6761},
-{"f_6750:library_scm",(void*)f_6750},
-{"f_6744:library_scm",(void*)f_6744},
-{"f_6733:library_scm",(void*)f_6733},
-{"f_6723:library_scm",(void*)f_6723},
-{"f_6705:library_scm",(void*)f_6705},
-{"f_6691:library_scm",(void*)f_6691},
-{"f_6677:library_scm",(void*)f_6677},
-{"f_6671:library_scm",(void*)f_6671},
-{"f_6657:library_scm",(void*)f_6657},
-{"f_6650:library_scm",(void*)f_6650},
-{"f_6644:library_scm",(void*)f_6644},
-{"f_6630:library_scm",(void*)f_6630},
-{"f_6620:library_scm",(void*)f_6620},
-{"f_6610:library_scm",(void*)f_6610},
-{"f_6600:library_scm",(void*)f_6600},
-{"f_6597:library_scm",(void*)f_6597},
-{"f_6594:library_scm",(void*)f_6594},
-{"f_6591:library_scm",(void*)f_6591},
-{"f_6588:library_scm",(void*)f_6588},
-{"f_6585:library_scm",(void*)f_6585},
-{"f_6582:library_scm",(void*)f_6582},
-{"f_6579:library_scm",(void*)f_6579},
-{"f_6576:library_scm",(void*)f_6576},
-{"f_6573:library_scm",(void*)f_6573},
-{"f_6570:library_scm",(void*)f_6570},
-{"f_6567:library_scm",(void*)f_6567},
-{"f_6564:library_scm",(void*)f_6564},
-{"f_6561:library_scm",(void*)f_6561},
-{"f_6558:library_scm",(void*)f_6558},
-{"f_6555:library_scm",(void*)f_6555},
-{"f_6542:library_scm",(void*)f_6542},
-{"f_6547:library_scm",(void*)f_6547},
-{"f_6553:library_scm",(void*)f_6553},
-{"f_6522:library_scm",(void*)f_6522},
-{"f_6535:library_scm",(void*)f_6535},
-{"f_6506:library_scm",(void*)f_6506},
-{"f_6493:library_scm",(void*)f_6493},
-{"f_6471:library_scm",(void*)f_6471},
-{"f_6440:library_scm",(void*)f_6440},
-{"f_6421:library_scm",(void*)f_6421},
-{"f_6408:library_scm",(void*)f_6408},
-{"f_6395:library_scm",(void*)f_6395},
-{"f_6382:library_scm",(void*)f_6382},
-{"f_6369:library_scm",(void*)f_6369},
-{"f_6356:library_scm",(void*)f_6356},
-{"f_6343:library_scm",(void*)f_6343},
-{"f_6330:library_scm",(void*)f_6330},
-{"f_6317:library_scm",(void*)f_6317},
-{"f_6304:library_scm",(void*)f_6304},
-{"f_6290:library_scm",(void*)f_6290},
-{"f_6277:library_scm",(void*)f_6277},
-{"f_6274:library_scm",(void*)f_6274},
-{"f_6240:library_scm",(void*)f_6240},
-{"f_6244:library_scm",(void*)f_6244},
-{"f_6247:library_scm",(void*)f_6247},
-{"f_6231:library_scm",(void*)f_6231},
-{"f_6227:library_scm",(void*)f_6227},
-{"f_6224:library_scm",(void*)f_6224},
-{"f_6219:library_scm",(void*)f_6219},
-{"f_6216:library_scm",(void*)f_6216},
-{"f_6213:library_scm",(void*)f_6213},
-{"f_6210:library_scm",(void*)f_6210},
-{"f_6204:library_scm",(void*)f_6204},
-{"f_6200:library_scm",(void*)f_6200},
-{"f_6190:library_scm",(void*)f_6190},
-{"f_6184:library_scm",(void*)f_6184},
-{"f_6176:library_scm",(void*)f_6176},
-{"f_6168:library_scm",(void*)f_6168},
-{"f_6163:library_scm",(void*)f_6163},
-{"f_6160:library_scm",(void*)f_6160},
-{"f_6156:library_scm",(void*)f_6156},
-{"f_6141:library_scm",(void*)f_6141},
-{"f_6132:library_scm",(void*)f_6132},
-{"f_6116:library_scm",(void*)f_6116},
-{"f_6107:library_scm",(void*)f_6107},
-{"f_6111:library_scm",(void*)f_6111},
-{"f_6097:library_scm",(void*)f_6097},
-{"f_6105:library_scm",(void*)f_6105},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/lolevel.c b/bootstrap/lolevel.c
deleted file mode 100644
index d91252c8..00000000
--- a/bootstrap/lolevel.c
+++ /dev/null
@@ -1,5992 +0,0 @@
-/* Generated from lolevel.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-22 11:31
- Version 4.3.5
- windows-mingw32-x86 [ manyargs dload ptables ]
- compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
- command line: lolevel.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file lolevel.c
- unit: lolevel
-*/
-
-#include "chicken.h"
-
-#if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__)
-# include <sys/types.h>
-#endif
-#ifndef C_NONUNIX
-# include <sys/mman.h>
-#endif
-
-#define C_w2b(x) C_fix(C_wordstobytes(C_unfix(x)))
-#define C_pointer_eqp(x, y) C_mk_bool(C_c_pointer_nn(x) == C_c_pointer_nn(y))
-#define C_memmove_o(to, from, n, toff, foff) C_memmove((char *)(to) + (toff), (char *)(from) + (foff), (n))
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_srfi_69_toplevel)
-C_externimport void C_ccall C_srfi_69_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[131];
-static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,99,104,101,99,107,45,98,108,111,99,107,32,120,49,53,32,108,111,99,49,54,41,0,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,99,104,101,99,107,45,103,101,110,101,114,105,99,45,115,116,114,117,99,116,117,114,101,32,120,52,54,32,108,111,99,52,55,41,0,0,0,0,0,0,0};
-static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,99,104,101,99,107,45,112,111,105,110,116,101,114,32,120,55,53,32,46,32,108,111,99,55,54,41,0,0,0,0,0,0,0};
-static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,10),40,110,111,115,105,122,101,114,114,41,0,0,0,0,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,16),40,115,105,122,101,114,114,32,97,114,103,115,49,57,53,41};
-static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,29),40,99,104,101,99,107,110,49,32,110,49,57,54,32,110,109,97,120,49,57,55,32,111,102,102,49,57,56,41,0,0,0};
-static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,47),40,99,104,101,99,107,110,50,32,110,50,48,51,32,110,109,97,120,50,48,52,32,110,109,97,120,50,50,48,53,32,111,102,102,49,50,48,54,32,111,102,102,50,50,48,55,41,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,20),40,109,111,118,101,32,102,114,111,109,50,50,55,32,116,111,50,50,56,41,0,0,0,0};
-static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,36),40,98,111,100,121,49,55,56,32,110,49,56,56,32,102,111,102,102,115,101,116,49,56,57,32,116,111,102,102,115,101,116,49,57,48,41,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,40),40,100,101,102,45,116,111,102,102,115,101,116,49,56,50,32,37,110,49,55,53,51,50,54,32,37,102,111,102,102,115,101,116,49,55,54,51,50,55,41};
-static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,102,111,102,102,115,101,116,49,56,49,32,37,110,49,55,53,51,50,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,10),40,100,101,102,45,110,49,56,48,41,0,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,40),40,109,111,118,101,45,109,101,109,111,114,121,33,32,102,114,111,109,49,54,57,32,116,111,49,55,48,32,46,32,116,109,112,49,54,56,49,55,49,41};
-static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,51,53,57,32,105,51,54,51,41};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,11),40,99,111,112,121,32,120,51,52,49,41,0,0,0,0,0};
-static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,18),40,111,98,106,101,99,116,45,99,111,112,121,32,120,51,51,57,41,0,0,0,0,0,0};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,18),40,97,108,108,111,99,97,116,101,32,97,51,54,56,51,55,49,41,0,0,0,0,0,0};
-static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,14),40,102,114,101,101,32,97,51,55,51,51,55,55,41,0,0};
-static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,15),40,112,111,105,110,116,101,114,63,32,120,51,56,48,41,0};
-static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,20),40,112,111,105,110,116,101,114,45,108,105,107,101,63,32,120,51,56,53,41,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,26),40,97,100,100,114,101,115,115,45,62,112,111,105,110,116,101,114,32,97,100,100,114,51,57,50,41,0,0,0,0,0,0};
-static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,25),40,112,111,105,110,116,101,114,45,62,97,100,100,114,101,115,115,32,112,116,114,51,57,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,22),40,110,117,108,108,45,112,111,105,110,116,101,114,63,32,112,116,114,51,57,56,41,0,0};
-static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,22),40,111,98,106,101,99,116,45,62,112,111,105,110,116,101,114,32,120,52,48,49,41,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,24),40,112,111,105,110,116,101,114,45,62,111,98,106,101,99,116,32,112,116,114,52,49,50,41};
-static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,23),40,112,111,105,110,116,101,114,61,63,32,112,49,52,49,53,32,112,50,52,49,54,41,0};
-static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,26),40,112,111,105,110,116,101,114,43,32,97,52,50,48,52,50,52,32,97,52,49,57,52,50,53,41,0,0,0,0,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,20),40,97,108,105,103,110,45,116,111,45,119,111,114,100,32,120,52,51,52,41,0,0,0,0};
-static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,27),40,116,97,103,45,112,111,105,110,116,101,114,32,112,116,114,52,52,55,32,116,97,103,52,52,56,41,0,0,0,0,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,34),40,116,97,103,103,101,100,45,112,111,105,110,116,101,114,63,32,120,52,54,53,32,46,32,116,109,112,52,54,52,52,54,54,41,0,0,0,0,0,0};
-static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,18),40,112,111,105,110,116,101,114,45,116,97,103,32,120,52,56,50,41,0,0,0,0,0,0};
-static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,108,111,99,97,116,105,118,101,32,111,98,106,52,57,51,32,46,32,105,110,100,101,120,52,57,52,41,0,0,0,0,0,0,0};
-static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,38),40,109,97,107,101,45,119,101,97,107,45,108,111,99,97,116,105,118,101,32,111,98,106,53,48,48,32,46,32,105,110,100,101,120,53,48,49,41,0,0};
-static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,25),40,108,111,99,97,116,105,118,101,45,115,101,116,33,32,120,53,48,55,32,121,53,48,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,23),40,108,111,99,97,116,105,118,101,45,62,111,98,106,101,99,116,32,120,53,49,48,41,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,16),40,108,111,99,97,116,105,118,101,63,32,120,53,49,50,41};
-static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,33),40,112,111,105,110,116,101,114,45,117,56,45,115,101,116,33,32,97,53,49,54,53,50,48,32,97,53,49,53,53,50,49,41,0,0,0,0,0,0,0};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,33),40,112,111,105,110,116,101,114,45,115,56,45,115,101,116,33,32,97,53,50,52,53,50,56,32,97,53,50,51,53,50,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,117,49,54,45,115,101,116,33,32,97,53,51,50,53,51,54,32,97,53,51,49,53,51,55,41,0,0,0,0,0,0};
-static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,115,49,54,45,115,101,116,33,32,97,53,52,48,53,52,52,32,97,53,51,57,53,52,53,41,0,0,0,0,0,0};
-static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,117,51,50,45,115,101,116,33,32,97,53,52,56,53,53,50,32,97,53,52,55,53,53,51,41,0,0,0,0,0,0};
-static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,115,51,50,45,115,101,116,33,32,97,53,53,54,53,54,48,32,97,53,53,53,53,54,49,41,0,0,0,0,0,0};
-static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,102,51,50,45,115,101,116,33,32,97,53,54,52,53,54,56,32,97,53,54,51,53,54,57,41,0,0,0,0,0,0};
-static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,34),40,112,111,105,110,116,101,114,45,102,54,52,45,115,101,116,33,32,97,53,55,50,53,55,54,32,97,53,55,49,53,55,55,41,0,0,0,0,0,0};
-static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,12),40,97,50,50,55,51,32,120,54,51,52,41,0,0,0,0};
-static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,17),40,97,50,50,56,57,32,120,54,51,55,32,105,54,51,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,34),40,101,120,116,101,110,100,45,112,114,111,99,101,100,117,114,101,32,112,114,111,99,54,51,50,32,100,97,116,97,54,51,51,41,0,0,0,0,0,0};
-static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,12),40,97,50,51,49,54,32,120,54,53,51,41,0,0,0,0};
-static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,26),40,101,120,116,101,110,100,101,100,45,112,114,111,99,101,100,117,114,101,63,32,120,54,52,51,41,0,0,0,0,0,0};
-static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,12),40,97,50,51,52,57,32,120,54,54,57,41,0,0,0,0};
-static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,21),40,112,114,111,99,101,100,117,114,101,45,100,97,116,97,32,120,54,53,55,41,0,0,0};
-static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,34),40,115,101,116,45,112,114,111,99,101,100,117,114,101,45,100,97,116,97,33,32,112,114,111,99,54,55,51,32,120,54,55,52,41,0,0,0,0,0,0};
-static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,22),40,110,117,109,98,101,114,45,111,102,45,115,108,111,116,115,32,120,54,55,55,41,0,0};
-static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,22),40,110,117,109,98,101,114,45,111,102,45,98,121,116,101,115,32,120,54,56,48,41,0,0};
-static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,40),40,109,97,107,101,45,114,101,99,111,114,100,45,105,110,115,116,97,110,99,101,32,116,121,112,101,54,56,56,32,46,32,97,114,103,115,54,56,57,41};
-static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,35),40,114,101,99,111,114,100,45,105,110,115,116,97,110,99,101,63,32,120,54,57,56,32,46,32,116,109,112,54,57,55,54,57,57,41,0,0,0,0,0};
-static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,27),40,114,101,99,111,114,100,45,105,110,115,116,97,110,99,101,45,116,121,112,101,32,120,55,49,56,41,0,0,0,0,0};
-static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,29),40,114,101,99,111,114,100,45,105,110,115,116,97,110,99,101,45,108,101,110,103,116,104,32,120,55,50,49,41,0,0,0};
-static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,42),40,114,101,99,111,114,100,45,105,110,115,116,97,110,99,101,45,115,108,111,116,45,115,101,116,33,32,120,55,50,52,32,105,55,50,53,32,121,55,50,54,41,0,0,0,0,0,0};
-static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,11),40,100,111,108,111,111,112,55,51,56,41,0,0,0,0,0};
-static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,21),40,114,101,99,111,114,100,45,62,118,101,99,116,111,114,32,120,55,51,52,41,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,22),40,111,98,106,101,99,116,45,101,118,105,99,116,101,100,63,32,120,55,52,55,41,0,0};
-static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,16),40,102,95,50,54,56,54,32,97,55,53,51,55,53,54,41};
-static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,55,55,57,32,105,55,56,51,41};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,55,53,57,41,0,0,0,0};
-static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,34),40,111,98,106,101,99,116,45,101,118,105,99,116,32,120,55,52,57,32,46,32,97,108,108,111,99,97,116,111,114,55,53,48,41,0,0,0,0,0,0};
-static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,56,51,57,32,105,56,52,51,41};
-static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,56,49,52,41,0,0,0,0};
-static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,49),40,111,98,106,101,99,116,45,101,118,105,99,116,45,116,111,45,108,111,99,97,116,105,111,110,32,120,55,57,55,32,112,116,114,55,57,56,32,46,32,108,105,109,105,116,55,57,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,16),40,102,95,50,57,51,57,32,97,56,54,51,56,54,55,41};
-static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,56,56,48,32,105,56,56,52,41};
-static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,14),40,114,101,108,101,97,115,101,32,120,56,55,48,41,0,0};
-static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,35),40,111,98,106,101,99,116,45,114,101,108,101,97,115,101,32,120,56,53,57,32,46,32,114,101,108,101,97,115,101,114,56,54,48,41,0,0,0,0,0};
-static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,57,48,54,32,105,57,49,48,41};
-static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,56,57,52,41,0,0,0,0};
-static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,18),40,111,98,106,101,99,116,45,115,105,122,101,32,120,56,57,49,41,0,0,0,0,0,0};
-static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,57,53,54,32,105,57,54,48,41};
-static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,11),40,99,111,112,121,32,120,57,51,55,41,0,0,0,0,0};
-static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,33),40,111,98,106,101,99,116,45,117,110,101,118,105,99,116,32,120,57,50,56,32,46,32,116,109,112,57,50,55,57,50,57,41,0,0,0,0,0,0,0};
-static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,108,115,116,50,55,41,0,0,0,0};
-static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,24),40,111,98,106,101,99,116,45,98,101,99,111,109,101,33,32,97,108,115,116,57,54,55,41};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,33),40,109,117,116,97,116,101,45,112,114,111,99,101,100,117,114,101,32,111,108,100,57,55,52,32,112,114,111,99,57,55,53,41,0,0,0,0,0,0,0};
-static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,19),40,103,108,111,98,97,108,45,114,101,102,32,115,121,109,57,56,52,41,0,0,0,0,0};
-static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,25),40,103,108,111,98,97,108,45,115,101,116,33,32,115,121,109,57,56,55,32,120,57,56,56,41,0,0,0,0,0,0,0};
-static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,22),40,103,108,111,98,97,108,45,98,111,117,110,100,63,32,115,121,109,57,57,49,41,0,0};
-static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,29),40,103,108,111,98,97,108,45,109,97,107,101,45,117,110,98,111,117,110,100,33,32,115,121,109,57,57,52,41,0,0,0};
-static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,17),40,97,51,50,51,56,32,120,55,50,57,32,105,55,51,48,41,0,0,0,0,0,0,0};
-static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,15),40,97,51,50,54,50,32,97,54,50,52,54,50,56,41,0};
-static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,15),40,97,51,50,55,50,32,97,54,49,55,54,50,49,41,0};
-static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,15),40,97,51,50,56,50,32,97,54,49,48,54,49,52,41,0};
-static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,15),40,97,51,50,57,50,32,97,54,48,51,54,48,55,41,0};
-static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,15),40,97,51,51,48,50,32,97,53,57,55,54,48,49,41,0};
-static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,15),40,97,51,51,49,50,32,97,53,57,49,53,57,53,41,0};
-static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,15),40,97,51,51,50,50,32,97,53,56,53,53,56,57,41,0};
-static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,15),40,97,51,51,51,50,32,97,53,55,57,53,56,51,41,0};
-static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,14),67,95,108,111,99,97,116,105,118,101,95,114,101,102,0,0};
-static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
-
-
-/* from k2942 */
-static C_word C_fcall stub864(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub864(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-C_free(t0);
-return C_r;}
-
-/* from k2689 */
-static C_word C_fcall stub754(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub754(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-int t0=(int )C_unfix(C_a0);
-C_r=C_mpointer_or_false(&C_a,(void*)C_malloc(t0));
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_flonum(&C_a,(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub625(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub625(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((double *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_flonum(&C_a,(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub618(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub618(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((float *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_int_to_num(&C_a,(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub611(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub611(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((C_s32 *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_int_to_num(&C_a,(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub604(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub604(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((C_u32 *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub598(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub598(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((short *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub592(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub592(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((unsigned short *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub586(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub586(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((signed char *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub580(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub580(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-return(*((unsigned char *)p));
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub573(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub573(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-float n=(float )C_c_double(C_a1);
-*((double *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub565(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub565(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-double n=(double )C_c_double(C_a1);
-*((float *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub557(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub557(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((C_s32 *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub549(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub549(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((C_u32 *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub541(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub541(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((short *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub533(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub533(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((unsigned short *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub525(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub525(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((char *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub517(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub517(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * p=(void * )C_c_pointer_or_null(C_a0);
-int n=(int )C_unfix(C_a1);
-*((unsigned char *)p) = n;
-C_ret:
-#undef return
-
-return C_r;}
-
-/* from k1916 */
-static C_word C_fcall stub430(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub430(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-int t0=(int )C_num_to_int(C_a0);
-C_r=C_int_to_num(&C_a,C_align(t0));
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub421(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
-C_regparm static C_word C_fcall stub421(C_word C_buf,C_word C_a0,C_word C_a1){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * ptr=(void * )C_c_pointer_or_null(C_a0);
-int off=(int )C_num_to_int(C_a1);
-return((unsigned char *)ptr + off);
-C_ret:
-#undef return
-
-return C_r;}
-
-#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
-static C_word C_fcall stub407(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub407(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-C_word x=(C_word )(C_a0);
-return((void *)x);
-C_ret:
-#undef return
-
-return C_r;}
-
-/* from k1814 */
-static C_word C_fcall stub374(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub374(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-C_free(t0);
-return C_r;}
-
-/* from k1807 */
-static C_word C_fcall stub369(C_word C_buf,C_word C_a0) C_regparm;
-C_regparm static C_word C_fcall stub369(C_word C_buf,C_word C_a0){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-int t0=(int )C_unfix(C_a0);
-C_r=C_mpointer_or_false(&C_a,(void*)C_malloc(t0));
-return C_r;}
-
-/* from k1346 */
-static C_word C_fcall stub149(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4) C_regparm;
-C_regparm static C_word C_fcall stub149(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_data_pointer_or_null(C_a0);
-void * t1=(void * )C_data_pointer_or_null(C_a1);
-int t2=(int )C_unfix(C_a2);
-int t3=(int )C_unfix(C_a3);
-int t4=(int )C_unfix(C_a4);
-C_memmove_o(t0,t1,t2,t3,t4);
-return C_r;}
-
-/* from k1318 */
-static C_word C_fcall stub133(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4) C_regparm;
-C_regparm static C_word C_fcall stub133(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_data_pointer_or_null(C_a0);
-void * t1=(void * )C_c_pointer_or_null(C_a1);
-int t2=(int )C_unfix(C_a2);
-int t3=(int )C_unfix(C_a3);
-int t4=(int )C_unfix(C_a4);
-C_memmove_o(t0,t1,t2,t3,t4);
-return C_r;}
-
-/* from k1290 */
-static C_word C_fcall stub117(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4) C_regparm;
-C_regparm static C_word C_fcall stub117(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-void * t1=(void * )C_data_pointer_or_null(C_a1);
-int t2=(int )C_unfix(C_a2);
-int t3=(int )C_unfix(C_a3);
-int t4=(int )C_unfix(C_a4);
-C_memmove_o(t0,t1,t2,t3,t4);
-return C_r;}
-
-/* from k1262 */
-static C_word C_fcall stub101(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4) C_regparm;
-C_regparm static C_word C_fcall stub101(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4){
-C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
-void * t0=(void * )C_c_pointer_or_null(C_a0);
-void * t1=(void * )C_c_pointer_or_null(C_a1);
-int t2=(int )C_unfix(C_a2);
-int t3=(int )C_unfix(C_a3);
-int t4=(int )C_unfix(C_a4);
-C_memmove_o(t0,t1,t2,t3,t4);
-return C_r;}
-
-C_noret_decl(C_lolevel_toplevel)
-C_externexport void C_ccall C_lolevel_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1080)
-static void C_ccall f_1080(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1083)
-static void C_ccall f_1083(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2106)
-static void C_ccall f_2106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3333)
-static void C_ccall f_3333(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2231)
-static void C_ccall f_2231(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3323)
-static void C_ccall f_3323(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2235)
-static void C_ccall f_2235(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3313)
-static void C_ccall f_3313(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2239)
-static void C_ccall f_2239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3303)
-static void C_ccall f_3303(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2243)
-static void C_ccall f_2243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3293)
-static void C_ccall f_3293(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2247)
-static void C_ccall f_2247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3283)
-static void C_ccall f_3283(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2251)
-static void C_ccall f_2251(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3273)
-static void C_ccall f_3273(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2255)
-static void C_ccall f_2255(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3263)
-static void C_ccall f_3263(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2259)
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2393)
-static void C_ccall f_2393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3239)
-static void C_ccall f_3239(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3243)
-static void C_ccall f_3243(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3246)
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2532)
-static void C_ccall f_2532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3226)
-static void C_ccall f_3226(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3217)
-static void C_ccall f_3217(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3208)
-static void C_ccall f_3208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3202)
-static void C_ccall f_3202(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3171)
-static void C_ccall f_3171(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3175)
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3178)
-static void C_ccall f_3178(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3185)
-static void C_ccall f_3185(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3200)
-static void C_ccall f_3200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3188)
-static void C_ccall f_3188(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3162)
-static void C_ccall f_3162(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1113)
-static void C_fcall f_1113(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1135)
-static void C_ccall f_1135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1138)
-static void C_ccall f_1138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3166)
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3033)
-static void C_ccall f_3033(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_3033)
-static void C_ccall f_3033r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_3037)
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3040)
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3045)
-static void C_fcall f_3045(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3061)
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3104)
-static void C_ccall f_3104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3107)
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3116)
-static void C_fcall f_3116(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3137)
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3110)
-static void C_ccall f_3110(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3090)
-static void C_ccall f_3090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3093)
-static void C_ccall f_3093(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3074)
-static void C_ccall f_3074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3077)
-static void C_ccall f_3077(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2949)
-static void C_ccall f_2949(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2953)
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2958)
-static void C_fcall f_2958(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2971)
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3028)
-static void C_ccall f_3028(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2977)
-static void C_fcall f_2977(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2980)
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2990)
-static void C_fcall f_2990(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2992)
-static void C_fcall f_2992(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3014)
-static void C_ccall f_3014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2983)
-static void C_ccall f_2983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2857)
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2857)
-static void C_ccall f_2857r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2866)
-static void C_fcall f_2866(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2911)
-static void C_fcall f_2911(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2921)
-static void C_ccall f_2921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f3720)
-static void C_ccall f3720(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2895)
-static void C_ccall f_2895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2902)
-static void C_ccall f_2902(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2939)
-static void C_ccall f_2939(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2693)
-static void C_ccall f_2693(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_2693)
-static void C_ccall f_2693r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_2697)
-static void C_ccall f_2697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2700)
-static void C_fcall f_2700(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2846)
-static void C_ccall f_2846(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2703)
-static void C_ccall f_2703(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2706)
-static void C_ccall f_2706(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2714)
-static void C_fcall f_2714(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2724)
-static void C_ccall f_2724(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2839)
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2733)
-static void C_fcall f_2733(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2827)
-static void C_ccall f_2827(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2831)
-static void C_ccall f_2831(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2823)
-static void C_ccall f_2823(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2736)
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2739)
-static void C_fcall f_2739(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2796)
-static void C_ccall f_2796(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2742)
-static void C_ccall f_2742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2745)
-static void C_ccall f_2745(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2755)
-static void C_fcall f_2755(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2757)
-static void C_fcall f_2757(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2778)
-static void C_ccall f_2778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2748)
-static void C_ccall f_2748(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2709)
-static void C_ccall f_2709(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2575)
-static void C_ccall f_2575(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2575)
-static void C_ccall f_2575r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2582)
-static void C_ccall f_2582(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2585)
-static void C_ccall f_2585(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2590)
-static void C_fcall f_2590(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2600)
-static void C_ccall f_2600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2609)
-static void C_ccall f_2609(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2613)
-static void C_ccall f_2613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2616)
-static void C_fcall f_2616(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2619)
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2629)
-static void C_fcall f_2629(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2631)
-static void C_fcall f_2631(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2652)
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2622)
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2686)
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2572)
-static void C_ccall f_2572(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2534)
-static void C_ccall f_2534(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2538)
-static void C_ccall f_2538(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2544)
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2549)
-static C_word C_fcall f_2549(C_word t0,C_word t1);
-C_noret_decl(f_2506)
-static void C_ccall f_2506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_2510)
-static void C_ccall f_2510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2513)
-static void C_ccall f_2513(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2493)
-static void C_ccall f_2493(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2497)
-static void C_ccall f_2497(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2484)
-static void C_ccall f_2484(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2488)
-static void C_ccall f_2488(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2435)
-static void C_ccall f_2435(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2435)
-static void C_ccall f_2435r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2439)
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2450)
-static void C_fcall f_2450(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2426)
-static void C_ccall f_2426(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2426)
-static void C_ccall f_2426r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2404)
-static void C_ccall f_2404(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2395)
-static void C_ccall f_2395(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1204)
-static void C_fcall f_1204(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2399)
-static void C_ccall f_2399(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2375)
-static void C_ccall f_2375(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2379)
-static void C_ccall f_2379(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2336)
-static void C_ccall f_2336(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2350)
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2367)
-static void C_ccall f_2367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2300)
-static void C_ccall f_2300(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2317)
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2334)
-static void C_ccall f_2334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2265)
-static void C_ccall f_2265(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2269)
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2290)
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2274)
-static void C_ccall f_2274(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2215)
-static void C_ccall f_2215(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2201)
-static void C_ccall f_2201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2187)
-static void C_ccall f_2187(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2173)
-static void C_ccall f_2173(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2159)
-static void C_ccall f_2159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2145)
-static void C_ccall f_2145(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2131)
-static void C_ccall f_2131(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2117)
-static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2111)
-static void C_ccall f_2111(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2108)
-static void C_ccall f_2108(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2101)
-static void C_ccall f_2101(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_2072)
-static void C_ccall f_2072(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2072)
-static void C_ccall f_2072r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2080)
-static void C_ccall f_2080(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2043)
-static void C_ccall f_2043(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_2043)
-static void C_ccall f_2043r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_2051)
-static void C_ccall f_2051(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_2020)
-static void C_ccall f_2020(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_2032)
-static void C_fcall f_2032(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1976)
-static void C_ccall f_1976(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1976)
-static void C_ccall f_1976r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1980)
-static void C_ccall f_1980(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1956)
-static void C_ccall f_1956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1960)
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1971)
-static void C_fcall f_1971(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1963)
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1919)
-static void C_ccall f_1919(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1940)
-static void C_fcall f_1940(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1951)
-static void C_ccall f_1951(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1898)
-static void C_ccall f_1898(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1889)
-static void C_ccall f_1889(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1893)
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1896)
-static void C_ccall f_1896(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1883)
-static void C_ccall f_1883(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1887)
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1872)
-static void C_ccall f_1872(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1859)
-static void C_ccall f_1859(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1863)
-static void C_ccall f_1863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1870)
-static void C_ccall f_1870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1849)
-static void C_ccall f_1849(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1853)
-static void C_ccall f_1853(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1840)
-static void C_ccall f_1840(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1844)
-static void C_ccall f_1844(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1829)
-static void C_ccall f_1829(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1821)
-static void C_ccall f_1821(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1811)
-static void C_ccall f_1811(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1804)
-static void C_ccall f_1804(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1723)
-static void C_ccall f_1723(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1729)
-static void C_fcall f_1729(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1759)
-static void C_ccall f_1759(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1774)
-static void C_fcall f_1774(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1795)
-static void C_ccall f_1795(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1762)
-static void C_ccall f_1762(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1360)
-static void C_ccall f_1360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
-C_noret_decl(f_1360)
-static void C_ccall f_1360r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
-C_noret_decl(f_1660)
-static void C_fcall f_1660(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1655)
-static void C_fcall f_1655(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1650)
-static void C_fcall f_1650(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1362)
-static void C_fcall f_1362(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1420)
-static void C_ccall f_1420(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1423)
-static void C_ccall f_1423(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1426)
-static void C_ccall f_1426(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1429)
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1434)
-static void C_fcall f_1434(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_1503)
-static void C_fcall f_1503(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1568)
-static void C_ccall f_1568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1590)
-static void C_fcall f_1590(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1607)
-static void C_ccall f_1607(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1617)
-static void C_ccall f_1617(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1597)
-static void C_ccall f_1597(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1519)
-static void C_fcall f_1519(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1535)
-static void C_ccall f_1535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1549)
-static void C_ccall f_1549(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1545)
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1526)
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1393)
-static void C_fcall f_1393(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_1400)
-static void C_fcall f_1400(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1377)
-static void C_fcall f_1377(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_1371)
-static void C_fcall f_1371(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1365)
-static void C_fcall f_1365(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1219)
-static void C_ccall f_1219(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_1219)
-static void C_ccall f_1219r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_1158)
-static void C_fcall f_1158(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_1170)
-static void C_fcall f_1170(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_1085)
-static void C_fcall f_1085(C_word t0,C_word t1,C_word t2) C_noret;
-
-C_noret_decl(trf_1113)
-static void C_fcall trf_1113(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1113(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1113(t0,t1,t2);}
-
-C_noret_decl(trf_3045)
-static void C_fcall trf_3045(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3045(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3045(t0,t1,t2);}
-
-C_noret_decl(trf_3116)
-static void C_fcall trf_3116(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3116(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3116(t0,t1,t2);}
-
-C_noret_decl(trf_2958)
-static void C_fcall trf_2958(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2958(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2958(t0,t1,t2);}
-
-C_noret_decl(trf_2977)
-static void C_fcall trf_2977(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2977(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2977(t0,t1);}
-
-C_noret_decl(trf_2990)
-static void C_fcall trf_2990(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2990(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2990(t0,t1);}
-
-C_noret_decl(trf_2992)
-static void C_fcall trf_2992(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2992(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2992(t0,t1,t2);}
-
-C_noret_decl(trf_2866)
-static void C_fcall trf_2866(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2866(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2866(t0,t1,t2);}
-
-C_noret_decl(trf_2911)
-static void C_fcall trf_2911(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2911(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2911(t0,t1,t2);}
-
-C_noret_decl(trf_2700)
-static void C_fcall trf_2700(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2700(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2700(t0,t1);}
-
-C_noret_decl(trf_2714)
-static void C_fcall trf_2714(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2714(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2714(t0,t1,t2);}
-
-C_noret_decl(trf_2733)
-static void C_fcall trf_2733(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2733(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2733(t0,t1);}
-
-C_noret_decl(trf_2739)
-static void C_fcall trf_2739(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2739(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2739(t0,t1);}
-
-C_noret_decl(trf_2755)
-static void C_fcall trf_2755(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2755(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2755(t0,t1);}
-
-C_noret_decl(trf_2757)
-static void C_fcall trf_2757(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2757(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2757(t0,t1,t2);}
-
-C_noret_decl(trf_2590)
-static void C_fcall trf_2590(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2590(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2590(t0,t1,t2);}
-
-C_noret_decl(trf_2616)
-static void C_fcall trf_2616(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2616(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2616(t0,t1);}
-
-C_noret_decl(trf_2629)
-static void C_fcall trf_2629(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2629(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2629(t0,t1);}
-
-C_noret_decl(trf_2631)
-static void C_fcall trf_2631(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2631(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_2631(t0,t1,t2);}
-
-C_noret_decl(trf_2450)
-static void C_fcall trf_2450(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2450(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2450(t0,t1);}
-
-C_noret_decl(trf_1204)
-static void C_fcall trf_1204(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1204(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1204(t0,t1);}
-
-C_noret_decl(trf_2032)
-static void C_fcall trf_2032(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_2032(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_2032(t0,t1);}
-
-C_noret_decl(trf_1971)
-static void C_fcall trf_1971(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1971(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1971(t0,t1);}
-
-C_noret_decl(trf_1940)
-static void C_fcall trf_1940(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1940(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1940(t0,t1);}
-
-C_noret_decl(trf_1729)
-static void C_fcall trf_1729(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1729(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1729(t0,t1,t2);}
-
-C_noret_decl(trf_1774)
-static void C_fcall trf_1774(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1774(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1774(t0,t1,t2);}
-
-C_noret_decl(trf_1660)
-static void C_fcall trf_1660(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1660(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1660(t0,t1);}
-
-C_noret_decl(trf_1655)
-static void C_fcall trf_1655(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1655(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1655(t0,t1,t2);}
-
-C_noret_decl(trf_1650)
-static void C_fcall trf_1650(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1650(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1650(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1362)
-static void C_fcall trf_1362(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1362(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1362(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1434)
-static void C_fcall trf_1434(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1434(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_1434(t0,t1,t2,t3);}
-
-C_noret_decl(trf_1503)
-static void C_fcall trf_1503(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1503(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1503(t0,t1);}
-
-C_noret_decl(trf_1590)
-static void C_fcall trf_1590(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1590(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1590(t0,t1);}
-
-C_noret_decl(trf_1519)
-static void C_fcall trf_1519(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1519(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1519(t0,t1);}
-
-C_noret_decl(trf_1393)
-static void C_fcall trf_1393(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1393(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_1393(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_1400)
-static void C_fcall trf_1400(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1400(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1400(t0,t1);}
-
-C_noret_decl(trf_1377)
-static void C_fcall trf_1377(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1377(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_1377(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_1371)
-static void C_fcall trf_1371(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1371(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1371(t0,t1,t2);}
-
-C_noret_decl(trf_1365)
-static void C_fcall trf_1365(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1365(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1365(t0,t1);}
-
-C_noret_decl(trf_1158)
-static void C_fcall trf_1158(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1158(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1158(t0,t1,t2);}
-
-C_noret_decl(trf_1170)
-static void C_fcall trf_1170(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1170(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_1170(t0,t1);}
-
-C_noret_decl(trf_1085)
-static void C_fcall trf_1085(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_1085(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_1085(t0,t1,t2);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr4r)
-static void C_fcall tr4r(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4r(C_proc4 k){
-int n;
-C_word *a,t4;
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t4=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_lolevel_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_lolevel_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("lolevel_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(1247)){
-C_save(t1);
-C_rereclaim2(1247*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,131);
-lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[3]=C_h_intern(&lf[3],14,"\003syserror-hook");
-lf[5]=C_h_intern(&lf[5],15,"\003syssignal-hook");
-lf[6]=C_h_intern(&lf[6],11,"\000type-error");
-lf[7]=C_decode_literal(C_heaptop,"\376B\000\000#bad argument type - not a structure");
-lf[8]=C_h_intern(&lf[8],17,"\003syscheck-pointer");
-lf[9]=C_decode_literal(C_heaptop,"\376B\000\000!bad argument type - not a pointer");
-lf[10]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\004mmap\376\003\000\000\002\376\001\000\000\010u8vector\376\003\000\000\002\376\001\000\000\011u16vector\376\003\000\000\002\376\001\000\000\011u32vector\376\003\000\000\002\376\001\000\000\010"
-"s8vector\376\003\000\000\002\376\001\000\000\011s16vector\376\003\000\000\002\376\001\000\000\011s32vector\376\003\000\000\002\376\001\000\000\011f32vector\376\003\000\000\002\376\001\000\000\011f64ve"
-"ctor\376\377\016");
-lf[11]=C_h_intern(&lf[11],12,"move-memory!");
-lf[12]=C_h_intern(&lf[12],9,"\003syserror");
-lf[13]=C_decode_literal(C_heaptop,"\376B\000\000\034need number of bytes to move");
-lf[14]=C_decode_literal(C_heaptop,"\376B\000\000!number of bytes to move too large");
-lf[15]=C_h_intern(&lf[15],15,"\003sysbytevector\077");
-lf[16]=C_decode_literal(C_heaptop,"\376B\000\000\033negative destination offset");
-lf[17]=C_decode_literal(C_heaptop,"\376B\000\000\026negative source offset");
-lf[18]=C_h_intern(&lf[18],11,"object-copy");
-lf[19]=C_h_intern(&lf[19],15,"\003sysmake-vector");
-lf[20]=C_h_intern(&lf[20],8,"allocate");
-lf[21]=C_h_intern(&lf[21],4,"free");
-lf[22]=C_h_intern(&lf[22],8,"pointer\077");
-lf[23]=C_h_intern(&lf[23],13,"pointer-like\077");
-lf[24]=C_h_intern(&lf[24],16,"address->pointer");
-lf[25]=C_h_intern(&lf[25],20,"\003sysaddress->pointer");
-lf[26]=C_h_intern(&lf[26],17,"\003syscheck-integer");
-lf[27]=C_h_intern(&lf[27],16,"pointer->address");
-lf[28]=C_h_intern(&lf[28],20,"\003syspointer->address");
-lf[29]=C_h_intern(&lf[29],17,"\003syscheck-special");
-lf[30]=C_h_intern(&lf[30],12,"null-pointer");
-lf[31]=C_h_intern(&lf[31],16,"\003sysnull-pointer");
-lf[32]=C_h_intern(&lf[32],13,"null-pointer\077");
-lf[33]=C_h_intern(&lf[33],15,"object->pointer");
-lf[34]=C_h_intern(&lf[34],15,"pointer->object");
-lf[35]=C_h_intern(&lf[35],9,"pointer=\077");
-lf[36]=C_h_intern(&lf[36],8,"pointer+");
-lf[37]=C_h_intern(&lf[37],14,"pointer-offset");
-lf[38]=C_h_intern(&lf[38],13,"align-to-word");
-lf[39]=C_decode_literal(C_heaptop,"\376B\000\000,bad argument type - not a pointer or integer");
-lf[40]=C_h_intern(&lf[40],11,"tag-pointer");
-lf[41]=C_h_intern(&lf[41],23,"\003sysmake-tagged-pointer");
-lf[42]=C_h_intern(&lf[42],15,"tagged-pointer\077");
-lf[43]=C_h_intern(&lf[43],11,"pointer-tag");
-lf[44]=C_h_intern(&lf[44],13,"make-locative");
-lf[45]=C_h_intern(&lf[45],17,"\003sysmake-locative");
-lf[46]=C_h_intern(&lf[46],18,"make-weak-locative");
-lf[47]=C_h_intern(&lf[47],13,"locative-set!");
-lf[48]=C_h_intern(&lf[48],12,"locative-ref");
-lf[49]=C_h_intern(&lf[49],16,"locative->object");
-lf[50]=C_h_intern(&lf[50],9,"locative\077");
-lf[51]=C_h_intern(&lf[51],15,"pointer-u8-set!");
-lf[52]=C_h_intern(&lf[52],15,"pointer-s8-set!");
-lf[53]=C_h_intern(&lf[53],16,"pointer-u16-set!");
-lf[54]=C_h_intern(&lf[54],16,"pointer-s16-set!");
-lf[55]=C_h_intern(&lf[55],16,"pointer-u32-set!");
-lf[56]=C_h_intern(&lf[56],16,"pointer-s32-set!");
-lf[57]=C_h_intern(&lf[57],16,"pointer-f32-set!");
-lf[58]=C_h_intern(&lf[58],16,"pointer-f64-set!");
-lf[59]=C_h_intern(&lf[59],14,"pointer-u8-ref");
-lf[60]=C_h_intern(&lf[60],14,"pointer-s8-ref");
-lf[61]=C_h_intern(&lf[61],15,"pointer-u16-ref");
-lf[62]=C_h_intern(&lf[62],15,"pointer-s16-ref");
-lf[63]=C_h_intern(&lf[63],15,"pointer-u32-ref");
-lf[64]=C_h_intern(&lf[64],15,"pointer-s32-ref");
-lf[65]=C_h_intern(&lf[65],15,"pointer-f32-ref");
-lf[66]=C_h_intern(&lf[66],15,"pointer-f64-ref");
-lf[67]=C_h_intern(&lf[67],8,"extended");
-lf[69]=C_h_intern(&lf[69],16,"extend-procedure");
-lf[70]=C_h_intern(&lf[70],19,"\003sysdecorate-lambda");
-lf[71]=C_h_intern(&lf[71],17,"\003syscheck-closure");
-lf[72]=C_h_intern(&lf[72],19,"extended-procedure\077");
-lf[73]=C_h_intern(&lf[73],21,"\003syslambda-decoration");
-lf[74]=C_h_intern(&lf[74],14,"procedure-data");
-lf[75]=C_h_intern(&lf[75],19,"set-procedure-data!");
-lf[76]=C_decode_literal(C_heaptop,"\376B\000\000-bad argument type - not an extended procedure");
-lf[77]=C_h_intern(&lf[77],10,"block-set!");
-lf[78]=C_h_intern(&lf[78],14,"\003sysblock-set!");
-lf[79]=C_h_intern(&lf[79],9,"block-ref");
-lf[80]=C_h_intern(&lf[80],15,"number-of-slots");
-lf[81]=C_decode_literal(C_heaptop,"\376B\000\000,bad argument type - not a vector-like object");
-lf[82]=C_h_intern(&lf[82],15,"number-of-bytes");
-lf[83]=C_decode_literal(C_heaptop,"\376B\000\0002cannot compute number of bytes of immediate object");
-lf[84]=C_h_intern(&lf[84],20,"make-record-instance");
-lf[85]=C_h_intern(&lf[85],18,"\003sysmake-structure");
-lf[86]=C_h_intern(&lf[86],16,"record-instance\077");
-lf[87]=C_h_intern(&lf[87],20,"record-instance-type");
-lf[88]=C_h_intern(&lf[88],22,"record-instance-length");
-lf[89]=C_h_intern(&lf[89],25,"record-instance-slot-set!");
-lf[90]=C_h_intern(&lf[90],15,"\003syscheck-range");
-lf[91]=C_h_intern(&lf[91],20,"record-instance-slot");
-lf[92]=C_h_intern(&lf[92],14,"record->vector");
-lf[93]=C_h_intern(&lf[93],15,"object-evicted\077");
-lf[94]=C_h_intern(&lf[94],12,"object-evict");
-lf[95]=C_h_intern(&lf[95],15,"hash-table-set!");
-lf[96]=C_h_intern(&lf[96],19,"\003sysundefined-value");
-lf[97]=C_h_intern(&lf[97],22,"hash-table-ref/default");
-lf[98]=C_h_intern(&lf[98],15,"make-hash-table");
-lf[99]=C_h_intern(&lf[99],3,"eq\077");
-lf[100]=C_h_intern(&lf[100],24,"object-evict-to-location");
-lf[101]=C_h_intern(&lf[101],24,"\003sysset-pointer-address!");
-lf[102]=C_h_intern(&lf[102],6,"signal");
-lf[103]=C_h_intern(&lf[103],24,"make-composite-condition");
-lf[104]=C_h_intern(&lf[104],23,"make-property-condition");
-lf[105]=C_h_intern(&lf[105],5,"evict");
-lf[106]=C_h_intern(&lf[106],5,"limit");
-lf[107]=C_h_intern(&lf[107],3,"exn");
-lf[108]=C_h_intern(&lf[108],8,"location");
-lf[109]=C_h_intern(&lf[109],7,"message");
-lf[110]=C_decode_literal(C_heaptop,"\376B\000\000$cannot evict object - limit exceeded");
-lf[111]=C_h_intern(&lf[111],9,"arguments");
-lf[112]=C_h_intern(&lf[112],14,"object-release");
-lf[113]=C_h_intern(&lf[113],11,"object-size");
-lf[114]=C_h_intern(&lf[114],14,"object-unevict");
-lf[115]=C_h_intern(&lf[115],15,"\003sysmake-string");
-lf[116]=C_h_intern(&lf[116],14,"object-become!");
-lf[117]=C_h_intern(&lf[117],11,"\003sysbecome!");
-lf[118]=C_decode_literal(C_heaptop,"\376B\000\000:bad argument type - not an a-list of non-immediate objects");
-lf[119]=C_h_intern(&lf[119],16,"mutate-procedure");
-lf[120]=C_h_intern(&lf[120],10,"global-ref");
-lf[121]=C_h_intern(&lf[121],11,"global-set!");
-lf[122]=C_h_intern(&lf[122],13,"global-bound\077");
-lf[123]=C_h_intern(&lf[123],32,"\003syssymbol-has-toplevel-binding\077");
-lf[124]=C_h_intern(&lf[124],20,"global-make-unbound!");
-lf[125]=C_h_intern(&lf[125],28,"\003sysarbitrary-unbound-symbol");
-lf[126]=C_h_intern(&lf[126],18,"getter-with-setter");
-lf[127]=C_h_intern(&lf[127],13,"\003sysblock-ref");
-lf[128]=C_h_intern(&lf[128],15,"pointer-s6-set!");
-lf[129]=C_h_intern(&lf[129],17,"register-feature!");
-lf[130]=C_h_intern(&lf[130],7,"lolevel");
-C_register_lf2(lf,131,create_ptable());
-t2=C_mutate(&lf[0] /* (set! c337 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1080,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_srfi_69_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-
-/* k1078 */
-static void C_ccall f_1080(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1080,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1083,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 75 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[129]+1)))(3,*((C_word*)lf[129]+1),t2,lf[130]);}
-
-/* k1081 in k1078 */
-static void C_ccall f_1083(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word ab[76],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1083,2,t0,t1);}
-t2=C_mutate(&lf[2] /* (set! check-block ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1085,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
-t3=C_mutate(&lf[4] /* (set! check-generic-structure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1158,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[8]+1 /* (set! check-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1219,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
-t5=lf[10];
-t6=C_mutate((C_word*)lf[11]+1 /* (set! move-memory! ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1360,a[2]=t5,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));
-t7=C_mutate((C_word*)lf[18]+1 /* (set! object-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1723,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[20]+1 /* (set! allocate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1804,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[21]+1 /* (set! free ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1811,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[22]+1 /* (set! pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1821,a[2]=((C_word)li18),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[23]+1 /* (set! pointer-like? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1829,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[24]+1 /* (set! address->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1840,a[2]=((C_word)li20),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[27]+1 /* (set! pointer->address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1849,a[2]=((C_word)li21),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[30]+1 /* (set! null-pointer ...) */,*((C_word*)lf[31]+1));
-t15=C_mutate((C_word*)lf[32]+1 /* (set! null-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1859,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
-t16=C_mutate((C_word*)lf[33]+1 /* (set! object->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1872,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp));
-t17=C_mutate((C_word*)lf[34]+1 /* (set! pointer->object ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1883,a[2]=((C_word)li24),tmp=(C_word)a,a+=3,tmp));
-t18=C_mutate((C_word*)lf[35]+1 /* (set! pointer=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1889,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
-t19=C_mutate((C_word*)lf[36]+1 /* (set! pointer+ ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1898,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
-t20=C_mutate((C_word*)lf[37]+1 /* (set! pointer-offset ...) */,*((C_word*)lf[36]+1));
-t21=C_mutate((C_word*)lf[38]+1 /* (set! align-to-word ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1919,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp));
-t22=C_mutate((C_word*)lf[40]+1 /* (set! tag-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1956,a[2]=((C_word)li28),tmp=(C_word)a,a+=3,tmp));
-t23=C_mutate((C_word*)lf[42]+1 /* (set! tagged-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1976,a[2]=((C_word)li29),tmp=(C_word)a,a+=3,tmp));
-t24=C_mutate((C_word*)lf[43]+1 /* (set! pointer-tag ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2020,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
-t25=C_mutate((C_word*)lf[44]+1 /* (set! make-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2043,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
-t26=C_mutate((C_word*)lf[46]+1 /* (set! make-weak-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2072,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
-t27=C_mutate((C_word*)lf[47]+1 /* (set! locative-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2101,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
-t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2106,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_locative_ref,a[2]=((C_word)li95),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 353 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t28,t29,*((C_word*)lf[47]+1));}
-
-/* k2104 in k1081 in k1078 */
-static void C_ccall f_2106(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[36],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2106,2,t0,t1);}
-t2=C_mutate((C_word*)lf[48]+1 /* (set! locative-ref ...) */,t1);
-t3=C_mutate((C_word*)lf[49]+1 /* (set! locative->object ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2108,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[50]+1 /* (set! locative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2111,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[51]+1 /* (set! pointer-u8-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2117,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[52]+1 /* (set! pointer-s8-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2131,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[53]+1 /* (set! pointer-u16-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2145,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[54]+1 /* (set! pointer-s16-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2159,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[55]+1 /* (set! pointer-u32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2173,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[56]+1 /* (set! pointer-s32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2187,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[57]+1 /* (set! pointer-f32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2201,a[2]=((C_word)li42),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[58]+1 /* (set! pointer-f64-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2215,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2231,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3333,a[2]=((C_word)li94),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 370 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t13,t14,*((C_word*)lf[51]+1));}
-
-/* a3332 in k2104 in k1081 in k1078 */
-static void C_ccall f_3333(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3333,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub580(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub580(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2231(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2231,2,t0,t1);}
-t2=C_mutate((C_word*)lf[59]+1 /* (set! pointer-u8-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2235,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3323,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 375 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[52]+1));}
-
-/* a3322 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3323(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3323,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub586(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub586(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2235(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2235,2,t0,t1);}
-t2=C_mutate((C_word*)lf[60]+1 /* (set! pointer-s8-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2239,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3313,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 380 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[53]+1));}
-
-/* a3312 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3313(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3313,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub592(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub592(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2239,2,t0,t1);}
-t2=C_mutate((C_word*)lf[61]+1 /* (set! pointer-u16-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2243,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3303,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 385 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[128]+1));}
-
-/* a3302 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3303(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3303,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub598(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub598(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2243,2,t0,t1);}
-t2=C_mutate((C_word*)lf[62]+1 /* (set! pointer-s16-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2247,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3293,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 390 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[55]+1));}
-
-/* a3292 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3293(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3293,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(4));
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub604(t3,t4));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub604(t3,C_SCHEME_FALSE));}}
-
-/* k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2247,2,t0,t1);}
-t2=C_mutate((C_word*)lf[63]+1 /* (set! pointer-u32-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2251,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3283,a[2]=((C_word)li89),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 395 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[56]+1));}
-
-/* a3282 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3283(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3283,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(4));
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub611(t3,t4));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub611(t3,C_SCHEME_FALSE));}}
-
-/* k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2251(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2251,2,t0,t1);}
-t2=C_mutate((C_word*)lf[64]+1 /* (set! pointer-s32-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2255,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3273,a[2]=((C_word)li88),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 400 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[57]+1));}
-
-/* a3272 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3273(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3273,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(4));
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub618(t3,t4));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub618(t3,C_SCHEME_FALSE));}}
-
-/* k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2255(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2255,2,t0,t1);}
-t2=C_mutate((C_word*)lf[65]+1 /* (set! pointer-f32-ref ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2259,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3263,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 405 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t3,t4,*((C_word*)lf[58]+1));}
-
-/* a3262 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3263(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3263,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(4));
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub625(t3,t4));}
-else{
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub625(t3,C_SCHEME_FALSE));}}
-
-/* k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2259(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[18],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2259,2,t0,t1);}
-t2=C_mutate((C_word*)lf[66]+1 /* (set! pointer-f64-ref ...) */,t1);
-t3=C_a_i_vector(&a,1,lf[67]);
-t4=C_mutate(&lf[68] /* (set! xproc-tag ...) */,t3);
-t5=C_mutate((C_word*)lf[69]+1 /* (set! extend-procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2265,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[72]+1 /* (set! extended-procedure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2300,a[2]=((C_word)li48),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[74]+1 /* (set! procedure-data ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2336,a[2]=((C_word)li50),tmp=(C_word)a,a+=3,tmp));
-t8=*((C_word*)lf[69]+1);
-t9=C_mutate((C_word*)lf[75]+1 /* (set! set-procedure-data! ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2375,a[2]=t8,a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp));
-t10=C_mutate((C_word*)lf[77]+1 /* (set! block-set! ...) */,*((C_word*)lf[78]+1));
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2393,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 449 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t11,*((C_word*)lf[127]+1),*((C_word*)lf[78]+1));}
-
-/* k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[27],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2393,2,t0,t1);}
-t2=C_mutate((C_word*)lf[79]+1 /* (set! block-ref ...) */,t1);
-t3=C_mutate((C_word*)lf[80]+1 /* (set! number-of-slots ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2395,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[82]+1 /* (set! number-of-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2404,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[84]+1 /* (set! make-record-instance ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2426,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[86]+1 /* (set! record-instance? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2435,a[2]=((C_word)li55),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[87]+1 /* (set! record-instance-type ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2484,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[88]+1 /* (set! record-instance-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2493,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[89]+1 /* (set! record-instance-slot-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2506,a[2]=((C_word)li58),tmp=(C_word)a,a+=3,tmp));
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3239,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 496 getter-with-setter */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[126]+1)))(4,*((C_word*)lf[126]+1),t10,t11,*((C_word*)lf[89]+1));}
-
-/* a3238 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3239(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3239,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3243,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 498 ##sys#check-generic-structure */
-f_1158(t4,t2,C_a_i_list(&a,1,lf[91]));}
-
-/* k3241 in a3238 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3243(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3243,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3246,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t3=C_block_size(((C_word*)t0)[2]);
-t4=C_fixnum_difference(t3,C_fix(1));
-/* lolevel.scm: 499 ##sys#check-range */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[90]+1)))(6,*((C_word*)lf[90]+1),t2,((C_word*)t0)[4],C_fix(0),t4,lf[91]);}
-
-/* k3244 in k3241 in a3238 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3246(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_slot(((C_word*)t0)[2],t2));}
-
-/* k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2532(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[39],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2532,2,t0,t1);}
-t2=C_mutate((C_word*)lf[91]+1 /* (set! record-instance-slot ...) */,t1);
-t3=C_mutate((C_word*)lf[92]+1 /* (set! record->vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2534,a[2]=((C_word)li60),tmp=(C_word)a,a+=3,tmp));
-t4=C_mutate((C_word*)lf[93]+1 /* (set! object-evicted? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2572,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp));
-t5=C_mutate((C_word*)lf[94]+1 /* (set! object-evict ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2575,a[2]=((C_word)li65),tmp=(C_word)a,a+=3,tmp));
-t6=C_mutate((C_word*)lf[100]+1 /* (set! object-evict-to-location ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2693,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
-t7=C_mutate((C_word*)lf[112]+1 /* (set! object-release ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2857,a[2]=((C_word)li72),tmp=(C_word)a,a+=3,tmp));
-t8=C_mutate((C_word*)lf[113]+1 /* (set! object-size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2949,a[2]=((C_word)li75),tmp=(C_word)a,a+=3,tmp));
-t9=C_mutate((C_word*)lf[114]+1 /* (set! object-unevict ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3033,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp));
-t10=C_mutate((C_word*)lf[116]+1 /* (set! object-become! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3162,a[2]=((C_word)li80),tmp=(C_word)a,a+=3,tmp));
-t11=C_mutate((C_word*)lf[119]+1 /* (set! mutate-procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3171,a[2]=((C_word)li81),tmp=(C_word)a,a+=3,tmp));
-t12=C_mutate((C_word*)lf[120]+1 /* (set! global-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3202,a[2]=((C_word)li82),tmp=(C_word)a,a+=3,tmp));
-t13=C_mutate((C_word*)lf[121]+1 /* (set! global-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3208,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
-t14=C_mutate((C_word*)lf[122]+1 /* (set! global-bound? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3217,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
-t15=C_mutate((C_word*)lf[124]+1 /* (set! global-make-unbound! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3226,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp));
-t16=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_UNDEFINED);}
-
-/* global-make-unbound! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3226(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3226,3,t0,t1,t2);}
-t3=C_i_check_symbol_2(t2,lf[124]);
-t4=C_slot(lf[125],C_fix(0));
-t5=C_i_setslot(t2,C_fix(0),t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-
-/* global-bound? in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3217(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3217,3,t0,t1,t2);}
-t3=C_i_check_symbol_2(t2,lf[122]);
-/* lolevel.scm: 667 ##sys#symbol-has-toplevel-binding? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[123]+1)))(3,*((C_word*)lf[123]+1),t1,t2);}
-
-/* global-set! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3208,4,t0,t1,t2,t3);}
-t4=C_i_check_symbol_2(t2,lf[121]);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_setslot(t2,C_fix(0),t3));}
-
-/* global-ref in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3202(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3202,3,t0,t1,t2);}
-t3=C_i_check_symbol_2(t2,lf[120]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_retrieve(t2));}
-
-/* mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3171(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_3171,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3175,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 646 ##sys#check-closure */
-t5=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[119]);}
-
-/* k3173 in mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3175,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3178,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 647 ##sys#check-closure */
-t3=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[119]);}
-
-/* k3176 in k3173 in mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3178(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3178,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[4]);
-t3=C_words(t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3185,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 650 ##sys#make-vector */
-t5=*((C_word*)lf[19]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k3183 in k3176 in k3173 in mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3185(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3185,2,t0,t1);}
-t2=C_copy_block(((C_word*)t0)[4],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3188,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3200,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 651 proc */
-t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
-
-/* k3198 in k3183 in k3176 in k3173 in mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3200,2,t0,t1);}
-t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
-t3=C_a_i_list(&a,1,t2);
-/* lolevel.scm: 651 ##sys#become! */
-t4=*((C_word*)lf[117]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
-
-/* k3186 in k3183 in k3176 in k3173 in mutate-procedure in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3188(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* object-become! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3162(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[11],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3162,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3166,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-t5=C_i_check_list_2(t4,lf[116]);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1113,a[2]=t4,a[3]=t7,a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_1113(t9,t3,t4);}
-
-/* loop in object-become! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_1113(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1113,NULL,3,t0,t1,t2);}
-t3=C_i_nullp(t2);
-if(C_truep(t3)){
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-if(C_truep(C_i_pairp(t2))){
-t4=C_i_car(t2);
-t5=C_i_check_pair_2(t4,lf[116]);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1135,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t7=C_i_car(t4);
-/* lolevel.scm: 116 ##sys#check-block */
-f_1085(t6,t7,C_a_i_list(&a,1,lf[116]));}
-else{
-/* lolevel.scm: 120 ##sys#signal-hook */
-t4=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[6],lf[116],lf[118],((C_word*)t0)[2]);}}}
-
-/* k1133 in loop in object-become! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_1135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1135,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1138,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_i_cdr(((C_word*)t0)[2]);
-/* lolevel.scm: 117 ##sys#check-block */
-f_1085(t2,t3,C_a_i_list(&a,1,lf[116]));}
-
-/* k1136 in k1133 in loop in object-become! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_1138(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_i_cdr(((C_word*)t0)[4]);
-/* lolevel.scm: 118 loop */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_1113(t3,((C_word*)t0)[2],t2);}
-
-/* k3164 in object-become! in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3166(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 643 ##sys#become! */
-t2=*((C_word*)lf[117]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3033(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_3033r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_3033r(t0,t1,t2,t3);}}
-
-static void C_ccall f_3033r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3037,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_3037(2,t5,C_SCHEME_FALSE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_3037(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3037(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3037,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3040,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 614 make-hash-table */
-t3=*((C_word*)lf[98]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[99]+1));}
-
-/* k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3045,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word)li77),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_3045(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_3045(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3045,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_permanentp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3061,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 618 hash-table-ref/default */
-t4=*((C_word*)lf[97]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3061(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3061,2,t0,t1);}
-if(C_truep(t1)){
-t2=t1;
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_byteblockp(((C_word*)t0)[5]))){
-if(C_truep(((C_word*)t0)[4])){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3074,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-t3=C_block_size(((C_word*)t0)[5]);
-/* lolevel.scm: 621 ##sys#make-string */
-t4=*((C_word*)lf[115]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
-else{
-t2=((C_word*)t0)[5];
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-else{
-if(C_truep(C_i_symbolp(((C_word*)t0)[5]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3090,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=C_slot(((C_word*)t0)[5],C_fix(1));
-/* lolevel.scm: 626 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t2,t3);}
-else{
-t2=C_block_size(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3104,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 631 ##sys#make-vector */
-t4=*((C_word*)lf[19]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}}}
-
-/* k3102 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3104(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3104,2,t0,t1);}
-t2=C_copy_block(((C_word*)t0)[6],t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3107,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 632 hash-table-set! */
-t4=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],((C_word*)t0)[6],t2);}
-
-/* k3105 in k3102 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3107(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3107,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3110,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_truep(C_specialp(((C_word*)t0)[4]))?C_fix(1):C_fix(0));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3116,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[3],a[6]=((C_word)li76),tmp=(C_word)a,a+=7,tmp));
-t7=((C_word*)t5)[1];
-f_3116(t7,t2,t3);}
-
-/* doloop956 in k3105 in k3102 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_3116(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3116,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3137,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[4],t2);
-/* lolevel.scm: 635 copy */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_3045(t5,t3,t4);}}
-
-/* k3135 in doloop956 in k3105 in k3102 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3137(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_3116(t4,((C_word*)t0)[2],t3);}
-
-/* k3108 in k3105 in k3102 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3110(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* k3088 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3090,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3093,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 627 hash-table-set! */
-t3=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k3091 in k3088 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3093(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=((C_word*)t0)[3];
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k3072 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3074(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3074,2,t0,t1);}
-t2=C_copy_block(((C_word*)t0)[4],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3077,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 622 hash-table-set! */
-t4=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],((C_word*)t0)[4],t2);}
-
-/* k3075 in k3072 in k3059 in copy in k3038 in k3035 in object-unevict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3077(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2949(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2949,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2953,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 597 make-hash-table */
-t4=*((C_word*)lf[98]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,*((C_word*)lf[99]+1));}
-
-/* k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2953(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2953,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2958,a[2]=t1,a[3]=t3,a[4]=((C_word)li74),tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_2958(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2958(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2958,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 600 hash-table-ref/default */
-t4=*((C_word*)lf[97]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],t2,C_SCHEME_FALSE);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fix(0));}}
-
-/* k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2971,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
-else{
-t2=C_block_size(((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2977,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3028,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[4]))){
-/* lolevel.scm: 604 align-to-word */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[38]+1)))(3,*((C_word*)lf[38]+1),t4,t2);}
-else{
-t5=C_bytes(t2);
-t6=t3;
-f_2977(t6,C_fixnum_plus(t5,C_bytes(C_fix(1))));}}}
-
-/* k3026 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3028(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_2977(t2,C_fixnum_plus(t1,C_bytes(C_fix(1))));}
-
-/* k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2977(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2977,NULL,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2980,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 606 hash-table-set! */
-t5=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,((C_word*)t0)[2],((C_word*)t0)[5],C_SCHEME_TRUE);}
-
-/* k2978 in k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2980,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2983,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[4]))){
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)((C_word*)t0)[5])[1]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2990,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-t4=C_specialp(((C_word*)t0)[4]);
-if(C_truep(t4)){
-t5=t3;
-f_2990(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
-else{
-t5=C_i_symbolp(((C_word*)t0)[4]);
-t6=t3;
-f_2990(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
-
-/* k2988 in k2978 in k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2990(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2990,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2992,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li73),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_2992(t5,((C_word*)t0)[2],t1);}
-
-/* doloop906 in k2988 in k2978 in k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2992(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2992,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3014,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[3],t2);
-/* lolevel.scm: 610 evict */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_2958(t5,t3,t4);}}
-
-/* k3012 in doloop906 in k2988 in k2978 in k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_3014(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_fixnum_plus(t1,((C_word*)((C_word*)t0)[5])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
-t4=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_2992(t5,((C_word*)t0)[2],t4);}
-
-/* k2981 in k2978 in k2975 in k2969 in evict in k2951 in object-size in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+13)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2857r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2857r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2857r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word *a=C_alloc(13);
-t4=C_i_pairp(t3);
-t5=(C_truep(t4)?C_i_car(t3):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2939,a[2]=((C_word)li69),tmp=(C_word)a,a+=3,tmp));
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2866,a[2]=t9,a[3]=t5,a[4]=t7,a[5]=((C_word)li71),tmp=(C_word)a,a+=6,tmp));
-t11=((C_word*)t9)[1];
-f_2866(t11,t1,t2);}
-
-/* release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2866(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[17],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2866,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_permanentp(t2))){
-if(C_truep(C_i_memq(t2,((C_word*)((C_word*)t0)[4])[1]))){
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=C_block_size(t2);
-t4=C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[4])[1]);
-t5=C_mutate(((C_word *)((C_word*)t0)[4])+1,t4);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2895,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_byteblockp(t2))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f3720,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 594 ##sys#address->pointer */
-t8=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,C_block_address(&a,1,t2));}
-else{
-t7=(C_truep(C_specialp(t2))?C_fix(1):C_fix(0));
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2911,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t9,a[5]=t3,a[6]=((C_word)li70),tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_2911(t11,t6,t7);}}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* doloop880 in release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2911(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2911,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2921,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=C_slot(((C_word*)t0)[3],t2);
-/* lolevel.scm: 593 release */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_2866(t5,t3,t4);}}
-
-/* k2919 in doloop880 in release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_2911(t3,((C_word*)t0)[2],t2);}
-
-/* f3720 in release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f3720(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 594 free */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k2893 in release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2895(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2895,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2902,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 594 ##sys#address->pointer */
-t3=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_block_address(&a,1,((C_word*)t0)[2]));}
-
-/* k2900 in k2893 in release in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2902(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 594 free */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-
-/* f_2939 in object-release in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2939(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2939,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub864(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub864(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2693(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+6)){
-C_save_and_reclaim((void*)tr4r,(void*)f_2693r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_2693r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_2693r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(6);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2697,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 541 ##sys#check-special */
-t6=*((C_word*)lf[29]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,lf[100]);}
-
-/* k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2697,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2700,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
-t3=C_i_car(((C_word*)t0)[2]);
-t4=C_i_check_exact_2(t3,lf[100]);
-t5=t2;
-f_2700(t5,t3);}
-else{
-t3=t2;
-f_2700(t3,C_SCHEME_FALSE);}}
-
-/* k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2700(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2700,NULL,2,t0,t1);}
-t2=t1;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2703,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2846,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 546 ##sys#pointer->address */
-t6=*((C_word*)lf[28]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-
-/* k2844 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2846(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 546 ##sys#address->pointer */
-t2=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2703(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2703,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2706,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 547 make-hash-table */
-t3=*((C_word*)lf[98]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[99]+1));}
-
-/* k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2706(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2706,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2709,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2714,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,a[5]=((C_word*)t0)[4],a[6]=((C_word)li67),tmp=(C_word)a,a+=7,tmp));
-t6=((C_word*)t4)[1];
-f_2714(t6,t2,((C_word*)t0)[2]);}
-
-/* evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2714(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2714,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2724,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* lolevel.scm: 551 hash-table-ref/default */
-t4=*((C_word*)lf[97]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE);}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2724(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2724,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_block_size(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2733,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2839,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[6]))){
-/* lolevel.scm: 555 align-to-word */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[38]+1)))(3,*((C_word*)lf[38]+1),t4,t2);}
-else{
-t5=C_bytes(t2);
-t6=t3;
-f_2733(t6,C_fixnum_plus(t5,C_bytes(C_fix(1))));}}}
-
-/* k2837 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2839(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-f_2733(t2,C_fixnum_plus(t1,C_bytes(C_fix(1))));}
-
-/* k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2733(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[22],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2733,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2736,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
-t3=C_fixnum_difference(((C_word*)((C_word*)t0)[2])[1],t1);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-if(C_truep(C_fixnum_lessp(((C_word*)((C_word*)t0)[2])[1],C_fix(0)))){
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2823,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2827,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-t7=C_a_i_list(&a,2,((C_word*)t0)[8],((C_word*)((C_word*)t0)[2])[1]);
-/* lolevel.scm: 562 make-property-condition */
-t8=*((C_word*)lf[104]+1);
-((C_proc9)(void*)(*((C_word*)t8+1)))(9,t8,t6,lf[107],lf[108],lf[100],lf[109],lf[110],lf[111],t7);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t2;
-f_2736(2,t6,t5);}}
-else{
-t3=t2;
-f_2736(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k2825 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2827(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2827,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2831,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 566 make-property-condition */
-t3=*((C_word*)lf[104]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[105],lf[106],((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k2829 in k2825 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2831(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 561 make-composite-condition */
-t2=*((C_word*)lf[103]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k2821 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2823(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 560 signal */
-t2=*((C_word*)lf[102]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-
-/* k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2736(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2736,2,t0,t1);}
-t2=C_evict_block(((C_word*)t0)[8],((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2739,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[8],a[8]=t2,a[9]=((C_word*)t0)[6],tmp=(C_word)a,a+=10,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[8]))){
-t4=*((C_word*)lf[96]+1);
-t5=t3;
-f_2739(t5,C_i_set_i_slot(t2,C_fix(0),t4));}
-else{
-t4=t3;
-f_2739(t4,C_SCHEME_UNDEFINED);}}
-
-/* k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2739(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2739,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2742,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2796,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 569 ##sys#pointer->address */
-t4=*((C_word*)lf[28]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-
-/* k2794 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2796(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2796,2,t0,t1);}
-t2=C_a_i_plus(&a,2,t1,((C_word*)t0)[4]);
-/* lolevel.scm: 569 ##sys#set-pointer-address! */
-t3=*((C_word*)lf[101]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2742(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2742,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2745,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 570 hash-table-set! */
-t3=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[6]);}
-
-/* k2743 in k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2745(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2745,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2748,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[4]))){
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[5]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2755,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-t4=C_specialp(((C_word*)t0)[4]);
-if(C_truep(t4)){
-t5=t3;
-f_2755(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
-else{
-t5=C_i_symbolp(((C_word*)t0)[4]);
-t6=t3;
-f_2755(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
-
-/* k2753 in k2743 in k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2755(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2755,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li66),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_2757(t5,((C_word*)t0)[2],t1);}
-
-/* doloop839 in k2753 in k2743 in k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2757(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2757,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2778,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[3],t2);
-/* lolevel.scm: 574 evict */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_2714(t5,t3,t4);}}
-
-/* k2776 in doloop839 in k2753 in k2743 in k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2778(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_set_i_slot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2757(t4,((C_word*)t0)[2],t3);}
-
-/* k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2722 in evict in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2748(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* k2707 in k2704 in k2701 in k2698 in k2695 in object-evict-to-location in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2709(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 576 values */
-C_values(4,0,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2575(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+8)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2575r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2575r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2575r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(8);
-t4=C_i_pairp(t3);
-t5=(C_truep(t4)?C_i_car(t3):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2686,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2582,a[2]=t2,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 522 make-hash-table */
-t7=*((C_word*)lf[98]+1);
-((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,*((C_word*)lf[99]+1));}
-
-/* k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2582(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2582,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2585,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 523 ##sys#check-closure */
-t3=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[94]);}
-
-/* k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2585(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2585,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2590,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=((C_word)li64),tmp=(C_word)a,a+=6,tmp));
-t5=((C_word*)t3)[1];
-f_2590(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2590(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2590,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2600,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 526 hash-table-ref/default */
-t4=*((C_word*)lf[97]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE);}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2600(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2600,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
-else{
-t2=C_block_size(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2609,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[5]))){
-/* lolevel.scm: 529 align-to-word */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[38]+1)))(3,*((C_word*)lf[38]+1),t3,t2);}
-else{
-t4=t3;
-f_2609(2,t4,C_bytes(t2));}}}
-
-/* k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2609(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2609,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2613,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-t3=C_fixnum_plus(t1,C_bytes(C_fix(1)));
-/* lolevel.scm: 530 allocator */
-t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
-
-/* k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2613(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2613,2,t0,t1);}
-t2=C_evict_block(((C_word*)t0)[6],t1);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2616,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(C_i_symbolp(((C_word*)t0)[6]))){
-t4=*((C_word*)lf[96]+1);
-t5=t3;
-f_2616(t5,C_i_set_i_slot(t2,C_fix(0),t4));}
-else{
-t4=t3;
-f_2616(t4,C_SCHEME_UNDEFINED);}}
-
-/* k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2616(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2616,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2619,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* lolevel.scm: 532 hash-table-set! */
-t3=*((C_word*)lf[95]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[6]);}
-
-/* k2617 in k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2619(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2619,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2622,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_byteblockp(((C_word*)t0)[4]))){
-t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[5]);}
-else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2629,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-t4=C_specialp(((C_word*)t0)[4]);
-if(C_truep(t4)){
-t5=t3;
-f_2629(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
-else{
-t5=C_i_symbolp(((C_word*)t0)[4]);
-t6=t3;
-f_2629(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
-
-/* k2627 in k2617 in k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2629(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2629,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2631,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li63),tmp=(C_word)a,a+=8,tmp));
-t5=((C_word*)t3)[1];
-f_2631(t5,((C_word*)t0)[2],t1);}
-
-/* doloop779 in k2627 in k2617 in k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2631(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2631,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2652,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[3],t2);
-/* lolevel.scm: 537 evict */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_2590(t5,t3,t4);}}
-
-/* k2650 in doloop779 in k2627 in k2617 in k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2652(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_set_i_slot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_2631(t4,((C_word*)t0)[2],t3);}
-
-/* k2620 in k2617 in k2614 in k2611 in k2607 in k2598 in evict in k2583 in k2580 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2622(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* f_2686 in object-evict in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2686(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2686,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(3));
-t4=C_i_foreign_fixnum_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub754(t3,t4));}
-
-/* object-evicted? in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2572(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2572,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_permanentp(t2));}
-
-/* record->vector in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2534(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2534,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2538,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 504 ##sys#check-generic-structure */
-f_1158(t3,t2,C_a_i_list(&a,1,lf[92]));}
-
-/* k2536 in record->vector in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2538(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2538,2,t0,t1);}
-t2=C_block_size(((C_word*)t0)[3]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2544,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 506 ##sys#make-vector */
-t4=*((C_word*)lf[19]+1);
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-
-/* k2542 in k2536 in record->vector in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2544(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2544,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2549,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word)li59),tmp=(C_word)a,a+=6,tmp);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_2549(t2,C_fix(0)));}
-
-/* doloop738 in k2542 in k2536 in record->vector in k2530 in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static C_word C_fcall f_2549(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-loop:
-C_stack_check;
-if(C_truep(C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
-t2=((C_word*)t0)[3];
-return(t2);}
-else{
-t2=C_slot(((C_word*)t0)[2],t1);
-t3=C_i_setslot(((C_word*)t0)[3],t1,t2);
-t4=C_fixnum_plus(t1,C_fix(1));
-t7=t4;
-t1=t7;
-goto loop;}}
-
-/* record-instance-slot-set! in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[9],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2506,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2510,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 491 ##sys#check-generic-structure */
-f_1158(t5,t2,C_a_i_list(&a,1,lf[89]));}
-
-/* k2508 in record-instance-slot-set! in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2510,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2513,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t3=C_block_size(((C_word*)t0)[3]);
-t4=C_fixnum_difference(t3,C_fix(1));
-/* lolevel.scm: 492 ##sys#check-range */
-((C_proc6)C_retrieve_proc(*((C_word*)lf[90]+1)))(6,*((C_word*)lf[90]+1),t2,((C_word*)t0)[5],C_fix(0),t4,lf[89]);}
-
-/* k2511 in k2508 in record-instance-slot-set! in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2513(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_setslot(((C_word*)t0)[3],t2,((C_word*)t0)[2]));}
-
-/* record-instance-length in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2493(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2493,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2497,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 487 ##sys#check-generic-structure */
-f_1158(t3,t2,C_a_i_list(&a,1,lf[88]));}
-
-/* k2495 in record-instance-length in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2497(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_block_size(((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_fixnum_difference(t2,C_fix(1)));}
-
-/* record-instance-type in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2484(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2484,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2488,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 483 ##sys#check-generic-structure */
-f_1158(t3,t2,C_a_i_list(&a,1,lf[87]));}
-
-/* k2486 in record-instance-type in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2488(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_slot(((C_word*)t0)[2],C_fix(0)));}
-
-/* record-instance? in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2435(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2435r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2435r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2435r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2439,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_2439(2,t5,C_SCHEME_FALSE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_2439(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k2437 in record-instance? in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2439(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2439,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2450,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t3=((C_word*)t0)[2];
-if(C_truep(C_blockp(t3))){
-t4=C_structurep(t3);
-t5=t2;
-f_2450(t5,t4);}
-else{
-t4=t2;
-f_2450(t4,C_SCHEME_FALSE);}}
-
-/* k2448 in k2437 in record-instance? in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_2450(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_i_not(((C_word*)t0)[4]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=C_slot(((C_word*)t0)[2],C_fix(0));
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(((C_word*)t0)[4],t3));}}
-else{
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* make-record-instance in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2426(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2426r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2426r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2426r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-t4=C_i_check_symbol_2(t2,lf[84]);
-C_apply(5,0,t1,*((C_word*)lf[85]+1),t2,t3);}
-
-/* number-of-bytes in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2404(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2404,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_byteblockp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_block_size(t2));}
-else{
-t3=C_block_size(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_w2b(t3));}}
-else{
-/* lolevel.scm: 457 ##sys#signal-hook */
-t3=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t1,lf[6],lf[82],lf[83],t2);}}
-
-/* number-of-slots in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2395(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[14],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2395,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2399,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-t5=C_a_i_list(&a,1,lf[80]);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1204,a[2]=t4,a[3]=t3,a[4]=t5,a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-if(C_truep(C_blockp(t4))){
-t7=C_specialp(t4);
-if(C_truep(t7)){
-t8=t6;
-f_1204(t8,C_i_not(t7));}
-else{
-t8=C_byteblockp(t4);
-t9=t6;
-f_1204(t9,C_i_not(t8));}}
-else{
-t7=t6;
-f_1204(t7,C_SCHEME_FALSE);}}
-
-/* k1202 in number-of-slots in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_fcall f_1204(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_block_size(((C_word*)t0)[5]));}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
-t2=C_i_car(((C_word*)t0)[4]);
-/* lolevel.scm: 134 ##sys#signal-hook */
-t3=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[3],lf[6],t2,lf[81],((C_word*)t0)[2]);}
-else{
-/* lolevel.scm: 134 ##sys#signal-hook */
-t2=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[6],C_SCHEME_FALSE,lf[81],((C_word*)t0)[2]);}}}
-
-/* k2397 in number-of-slots in k2391 in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2399(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_block_size(((C_word*)t0)[2]));}
-
-/* set-procedure-data! in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2375(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2375,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2379,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 438 extend-procedure */
-t5=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,t3);}
-
-/* k2377 in set-procedure-data! in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2379(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_eqp(t1,((C_word*)t0)[3]);
-if(C_truep(t2)){
-t3=((C_word*)t0)[3];
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-/* lolevel.scm: 441 ##sys#signal-hook */
-t3=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[2],lf[6],lf[75],lf[76],((C_word*)t0)[3]);}}
-
-/* procedure-data in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2336(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2336,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_closurep(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2367,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=t2;
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2350,a[2]=((C_word)li49),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 423 ##sys#lambda-decoration */
-t6=*((C_word*)lf[73]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* a2349 in procedure-data in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2350(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2350,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[68],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k2365 in procedure-data in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2367(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_slot(t1,C_fix(1)):C_SCHEME_FALSE));}
-
-/* extended-procedure? in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2300(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2300,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_closurep(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2334,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t4=t2;
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2317,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 423 ##sys#lambda-decoration */
-t6=*((C_word*)lf[73]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* a2316 in extended-procedure? in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2317(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2317,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[68],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* k2332 in extended-procedure? in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?C_SCHEME_TRUE:C_SCHEME_FALSE));}
-
-/* extend-procedure in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2265(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2265,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2269,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 416 ##sys#check-closure */
-t5=*((C_word*)lf[71]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[69]);}
-
-/* k2267 in extend-procedure in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2274,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[4],a[3]=((C_word)li45),tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 417 ##sys#decorate-lambda */
-t4=*((C_word*)lf[70]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3);}
-
-/* a2289 in k2267 in extend-procedure in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2290(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[3],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2290,4,t0,t1,t2,t3);}
-t4=C_a_i_cons(&a,2,lf[68],((C_word*)t0)[2]);
-t5=C_i_setslot(t2,t3,t4);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-
-/* a2273 in k2267 in extend-procedure in k2257 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2104 in k1081 in k1078 */
-static void C_ccall f_2274(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2274,3,t0,t1,t2);}
-if(C_truep(C_i_pairp(t2))){
-t3=C_slot(t2,C_fix(0));
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(lf[68],t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* pointer-f64-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2215(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2215,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_flonum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub573(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_flonum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub573(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-f32-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2201,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_flonum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub565(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_flonum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub565(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-s32-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2187(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2187,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub557(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub557(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-u32-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2173(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2173,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub549(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub549(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-s16-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2159,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub541(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub541(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-u16-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2145(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2145,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub533(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub533(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-s8-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2131(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2131,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub525(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub525(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* pointer-u8-set! in k2104 in k1081 in k1078 */
-static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2117,4,t0,t1,t2,t3);}
-if(C_truep(t2)){
-t4=C_i_foreign_pointer_argumentp(t2);
-t5=C_i_foreign_fixnum_argumentp(t3);
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub517(C_SCHEME_UNDEFINED,t4,t5));}
-else{
-t4=C_i_foreign_fixnum_argumentp(t3);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub517(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
-
-/* locative? in k2104 in k1081 in k1078 */
-static void C_ccall f_2111(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2111,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=C_locativep(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* locative->object in k2104 in k1081 in k1078 */
-static void C_ccall f_2108(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2108,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_locative_to_object(t2));}
-
-/* locative-set! in k1081 in k1078 */
-static void C_ccall f_2101(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2101,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_locative_set(t2,t3));}
-
-/* make-weak-locative in k1081 in k1078 */
-static void C_ccall f_2072(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2072r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2072r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2072r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2080,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-/* lolevel.scm: 350 ##sys#make-locative */
-t5=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,t2,C_fix(0),C_SCHEME_TRUE,lf[46]);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-/* lolevel.scm: 350 ##sys#make-locative */
-t7=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,C_SCHEME_TRUE,lf[46]);}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k2078 in make-weak-locative in k1081 in k1078 */
-static void C_ccall f_2080(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 350 ##sys#make-locative */
-t2=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_TRUE,lf[46]);}
-
-/* make-locative in k1081 in k1078 */
-static void C_ccall f_2043(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_2043r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_2043r(t0,t1,t2,t3);}}
-
-static void C_ccall f_2043r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2051,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-/* lolevel.scm: 347 ##sys#make-locative */
-t5=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,t2,C_fix(0),C_SCHEME_FALSE,lf[44]);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=C_i_car(t3);
-/* lolevel.scm: 347 ##sys#make-locative */
-t7=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,C_SCHEME_FALSE,lf[44]);}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k2049 in make-locative in k1081 in k1078 */
-static void C_ccall f_2051(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 347 ##sys#make-locative */
-t2=*((C_word*)lf[45]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE,lf[44]);}
-
-/* pointer-tag in k1081 in k1078 */
-static void C_ccall f_2020(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2020,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2032,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_blockp(t4))){
-t5=C_specialp(t4);
-t6=t3;
-f_2032(t6,t5);}
-else{
-t5=t3;
-f_2032(t5,C_SCHEME_FALSE);}}
-
-/* k2030 in pointer-tag in k1081 in k1078 */
-static void C_fcall f_2032(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(C_taggedpointerp(((C_word*)t0)[2]))?C_slot(((C_word*)t0)[2],C_fix(1)):C_SCHEME_FALSE));}
-else{
-/* lolevel.scm: 324 ##sys#error-hook */
-t2=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),lf[43],((C_word*)t0)[2]);}}
-
-/* tagged-pointer? in k1081 in k1078 */
-static void C_ccall f_1976(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+4)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1976r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1976r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1976r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1980,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t3))){
-t5=t4;
-f_1980(2,t5,C_SCHEME_FALSE);}
-else{
-t5=C_i_cdr(t3);
-if(C_truep(C_i_nullp(t5))){
-t6=t4;
-f_1980(2,t6,C_i_car(t3));}
-else{
-/* ##sys#error */
-t6=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
-
-/* k1978 in tagged-pointer? in k1081 in k1078 */
-static void C_ccall f_1980(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(C_blockp(((C_word*)t0)[3]))){
-if(C_truep(C_taggedpointerp(((C_word*)t0)[3]))){
-t2=C_i_not(t1);
-if(C_truep(t2)){
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=C_slot(((C_word*)t0)[3],C_fix(1));
-t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_equalp(t1,t3));}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* tag-pointer in k1081 in k1078 */
-static void C_ccall f_1956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1956,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1960,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 309 ##sys#make-tagged-pointer */
-t5=*((C_word*)lf[41]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-
-/* k1958 in tag-pointer in k1081 in k1078 */
-static void C_ccall f_1960(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1960,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1963,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1971,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
-t4=((C_word*)t0)[2];
-if(C_truep(C_blockp(t4))){
-t5=C_specialp(t4);
-t6=t3;
-f_1971(t6,t5);}
-else{
-t5=t3;
-f_1971(t5,C_SCHEME_FALSE);}}
-
-/* k1969 in k1958 in tag-pointer in k1081 in k1078 */
-static void C_fcall f_1971(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=C_copy_pointer(((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[4]);}
-else{
-/* lolevel.scm: 312 ##sys#error-hook */
-t2=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),lf[40],((C_word*)t0)[5]);}}
-
-/* k1961 in k1958 in tag-pointer in k1081 in k1078 */
-static void C_ccall f_1963(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* align-to-word in k1081 in k1078 */
-static void C_ccall f_1919(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1919,3,t0,t1,t2);}
-if(C_truep(C_i_integerp(t2))){
-t3=t1;
-t4=t2;
-t5=C_a_i_bytevector(&a,1,C_fix(4));
-t6=C_i_foreign_integer_argumentp(t4);
-t7=t3;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,stub430(t5,t6));}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1940,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t4=t2;
-if(C_truep(C_blockp(t4))){
-t5=C_specialp(t4);
-t6=t3;
-f_1940(t6,t5);}
-else{
-t5=t3;
-f_1940(t5,C_SCHEME_FALSE);}}}
-
-/* k1938 in align-to-word in k1081 in k1078 */
-static void C_fcall f_1940(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1940,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1951,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 299 ##sys#pointer->address */
-t3=*((C_word*)lf[28]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-else{
-/* lolevel.scm: 301 ##sys#signal-hook */
-t2=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[6],lf[38],lf[39],((C_word*)t0)[2]);}}
-
-/* k1949 in k1938 in align-to-word in k1081 in k1078 */
-static void C_ccall f_1951(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1951,2,t0,t1);}
-t2=C_a_i_bytevector(&a,1,C_fix(4));
-t3=C_i_foreign_integer_argumentp(t1);
-t4=stub430(t2,t3);
-/* lolevel.scm: 299 ##sys#address->pointer */
-t5=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,((C_word*)t0)[2],t4);}
-
-/* pointer+ in k1081 in k1078 */
-static void C_ccall f_1898(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1898,4,t0,t1,t2,t3);}
-t4=C_a_i_bytevector(&a,1,C_fix(3));
-t5=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
-t6=C_i_foreign_integer_argumentp(t3);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,stub421(t4,t5,t6));}
-
-/* pointer=? in k1081 in k1078 */
-static void C_ccall f_1889(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1889,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1893,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 283 ##sys#check-special */
-t5=*((C_word*)lf[29]+1);
-((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[35]);}
-
-/* k1891 in pointer=? in k1081 in k1078 */
-static void C_ccall f_1893(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1893,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* lolevel.scm: 284 ##sys#check-special */
-t3=*((C_word*)lf[29]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[35]);}
-
-/* k1894 in k1891 in pointer=? in k1081 in k1078 */
-static void C_ccall f_1896(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_pointer_eqp(((C_word*)t0)[3],((C_word*)t0)[2]));}
-
-/* pointer->object in k1081 in k1078 */
-static void C_ccall f_1883(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1883,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1887,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 279 ##sys#check-pointer */
-t4=*((C_word*)lf[8]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[34]);}
-
-/* k1885 in pointer->object in k1081 in k1078 */
-static void C_ccall f_1887(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_pointer_to_object(((C_word*)t0)[2]));}
-
-/* object->pointer in k1081 in k1078 */
-static void C_ccall f_1872(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1872,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=t1;
-t4=t2;
-t5=C_a_i_bytevector(&a,1,C_fix(3));
-t6=t3;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub407(t5,t4));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* null-pointer? in k1081 in k1078 */
-static void C_ccall f_1859(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1859,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1863,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 271 ##sys#check-special */
-t4=*((C_word*)lf[29]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[32]);}
-
-/* k1861 in null-pointer? in k1081 in k1078 */
-static void C_ccall f_1863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1863,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1870,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-/* lolevel.scm: 272 ##sys#pointer->address */
-t3=*((C_word*)lf[28]+1);
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-
-/* k1868 in k1861 in null-pointer? in k1081 in k1078 */
-static void C_ccall f_1870(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_eqp(C_fix(0),t1));}
-
-/* pointer->address in k1081 in k1078 */
-static void C_ccall f_1849(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1849,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1853,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 265 ##sys#check-special */
-t4=*((C_word*)lf[29]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[27]);}
-
-/* k1851 in pointer->address in k1081 in k1078 */
-static void C_ccall f_1853(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 266 ##sys#pointer->address */
-t2=*((C_word*)lf[28]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* address->pointer in k1081 in k1078 */
-static void C_ccall f_1840(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[4],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1840,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1844,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* lolevel.scm: 261 ##sys#check-integer */
-t4=*((C_word*)lf[26]+1);
-((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[24]);}
-
-/* k1842 in address->pointer in k1081 in k1078 */
-static void C_ccall f_1844(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* lolevel.scm: 262 ##sys#address->pointer */
-t2=*((C_word*)lf[25]+1);
-((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* pointer-like? in k1081 in k1078 */
-static void C_ccall f_1829(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1829,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-t3=C_specialp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-
-/* pointer? in k1081 in k1078 */
-static void C_ccall f_1821(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1821,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_safe_pointerp(t2));}
-
-/* free in k1081 in k1078 */
-static void C_ccall f_1811(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1811,3,t0,t1,t2);}
-if(C_truep(t2)){
-t3=C_i_foreign_pointer_argumentp(t2);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub374(C_SCHEME_UNDEFINED,t3));}
-else{
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,stub374(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
-
-/* allocate in k1081 in k1078 */
-static void C_ccall f_1804(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1804,3,t0,t1,t2);}
-t3=C_a_i_bytevector(&a,1,C_fix(3));
-t4=C_i_foreign_fixnum_argumentp(t2);
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub369(t3,t4));}
-
-/* object-copy in k1081 in k1078 */
-static void C_ccall f_1723(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1723,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1729,a[2]=t4,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_1729(t6,t1,t2);}
-
-/* copy in object-copy in k1081 in k1078 */
-static void C_fcall f_1729(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1729,NULL,3,t0,t1,t2);}
-if(C_truep(C_blockp(t2))){
-if(C_truep(C_i_symbolp(t2))){
-t3=C_slot(t2,C_fix(1));
-/* lolevel.scm: 239 ##sys#intern-symbol */
-C_string_to_symbol(3,0,t1,t3);}
-else{
-t3=C_block_size(t2);
-t4=(C_truep(C_byteblockp(t2))?C_words(t3):t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1759,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-/* lolevel.scm: 243 ##sys#make-vector */
-t6=*((C_word*)lf[19]+1);
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}}
-else{
-t3=t2;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k1757 in copy in object-copy in k1081 in k1078 */
-static void C_ccall f_1759(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1759,2,t0,t1);}
-t2=C_copy_block(((C_word*)t0)[5],t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1762,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=C_byteblockp(((C_word*)t0)[5]);
-t5=(C_truep(t4)?t4:C_i_symbolp(((C_word*)t0)[5]));
-if(C_truep(t5)){
-t6=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
-else{
-t6=(C_truep(C_specialp(((C_word*)t0)[5]))?C_fix(1):C_fix(0));
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1774,a[2]=((C_word*)t0)[2],a[3]=t8,a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word)li13),tmp=(C_word)a,a+=7,tmp));
-t10=((C_word*)t8)[1];
-f_1774(t10,t3,t6);}}
-
-/* doloop359 in k1757 in copy in object-copy in k1081 in k1078 */
-static void C_fcall f_1774(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1774,NULL,3,t0,t1,t2);}
-if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1795,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t4=C_slot(((C_word*)t0)[4],t2);
-/* lolevel.scm: 247 copy */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_1729(t5,t3,t4);}}
-
-/* k1793 in doloop359 in k1757 in copy in object-copy in k1081 in k1078 */
-static void C_ccall f_1795(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_i_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
-t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_1774(t4,((C_word*)t0)[2],t3);}
-
-/* k1760 in k1757 in copy in object-copy in k1081 in k1078 */
-static void C_ccall f_1762(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-
-/* move-memory! in k1081 in k1078 */
-static void C_ccall f_1360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
-C_word tmp;
-C_word t4;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t3,c2,4);
-if(c<4) C_bad_min_argc_2(c,4,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+18)){
-C_save_and_reclaim((void*)tr4r,(void*)f_1360r,4,t0,t1,t2,t3);}
-else{
-a=C_alloc((c-4)*3);
-t4=C_restore_rest(a,C_rest_count(0));
-f_1360r(t0,t1,t2,t3,t4);}}
-
-static void C_ccall f_1360r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a=C_alloc(18);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1362,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=((C_word)li8),tmp=(C_word)a,a+=6,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1650,a[2]=t5,a[3]=((C_word)li9),tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1655,a[2]=t6,a[3]=((C_word)li10),tmp=(C_word)a,a+=4,tmp);
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1660,a[2]=t7,a[3]=((C_word)li11),tmp=(C_word)a,a+=4,tmp);
-if(C_truep(C_i_nullp(t4))){
-/* def-n180330 */
-t9=t8;
-f_1660(t9,t1);}
-else{
-t9=C_i_car(t4);
-t10=C_i_cdr(t4);
-if(C_truep(C_i_nullp(t10))){
-/* def-foffset181328 */
-t11=t7;
-f_1655(t11,t1,t9);}
-else{
-t11=C_i_car(t10);
-t12=C_i_cdr(t10);
-if(C_truep(C_i_nullp(t12))){
-/* def-toffset182325 */
-t13=t6;
-f_1650(t13,t1,t9,t11);}
-else{
-t13=C_i_car(t12);
-t14=C_i_cdr(t12);
-if(C_truep(C_i_nullp(t14))){
-/* body178187 */
-t15=t5;
-f_1362(t15,t1,t9,t11,t13);}
-else{
-/* ##sys#error */
-t15=*((C_word*)lf[12]+1);
-((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
-
-/* def-n180 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1660(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1660,NULL,2,t0,t1);}
-/* def-foffset181328 */
-t2=((C_word*)t0)[2];
-f_1655(t2,t1,C_SCHEME_FALSE);}
-
-/* def-foffset181 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1655(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1655,NULL,3,t0,t1,t2);}
-/* def-toffset182325 */
-t3=((C_word*)t0)[2];
-f_1650(t3,t1,t2,C_fix(0));}
-
-/* def-toffset182 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1650(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1650,NULL,4,t0,t1,t2,t3);}
-/* body178187 */
-t4=((C_word*)t0)[2];
-f_1362(t4,t1,t2,t3,C_fix(0));}
-
-/* body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1362(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[41],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1362,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1365,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li3),tmp=(C_word)a,a+=5,tmp));
-t14=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1371,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li4),tmp=(C_word)a,a+=5,tmp));
-t15=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1377,a[2]=t8,a[3]=((C_word)li5),tmp=(C_word)a,a+=4,tmp));
-t16=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1393,a[2]=t8,a[3]=((C_word)li6),tmp=(C_word)a,a+=4,tmp));
-t17=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1420,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t12,a[6]=t10,a[7]=t6,a[8]=t3,a[9]=t4,a[10]=t2,a[11]=((C_word*)t0)[2],tmp=(C_word)a,a+=12,tmp);
-/* lolevel.scm: 197 ##sys#check-block */
-f_1085(t17,((C_word*)t0)[4],C_a_i_list(&a,1,lf[11]));}
-
-/* k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1420(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[15],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1420,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1423,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-/* lolevel.scm: 198 ##sys#check-block */
-f_1085(t2,((C_word*)t0)[2],C_a_i_list(&a,1,lf[11]));}
-
-/* k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1423(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1423,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[8],C_fix(0)))){
-/* lolevel.scm: 201 ##sys#error */
-t3=*((C_word*)lf[12]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[11],lf[17],((C_word*)t0)[8]);}
-else{
-t3=t2;
-f_1426(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1426(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1426,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-if(C_truep(C_fixnum_lessp(((C_word*)t0)[9],C_fix(0)))){
-/* lolevel.scm: 204 ##sys#error */
-t3=*((C_word*)lf[12]+1);
-((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[11],lf[16],((C_word*)t0)[9]);}
-else{
-t3=t2;
-f_1429(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1429(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1429,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1434,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=t3,a[9]=((C_word*)t0)[11],a[10]=((C_word)li7),tmp=(C_word)a,a+=11,tmp));
-t5=((C_word*)t3)[1];
-f_1434(t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1434(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word *a;
-loop:
-a=C_alloc(11);
-C_check_for_interrupt;
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_1434,NULL,4,t0,t1,t2,t3);}
-if(C_truep(C_structurep(t2))){
-t4=C_slot(t2,C_fix(0));
-if(C_truep(C_i_memq(t4,((C_word*)t0)[9]))){
-t5=C_slot(t2,C_fix(1));
-/* lolevel.scm: 208 move */
-t17=t1;
-t18=t5;
-t19=t3;
-t1=t17;
-t2=t18;
-t3=t19;
-goto loop;}
-else{
-t5=t1;
-t6=t2;
-/* lolevel.scm: 173 ##sys#error-hook */
-t7=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,C_fix((C_word)C_BAD_ARGUMENT_TYPE_ERROR),lf[11],t6);}}
-else{
-if(C_truep(C_structurep(t3))){
-t4=C_slot(t3,C_fix(0));
-if(C_truep(C_i_memq(t4,((C_word*)t0)[9]))){
-t5=C_slot(t3,C_fix(1));
-/* lolevel.scm: 212 move */
-t17=t1;
-t18=t2;
-t19=t5;
-t1=t17;
-t2=t18;
-t3=t19;
-goto loop;}
-else{
-t5=t1;
-t6=t3;
-/* lolevel.scm: 173 ##sys#error-hook */
-t7=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,C_fix((C_word)C_BAD_ARGUMENT_TYPE_ERROR),lf[11],t6);}}
-else{
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1503,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=t3,a[9]=t1,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
-t5=t2;
-t6=C_i_safe_pointerp(t5);
-if(C_truep(t6)){
-t7=t4;
-f_1503(t7,t6);}
-else{
-t7=C_locativep(t5);
-t8=t4;
-f_1503(t8,t7);}}}}
-
-/* k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1503(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1503,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1519,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
-t3=((C_word*)t0)[8];
-t4=C_i_safe_pointerp(t3);
-if(C_truep(t4)){
-t5=t2;
-f_1519(t5,t4);}
-else{
-t5=C_locativep(t3);
-t6=t2;
-f_1519(t6,t5);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1568,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-/* lolevel.scm: 221 ##sys#bytevector? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[7]);}}
-
-/* k1566 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1568(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[11],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1568,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_i_stringp(((C_word*)t0)[9]));
-if(C_truep(t2)){
-t3=C_block_size(((C_word*)t0)[9]);
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1590,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
-t5=((C_word*)t0)[7];
-t6=C_i_safe_pointerp(t5);
-if(C_truep(t6)){
-t7=t4;
-f_1590(t7,t6);}
-else{
-t7=C_locativep(t5);
-t8=t4;
-f_1590(t8,t7);}}
-else{
-t3=((C_word*)t0)[8];
-t4=((C_word*)t0)[9];
-/* lolevel.scm: 173 ##sys#error-hook */
-t5=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_ERROR),lf[11],t4);}}
-
-/* k1588 in k1566 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1590(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1590,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1597,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
-t3=((C_word*)t0)[5];
-if(C_truep(t3)){
-/* lolevel.scm: 224 checkn1 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_1377(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[6]);}
-else{
-/* lolevel.scm: 224 checkn1 */
-t4=((C_word*)((C_word*)t0)[4])[1];
-f_1377(t4,t2,((C_word*)t0)[3],((C_word*)t0)[3],((C_word*)t0)[6]);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* lolevel.scm: 225 ##sys#bytevector? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[9]);}}
-
-/* k1605 in k1588 in k1566 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1607(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1607,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_i_stringp(((C_word*)t0)[9]));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1617,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[4];
-t5=(C_truep(t4)?t4:((C_word*)t0)[3]);
-t6=C_block_size(((C_word*)t0)[9]);
-/* lolevel.scm: 226 checkn2 */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_1393(t7,t3,t5,((C_word*)t0)[3],t6,((C_word*)t0)[5],((C_word*)t0)[6]);}
-else{
-t3=((C_word*)t0)[8];
-t4=((C_word*)t0)[9];
-/* lolevel.scm: 173 ##sys#error-hook */
-t5=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_ERROR),lf[11],t4);}}
-
-/* k1615 in k1605 in k1588 in k1566 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1617(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[2];
-t7=(C_truep(t3)?C_i_foreign_block_argumentp(t3):C_SCHEME_FALSE);
-t8=(C_truep(t4)?C_i_foreign_block_argumentp(t4):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t1);
-t10=C_i_foreign_fixnum_argumentp(t5);
-t11=C_i_foreign_fixnum_argumentp(t6);
-t12=t2;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,stub149(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
-
-/* k1595 in k1588 in k1566 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1597(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[2];
-t7=(C_truep(t3)?C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
-t8=(C_truep(t4)?C_i_foreign_block_argumentp(t4):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t1);
-t10=C_i_foreign_fixnum_argumentp(t5);
-t11=C_i_foreign_fixnum_argumentp(t6);
-t12=t2;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,stub117(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
-
-/* k1517 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1519(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[10],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1519,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[9];
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1526,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t2)){
-t4=t3;
-f_1526(2,t4,t2);}
-else{
-/* lolevel.scm: 216 nosizerr */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_1365(t4,t3);}}
-else{
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1535,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
-/* lolevel.scm: 217 ##sys#bytevector? */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[7]);}}
-
-/* k1533 in k1517 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1535(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1535,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_i_stringp(((C_word*)t0)[9]));
-if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1545,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t4=((C_word*)t0)[4];
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1549,a[2]=((C_word*)t0)[6],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
-if(C_truep(t4)){
-t6=C_block_size(((C_word*)t0)[9]);
-/* lolevel.scm: 218 checkn1 */
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_1377(t7,t3,t4,t6,((C_word*)t0)[6]);}
-else{
-/* lolevel.scm: 218 nosizerr */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1365(t6,t5);}}
-else{
-t3=((C_word*)t0)[8];
-t4=((C_word*)t0)[9];
-/* lolevel.scm: 173 ##sys#error-hook */
-t5=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t3,C_fix((C_word)C_BAD_ARGUMENT_TYPE_ERROR),lf[11],t4);}}
-
-/* k1547 in k1533 in k1517 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1549(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_block_size(((C_word*)t0)[5]);
-/* lolevel.scm: 218 checkn1 */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_1377(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
-
-/* k1543 in k1533 in k1517 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1545(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[2];
-t7=(C_truep(t3)?C_i_foreign_block_argumentp(t3):C_SCHEME_FALSE);
-t8=(C_truep(t4)?C_i_foreign_pointer_argumentp(t4):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t1);
-t10=C_i_foreign_fixnum_argumentp(t5);
-t11=C_i_foreign_fixnum_argumentp(t6);
-t12=t2;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,stub133(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
-
-/* k1524 in k1517 in k1501 in move in k1427 in k1424 in k1421 in k1418 in body178 in move-memory! in k1081 in k1078 */
-static void C_ccall f_1526(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word *a;
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-t4=((C_word*)t0)[4];
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[2];
-t7=(C_truep(t3)?C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
-t8=(C_truep(t4)?C_i_foreign_pointer_argumentp(t4):C_SCHEME_FALSE);
-t9=C_i_foreign_fixnum_argumentp(t1);
-t10=C_i_foreign_fixnum_argumentp(t5);
-t11=C_i_foreign_fixnum_argumentp(t6);
-t12=t2;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,stub101(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
-
-/* checkn2 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1393(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[7],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1393,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1400,a[2]=t4,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t8=C_fixnum_difference(t3,t5);
-if(C_truep(C_fixnum_less_or_equal_p(t2,t8))){
-t9=C_fixnum_difference(t4,t6);
-t10=t7;
-f_1400(t10,C_fixnum_less_or_equal_p(t2,t9));}
-else{
-t9=t7;
-f_1400(t9,C_SCHEME_FALSE);}}
-
-/* k1398 in checkn2 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1400(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1400,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-/* lolevel.scm: 195 sizerr */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_1371(t2,((C_word*)t0)[5],C_a_i_list(&a,3,((C_word*)t0)[6],((C_word*)t0)[3],((C_word*)t0)[2]));}}
-
-/* checkn1 in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1377(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1377,NULL,5,t0,t1,t2,t3,t4);}
-t5=C_fixnum_difference(t3,t4);
-if(C_truep(C_fixnum_less_or_equal_p(t2,t5))){
-t6=t2;
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
-else{
-/* lolevel.scm: 190 sizerr */
-t6=((C_word*)((C_word*)t0)[2])[1];
-f_1371(t6,t1,C_a_i_list(&a,2,t2,t3));}}
-
-/* sizerr in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1371(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1371,NULL,3,t0,t1,t2);}
-C_apply(8,0,t1,*((C_word*)lf[12]+1),lf[11],lf[14],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* nosizerr in body178 in move-memory! in k1081 in k1078 */
-static void C_fcall f_1365(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1365,NULL,2,t0,t1);}
-/* lolevel.scm: 182 ##sys#error */
-t2=*((C_word*)lf[12]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,t1,lf[11],lf[13],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* ##sys#check-pointer in k1081 in k1078 */
-static void C_ccall f_1219(C_word c,C_word t0,C_word t1,C_word t2,...){
-C_word tmp;
-C_word t3;
-va_list v;
-C_word *a,c2=c;
-C_save_rest(t2,c2,3);
-if(c<3) C_bad_min_argc_2(c,3,t0);
-C_check_for_interrupt;
-if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr3r,(void*)f_1219r,3,t0,t1,t2);}
-else{
-a=C_alloc((c-3)*3);
-t3=C_restore_rest(a,C_rest_count(0));
-f_1219r(t0,t1,t2,t3);}}
-
-static void C_ccall f_1219r(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-t4=t2;
-if(C_truep(C_i_safe_pointerp(t4))){
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-if(C_truep(C_i_pairp(t3))){
-t5=C_i_car(t3);
-/* lolevel.scm: 140 ##sys#error-hook */
-t6=*((C_word*)lf[3]+1);
-((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),t5,lf[9],t2);}
-else{
-/* lolevel.scm: 140 ##sys#error-hook */
-t5=*((C_word*)lf[3]+1);
-((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),C_SCHEME_FALSE,lf[9],t2);}}}
-
-/* ##sys#check-generic-structure in k1081 in k1078 */
-static void C_fcall f_1158(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1158,NULL,3,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1170,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-t5=t2;
-if(C_truep(C_blockp(t5))){
-t6=C_structurep(t5);
-t7=t4;
-f_1170(t7,t6);}
-else{
-t6=t4;
-f_1170(t6,C_SCHEME_FALSE);}}
-
-/* k1168 in ##sys#check-generic-structure in k1081 in k1078 */
-static void C_fcall f_1170(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-if(C_truep(t1)){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
-t2=C_i_car(((C_word*)t0)[3]);
-/* lolevel.scm: 126 ##sys#signal-hook */
-t3=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],lf[6],t2,lf[7],((C_word*)t0)[2]);}
-else{
-/* lolevel.scm: 126 ##sys#signal-hook */
-t2=*((C_word*)lf[5]+1);
-((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[6],C_SCHEME_FALSE,lf[7],((C_word*)t0)[2]);}}}
-
-/* ##sys#check-block in k1081 in k1078 */
-static void C_fcall f_1085(C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-C_check_for_interrupt;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1085,NULL,3,t1,t2,t3);}
-if(C_truep(C_blockp(t2))){
-t4=C_SCHEME_UNDEFINED;
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-else{
-if(C_truep(C_i_pairp(t3))){
-t4=C_i_car(t3);
-/* lolevel.scm: 105 ##sys#error-hook */
-t5=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_BLOCK_ERROR),t4,t2);}
-else{
-/* lolevel.scm: 105 ##sys#error-hook */
-t4=*((C_word*)lf[3]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_BLOCK_ERROR),C_SCHEME_FALSE,t2);}}}
-
-#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[223] = {
-{"toplevel:lolevel_scm",(void*)C_lolevel_toplevel},
-{"f_1080:lolevel_scm",(void*)f_1080},
-{"f_1083:lolevel_scm",(void*)f_1083},
-{"f_2106:lolevel_scm",(void*)f_2106},
-{"f_3333:lolevel_scm",(void*)f_3333},
-{"f_2231:lolevel_scm",(void*)f_2231},
-{"f_3323:lolevel_scm",(void*)f_3323},
-{"f_2235:lolevel_scm",(void*)f_2235},
-{"f_3313:lolevel_scm",(void*)f_3313},
-{"f_2239:lolevel_scm",(void*)f_2239},
-{"f_3303:lolevel_scm",(void*)f_3303},
-{"f_2243:lolevel_scm",(void*)f_2243},
-{"f_3293:lolevel_scm",(void*)f_3293},
-{"f_2247:lolevel_scm",(void*)f_2247},
-{"f_3283:lolevel_scm",(void*)f_3283},
-{"f_2251:lolevel_scm",(void*)f_2251},
-{"f_3273:lolevel_scm",(void*)f_3273},
-{"f_2255:lolevel_scm",(void*)f_2255},
-{"f_3263:lolevel_scm",(void*)f_3263},
-{"f_2259:lolevel_scm",(void*)f_2259},
-{"f_2393:lolevel_scm",(void*)f_2393},
-{"f_3239:lolevel_scm",(void*)f_3239},
-{"f_3243:lolevel_scm",(void*)f_3243},
-{"f_3246:lolevel_scm",(void*)f_3246},
-{"f_2532:lolevel_scm",(void*)f_2532},
-{"f_3226:lolevel_scm",(void*)f_3226},
-{"f_3217:lolevel_scm",(void*)f_3217},
-{"f_3208:lolevel_scm",(void*)f_3208},
-{"f_3202:lolevel_scm",(void*)f_3202},
-{"f_3171:lolevel_scm",(void*)f_3171},
-{"f_3175:lolevel_scm",(void*)f_3175},
-{"f_3178:lolevel_scm",(void*)f_3178},
-{"f_3185:lolevel_scm",(void*)f_3185},
-{"f_3200:lolevel_scm",(void*)f_3200},
-{"f_3188:lolevel_scm",(void*)f_3188},
-{"f_3162:lolevel_scm",(void*)f_3162},
-{"f_1113:lolevel_scm",(void*)f_1113},
-{"f_1135:lolevel_scm",(void*)f_1135},
-{"f_1138:lolevel_scm",(void*)f_1138},
-{"f_3166:lolevel_scm",(void*)f_3166},
-{"f_3033:lolevel_scm",(void*)f_3033},
-{"f_3037:lolevel_scm",(void*)f_3037},
-{"f_3040:lolevel_scm",(void*)f_3040},
-{"f_3045:lolevel_scm",(void*)f_3045},
-{"f_3061:lolevel_scm",(void*)f_3061},
-{"f_3104:lolevel_scm",(void*)f_3104},
-{"f_3107:lolevel_scm",(void*)f_3107},
-{"f_3116:lolevel_scm",(void*)f_3116},
-{"f_3137:lolevel_scm",(void*)f_3137},
-{"f_3110:lolevel_scm",(void*)f_3110},
-{"f_3090:lolevel_scm",(void*)f_3090},
-{"f_3093:lolevel_scm",(void*)f_3093},
-{"f_3074:lolevel_scm",(void*)f_3074},
-{"f_3077:lolevel_scm",(void*)f_3077},
-{"f_2949:lolevel_scm",(void*)f_2949},
-{"f_2953:lolevel_scm",(void*)f_2953},
-{"f_2958:lolevel_scm",(void*)f_2958},
-{"f_2971:lolevel_scm",(void*)f_2971},
-{"f_3028:lolevel_scm",(void*)f_3028},
-{"f_2977:lolevel_scm",(void*)f_2977},
-{"f_2980:lolevel_scm",(void*)f_2980},
-{"f_2990:lolevel_scm",(void*)f_2990},
-{"f_2992:lolevel_scm",(void*)f_2992},
-{"f_3014:lolevel_scm",(void*)f_3014},
-{"f_2983:lolevel_scm",(void*)f_2983},
-{"f_2857:lolevel_scm",(void*)f_2857},
-{"f_2866:lolevel_scm",(void*)f_2866},
-{"f_2911:lolevel_scm",(void*)f_2911},
-{"f_2921:lolevel_scm",(void*)f_2921},
-{"f3720:lolevel_scm",(void*)f3720},
-{"f_2895:lolevel_scm",(void*)f_2895},
-{"f_2902:lolevel_scm",(void*)f_2902},
-{"f_2939:lolevel_scm",(void*)f_2939},
-{"f_2693:lolevel_scm",(void*)f_2693},
-{"f_2697:lolevel_scm",(void*)f_2697},
-{"f_2700:lolevel_scm",(void*)f_2700},
-{"f_2846:lolevel_scm",(void*)f_2846},
-{"f_2703:lolevel_scm",(void*)f_2703},
-{"f_2706:lolevel_scm",(void*)f_2706},
-{"f_2714:lolevel_scm",(void*)f_2714},
-{"f_2724:lolevel_scm",(void*)f_2724},
-{"f_2839:lolevel_scm",(void*)f_2839},
-{"f_2733:lolevel_scm",(void*)f_2733},
-{"f_2827:lolevel_scm",(void*)f_2827},
-{"f_2831:lolevel_scm",(void*)f_2831},
-{"f_2823:lolevel_scm",(void*)f_2823},
-{"f_2736:lolevel_scm",(void*)f_2736},
-{"f_2739:lolevel_scm",(void*)f_2739},
-{"f_2796:lolevel_scm",(void*)f_2796},
-{"f_2742:lolevel_scm",(void*)f_2742},
-{"f_2745:lolevel_scm",(void*)f_2745},
-{"f_2755:lolevel_scm",(void*)f_2755},
-{"f_2757:lolevel_scm",(void*)f_2757},
-{"f_2778:lolevel_scm",(void*)f_2778},
-{"f_2748:lolevel_scm",(void*)f_2748},
-{"f_2709:lolevel_scm",(void*)f_2709},
-{"f_2575:lolevel_scm",(void*)f_2575},
-{"f_2582:lolevel_scm",(void*)f_2582},
-{"f_2585:lolevel_scm",(void*)f_2585},
-{"f_2590:lolevel_scm",(void*)f_2590},
-{"f_2600:lolevel_scm",(void*)f_2600},
-{"f_2609:lolevel_scm",(void*)f_2609},
-{"f_2613:lolevel_scm",(void*)f_2613},
-{"f_2616:lolevel_scm",(void*)f_2616},
-{"f_2619:lolevel_scm",(void*)f_2619},
-{"f_2629:lolevel_scm",(void*)f_2629},
-{"f_2631:lolevel_scm",(void*)f_2631},
-{"f_2652:lolevel_scm",(void*)f_2652},
-{"f_2622:lolevel_scm",(void*)f_2622},
-{"f_2686:lolevel_scm",(void*)f_2686},
-{"f_2572:lolevel_scm",(void*)f_2572},
-{"f_2534:lolevel_scm",(void*)f_2534},
-{"f_2538:lolevel_scm",(void*)f_2538},
-{"f_2544:lolevel_scm",(void*)f_2544},
-{"f_2549:lolevel_scm",(void*)f_2549},
-{"f_2506:lolevel_scm",(void*)f_2506},
-{"f_2510:lolevel_scm",(void*)f_2510},
-{"f_2513:lolevel_scm",(void*)f_2513},
-{"f_2493:lolevel_scm",(void*)f_2493},
-{"f_2497:lolevel_scm",(void*)f_2497},
-{"f_2484:lolevel_scm",(void*)f_2484},
-{"f_2488:lolevel_scm",(void*)f_2488},
-{"f_2435:lolevel_scm",(void*)f_2435},
-{"f_2439:lolevel_scm",(void*)f_2439},
-{"f_2450:lolevel_scm",(void*)f_2450},
-{"f_2426:lolevel_scm",(void*)f_2426},
-{"f_2404:lolevel_scm",(void*)f_2404},
-{"f_2395:lolevel_scm",(void*)f_2395},
-{"f_1204:lolevel_scm",(void*)f_1204},
-{"f_2399:lolevel_scm",(void*)f_2399},
-{"f_2375:lolevel_scm",(void*)f_2375},
-{"f_2379:lolevel_scm",(void*)f_2379},
-{"f_2336:lolevel_scm",(void*)f_2336},
-{"f_2350:lolevel_scm",(void*)f_2350},
-{"f_2367:lolevel_scm",(void*)f_2367},
-{"f_2300:lolevel_scm",(void*)f_2300},
-{"f_2317:lolevel_scm",(void*)f_2317},
-{"f_2334:lolevel_scm",(void*)f_2334},
-{"f_2265:lolevel_scm",(void*)f_2265},
-{"f_2269:lolevel_scm",(void*)f_2269},
-{"f_2290:lolevel_scm",(void*)f_2290},
-{"f_2274:lolevel_scm",(void*)f_2274},
-{"f_2215:lolevel_scm",(void*)f_2215},
-{"f_2201:lolevel_scm",(void*)f_2201},
-{"f_2187:lolevel_scm",(void*)f_2187},
-{"f_2173:lolevel_scm",(void*)f_2173},
-{"f_2159:lolevel_scm",(void*)f_2159},
-{"f_2145:lolevel_scm",(void*)f_2145},
-{"f_2131:lolevel_scm",(void*)f_2131},
-{"f_2117:lolevel_scm",(void*)f_2117},
-{"f_2111:lolevel_scm",(void*)f_2111},
-{"f_2108:lolevel_scm",(void*)f_2108},
-{"f_2101:lolevel_scm",(void*)f_2101},
-{"f_2072:lolevel_scm",(void*)f_2072},
-{"f_2080:lolevel_scm",(void*)f_2080},
-{"f_2043:lolevel_scm",(void*)f_2043},
-{"f_2051:lolevel_scm",(void*)f_2051},
-{"f_2020:lolevel_scm",(void*)f_2020},
-{"f_2032:lolevel_scm",(void*)f_2032},
-{"f_1976:lolevel_scm",(void*)f_1976},
-{"f_1980:lolevel_scm",(void*)f_1980},
-{"f_1956:lolevel_scm",(void*)f_1956},
-{"f_1960:lolevel_scm",(void*)f_1960},
-{"f_1971:lolevel_scm",(void*)f_1971},
-{"f_1963:lolevel_scm",(void*)f_1963},
-{"f_1919:lolevel_scm",(void*)f_1919},
-{"f_1940:lolevel_scm",(void*)f_1940},
-{"f_1951:lolevel_scm",(void*)f_1951},
-{"f_1898:lolevel_scm",(void*)f_1898},
-{"f_1889:lolevel_scm",(void*)f_1889},
-{"f_1893:lolevel_scm",(void*)f_1893},
-{"f_1896:lolevel_scm",(void*)f_1896},
-{"f_1883:lolevel_scm",(void*)f_1883},
-{"f_1887:lolevel_scm",(void*)f_1887},
-{"f_1872:lolevel_scm",(void*)f_1872},
-{"f_1859:lolevel_scm",(void*)f_1859},
-{"f_1863:lolevel_scm",(void*)f_1863},
-{"f_1870:lolevel_scm",(void*)f_1870},
-{"f_1849:lolevel_scm",(void*)f_1849},
-{"f_1853:lolevel_scm",(void*)f_1853},
-{"f_1840:lolevel_scm",(void*)f_1840},
-{"f_1844:lolevel_scm",(void*)f_1844},
-{"f_1829:lolevel_scm",(void*)f_1829},
-{"f_1821:lolevel_scm",(void*)f_1821},
-{"f_1811:lolevel_scm",(void*)f_1811},
-{"f_1804:lolevel_scm",(void*)f_1804},
-{"f_1723:lolevel_scm",(void*)f_1723},
-{"f_1729:lolevel_scm",(void*)f_1729},
-{"f_1759:lolevel_scm",(void*)f_1759},
-{"f_1774:lolevel_scm",(void*)f_1774},
-{"f_1795:lolevel_scm",(void*)f_1795},
-{"f_1762:lolevel_scm",(void*)f_1762},
-{"f_1360:lolevel_scm",(void*)f_1360},
-{"f_1660:lolevel_scm",(void*)f_1660},
-{"f_1655:lolevel_scm",(void*)f_1655},
-{"f_1650:lolevel_scm",(void*)f_1650},
-{"f_1362:lolevel_scm",(void*)f_1362},
-{"f_1420:lolevel_scm",(void*)f_1420},
-{"f_1423:lolevel_scm",(void*)f_1423},
-{"f_1426:lolevel_scm",(void*)f_1426},
-{"f_1429:lolevel_scm",(void*)f_1429},
-{"f_1434:lolevel_scm",(void*)f_1434},
-{"f_1503:lolevel_scm",(void*)f_1503},
-{"f_1568:lolevel_scm",(void*)f_1568},
-{"f_1590:lolevel_scm",(void*)f_1590},
-{"f_1607:lolevel_scm",(void*)f_1607},
-{"f_1617:lolevel_scm",(void*)f_1617},
-{"f_1597:lolevel_scm",(void*)f_1597},
-{"f_1519:lolevel_scm",(void*)f_1519},
-{"f_1535:lolevel_scm",(void*)f_1535},
-{"f_1549:lolevel_scm",(void*)f_1549},
-{"f_1545:lolevel_scm",(void*)f_1545},
-{"f_1526:lolevel_scm",(void*)f_1526},
-{"f_1393:lolevel_scm",(void*)f_1393},
-{"f_1400:lolevel_scm",(void*)f_1400},
-{"f_1377:lolevel_scm",(void*)f_1377},
-{"f_1371:lolevel_scm",(void*)f_1371},
-{"f_1365:lolevel_scm",(void*)f_1365},
-{"f_1219:lolevel_scm",(void*)f_1219},
-{"f_1158:lolevel_scm",(void*)f_1158},
-{"f_1170:lolevel_scm",(void*)f_1170},
-{"f_1085:lolevel_scm",(void*)f_1085},
-{NULL,NULL}};
-#endif
-
-static C_PTABLE_ENTRY *create_ptable(void){
-#ifdef C_ENABLE_PTABLES
-return ptable;
-#else
-return NULL;
-#endif
-}
-/* end of file */
diff --git a/bootstrap/optimizer.c b/bootstrap/optimizer.c
deleted file mode 100644
index ab47de60..00000000
--- a/bootstrap/optimizer.c
+++ /dev/null
@@ -1,18036 +0,0 @@
-/* Generated from optimizer.scm by the CHICKEN compiler
- http://www.call-with-current-continuation.org
- 2010-02-09 21:38
- Version 4.2.12
- windows-mingw32-x86 [ manyargs ptables ]
- compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
- command line: optimizer.scm -optimize-level 2 -include-path . -include-path ./ -inline -no-lambda-info -local -no-trace -extend private-namespace.scm -no-trace -output-file optimizer.c
- unit: optimizer
-*/
-
-#include "chicken.h"
-
-static C_PTABLE_ENTRY *create_ptable(void);
-C_noret_decl(C_library_toplevel)
-C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
-C_noret_decl(C_eval_toplevel)
-C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
-
-static C_TLS C_word lf[274];
-static double C_possibly_force_alignment;
-
-
-C_noret_decl(C_optimizer_toplevel)
-C_externexport void C_ccall C_optimizer_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3752)
-static void C_ccall f_3752(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3755)
-static void C_ccall f_3755(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4191)
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14726)
-static void C_ccall f_14726(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_14734)
-static void C_ccall f_14734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14739)
-static void C_fcall f_14739(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14789)
-static void C_ccall f_14789(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14793)
-static void C_ccall f_14793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14749)
-static void C_ccall f_14749(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14753)
-static void C_fcall f_14753(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_14775)
-static void C_ccall f_14775(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6390)
-static void C_ccall f_6390(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13635)
-static void C_ccall f_13635(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_13681)
-static void C_ccall f_13681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13783)
-static void C_ccall f_13783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_13793)
-static void C_fcall f_13793(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14130)
-static void C_ccall f_14130(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14122)
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13899)
-static void C_ccall f_13899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13928)
-static void C_fcall f_13928(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_14098)
-static void C_ccall f_14098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14090)
-static void C_ccall f_14090(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13959)
-static void C_fcall f_13959(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14012)
-static void C_ccall f_14012(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_14002)
-static void C_ccall f_14002(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14010)
-static void C_ccall f_14010(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14184)
-static void C_ccall f_14184(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10) C_noret;
-C_noret_decl(f_14197)
-static void C_ccall f_14197(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14239)
-static void C_ccall f_14239(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14223)
-static void C_ccall f_14223(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14227)
-static void C_ccall f_14227(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14219)
-static void C_ccall f_14219(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14405)
-static void C_ccall f_14405(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13) C_noret;
-C_noret_decl(f_14418)
-static void C_ccall f_14418(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14424)
-static void C_ccall f_14424(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14476)
-static void C_ccall f_14476(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14468)
-static void C_ccall f_14468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14452)
-static void C_ccall f_14452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14456)
-static void C_ccall f_14456(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_14460)
-static void C_ccall f_14460(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6393)
-static void C_ccall f_6393(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13276)
-static void C_ccall f_13276(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_13298)
-static void C_ccall f_13298(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13378)
-static void C_ccall f_13378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13336)
-static void C_ccall f_13336(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13370)
-static void C_ccall f_13370(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13374)
-static void C_ccall f_13374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13362)
-static void C_ccall f_13362(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13334)
-static void C_ccall f_13334(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13472)
-static void C_ccall f_13472(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9) C_noret;
-C_noret_decl(f_13492)
-static void C_ccall f_13492(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6396)
-static void C_ccall f_6396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6885)
-static void C_ccall f_6885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10651)
-static void C_ccall f_10651(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_13149)
-static void C_ccall f_13149(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13152)
-static void C_ccall f_13152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13155)
-static void C_ccall f_13155(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13158)
-static void C_ccall f_13158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13161)
-static void C_ccall f_13161(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13164)
-static void C_ccall f_13164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13247)
-static void C_ccall f_13247(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13167)
-static void C_ccall f_13167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13170)
-static void C_ccall f_13170(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13173)
-static void C_ccall f_13173(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13241)
-static void C_ccall f_13241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13176)
-static void C_ccall f_13176(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13179)
-static void C_ccall f_13179(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13238)
-static void C_ccall f_13238(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11428)
-static void C_fcall f_11428(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11446)
-static void C_ccall f_11446(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11452)
-static void C_ccall f_11452(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11432)
-static void C_ccall f_11432(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13182)
-static void C_ccall f_13182(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13230)
-static void C_ccall f_13230(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13228)
-static void C_ccall f_13228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13185)
-static void C_ccall f_13185(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13188)
-static void C_ccall f_13188(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13191)
-static void C_ccall f_13191(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13215)
-static void C_ccall f_13215(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13194)
-static void C_ccall f_13194(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13197)
-static void C_ccall f_13197(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13200)
-static void C_ccall f_13200(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13203)
-static void C_ccall f_13203(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13206)
-static void C_ccall f_13206(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13209)
-static void C_ccall f_13209(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12908)
-static void C_fcall f_12908(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12914)
-static void C_fcall f_12914(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13125)
-static void C_fcall f_13125(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13135)
-static void C_ccall f_13135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13099)
-static void C_fcall f_13099(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13109)
-static void C_ccall f_13109(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13069)
-static void C_ccall f_13069(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13078)
-static void C_ccall f_13078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13081)
-static void C_ccall f_13081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_13039)
-static void C_fcall f_13039(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_13049)
-static void C_ccall f_13049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12948)
-static void C_ccall f_12948(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12953)
-static void C_fcall f_12953(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12991)
-static void C_ccall f_12991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12976)
-static void C_ccall f_12976(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12987)
-static void C_ccall f_12987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12983)
-static void C_ccall f_12983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12710)
-static void C_fcall f_12710(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12716)
-static void C_fcall f_12716(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12885)
-static void C_fcall f_12885(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12895)
-static void C_ccall f_12895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12825)
-static void C_fcall f_12825(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12854)
-static void C_ccall f_12854(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12815)
-static void C_ccall f_12815(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12811)
-static void C_ccall f_12811(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12753)
-static void C_ccall f_12753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12767)
-static void C_fcall f_12767(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12777)
-static void C_ccall f_12777(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12182)
-static void C_fcall f_12182(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12196)
-static void C_ccall f_12196(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12203)
-static void C_ccall f_12203(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12206)
-static void C_ccall f_12206(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12215)
-static void C_ccall f_12215(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_12367)
-static void C_fcall f_12367(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12396)
-static void C_ccall f_12396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12222)
-static void C_ccall f_12222(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12318)
-static void C_fcall f_12318(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_12351)
-static void C_ccall f_12351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12331)
-static void C_fcall f_12331(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12225)
-static void C_ccall f_12225(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12446)
-static void C_fcall f_12446(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12687)
-static void C_fcall f_12687(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12697)
-static void C_ccall f_12697(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12628)
-static void C_ccall f_12628(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_12649)
-static void C_fcall f_12649(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12647)
-static void C_ccall f_12647(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12643)
-static void C_ccall f_12643(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12575)
-static void C_ccall f_12575(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12580)
-static void C_fcall f_12580(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12590)
-static void C_ccall f_12590(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12512)
-static void C_fcall f_12512(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12510)
-static void C_ccall f_12510(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12480)
-static void C_ccall f_12480(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12485)
-static void C_fcall f_12485(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12495)
-static void C_ccall f_12495(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12431)
-static C_word C_fcall f_12431(C_word t0,C_word t1);
-C_noret_decl(f_12228)
-static void C_ccall f_12228(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12303)
-static void C_ccall f_12303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12291)
-static void C_ccall f_12291(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12287)
-static void C_ccall f_12287(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12194)
-static void C_ccall f_12194(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11773)
-static void C_fcall f_11773(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12134)
-static void C_fcall f_12134(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11899)
-static void C_ccall f_11899(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12111)
-static void C_fcall f_12111(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12121)
-static void C_ccall f_12121(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12032)
-static void C_ccall f_12032(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12037)
-static void C_fcall f_12037(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12105)
-static void C_ccall f_12105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12064)
-static void C_fcall f_12064(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12102)
-static void C_ccall f_12102(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11782)
-static void C_fcall f_11782(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11875)
-static void C_fcall f_11875(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11885)
-static void C_ccall f_11885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11858)
-static void C_ccall f_11858(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_11863)
-static void C_ccall f_11863(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11817)
-static void C_ccall f_11817(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11822)
-static void C_fcall f_11822(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11832)
-static void C_ccall f_11832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11780)
-static void C_ccall f_11780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12094)
-static void C_ccall f_12094(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_12080)
-static void C_ccall f_12080(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12078)
-static void C_ccall f_12078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11901)
-static void C_fcall f_11901(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12025)
-static void C_ccall f_12025(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12023)
-static void C_ccall f_12023(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11989)
-static void C_fcall f_11989(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_12008)
-static void C_ccall f_12008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11997)
-static void C_fcall f_11997(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11921)
-static void C_ccall f_11921(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11945)
-static void C_fcall f_11945(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11972)
-static C_word C_fcall f_11972(C_word t0,C_word t1);
-C_noret_decl(f_11943)
-static void C_ccall f_11943(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11939)
-static void C_ccall f_11939(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11931)
-static void C_ccall f_11931(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11462)
-static void C_fcall f_11462(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11468)
-static void C_fcall f_11468(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11502)
-static void C_fcall f_11502(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11724)
-static void C_fcall f_11724(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11739)
-static void C_ccall f_11739(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11732)
-static void C_fcall f_11732(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11621)
-static void C_ccall f_11621(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11637)
-static void C_fcall f_11637(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11690)
-static void C_ccall f_11690(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11694)
-static void C_ccall f_11694(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11657)
-static void C_ccall f_11657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11666)
-static void C_fcall f_11666(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11676)
-static void C_ccall f_11676(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11588)
-static void C_ccall f_11588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11593)
-static void C_fcall f_11593(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11608)
-static void C_ccall f_11608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11601)
-static void C_fcall f_11601(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11564)
-static void C_ccall f_11564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_11576)
-static void C_ccall f_11576(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11513)
-static void C_fcall f_11513(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11534)
-static void C_ccall f_11534(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11531)
-static void C_ccall f_11531(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11466)
-static void C_ccall f_11466(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11181)
-static void C_fcall f_11181(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11187)
-static void C_fcall f_11187(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11221)
-static void C_fcall f_11221(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11323)
-static void C_fcall f_11323(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11338)
-static void C_ccall f_11338(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11331)
-static void C_fcall f_11331(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11314)
-static void C_ccall f_11314(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11280)
-static void C_fcall f_11280(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11289)
-static void C_ccall f_11289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_11301)
-static void C_ccall f_11301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11232)
-static void C_fcall f_11232(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11253)
-static void C_ccall f_11253(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11250)
-static void C_ccall f_11250(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11185)
-static void C_ccall f_11185(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11048)
-static void C_fcall f_11048(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11054)
-static void C_ccall f_11054(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11098)
-static void C_ccall f_11098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11103)
-static void C_fcall f_11103(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_11110)
-static void C_ccall f_11110(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11171)
-static void C_ccall f_11171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11167)
-static void C_ccall f_11167(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11125)
-static void C_fcall f_11125(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11159)
-static void C_ccall f_11159(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11152)
-static void C_fcall f_11152(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11123)
-static void C_ccall f_11123(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11088)
-static void C_ccall f_11088(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11066)
-static void C_ccall f_11066(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11073)
-static void C_ccall f_11073(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10760)
-static void C_fcall f_10760(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10973)
-static void C_fcall f_10973(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11035)
-static void C_ccall f_11035(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10981)
-static void C_fcall f_10981(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_11006)
-static void C_ccall f_11006(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10996)
-static void C_ccall f_10996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_11000)
-static void C_ccall f_11000(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10971)
-static void C_ccall f_10971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10763)
-static void C_fcall f_10763(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10939)
-static void C_fcall f_10939(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10954)
-static void C_ccall f_10954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10947)
-static void C_fcall f_10947(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10922)
-static void C_ccall f_10922(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_10934)
-static void C_ccall f_10934(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10868)
-static void C_fcall f_10868(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10892)
-static void C_ccall f_10892(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10886)
-static void C_ccall f_10886(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10850)
-static void C_ccall f_10850(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10803)
-static void C_fcall f_10803(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10806)
-static void C_fcall f_10806(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10811)
-static void C_fcall f_10811(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10826)
-static void C_ccall f_10826(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10819)
-static void C_fcall f_10819(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10654)
-static void C_fcall f_10654(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10660)
-static void C_ccall f_10660(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10691)
-static void C_fcall f_10691(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10695)
-static void C_ccall f_10695(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10699)
-static void C_ccall f_10699(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10658)
-static void C_ccall f_10658(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9266)
-static void C_ccall f_9266(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10646)
-static void C_ccall f_10646(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10649)
-static void C_ccall f_10649(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9922)
-static void C_fcall f_9922(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7) C_noret;
-C_noret_decl(f_10636)
-static void C_ccall f_10636(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10634)
-static void C_ccall f_10634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9926)
-static void C_ccall f_9926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9941)
-static void C_ccall f_9941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9950)
-static void C_fcall f_9950(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9956)
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9959)
-static void C_ccall f_9959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9965)
-static void C_ccall f_9965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10248)
-static void C_fcall f_10248(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10563)
-static void C_fcall f_10563(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10573)
-static void C_ccall f_10573(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10537)
-static void C_fcall f_10537(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10547)
-static void C_ccall f_10547(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10522)
-static void C_ccall f_10522(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10525)
-static void C_ccall f_10525(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10470)
-static void C_ccall f_10470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10473)
-static void C_ccall f_10473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10317)
-static void C_ccall f_10317(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10364)
-static void C_fcall f_10364(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10374)
-static void C_ccall f_10374(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10377)
-static void C_ccall f_10377(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10411)
-static void C_ccall f_10411(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10380)
-static void C_ccall f_10380(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10383)
-static void C_ccall f_10383(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10326)
-static void C_ccall f_10326(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10329)
-static void C_ccall f_10329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10332)
-static void C_ccall f_10332(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9968)
-static void C_ccall f_9968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10230)
-static void C_ccall f_10230(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_10139)
-static void C_ccall f_10139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10141)
-static void C_fcall f_10141(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10217)
-static void C_ccall f_10217(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10149)
-static void C_fcall f_10149(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10164)
-static void C_ccall f_10164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9971)
-static void C_ccall f_9971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9988)
-static void C_ccall f_9988(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10059)
-static void C_ccall f_10059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9991)
-static void C_ccall f_9991(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9994)
-static void C_ccall f_9994(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9999)
-static void C_fcall f_9999(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_10043)
-static void C_ccall f_10043(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10014)
-static void C_ccall f_10014(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9468)
-static void C_fcall f_9468(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_9913)
-static void C_ccall f_9913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9920)
-static void C_ccall f_9920(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9471)
-static void C_fcall f_9471(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_9900)
-static void C_ccall f_9900(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9876)
-static void C_ccall f_9876(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9887)
-static void C_ccall f_9887(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9843)
-static void C_ccall f_9843(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9734)
-static void C_fcall f_9734(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9739)
-static void C_ccall f_9739(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9681)
-static void C_ccall f_9681(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9687)
-static void C_fcall f_9687(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9692)
-static void C_ccall f_9692(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9640)
-static void C_ccall f_9640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9646)
-static void C_fcall f_9646(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9651)
-static void C_ccall f_9651(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9624)
-static void C_ccall f_9624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9620)
-static void C_ccall f_9620(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9590)
-static void C_ccall f_9590(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9553)
-static void C_ccall f_9553(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9569)
-static void C_ccall f_9569(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9535)
-static void C_ccall f_9535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9269)
-static void C_fcall f_9269(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_9440)
-static void C_fcall f_9440(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9455)
-static void C_ccall f_9455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9448)
-static void C_fcall f_9448(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_9420)
-static void C_ccall f_9420(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9394)
-static void C_ccall f_9394(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9340)
-static void C_ccall f_9340(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9346)
-static void C_ccall f_9346(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9352)
-static void C_ccall f_9352(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9309)
-static void C_ccall f_9309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6907)
-static void C_ccall f_6907(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
-C_noret_decl(f_9133)
-static void C_ccall f_9133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9162)
-static void C_ccall f_9162(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9174)
-static void C_ccall f_9174(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9188)
-static void C_fcall f_9188(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_9237)
-static void C_ccall f_9237(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6932)
-static void C_fcall f_6932(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9208)
-static void C_ccall f_9208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9212)
-static void C_ccall f_9212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9182)
-static void C_ccall f_9182(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9168)
-static void C_ccall f_9168(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9166)
-static void C_ccall f_9166(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9158)
-static void C_ccall f_9158(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9053)
-static void C_ccall f_9053(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_9097)
-static void C_ccall f_9097(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8858)
-static void C_ccall f_8858(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8864)
-static void C_ccall f_8864(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8980)
-static void C_ccall f_8980(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8873)
-static void C_ccall f_8873(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8935)
-static void C_ccall f_8935(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8933)
-static void C_ccall f_8933(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8895)
-static void C_ccall f_8895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8773)
-static void C_ccall f_8773(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8814)
-static void C_ccall f_8814(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8826)
-static void C_ccall f_8826(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8804)
-static void C_ccall f_8804(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8802)
-static void C_ccall f_8802(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8591)
-static void C_ccall f_8591(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8697)
-static void C_ccall f_8697(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_8600)
-static void C_ccall f_8600(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8671)
-static void C_ccall f_8671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_8669)
-static void C_ccall f_8669(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8622)
-static void C_ccall f_8622(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8551)
-static void C_ccall f_8551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8567)
-static void C_ccall f_8567(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8472)
-static void C_ccall f_8472(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8501)
-static void C_fcall f_8501(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8382)
-static void C_ccall f_8382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8416)
-static void C_fcall f_8416(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8277)
-static void C_ccall f_8277(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8303)
-static void C_ccall f_8303(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8299)
-static void C_ccall f_8299(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8183)
-static void C_ccall f_8183(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8106)
-static void C_ccall f_8106(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8130)
-static void C_fcall f_8130(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8134)
-static void C_ccall f_8134(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8018)
-static void C_ccall f_8018(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8074)
-static void C_ccall f_8074(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_8070)
-static void C_ccall f_8070(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7947)
-static void C_ccall f_7947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7959)
-static void C_fcall f_7959(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7979)
-static void C_ccall f_7979(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7975)
-static void C_ccall f_7975(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7848)
-static void C_ccall f_7848(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7877)
-static void C_ccall f_7877(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7885)
-static void C_ccall f_7885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7889)
-static void C_ccall f_7889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7605)
-static void C_ccall f_7605(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7633)
-static void C_fcall f_7633(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7636)
-static void C_fcall f_7636(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7749)
-static void C_fcall f_7749(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7783)
-static void C_ccall f_7783(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7639)
-static void C_ccall f_7639(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7714)
-static void C_fcall f_7714(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_7743)
-static void C_ccall f_7743(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7642)
-static void C_ccall f_7642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7686)
-static void C_ccall f_7686(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_7684)
-static void C_ccall f_7684(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7647)
-static void C_ccall f_7647(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_7627)
-static void C_ccall f_7627(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7579)
-static void C_ccall f_7579(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7506)
-static void C_ccall f_7506(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7543)
-static void C_ccall f_7543(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7535)
-static void C_ccall f_7535(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7417)
-static void C_ccall f_7417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7312)
-static void C_ccall f_7312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7367)
-static void C_ccall f_7367(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7244)
-static void C_ccall f_7244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7264)
-static void C_ccall f_7264(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7272)
-static void C_ccall f_7272(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7195)
-static void C_ccall f_7195(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7211)
-static void C_ccall f_7211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7120)
-static void C_ccall f_7120(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6969)
-static void C_ccall f_6969(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_7050)
-static void C_ccall f_7050(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6972)
-static void C_fcall f_6972(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6887)
-static void C_ccall f_6887(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6887)
-static void C_ccall f_6887r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6891)
-static void C_ccall f_6891(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6901)
-static void C_ccall f_6901(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6398)
-static void C_ccall f_6398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_6834)
-static void C_fcall f_6834(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6867)
-static void C_ccall f_6867(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6847)
-static void C_fcall f_6847(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6402)
-static void C_ccall f_6402(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6787)
-static void C_fcall f_6787(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6807)
-static void C_ccall f_6807(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6795)
-static void C_fcall f_6795(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6804)
-static void C_ccall f_6804(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6800)
-static void C_ccall f_6800(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6449)
-static void C_ccall f_6449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6707)
-static void C_fcall f_6707(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6774)
-static void C_ccall f_6774(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6715)
-static void C_fcall f_6715(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6747)
-static void C_ccall f_6747(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6760)
-static void C_ccall f_6760(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6725)
-static void C_ccall f_6725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6741)
-static void C_ccall f_6741(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6729)
-static void C_ccall f_6729(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6733)
-static void C_ccall f_6733(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6452)
-static void C_ccall f_6452(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6626)
-static void C_fcall f_6626(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6694)
-static void C_ccall f_6694(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6634)
-static void C_fcall f_6634(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6677)
-static void C_ccall f_6677(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6683)
-static void C_ccall f_6683(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6641)
-static void C_ccall f_6641(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6651)
-static void C_ccall f_6651(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6664)
-static void C_ccall f_6664(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6649)
-static void C_ccall f_6649(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6645)
-static void C_ccall f_6645(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6455)
-static void C_ccall f_6455(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6458)
-static void C_ccall f_6458(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6478)
-static void C_ccall f_6478(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6491)
-static void C_fcall f_6491(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6552)
-static void C_ccall f_6552(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6598)
-static void C_ccall f_6598(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6550)
-static void C_ccall f_6550(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6520)
-static void C_ccall f_6520(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6461)
-static void C_ccall f_6461(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6470)
-static void C_ccall f_6470(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6404)
-static void C_fcall f_6404(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6410)
-static void C_fcall f_6410(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6434)
-static void C_ccall f_6434(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6383)
-static void C_ccall f_6383(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
-C_noret_decl(f_6383)
-static void C_ccall f_6383r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_6064)
-static void C_ccall f_6064(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6078)
-static void C_ccall f_6078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6098)
-static void C_ccall f_6098(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6105)
-static void C_ccall f_6105(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6110)
-static void C_fcall f_6110(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6370)
-static void C_ccall f_6370(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6118)
-static void C_fcall f_6118(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6354)
-static void C_ccall f_6354(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6136)
-static void C_ccall f_6136(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6139)
-static void C_ccall f_6139(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6145)
-static void C_fcall f_6145(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6165)
-static void C_fcall f_6165(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6171)
-static void C_ccall f_6171(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6177)
-static void C_fcall f_6177(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6186)
-static void C_fcall f_6186(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6193)
-static void C_ccall f_6193(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6196)
-static void C_ccall f_6196(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6214)
-static void C_ccall f_6214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6199)
-static void C_ccall f_6199(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6081)
-static void C_ccall f_6081(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6084)
-static void C_ccall f_6084(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6071)
-static void C_fcall f_6071(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_6067)
-static C_word C_fcall f_6067(C_word t0);
-C_noret_decl(f_4194)
-static void C_ccall f_4194(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5946)
-static void C_ccall f_5946(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5952)
-static void C_ccall f_5952(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5956)
-static void C_ccall f_5956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5959)
-static void C_ccall f_5959(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5995)
-static void C_ccall f_5995(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6000)
-static void C_fcall f_6000(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_6012)
-static void C_ccall f_6012(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6039)
-static void C_ccall f_6039(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5962)
-static void C_ccall f_5962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5965)
-static void C_ccall f_5965(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5968)
-static void C_ccall f_5968(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5971)
-static void C_ccall f_5971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5916)
-static void C_fcall f_5916(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
-C_noret_decl(f_5936)
-static void C_ccall f_5936(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5920)
-static void C_ccall f_5920(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5926)
-static void C_ccall f_5926(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4649)
-static void C_fcall f_4649(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5806)
-static void C_ccall f_5806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5809)
-static void C_ccall f_5809(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5908)
-static void C_ccall f_5908(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5904)
-static void C_ccall f_5904(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5866)
-static void C_fcall f_5866(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5897)
-static void C_ccall f_5897(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5893)
-static void C_ccall f_5893(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5885)
-static void C_ccall f_5885(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5826)
-static void C_fcall f_5826(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5856)
-static void C_ccall f_5856(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5832)
-static void C_ccall f_5832(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5780)
-static void C_ccall f_5780(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5778)
-static void C_ccall f_5778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5738)
-static void C_ccall f_5738(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5728)
-static void C_ccall f_5728(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5040)
-static void C_ccall f_5040(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5049)
-static void C_ccall f_5049(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5280)
-static void C_fcall f_5280(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5296)
-static void C_ccall f_5296(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_5670)
-static void C_ccall f_5670(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5707)
-static void C_ccall f_5707(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5684)
-static void C_ccall f_5684(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5306)
-static void C_fcall f_5306(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5378)
-static void C_ccall f_5378(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5657)
-static void C_ccall f_5657(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5556)
-static void C_fcall f_5556(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5559)
-static void C_ccall f_5559(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5571)
-static void C_ccall f_5571(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5582)
-static void C_ccall f_5582(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_5621)
-static void C_ccall f_5621(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5613)
-static void C_ccall f_5613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5601)
-static void C_ccall f_5601(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5599)
-static void C_ccall f_5599(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5576)
-static void C_ccall f_5576(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5392)
-static void C_fcall f_5392(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
-C_noret_decl(f_5437)
-static void C_ccall f_5437(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5443)
-static void C_ccall f_5443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5449)
-static void C_ccall f_5449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5493)
-static void C_ccall f_5493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5469)
-static void C_ccall f_5469(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5473)
-static void C_ccall f_5473(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5431)
-static void C_ccall f_5431(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5419)
-static void C_ccall f_5419(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5417)
-static void C_ccall f_5417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5372)
-static void C_ccall f_5372(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5309)
-static void C_ccall f_5309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5343)
-static void C_ccall f_5343(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5312)
-static void C_ccall f_5312(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5315)
-static void C_ccall f_5315(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5318)
-static void C_ccall f_5318(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5328)
-static void C_ccall f_5328(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5256)
-static void C_ccall f_5256(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5131)
-static void C_ccall f_5131(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5152)
-static void C_ccall f_5152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5220)
-static void C_ccall f_5220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5212)
-static void C_ccall f_5212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5155)
-static void C_fcall f_5155(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5191)
-static void C_ccall f_5191(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5189)
-static void C_ccall f_5189(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5164)
-static void C_ccall f_5164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5110)
-static void C_fcall f_5110(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5063)
-static void C_ccall f_5063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5066)
-static void C_ccall f_5066(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5094)
-static void C_ccall f_5094(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_5072)
-static void C_ccall f_5072(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5079)
-static void C_ccall f_5079(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4845)
-static void C_ccall f_4845(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4944)
-static void C_ccall f_4944(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4949)
-static void C_ccall f_4949(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4956)
-static void C_ccall f_4956(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4996)
-static void C_ccall f_4996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4976)
-static void C_ccall f_4976(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4850)
-static void C_ccall f_4850(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
-C_noret_decl(f_4868)
-static void C_ccall f_4868(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4875)
-static void C_ccall f_4875(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4922)
-static void C_ccall f_4922(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4925)
-static void C_ccall f_4925(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4915)
-static void C_ccall f_4915(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4895)
-static void C_ccall f_4895(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4856)
-static void C_ccall f_4856(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4862)
-static void C_ccall f_4862(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4779)
-static void C_ccall f_4779(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4820)
-static void C_ccall f_4820(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4827)
-static void C_ccall f_4827(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4782)
-static void C_fcall f_4782(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4810)
-static void C_ccall f_4810(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4808)
-static void C_ccall f_4808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4689)
-static void C_fcall f_4689(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4693)
-static void C_ccall f_4693(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4705)
-static void C_ccall f_4705(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4734)
-static void C_ccall f_4734(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4711)
-static void C_ccall f_4711(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4731)
-static void C_ccall f_4731(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4368)
-static void C_fcall f_4368(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_4382)
-static void C_ccall f_4382(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4608)
-static void C_ccall f_4608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4614)
-static void C_ccall f_4614(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4462)
-static void C_ccall f_4462(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4554)
-static void C_fcall f_4554(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4548)
-static void C_ccall f_4548(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4473)
-static void C_ccall f_4473(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4496)
-static void C_ccall f_4496(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4534)
-static void C_ccall f_4534(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_4534)
-static void C_ccall f_4534r(C_word t0,C_word t1,C_word t3) C_noret;
-C_noret_decl(f_4540)
-static void C_ccall f_4540(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4502)
-static void C_ccall f_4502(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4506)
-static void C_ccall f_4506(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4509)
-static void C_ccall f_4509(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4532)
-static void C_ccall f_4532(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4479)
-static void C_ccall f_4479(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4485)
-static void C_ccall f_4485(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4489)
-static void C_fcall f_4489(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4493)
-static void C_ccall f_4493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4468)
-static void C_ccall f_4468(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4401)
-static void C_ccall f_4401(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4237)
-static void C_fcall f_4237(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4241)
-static void C_ccall f_4241(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4252)
-static void C_ccall f_4252(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4262)
-static void C_ccall f_4262(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4311)
-static void C_fcall f_4311(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4338)
-static C_word C_fcall f_4338(C_word t0,C_word t1);
-C_noret_decl(f_4309)
-static void C_ccall f_4309(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4268)
-static void C_ccall f_4268(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4274)
-static void C_ccall f_4274(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4301)
-static void C_ccall f_4301(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4244)
-static void C_ccall f_4244(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4233)
-static C_word C_fcall f_4233(C_word t0);
-C_noret_decl(f_4203)
-static void C_ccall f_4203(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4197)
-static void C_fcall f_4197(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3757)
-static void C_ccall f_3757(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4135)
-static void C_ccall f_4135(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4138)
-static void C_ccall f_4138(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4187)
-static void C_ccall f_4187(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4141)
-static void C_ccall f_4141(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4146)
-static void C_ccall f_4146(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_4152)
-static void C_ccall f_4152(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3829)
-static void C_fcall f_3829(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3910)
-static void C_fcall f_3910(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3960)
-static void C_fcall f_3960(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3984)
-static void C_ccall f_3984(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3987)
-static void C_ccall f_3987(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4089)
-static void C_fcall f_4089(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4092)
-static void C_ccall f_4092(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3990)
-static void C_ccall f_3990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4008)
-static void C_fcall f_4008(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4027)
-static void C_ccall f_4027(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4030)
-static void C_ccall f_4030(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4033)
-static void C_ccall f_4033(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4036)
-static void C_ccall f_4036(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4039)
-static void C_ccall f_4039(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4042)
-static void C_ccall f_4042(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4020)
-static void C_ccall f_4020(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3993)
-static void C_ccall f_3993(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3996)
-static void C_ccall f_3996(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3936)
-static void C_ccall f_3936(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3947)
-static void C_ccall f_3947(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3913)
-static void C_ccall f_3913(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3883)
-static void C_fcall f_3883(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3866)
-static void C_fcall f_3866(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3872)
-static void C_ccall f_3872(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3870)
-static void C_ccall f_3870(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3795)
-static void C_fcall f_3795(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3801)
-static void C_fcall f_3801(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3816)
-static void C_ccall f_3816(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3809)
-static void C_fcall f_3809(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3790)
-static C_word C_fcall f_3790(C_word t0);
-C_noret_decl(f_3783)
-static void C_fcall f_3783(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
-C_noret_decl(f_3788)
-static void C_ccall f_3788(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_3760)
-static void C_fcall f_3760(C_word t0,C_word t1,C_word t2) C_noret;
-C_noret_decl(f_3767)
-static void C_fcall f_3767(C_word t0,C_word t1) C_noret;
-
-C_noret_decl(trf_14739)
-static void C_fcall trf_14739(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14739(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14739(t0,t1,t2);}
-
-C_noret_decl(trf_14753)
-static void C_fcall trf_14753(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_14753(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_14753(t0,t1,t2);}
-
-C_noret_decl(trf_13793)
-static void C_fcall trf_13793(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13793(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_13793(t0,t1,t2,t3);}
-
-C_noret_decl(trf_13928)
-static void C_fcall trf_13928(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13928(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_13928(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_13959)
-static void C_fcall trf_13959(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13959(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_13959(t0,t1);}
-
-C_noret_decl(trf_11428)
-static void C_fcall trf_11428(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11428(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11428(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12908)
-static void C_fcall trf_12908(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12908(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12908(t0,t1,t2);}
-
-C_noret_decl(trf_12914)
-static void C_fcall trf_12914(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12914(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12914(t0,t1,t2);}
-
-C_noret_decl(trf_13125)
-static void C_fcall trf_13125(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13125(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13125(t0,t1,t2);}
-
-C_noret_decl(trf_13099)
-static void C_fcall trf_13099(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13099(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13099(t0,t1,t2);}
-
-C_noret_decl(trf_13039)
-static void C_fcall trf_13039(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_13039(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_13039(t0,t1,t2);}
-
-C_noret_decl(trf_12953)
-static void C_fcall trf_12953(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12953(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12953(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12710)
-static void C_fcall trf_12710(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12710(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12710(t0,t1,t2);}
-
-C_noret_decl(trf_12716)
-static void C_fcall trf_12716(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12716(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12716(t0,t1,t2);}
-
-C_noret_decl(trf_12885)
-static void C_fcall trf_12885(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12885(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12885(t0,t1,t2);}
-
-C_noret_decl(trf_12825)
-static void C_fcall trf_12825(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12825(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12825(t0,t1,t2);}
-
-C_noret_decl(trf_12767)
-static void C_fcall trf_12767(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12767(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12767(t0,t1,t2);}
-
-C_noret_decl(trf_12182)
-static void C_fcall trf_12182(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12182(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12182(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12367)
-static void C_fcall trf_12367(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12367(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12367(t0,t1,t2);}
-
-C_noret_decl(trf_12318)
-static void C_fcall trf_12318(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12318(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_12318(t0,t1,t2,t3);}
-
-C_noret_decl(trf_12331)
-static void C_fcall trf_12331(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12331(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_12331(t0,t1);}
-
-C_noret_decl(trf_12446)
-static void C_fcall trf_12446(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12446(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12446(t0,t1,t2);}
-
-C_noret_decl(trf_12687)
-static void C_fcall trf_12687(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12687(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12687(t0,t1,t2);}
-
-C_noret_decl(trf_12649)
-static void C_fcall trf_12649(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12649(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12649(t0,t1,t2);}
-
-C_noret_decl(trf_12580)
-static void C_fcall trf_12580(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12580(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12580(t0,t1,t2);}
-
-C_noret_decl(trf_12512)
-static void C_fcall trf_12512(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12512(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12512(t0,t1,t2);}
-
-C_noret_decl(trf_12485)
-static void C_fcall trf_12485(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12485(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12485(t0,t1,t2);}
-
-C_noret_decl(trf_11773)
-static void C_fcall trf_11773(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11773(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11773(t0,t1,t2);}
-
-C_noret_decl(trf_12134)
-static void C_fcall trf_12134(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12134(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12134(t0,t1,t2);}
-
-C_noret_decl(trf_12111)
-static void C_fcall trf_12111(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12111(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12111(t0,t1,t2);}
-
-C_noret_decl(trf_12037)
-static void C_fcall trf_12037(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12037(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12037(t0,t1,t2);}
-
-C_noret_decl(trf_12064)
-static void C_fcall trf_12064(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_12064(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_12064(t0,t1,t2);}
-
-C_noret_decl(trf_11782)
-static void C_fcall trf_11782(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11782(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11782(t0,t1,t2);}
-
-C_noret_decl(trf_11875)
-static void C_fcall trf_11875(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11875(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11875(t0,t1,t2);}
-
-C_noret_decl(trf_11822)
-static void C_fcall trf_11822(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11822(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11822(t0,t1,t2);}
-
-C_noret_decl(trf_11901)
-static void C_fcall trf_11901(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11901(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11901(t0,t1,t2);}
-
-C_noret_decl(trf_11989)
-static void C_fcall trf_11989(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11989(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11989(t0,t1,t2);}
-
-C_noret_decl(trf_11997)
-static void C_fcall trf_11997(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11997(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11997(t0,t1,t2);}
-
-C_noret_decl(trf_11945)
-static void C_fcall trf_11945(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11945(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11945(t0,t1,t2);}
-
-C_noret_decl(trf_11462)
-static void C_fcall trf_11462(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11462(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11462(t0,t1,t2);}
-
-C_noret_decl(trf_11468)
-static void C_fcall trf_11468(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11468(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11468(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11502)
-static void C_fcall trf_11502(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11502(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11502(t0,t1);}
-
-C_noret_decl(trf_11724)
-static void C_fcall trf_11724(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11724(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11724(t0,t1,t2);}
-
-C_noret_decl(trf_11732)
-static void C_fcall trf_11732(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11732(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11732(t0,t1,t2);}
-
-C_noret_decl(trf_11637)
-static void C_fcall trf_11637(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11637(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11637(t0,t1,t2);}
-
-C_noret_decl(trf_11666)
-static void C_fcall trf_11666(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11666(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11666(t0,t1,t2);}
-
-C_noret_decl(trf_11593)
-static void C_fcall trf_11593(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11593(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11593(t0,t1,t2);}
-
-C_noret_decl(trf_11601)
-static void C_fcall trf_11601(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11601(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11601(t0,t1,t2);}
-
-C_noret_decl(trf_11513)
-static void C_fcall trf_11513(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11513(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11513(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11181)
-static void C_fcall trf_11181(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11181(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11181(t0,t1,t2);}
-
-C_noret_decl(trf_11187)
-static void C_fcall trf_11187(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11187(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11187(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11221)
-static void C_fcall trf_11221(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11221(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11221(t0,t1);}
-
-C_noret_decl(trf_11323)
-static void C_fcall trf_11323(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11323(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11323(t0,t1,t2);}
-
-C_noret_decl(trf_11331)
-static void C_fcall trf_11331(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11331(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11331(t0,t1,t2);}
-
-C_noret_decl(trf_11280)
-static void C_fcall trf_11280(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11280(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_11280(t0,t1);}
-
-C_noret_decl(trf_11232)
-static void C_fcall trf_11232(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11232(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11232(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11048)
-static void C_fcall trf_11048(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11048(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11048(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11103)
-static void C_fcall trf_11103(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11103(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_11103(t0,t1,t2,t3);}
-
-C_noret_decl(trf_11125)
-static void C_fcall trf_11125(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11125(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11125(t0,t1,t2);}
-
-C_noret_decl(trf_11152)
-static void C_fcall trf_11152(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_11152(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_11152(t0,t1,t2);}
-
-C_noret_decl(trf_10760)
-static void C_fcall trf_10760(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10760(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10760(t0,t1,t2);}
-
-C_noret_decl(trf_10973)
-static void C_fcall trf_10973(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10973(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10973(t0,t1,t2);}
-
-C_noret_decl(trf_10981)
-static void C_fcall trf_10981(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10981(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10981(t0,t1,t2);}
-
-C_noret_decl(trf_10763)
-static void C_fcall trf_10763(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10763(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10763(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10939)
-static void C_fcall trf_10939(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10939(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10939(t0,t1,t2);}
-
-C_noret_decl(trf_10947)
-static void C_fcall trf_10947(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10947(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10947(t0,t1,t2);}
-
-C_noret_decl(trf_10868)
-static void C_fcall trf_10868(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10868(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_10868(t0,t1,t2,t3);}
-
-C_noret_decl(trf_10803)
-static void C_fcall trf_10803(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10803(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10803(t0,t1);}
-
-C_noret_decl(trf_10806)
-static void C_fcall trf_10806(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10806(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10806(t0,t1);}
-
-C_noret_decl(trf_10811)
-static void C_fcall trf_10811(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10811(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10811(t0,t1,t2);}
-
-C_noret_decl(trf_10819)
-static void C_fcall trf_10819(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10819(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10819(t0,t1,t2);}
-
-C_noret_decl(trf_10654)
-static void C_fcall trf_10654(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10654(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10654(t0,t1);}
-
-C_noret_decl(trf_10691)
-static void C_fcall trf_10691(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10691(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_10691(t0,t1);}
-
-C_noret_decl(trf_9922)
-static void C_fcall trf_9922(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9922(void *dummy){
-C_word t7=C_pick(0);
-C_word t6=C_pick(1);
-C_word t5=C_pick(2);
-C_word t4=C_pick(3);
-C_word t3=C_pick(4);
-C_word t2=C_pick(5);
-C_word t1=C_pick(6);
-C_word t0=C_pick(7);
-C_adjust_stack(-8);
-f_9922(t0,t1,t2,t3,t4,t5,t6,t7);}
-
-C_noret_decl(trf_9950)
-static void C_fcall trf_9950(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9950(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9950(t0,t1);}
-
-C_noret_decl(trf_10248)
-static void C_fcall trf_10248(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10248(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10248(t0,t1,t2);}
-
-C_noret_decl(trf_10563)
-static void C_fcall trf_10563(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10563(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10563(t0,t1,t2);}
-
-C_noret_decl(trf_10537)
-static void C_fcall trf_10537(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10537(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10537(t0,t1,t2);}
-
-C_noret_decl(trf_10364)
-static void C_fcall trf_10364(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10364(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10364(t0,t1,t2);}
-
-C_noret_decl(trf_10141)
-static void C_fcall trf_10141(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10141(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10141(t0,t1,t2);}
-
-C_noret_decl(trf_10149)
-static void C_fcall trf_10149(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_10149(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_10149(t0,t1,t2);}
-
-C_noret_decl(trf_9999)
-static void C_fcall trf_9999(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9999(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9999(t0,t1,t2);}
-
-C_noret_decl(trf_9468)
-static void C_fcall trf_9468(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9468(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_9468(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_9471)
-static void C_fcall trf_9471(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9471(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_9471(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_9734)
-static void C_fcall trf_9734(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9734(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9734(t0,t1);}
-
-C_noret_decl(trf_9687)
-static void C_fcall trf_9687(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9687(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9687(t0,t1);}
-
-C_noret_decl(trf_9646)
-static void C_fcall trf_9646(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9646(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_9646(t0,t1);}
-
-C_noret_decl(trf_9269)
-static void C_fcall trf_9269(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9269(void *dummy){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-f_9269(t0,t1,t2,t3,t4);}
-
-C_noret_decl(trf_9440)
-static void C_fcall trf_9440(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9440(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9440(t0,t1,t2);}
-
-C_noret_decl(trf_9448)
-static void C_fcall trf_9448(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9448(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_9448(t0,t1,t2);}
-
-C_noret_decl(trf_9188)
-static void C_fcall trf_9188(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_9188(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_9188(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6932)
-static void C_fcall trf_6932(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6932(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6932(t0,t1);}
-
-C_noret_decl(trf_8501)
-static void C_fcall trf_8501(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8501(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8501(t0,t1);}
-
-C_noret_decl(trf_8416)
-static void C_fcall trf_8416(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8416(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8416(t0,t1);}
-
-C_noret_decl(trf_8130)
-static void C_fcall trf_8130(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8130(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_8130(t0,t1);}
-
-C_noret_decl(trf_7959)
-static void C_fcall trf_7959(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7959(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7959(t0,t1);}
-
-C_noret_decl(trf_7633)
-static void C_fcall trf_7633(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7633(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7633(t0,t1);}
-
-C_noret_decl(trf_7636)
-static void C_fcall trf_7636(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7636(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_7636(t0,t1);}
-
-C_noret_decl(trf_7749)
-static void C_fcall trf_7749(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7749(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7749(t0,t1,t2);}
-
-C_noret_decl(trf_7714)
-static void C_fcall trf_7714(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7714(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_7714(t0,t1,t2);}
-
-C_noret_decl(trf_6972)
-static void C_fcall trf_6972(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6972(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6972(t0,t1);}
-
-C_noret_decl(trf_6834)
-static void C_fcall trf_6834(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6834(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6834(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6847)
-static void C_fcall trf_6847(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6847(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6847(t0,t1);}
-
-C_noret_decl(trf_6787)
-static void C_fcall trf_6787(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6787(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6787(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6795)
-static void C_fcall trf_6795(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6795(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6795(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6707)
-static void C_fcall trf_6707(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6707(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6707(t0,t1,t2);}
-
-C_noret_decl(trf_6715)
-static void C_fcall trf_6715(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6715(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6715(t0,t1,t2);}
-
-C_noret_decl(trf_6626)
-static void C_fcall trf_6626(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6626(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6626(t0,t1,t2);}
-
-C_noret_decl(trf_6634)
-static void C_fcall trf_6634(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6634(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6634(t0,t1,t2);}
-
-C_noret_decl(trf_6491)
-static void C_fcall trf_6491(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6491(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6491(t0,t1);}
-
-C_noret_decl(trf_6404)
-static void C_fcall trf_6404(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6404(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6404(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6410)
-static void C_fcall trf_6410(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6410(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6410(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6110)
-static void C_fcall trf_6110(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6110(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6110(t0,t1,t2);}
-
-C_noret_decl(trf_6118)
-static void C_fcall trf_6118(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6118(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6118(t0,t1,t2);}
-
-C_noret_decl(trf_6145)
-static void C_fcall trf_6145(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6145(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6145(t0,t1);}
-
-C_noret_decl(trf_6165)
-static void C_fcall trf_6165(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6165(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6165(t0,t1);}
-
-C_noret_decl(trf_6177)
-static void C_fcall trf_6177(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6177(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6177(t0,t1);}
-
-C_noret_decl(trf_6186)
-static void C_fcall trf_6186(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6186(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_6186(t0,t1);}
-
-C_noret_decl(trf_6071)
-static void C_fcall trf_6071(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6071(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_6071(t0,t1,t2,t3);}
-
-C_noret_decl(trf_6000)
-static void C_fcall trf_6000(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6000(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_6000(t0,t1,t2);}
-
-C_noret_decl(trf_5916)
-static void C_fcall trf_5916(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5916(void *dummy){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-f_5916(t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(trf_4649)
-static void C_fcall trf_4649(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4649(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4649(t0,t1,t2,t3);}
-
-C_noret_decl(trf_5866)
-static void C_fcall trf_5866(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5866(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5866(t0,t1);}
-
-C_noret_decl(trf_5826)
-static void C_fcall trf_5826(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5826(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5826(t0,t1);}
-
-C_noret_decl(trf_5280)
-static void C_fcall trf_5280(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5280(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5280(t0,t1);}
-
-C_noret_decl(trf_5306)
-static void C_fcall trf_5306(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5306(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5306(t0,t1);}
-
-C_noret_decl(trf_5556)
-static void C_fcall trf_5556(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5556(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5556(t0,t1);}
-
-C_noret_decl(trf_5392)
-static void C_fcall trf_5392(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5392(void *dummy){
-C_word t5=C_pick(0);
-C_word t4=C_pick(1);
-C_word t3=C_pick(2);
-C_word t2=C_pick(3);
-C_word t1=C_pick(4);
-C_word t0=C_pick(5);
-C_adjust_stack(-6);
-f_5392(t0,t1,t2,t3,t4,t5);}
-
-C_noret_decl(trf_5155)
-static void C_fcall trf_5155(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5155(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5155(t0,t1);}
-
-C_noret_decl(trf_5110)
-static void C_fcall trf_5110(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_5110(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_5110(t0,t1);}
-
-C_noret_decl(trf_4782)
-static void C_fcall trf_4782(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4782(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4782(t0,t1);}
-
-C_noret_decl(trf_4689)
-static void C_fcall trf_4689(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4689(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4689(t0,t1,t2);}
-
-C_noret_decl(trf_4368)
-static void C_fcall trf_4368(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4368(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4368(t0,t1,t2,t3);}
-
-C_noret_decl(trf_4554)
-static void C_fcall trf_4554(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4554(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4554(t0,t1,t2);}
-
-C_noret_decl(trf_4489)
-static void C_fcall trf_4489(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4489(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4489(t0,t1);}
-
-C_noret_decl(trf_4237)
-static void C_fcall trf_4237(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4237(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4237(t0,t1,t2);}
-
-C_noret_decl(trf_4311)
-static void C_fcall trf_4311(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4311(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_4311(t0,t1,t2);}
-
-C_noret_decl(trf_4197)
-static void C_fcall trf_4197(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4197(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_4197(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3829)
-static void C_fcall trf_3829(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3829(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3829(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3910)
-static void C_fcall trf_3910(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3910(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3910(t0,t1);}
-
-C_noret_decl(trf_3960)
-static void C_fcall trf_3960(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3960(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3960(t0,t1);}
-
-C_noret_decl(trf_4089)
-static void C_fcall trf_4089(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4089(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4089(t0,t1);}
-
-C_noret_decl(trf_4008)
-static void C_fcall trf_4008(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4008(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_4008(t0,t1);}
-
-C_noret_decl(trf_3883)
-static void C_fcall trf_3883(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3883(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3883(t0,t1);}
-
-C_noret_decl(trf_3866)
-static void C_fcall trf_3866(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3866(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3866(t0,t1);}
-
-C_noret_decl(trf_3795)
-static void C_fcall trf_3795(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3795(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3795(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3801)
-static void C_fcall trf_3801(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3801(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3801(t0,t1,t2);}
-
-C_noret_decl(trf_3809)
-static void C_fcall trf_3809(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3809(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3809(t0,t1,t2);}
-
-C_noret_decl(trf_3783)
-static void C_fcall trf_3783(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3783(void *dummy){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-f_3783(t0,t1,t2,t3);}
-
-C_noret_decl(trf_3760)
-static void C_fcall trf_3760(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3760(void *dummy){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-f_3760(t0,t1,t2);}
-
-C_noret_decl(trf_3767)
-static void C_fcall trf_3767(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_3767(void *dummy){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-f_3767(t0,t1);}
-
-C_noret_decl(tr3)
-static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3(C_proc3 k){
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-(k)(3,t0,t1,t2);}
-
-C_noret_decl(tr10)
-static void C_fcall tr10(C_proc10 k) C_regparm C_noret;
-C_regparm static void C_fcall tr10(C_proc10 k){
-C_word t9=C_pick(0);
-C_word t8=C_pick(1);
-C_word t7=C_pick(2);
-C_word t6=C_pick(3);
-C_word t5=C_pick(4);
-C_word t4=C_pick(5);
-C_word t3=C_pick(6);
-C_word t2=C_pick(7);
-C_word t1=C_pick(8);
-C_word t0=C_pick(9);
-C_adjust_stack(-10);
-(k)(10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-
-C_noret_decl(tr14)
-static void C_fcall tr14(C_proc14 k) C_regparm C_noret;
-C_regparm static void C_fcall tr14(C_proc14 k){
-C_word t13=C_pick(0);
-C_word t12=C_pick(1);
-C_word t11=C_pick(2);
-C_word t10=C_pick(3);
-C_word t9=C_pick(4);
-C_word t8=C_pick(5);
-C_word t7=C_pick(6);
-C_word t6=C_pick(7);
-C_word t5=C_pick(8);
-C_word t4=C_pick(9);
-C_word t3=C_pick(10);
-C_word t2=C_pick(11);
-C_word t1=C_pick(12);
-C_word t0=C_pick(13);
-C_adjust_stack(-14);
-(k)(14,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13);}
-
-C_noret_decl(tr11)
-static void C_fcall tr11(C_proc11 k) C_regparm C_noret;
-C_regparm static void C_fcall tr11(C_proc11 k){
-C_word t10=C_pick(0);
-C_word t9=C_pick(1);
-C_word t8=C_pick(2);
-C_word t7=C_pick(3);
-C_word t6=C_pick(4);
-C_word t5=C_pick(5);
-C_word t4=C_pick(6);
-C_word t3=C_pick(7);
-C_word t2=C_pick(8);
-C_word t1=C_pick(9);
-C_word t0=C_pick(10);
-C_adjust_stack(-11);
-(k)(11,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10);}
-
-C_noret_decl(tr4)
-static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
-C_regparm static void C_fcall tr4(C_proc4 k){
-C_word t3=C_pick(0);
-C_word t2=C_pick(1);
-C_word t1=C_pick(2);
-C_word t0=C_pick(3);
-C_adjust_stack(-4);
-(k)(4,t0,t1,t2,t3);}
-
-C_noret_decl(tr5)
-static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
-C_regparm static void C_fcall tr5(C_proc5 k){
-C_word t4=C_pick(0);
-C_word t3=C_pick(1);
-C_word t2=C_pick(2);
-C_word t1=C_pick(3);
-C_word t0=C_pick(4);
-C_adjust_stack(-5);
-(k)(5,t0,t1,t2,t3,t4);}
-
-C_noret_decl(tr9)
-static void C_fcall tr9(C_proc9 k) C_regparm C_noret;
-C_regparm static void C_fcall tr9(C_proc9 k){
-C_word t8=C_pick(0);
-C_word t7=C_pick(1);
-C_word t6=C_pick(2);
-C_word t5=C_pick(3);
-C_word t4=C_pick(4);
-C_word t3=C_pick(5);
-C_word t2=C_pick(6);
-C_word t1=C_pick(7);
-C_word t0=C_pick(8);
-C_adjust_stack(-9);
-(k)(9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-
-C_noret_decl(tr7)
-static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
-C_regparm static void C_fcall tr7(C_proc7 k){
-C_word t6=C_pick(0);
-C_word t5=C_pick(1);
-C_word t4=C_pick(2);
-C_word t3=C_pick(3);
-C_word t2=C_pick(4);
-C_word t1=C_pick(5);
-C_word t0=C_pick(6);
-C_adjust_stack(-7);
-(k)(7,t0,t1,t2,t3,t4,t5,t6);}
-
-C_noret_decl(tr2)
-static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2(C_proc2 k){
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-(k)(2,t0,t1);}
-
-C_noret_decl(tr2r)
-static void C_fcall tr2r(C_proc2 k) C_regparm C_noret;
-C_regparm static void C_fcall tr2r(C_proc2 k){
-int n;
-C_word *a,t2;
-C_word t1=C_pick(0);
-C_word t0=C_pick(1);
-C_adjust_stack(-2);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t2=C_restore_rest(a,n);
-(k)(t0,t1,t2);}
-
-C_noret_decl(tr3r)
-static void C_fcall tr3r(C_proc3 k) C_regparm C_noret;
-C_regparm static void C_fcall tr3r(C_proc3 k){
-int n;
-C_word *a,t3;
-C_word t2=C_pick(0);
-C_word t1=C_pick(1);
-C_word t0=C_pick(2);
-C_adjust_stack(-3);
-n=C_rest_count(0);
-a=C_alloc(n*3);
-t3=C_restore_rest(a,n);
-(k)(t0,t1,t2,t3);}
-
-/* toplevel */
-static C_TLS int toplevel_initialized=0;
-C_noret_decl(toplevel_trampoline)
-static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall toplevel_trampoline(void *dummy){
-C_optimizer_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}
-
-void C_ccall C_optimizer_toplevel(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
-else C_toplevel_entry(C_text("optimizer_toplevel"));
-C_check_nursery_minimum(3);
-if(!C_demand(3)){
-C_save(t1);
-C_reclaim((void*)toplevel_trampoline,NULL);}
-toplevel_initialized=1;
-if(!C_demand_2(2024)){
-C_save(t1);
-C_rereclaim2(2024*sizeof(C_word), 1);
-t1=C_restore;}
-a=C_alloc(3);
-C_initialize_lf(lf,274);
-lf[0]=C_h_intern(&lf[0],34,"\010compilerscan-toplevel-assignments");
-lf[1]=C_h_intern(&lf[1],13,"alist-update!");
-lf[2]=C_h_intern(&lf[2],13,"\004corevariable");
-lf[3]=C_h_intern(&lf[3],6,"remove");
-lf[4]=C_h_intern(&lf[4],2,"if");
-lf[5]=C_h_intern(&lf[5],3,"let");
-lf[6]=C_h_intern(&lf[6],6,"append");
-lf[7]=C_h_intern(&lf[7],6,"lambda");
-lf[8]=C_h_intern(&lf[8],9,"\004corecall");
-lf[9]=C_h_intern(&lf[9],4,"set!");
-lf[10]=C_h_intern(&lf[10],8,"\003sysput!");
-lf[11]=C_h_intern(&lf[11],23,"\010compilertoplevel-alias");
-lf[12]=C_h_intern(&lf[12],18,"\010compilerdebugging");
-lf[13]=C_h_intern(&lf[13],1,"x");
-lf[14]=C_h_intern(&lf[14],17,"get-output-string");
-lf[15]=C_h_intern(&lf[15],5,"write");
-lf[16]=C_h_intern(&lf[16],7,"display");
-lf[17]=C_decode_literal(C_heaptop,"\376B\000\000\004 -> ");
-lf[18]=C_decode_literal(C_heaptop,"\376B\000\000\020toplevel-alias: ");
-lf[19]=C_h_intern(&lf[19],18,"open-output-string");
-lf[20]=C_h_intern(&lf[20],4,"node");
-lf[21]=C_h_intern(&lf[21],14,"\004coreundefined");
-lf[22]=C_h_intern(&lf[22],19,"\010compilercopy-node!");
-lf[23]=C_h_intern(&lf[23],25,"\010compilercompiler-warning");
-lf[24]=C_h_intern(&lf[24],3,"var");
-lf[25]=C_decode_literal(C_heaptop,"\376B\000\000;dropping assignment of unused value to global variable `~s\047");
-lf[26]=C_h_intern(&lf[26],9,"alist-ref");
-lf[27]=C_h_intern(&lf[27],11,"\004corelambda");
-lf[28]=C_h_intern(&lf[28],13,"\004corecallunit");
-lf[29]=C_h_intern(&lf[29],9,"\004corecond");
-lf[30]=C_h_intern(&lf[30],11,"\004coreswitch");
-lf[31]=C_h_intern(&lf[31],21,"\010compileralways-bound");
-lf[32]=C_h_intern(&lf[32],9,"\003syserror");
-lf[33]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[34]=C_h_intern(&lf[34],12,"\003sysfor-each");
-lf[35]=C_h_intern(&lf[35],1,"o");
-lf[36]=C_decode_literal(C_heaptop,"\376B\000\000\014safe globals");
-lf[37]=C_h_intern(&lf[37],17,"delete-duplicates");
-lf[38]=C_h_intern(&lf[38],3,"eq\077");
-lf[39]=C_h_intern(&lf[39],1,"p");
-lf[40]=C_decode_literal(C_heaptop,"\376B\000\000 scanning toplevel assignments...");
-lf[41]=C_h_intern(&lf[41],24,"\010compilersimplifications");
-lf[42]=C_h_intern(&lf[42],23,"\010compilersimplified-ops");
-lf[43]=C_h_intern(&lf[43],41,"\010compilerperform-high-level-optimizations");
-lf[44]=C_h_intern(&lf[44],12,"\010compilerget");
-lf[45]=C_h_intern(&lf[45],5,"quote");
-lf[46]=C_h_intern(&lf[46],10,"alist-cons");
-lf[47]=C_h_intern(&lf[47],4,"caar");
-lf[48]=C_h_intern(&lf[48],19,"\010compilermatch-node");
-lf[49]=C_h_intern(&lf[49],3,"any");
-lf[50]=C_h_intern(&lf[50],18,"\003syshash-table-ref");
-lf[51]=C_h_intern(&lf[51],30,"\010compilerbroken-constant-nodes");
-lf[52]=C_h_intern(&lf[52],11,"lset-adjoin");
-lf[53]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[54]=C_h_intern(&lf[54],14,"\010compilerqnode");
-lf[55]=C_decode_literal(C_heaptop,"\376B\000\000\033folding constant expression");
-lf[56]=C_h_intern(&lf[56],4,"eval");
-lf[57]=C_h_intern(&lf[57],22,"with-exception-handler");
-lf[58]=C_h_intern(&lf[58],30,"call-with-current-continuation");
-lf[59]=C_h_intern(&lf[59],5,"every");
-lf[60]=C_h_intern(&lf[60],9,"foldable\077");
-lf[61]=C_h_intern(&lf[61],7,"\003sysget");
-lf[62]=C_h_intern(&lf[62],18,"\010compilerintrinsic");
-lf[63]=C_h_intern(&lf[63],5,"value");
-lf[64]=C_decode_literal(C_heaptop,"\376B\000\000\035substituted constant variable");
-lf[65]=C_h_intern(&lf[65],16,"\010compilervarnode");
-lf[66]=C_h_intern(&lf[66],11,"collapsable");
-lf[67]=C_h_intern(&lf[67],10,"replacable");
-lf[68]=C_h_intern(&lf[68],7,"\003sysmap");
-lf[69]=C_h_intern(&lf[69],9,"replacing");
-lf[70]=C_h_intern(&lf[70],12,"contractable");
-lf[71]=C_h_intern(&lf[71],9,"removable");
-lf[72]=C_h_intern(&lf[72],6,"unused");
-lf[73]=C_h_intern(&lf[73],9,"partition");
-lf[74]=C_h_intern(&lf[74],26,"\010compilerbuild-lambda-list");
-lf[75]=C_decode_literal(C_heaptop,"\376B\000\000\047merged explicitly consed rest parameter");
-lf[76]=C_h_intern(&lf[76],13,"explicit-rest");
-lf[77]=C_decode_literal(C_heaptop,"\376B\000\000 removed unused formal parameters");
-lf[78]=C_h_intern(&lf[78],30,"\010compilerdecompose-lambda-list");
-lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\047merged explicitly consed rest parameter");
-lf[80]=C_h_intern(&lf[80],21,"has-unused-parameters");
-lf[81]=C_h_intern(&lf[81],31,"\010compilerinline-lambda-bindings");
-lf[82]=C_h_intern(&lf[82],13,"\010compilerput!");
-lf[83]=C_h_intern(&lf[83],13,"inline-target");
-lf[84]=C_decode_literal(C_heaptop,"\376B\000\000\024contracted procedure");
-lf[85]=C_h_intern(&lf[85],24,"\010compilercheck-signature");
-lf[86]=C_h_intern(&lf[86],30,"\010compilerconstant-declarations");
-lf[87]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[88]=C_decode_literal(C_heaptop,"\376B\000\0005removed call to constant procedure with unused result");
-lf[89]=C_h_intern(&lf[89],37,"\010compilerexpression-has-side-effects\077");
-lf[90]=C_h_intern(&lf[90],8,"assigned");
-lf[91]=C_h_intern(&lf[91],10,"references");
-lf[92]=C_h_intern(&lf[92],7,"unknown");
-lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\022inlining procedure");
-lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\017global inlining");
-lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\010inlining");
-lf[96]=C_h_intern(&lf[96],1,"i");
-lf[97]=C_h_intern(&lf[97],22,"\010compilerinline-global");
-lf[98]=C_h_intern(&lf[98],14,"append-reverse");
-lf[99]=C_h_intern(&lf[99],6,"gensym");
-lf[100]=C_h_intern(&lf[100],1,"t");
-lf[101]=C_decode_literal(C_heaptop,"\376B\000\000+removed unused parameter to known procedure");
-lf[102]=C_h_intern(&lf[102],8,"split-at");
-lf[103]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
-lf[104]=C_h_intern(&lf[104],20,"\004coreinline_allocate");
-lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\042consed rest parameter at call site");
-lf[106]=C_h_intern(&lf[106],21,"\010compilerllist-length");
-lf[107]=C_h_intern(&lf[107],23,"\010compilerinline-locally");
-lf[108]=C_h_intern(&lf[108],3,"yes");
-lf[109]=C_h_intern(&lf[109],2,"no");
-lf[110]=C_h_intern(&lf[110],24,"\010compilerinline-max-size");
-lf[111]=C_h_intern(&lf[111],15,"\010compilerinline");
-lf[112]=C_h_intern(&lf[112],9,"inlinable");
-lf[113]=C_h_intern(&lf[113],11,"local-value");
-lf[114]=C_decode_literal(C_heaptop,"\376B\000\0006removed side-effect free assignment to unused variable");
-lf[115]=C_h_intern(&lf[115],16,"inline-transient");
-lf[116]=C_h_intern(&lf[116],26,"\010compilervariable-visible\077");
-lf[117]=C_h_intern(&lf[117],6,"global");
-lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\031removed conditional forms");
-lf[119]=C_decode_literal(C_heaptop,"\376B\000\000\025removed binding forms");
-lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\022replaced variables");
-lf[121]=C_h_intern(&lf[121],5,"print");
-lf[122]=C_h_intern(&lf[122],7,"newline");
-lf[123]=C_h_intern(&lf[123],6,"print*");
-lf[124]=C_decode_literal(C_heaptop,"\376B\000\000\027 call simplifications:");
-lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\017simplifications");
-lf[126]=C_decode_literal(C_heaptop,"\376B\000\000\022traversal phase...");
-lf[127]=C_h_intern(&lf[127],34,"\010compilerperform-pre-optimization!");
-lf[128]=C_decode_literal(C_heaptop,"\376B\000\000\023Removed `not\047 forms");
-lf[129]=C_h_intern(&lf[129],24,"node-subexpressions-set!");
-lf[130]=C_h_intern(&lf[130],7,"reverse");
-lf[131]=C_h_intern(&lf[131],20,"node-parameters-set!");
-lf[132]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[133]=C_h_intern(&lf[133],17,"\010compilerget-list");
-lf[134]=C_h_intern(&lf[134],3,"not");
-lf[135]=C_h_intern(&lf[135],10,"call-sites");
-lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\031pre-optimization phase...");
-lf[137]=C_h_intern(&lf[137],24,"register-simplifications");
-lf[138]=C_h_intern(&lf[138],19,"\003syshash-table-set!");
-lf[139]=C_h_intern(&lf[139],38,"\010compilerreorganize-recursive-bindings");
-lf[140]=C_decode_literal(C_heaptop,"\376B\000\000!converted assignments to bindings");
-lf[141]=C_h_intern(&lf[141],10,"fold-right");
-lf[142]=C_h_intern(&lf[142],4,"fold");
-lf[143]=C_h_intern(&lf[143],16,"topological-sort");
-lf[144]=C_h_intern(&lf[144],6,"lset<=");
-lf[145]=C_h_intern(&lf[145],10,"filter-map");
-lf[146]=C_h_intern(&lf[146],6,"filter");
-lf[147]=C_h_intern(&lf[147],10,"append-map");
-lf[148]=C_h_intern(&lf[148],28,"\010compilerscan-used-variables");
-lf[149]=C_h_intern(&lf[149],4,"cons");
-lf[150]=C_h_intern(&lf[150],27,"\010compilersubstitution-table");
-lf[151]=C_h_intern(&lf[151],16,"\010compilerrewrite");
-lf[152]=C_h_intern(&lf[152],28,"\010compilersimplify-named-call");
-lf[153]=C_h_intern(&lf[153],37,"\010compilerinline-substitutions-enabled");
-lf[154]=C_h_intern(&lf[154],11,"\004coreinline");
-lf[155]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[156]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[157]=C_h_intern(&lf[157],6,"unsafe");
-lf[158]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[159]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[160]=C_h_intern(&lf[160],11,"number-type");
-lf[161]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[162]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[163]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[164]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[165]=C_h_intern(&lf[165],6,"fixnum");
-lf[166]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[167]=C_h_intern(&lf[167],21,"\010compilerfold-boolean");
-lf[168]=C_h_intern(&lf[168],6,"flonum");
-lf[169]=C_h_intern(&lf[169],7,"generic");
-lf[170]=C_h_intern(&lf[170],5,"cons*");
-lf[171]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[172]=C_h_intern(&lf[172],9,"\004coreproc");
-lf[173]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[174]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[175]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[176]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[177]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[178]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[179]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[180]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[181]=C_h_intern(&lf[181],19,"\010compilerfold-inner");
-lf[182]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[183]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[184]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[185]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[186]=C_h_intern(&lf[186],5,"fifth");
-lf[187]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[188]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[189]=C_h_intern(&lf[189],13,"\010compilerbomb");
-lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\023bad type (optimize)");
-lf[191]=C_h_intern(&lf[191],34,"\010compilertransform-direct-lambdas!");
-lf[192]=C_h_intern(&lf[192],5,"boxed");
-lf[193]=C_h_intern(&lf[193],18,"\004coredirect_lambda");
-lf[194]=C_h_intern(&lf[194],15,"\004coreinline_ref");
-lf[195]=C_h_intern(&lf[195],37,"\010compilerestimate-foreign-result-size");
-lf[196]=C_h_intern(&lf[196],19,"\004coreinline_loc_ref");
-lf[197]=C_h_intern(&lf[197],16,"\004coredirect_call");
-lf[198]=C_h_intern(&lf[198],5,"lset=");
-lf[199]=C_h_intern(&lf[199],6,"delete");
-lf[200]=C_h_intern(&lf[200],4,"quit");
-lf[201]=C_decode_literal(C_heaptop,"\376B\000\000;known procedure called with wrong number of arguments: `~A\047");
-lf[202]=C_h_intern(&lf[202],15,"lset-difference");
-lf[203]=C_h_intern(&lf[203],15,"node-class-set!");
-lf[204]=C_h_intern(&lf[204],12,"\004corerecurse");
-lf[205]=C_decode_literal(C_heaptop,"\376B\000\000Gknown procedure called recursively with wrong number of arguments: `~A\047");
-lf[206]=C_h_intern(&lf[206],4,"take");
-lf[207]=C_decode_literal(C_heaptop,"\376B\000\000Gknown procedure called recursively with wrong number of arguments: `~A\047");
-lf[208]=C_decode_literal(C_heaptop,"\376B\000\000\014missing kvar");
-lf[209]=C_h_intern(&lf[209],11,"\004corereturn");
-lf[210]=C_decode_literal(C_heaptop,"\376B\000\000\017bad call (leaf)");
-lf[211]=C_h_intern(&lf[211],6,"cdaddr");
-lf[212]=C_h_intern(&lf[212],6,"caaddr");
-lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid parameter list");
-lf[214]=C_decode_literal(C_heaptop,"\376B\000\0006direct leaf routine with hoistable closures/allocation");
-lf[215]=C_h_intern(&lf[215],6,"unzip1");
-lf[216]=C_h_intern(&lf[216],16,"\003sysmake-promise");
-lf[217]=C_decode_literal(C_heaptop,"\376B\000\000\036direct leaf routine/allocation");
-lf[218]=C_decode_literal(C_heaptop,"\376B\000\000(direct leaf routine optimization pass...");
-lf[219]=C_h_intern(&lf[219],32,"\010compilerperform-lambda-lifting!");
-lf[220]=C_h_intern(&lf[220],23,"\003syshash-table-for-each");
-lf[221]=C_h_intern(&lf[221],1,"+");
-lf[222]=C_h_intern(&lf[222],14,"\004coreprimitive");
-lf[223]=C_h_intern(&lf[223],7,"delete!");
-lf[224]=C_h_intern(&lf[224],11,"concatenate");
-lf[225]=C_h_intern(&lf[225],5,"count");
-lf[226]=C_h_intern(&lf[226],22,"\010compilerhide-variable");
-lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\037moving liftables to toplevel...");
-lf[228]=C_decode_literal(C_heaptop,"\376B\000\000\032removing local bindings...");
-lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\026changing call sites...");
-lf[230]=C_h_intern(&lf[230],12,"pretty-print");
-lf[231]=C_h_intern(&lf[231],1,"l");
-lf[232]=C_decode_literal(C_heaptop,"\376B\000\000\026additional parameters:");
-lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\035gathering extra parameters...");
-lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\031liftable local procedures");
-lf[235]=C_decode_literal(C_heaptop,"\376B\000\000Aeliminating liftables by access-lists and non-liftable callees...");
-lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\014accessibles:");
-lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\031computing access-lists...");
-lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\013call-graph:");
-lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\034eliminating non-liftables...");
-lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\026building call graph...");
-lf[241]=C_decode_literal(C_heaptop,"\376B\000\000\026gathering liftables...");
-lf[242]=C_h_intern(&lf[242],11,"make-vector");
-lf[243]=C_h_intern(&lf[243],1,"y");
-lf[244]=C_h_intern(&lf[244],2,"d2");
-lf[245]=C_h_intern(&lf[245],1,"z");
-lf[246]=C_h_intern(&lf[246],2,"d3");
-lf[247]=C_h_intern(&lf[247],2,"d1");
-lf[248]=C_h_intern(&lf[248],2,"op");
-lf[249]=C_h_intern(&lf[249],5,"clist");
-lf[250]=C_h_intern(&lf[250],34,"\010compilermembership-test-operators");
-lf[251]=C_h_intern(&lf[251],32,"\010compilermembership-unfold-limit");
-lf[252]=C_h_intern(&lf[252],4,"var1");
-lf[253]=C_h_intern(&lf[253],4,"var0");
-lf[254]=C_h_intern(&lf[254],6,"const1");
-lf[255]=C_h_intern(&lf[255],4,"var2");
-lf[256]=C_h_intern(&lf[256],6,"const2");
-lf[257]=C_h_intern(&lf[257],4,"rest");
-lf[258]=C_h_intern(&lf[258],5,"body2");
-lf[259]=C_h_intern(&lf[259],5,"body1");
-lf[260]=C_h_intern(&lf[260],27,"\010compilereq-inline-operator");
-lf[261]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\002\376\377\016");
-lf[262]=C_h_intern(&lf[262],19,"\010compilerimmediate\077");
-lf[263]=C_h_intern(&lf[263],5,"const");
-lf[264]=C_h_intern(&lf[264],1,"n");
-lf[265]=C_h_intern(&lf[265],7,"clauses");
-lf[266]=C_h_intern(&lf[266],4,"body");
-lf[267]=C_h_intern(&lf[267],1,"d");
-lf[268]=C_h_intern(&lf[268],4,"more");
-lf[269]=C_h_intern(&lf[269],4,"args");
-lf[270]=C_h_intern(&lf[270],1,"a");
-lf[271]=C_h_intern(&lf[271],1,"b");
-lf[272]=C_h_intern(&lf[272],1,"c");
-lf[273]=C_h_intern(&lf[273],4,"cdar");
-C_register_lf2(lf,274,create_ptable());
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3752,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k3750 */
-static void C_ccall f_3752(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3752,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3755,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-
-/* k3753 in k3750 */
-static void C_ccall f_3755(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3755,2,t0,t1);}
-t2=C_mutate((C_word*)lf[0]+1 /* (set! scan-toplevel-assignments ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3757,tmp=(C_word)a,a+=2,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4191,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* optimizer.scm: 136 make-vector */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[242]+1)))(4,*((C_word*)lf[242]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}
-
-/* k4189 in k3753 in k3750 */
-static void C_ccall f_4191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word ab[56],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4191,2,t0,t1);}
-t2=C_mutate((C_word*)lf[41]+1 /* (set! simplifications ...) */,t1);
-t3=C_set_block_item(lf[42] /* simplified-ops */,0,C_SCHEME_END_OF_LIST);
-t4=C_mutate((C_word*)lf[43]+1 /* (set! perform-high-level-optimizations ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4194,tmp=(C_word)a,a+=2,tmp));
-t5=C_mutate((C_word*)lf[127]+1 /* (set! perform-pre-optimization! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6064,tmp=(C_word)a,a+=2,tmp));
-t6=C_mutate((C_word*)lf[137]+1 /* (set! register-simplifications ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6383,tmp=(C_word)a,a+=2,tmp));
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6390,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t8=(C_word)C_a_i_cons(&a,2,lf[270],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,lf[2],t9);
-t11=(C_word)C_a_i_cons(&a,2,lf[271],lf[272]);
-t12=(C_word)C_a_i_cons(&a,2,t10,t11);
-t13=(C_word)C_a_i_cons(&a,2,lf[267],t12);
-t14=(C_word)C_a_i_cons(&a,2,lf[8],t13);
-t15=(C_word)C_a_i_cons(&a,2,lf[267],C_SCHEME_END_OF_LIST);
-t16=(C_word)C_a_i_cons(&a,2,lf[272],t15);
-t17=(C_word)C_a_i_cons(&a,2,lf[271],t16);
-t18=(C_word)C_a_i_cons(&a,2,lf[270],t17);
-t19=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14726,tmp=(C_word)a,a+=2,tmp);
-t20=(C_word)C_a_i_cons(&a,2,t19,C_SCHEME_END_OF_LIST);
-t21=(C_word)C_a_i_cons(&a,2,t18,t20);
-t22=(C_word)C_a_i_cons(&a,2,t14,t21);
-t23=(C_word)C_a_i_list(&a,1,t22);
-/* optimizer.scm: 506 ##sys#hash-table-set! */
-((C_proc5)C_retrieve_symbol_proc(lf[138]))(5,*((C_word*)lf[138]+1),t7,*((C_word*)lf[41]+1),lf[8],t23);}
-
-/* a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14726(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
-C_word tmp;
-C_word t7;
-C_word t8;
-C_word ab[8],*a=ab;
-if(c!=7) C_bad_argc_2(c,7,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_14726,7,t0,t1,t2,t3,t4,t5,t6);}
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14734,a[2]=t1,a[3]=t5,a[4]=t4,a[5]=t6,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 515 ##sys#hash-table-ref */
-((C_proc4)C_retrieve_symbol_proc(lf[50]))(4,*((C_word*)lf[50]+1),t7,C_retrieve(lf[150]),t3);}
-
-/* k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14734(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14734,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14739,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t4,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp));
-t6=((C_word*)t4)[1];
-f_14739(t6,((C_word*)t0)[2],t2);}
-
-/* loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_fcall f_14739(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14739,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14749,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14789,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t3,tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 517 caar */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[47]+1)))(3,*((C_word*)lf[47]+1),t4,t2);}}
-
-/* k14787 in loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14789(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14789,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14793,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 517 cdar */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[273]+1)))(3,*((C_word*)lf[273]+1),t2,((C_word*)t0)[2]);}
-
-/* k14791 in k14787 in loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14793(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 517 simplify-named-call */
-((C_proc9)C_retrieve_symbol_proc(lf[152]))(9,*((C_word*)lf[152]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k14747 in loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14749(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14749,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14753,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-/* g10321033 */
-t3=t2;
-f_14753(t3,((C_word*)t0)[4],t1);}
-else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* optimizer.scm: 524 loop */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_14739(t3,((C_word*)t0)[4],t2);}}
-
-/* g1032 in k14747 in loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_fcall f_14753(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14753,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(((C_word*)t0)[2],C_retrieve(lf[42]));
-if(C_truep(t3)){
-t4=(C_word)C_i_cdr(t3);
-t5=(C_word)C_fixnum_increase(t4);
-t6=(C_word)C_i_set_cdr(t3,t5);
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t2);}
-else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14775,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 522 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t4,((C_word*)t0)[2],C_fix(1),C_retrieve(lf[42]));}}
-
-/* k14773 in g1032 in k14747 in loop in k14732 in a14725 in k4189 in k3753 in k3750 */
-static void C_ccall f_14775(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate((C_word*)lf[42]+1 /* (set! simplified-ops ...) */,t1);
-t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
-
-/* k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_6390(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word t58;
-C_word t59;
-C_word t60;
-C_word t61;
-C_word t62;
-C_word t63;
-C_word t64;
-C_word t65;
-C_word t66;
-C_word t67;
-C_word t68;
-C_word t69;
-C_word t70;
-C_word t71;
-C_word t72;
-C_word t73;
-C_word t74;
-C_word t75;
-C_word t76;
-C_word t77;
-C_word t78;
-C_word t79;
-C_word t80;
-C_word t81;
-C_word t82;
-C_word t83;
-C_word t84;
-C_word t85;
-C_word t86;
-C_word t87;
-C_word t88;
-C_word t89;
-C_word t90;
-C_word t91;
-C_word t92;
-C_word t93;
-C_word t94;
-C_word t95;
-C_word t96;
-C_word t97;
-C_word t98;
-C_word t99;
-C_word t100;
-C_word t101;
-C_word t102;
-C_word t103;
-C_word t104;
-C_word t105;
-C_word t106;
-C_word t107;
-C_word t108;
-C_word t109;
-C_word t110;
-C_word t111;
-C_word t112;
-C_word t113;
-C_word t114;
-C_word t115;
-C_word t116;
-C_word t117;
-C_word t118;
-C_word t119;
-C_word t120;
-C_word t121;
-C_word t122;
-C_word t123;
-C_word t124;
-C_word t125;
-C_word t126;
-C_word t127;
-C_word t128;
-C_word t129;
-C_word t130;
-C_word t131;
-C_word t132;
-C_word t133;
-C_word t134;
-C_word t135;
-C_word t136;
-C_word t137;
-C_word t138;
-C_word t139;
-C_word t140;
-C_word t141;
-C_word t142;
-C_word t143;
-C_word t144;
-C_word t145;
-C_word t146;
-C_word t147;
-C_word t148;
-C_word t149;
-C_word ab[446],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6390,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6393,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_a_i_cons(&a,2,lf[252],C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[248],C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[253],C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[2],t6);
-t8=(C_word)C_a_i_cons(&a,2,lf[254],C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
-t10=(C_word)C_a_i_cons(&a,2,lf[45],t9);
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,t7,t11);
-t13=(C_word)C_a_i_cons(&a,2,t4,t12);
-t14=(C_word)C_a_i_cons(&a,2,lf[154],t13);
-t15=(C_word)C_a_i_cons(&a,2,lf[252],C_SCHEME_END_OF_LIST);
-t16=(C_word)C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
-t17=(C_word)C_a_i_cons(&a,2,lf[2],t16);
-t18=(C_word)C_a_i_cons(&a,2,lf[255],C_SCHEME_END_OF_LIST);
-t19=(C_word)C_a_i_cons(&a,2,lf[248],C_SCHEME_END_OF_LIST);
-t20=(C_word)C_a_i_cons(&a,2,lf[253],C_SCHEME_END_OF_LIST);
-t21=(C_word)C_a_i_cons(&a,2,t20,C_SCHEME_END_OF_LIST);
-t22=(C_word)C_a_i_cons(&a,2,lf[2],t21);
-t23=(C_word)C_a_i_cons(&a,2,lf[256],C_SCHEME_END_OF_LIST);
-t24=(C_word)C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
-t25=(C_word)C_a_i_cons(&a,2,lf[45],t24);
-t26=(C_word)C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
-t27=(C_word)C_a_i_cons(&a,2,t22,t26);
-t28=(C_word)C_a_i_cons(&a,2,t19,t27);
-t29=(C_word)C_a_i_cons(&a,2,lf[154],t28);
-t30=(C_word)C_a_i_cons(&a,2,lf[255],C_SCHEME_END_OF_LIST);
-t31=(C_word)C_a_i_cons(&a,2,t30,C_SCHEME_END_OF_LIST);
-t32=(C_word)C_a_i_cons(&a,2,lf[2],t31);
-t33=(C_word)C_a_i_cons(&a,2,lf[257],C_SCHEME_END_OF_LIST);
-t34=(C_word)C_a_i_cons(&a,2,lf[258],t33);
-t35=(C_word)C_a_i_cons(&a,2,t32,t34);
-t36=(C_word)C_a_i_cons(&a,2,lf[244],t35);
-t37=(C_word)C_a_i_cons(&a,2,lf[4],t36);
-t38=(C_word)C_a_i_cons(&a,2,t37,C_SCHEME_END_OF_LIST);
-t39=(C_word)C_a_i_cons(&a,2,t29,t38);
-t40=(C_word)C_a_i_cons(&a,2,t18,t39);
-t41=(C_word)C_a_i_cons(&a,2,lf[5],t40);
-t42=(C_word)C_a_i_cons(&a,2,t41,C_SCHEME_END_OF_LIST);
-t43=(C_word)C_a_i_cons(&a,2,lf[259],t42);
-t44=(C_word)C_a_i_cons(&a,2,t17,t43);
-t45=(C_word)C_a_i_cons(&a,2,lf[247],t44);
-t46=(C_word)C_a_i_cons(&a,2,lf[4],t45);
-t47=(C_word)C_a_i_cons(&a,2,t46,C_SCHEME_END_OF_LIST);
-t48=(C_word)C_a_i_cons(&a,2,t14,t47);
-t49=(C_word)C_a_i_cons(&a,2,t3,t48);
-t50=(C_word)C_a_i_cons(&a,2,lf[5],t49);
-t51=(C_word)C_a_i_cons(&a,2,lf[257],C_SCHEME_END_OF_LIST);
-t52=(C_word)C_a_i_cons(&a,2,lf[244],t51);
-t53=(C_word)C_a_i_cons(&a,2,lf[247],t52);
-t54=(C_word)C_a_i_cons(&a,2,lf[258],t53);
-t55=(C_word)C_a_i_cons(&a,2,lf[259],t54);
-t56=(C_word)C_a_i_cons(&a,2,lf[256],t55);
-t57=(C_word)C_a_i_cons(&a,2,lf[254],t56);
-t58=(C_word)C_a_i_cons(&a,2,lf[248],t57);
-t59=(C_word)C_a_i_cons(&a,2,lf[255],t58);
-t60=(C_word)C_a_i_cons(&a,2,lf[252],t59);
-t61=(C_word)C_a_i_cons(&a,2,lf[253],t60);
-t62=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14405,tmp=(C_word)a,a+=2,tmp);
-t63=(C_word)C_a_i_cons(&a,2,t62,C_SCHEME_END_OF_LIST);
-t64=(C_word)C_a_i_cons(&a,2,t61,t63);
-t65=(C_word)C_a_i_cons(&a,2,t50,t64);
-t66=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t67=(C_word)C_a_i_cons(&a,2,lf[248],C_SCHEME_END_OF_LIST);
-t68=(C_word)C_a_i_cons(&a,2,lf[253],C_SCHEME_END_OF_LIST);
-t69=(C_word)C_a_i_cons(&a,2,t68,C_SCHEME_END_OF_LIST);
-t70=(C_word)C_a_i_cons(&a,2,lf[2],t69);
-t71=(C_word)C_a_i_cons(&a,2,lf[263],C_SCHEME_END_OF_LIST);
-t72=(C_word)C_a_i_cons(&a,2,t71,C_SCHEME_END_OF_LIST);
-t73=(C_word)C_a_i_cons(&a,2,lf[45],t72);
-t74=(C_word)C_a_i_cons(&a,2,t73,C_SCHEME_END_OF_LIST);
-t75=(C_word)C_a_i_cons(&a,2,t70,t74);
-t76=(C_word)C_a_i_cons(&a,2,t67,t75);
-t77=(C_word)C_a_i_cons(&a,2,lf[154],t76);
-t78=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t79=(C_word)C_a_i_cons(&a,2,t78,C_SCHEME_END_OF_LIST);
-t80=(C_word)C_a_i_cons(&a,2,lf[2],t79);
-t81=(C_word)C_a_i_cons(&a,2,lf[264],C_SCHEME_END_OF_LIST);
-t82=(C_word)C_a_i_cons(&a,2,lf[253],C_SCHEME_END_OF_LIST);
-t83=(C_word)C_a_i_cons(&a,2,t82,C_SCHEME_END_OF_LIST);
-t84=(C_word)C_a_i_cons(&a,2,lf[2],t83);
-t85=(C_word)C_a_i_cons(&a,2,t84,lf[265]);
-t86=(C_word)C_a_i_cons(&a,2,t81,t85);
-t87=(C_word)C_a_i_cons(&a,2,lf[30],t86);
-t88=(C_word)C_a_i_cons(&a,2,t87,C_SCHEME_END_OF_LIST);
-t89=(C_word)C_a_i_cons(&a,2,lf[266],t88);
-t90=(C_word)C_a_i_cons(&a,2,t80,t89);
-t91=(C_word)C_a_i_cons(&a,2,lf[267],t90);
-t92=(C_word)C_a_i_cons(&a,2,lf[4],t91);
-t93=(C_word)C_a_i_cons(&a,2,t92,C_SCHEME_END_OF_LIST);
-t94=(C_word)C_a_i_cons(&a,2,t77,t93);
-t95=(C_word)C_a_i_cons(&a,2,t66,t94);
-t96=(C_word)C_a_i_cons(&a,2,lf[5],t95);
-t97=(C_word)C_a_i_cons(&a,2,lf[265],C_SCHEME_END_OF_LIST);
-t98=(C_word)C_a_i_cons(&a,2,lf[264],t97);
-t99=(C_word)C_a_i_cons(&a,2,lf[266],t98);
-t100=(C_word)C_a_i_cons(&a,2,lf[267],t99);
-t101=(C_word)C_a_i_cons(&a,2,lf[263],t100);
-t102=(C_word)C_a_i_cons(&a,2,lf[253],t101);
-t103=(C_word)C_a_i_cons(&a,2,lf[248],t102);
-t104=(C_word)C_a_i_cons(&a,2,lf[24],t103);
-t105=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14184,tmp=(C_word)a,a+=2,tmp);
-t106=(C_word)C_a_i_cons(&a,2,t105,C_SCHEME_END_OF_LIST);
-t107=(C_word)C_a_i_cons(&a,2,t104,t106);
-t108=(C_word)C_a_i_cons(&a,2,t96,t107);
-t109=(C_word)C_a_i_cons(&a,2,lf[252],C_SCHEME_END_OF_LIST);
-t110=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
-t111=(C_word)C_a_i_cons(&a,2,lf[21],t110);
-t112=(C_word)C_a_i_cons(&a,2,lf[268],C_SCHEME_END_OF_LIST);
-t113=(C_word)C_a_i_cons(&a,2,t111,t112);
-t114=(C_word)C_a_i_cons(&a,2,t109,t113);
-t115=(C_word)C_a_i_cons(&a,2,lf[5],t114);
-t116=(C_word)C_a_i_cons(&a,2,lf[268],C_SCHEME_END_OF_LIST);
-t117=(C_word)C_a_i_cons(&a,2,lf[252],t116);
-t118=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13783,tmp=(C_word)a,a+=2,tmp);
-t119=(C_word)C_a_i_cons(&a,2,t118,C_SCHEME_END_OF_LIST);
-t120=(C_word)C_a_i_cons(&a,2,t117,t119);
-t121=(C_word)C_a_i_cons(&a,2,t115,t120);
-t122=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t123=(C_word)C_a_i_cons(&a,2,lf[248],C_SCHEME_END_OF_LIST);
-t124=(C_word)C_a_i_cons(&a,2,t123,lf[269]);
-t125=(C_word)C_a_i_cons(&a,2,lf[154],t124);
-t126=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t127=(C_word)C_a_i_cons(&a,2,t126,C_SCHEME_END_OF_LIST);
-t128=(C_word)C_a_i_cons(&a,2,lf[2],t127);
-t129=(C_word)C_a_i_cons(&a,2,lf[243],C_SCHEME_END_OF_LIST);
-t130=(C_word)C_a_i_cons(&a,2,lf[13],t129);
-t131=(C_word)C_a_i_cons(&a,2,t128,t130);
-t132=(C_word)C_a_i_cons(&a,2,lf[267],t131);
-t133=(C_word)C_a_i_cons(&a,2,lf[4],t132);
-t134=(C_word)C_a_i_cons(&a,2,t133,C_SCHEME_END_OF_LIST);
-t135=(C_word)C_a_i_cons(&a,2,t125,t134);
-t136=(C_word)C_a_i_cons(&a,2,t122,t135);
-t137=(C_word)C_a_i_cons(&a,2,lf[5],t136);
-t138=(C_word)C_a_i_cons(&a,2,lf[243],C_SCHEME_END_OF_LIST);
-t139=(C_word)C_a_i_cons(&a,2,lf[13],t138);
-t140=(C_word)C_a_i_cons(&a,2,lf[267],t139);
-t141=(C_word)C_a_i_cons(&a,2,lf[269],t140);
-t142=(C_word)C_a_i_cons(&a,2,lf[248],t141);
-t143=(C_word)C_a_i_cons(&a,2,lf[24],t142);
-t144=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13635,tmp=(C_word)a,a+=2,tmp);
-t145=(C_word)C_a_i_cons(&a,2,t144,C_SCHEME_END_OF_LIST);
-t146=(C_word)C_a_i_cons(&a,2,t143,t145);
-t147=(C_word)C_a_i_cons(&a,2,t137,t146);
-t148=(C_word)C_a_i_list(&a,4,t65,t108,t121,t147);
-/* optimizer.scm: 506 ##sys#hash-table-set! */
-((C_proc5)C_retrieve_symbol_proc(lf[138]))(5,*((C_word*)lf[138]+1),t2,*((C_word*)lf[41]+1),lf[5],t148);}
-
-/* a13634 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13635(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
-C_word tmp;
-C_word t9;
-C_word t10;
-C_word ab[8],*a=ab;
-if(c!=9) C_bad_argc_2(c,9,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr9,(void*)f_13635,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-if(C_truep((C_word)C_i_equalp(t4,C_retrieve(lf[260])))){
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_SCHEME_FALSE);}
-else{
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13681,a[2]=t6,a[3]=t1,a[4]=t8,a[5]=t7,a[6]=t5,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 665 get-list */
-((C_proc5)C_retrieve_symbol_proc(lf[133]))(5,*((C_word*)lf[133]+1),t9,t2,t3,lf[91]);}}
-
-/* k13679 in a13634 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13681(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13681,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=(C_word)C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(C_word)C_a_i_list(&a,1,((C_word*)t0)[7]);
-t5=((C_word*)t0)[6];
-t6=(C_word)C_a_i_record(&a,4,lf[20],lf[154],t4,t5);
-t7=(C_word)C_a_i_list(&a,3,t6,((C_word*)t0)[5],((C_word*)t0)[4]);
-t8=((C_word*)t0)[3];
-t9=((C_word*)t0)[2];
-t10=t8;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_record(&a,4,lf[20],lf[4],t9,t7));}
-else{
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[9],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_13783,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_a_i_list(&a,1,t3);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13793,a[2]=t2,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
-t9=((C_word*)t7)[1];
-f_13793(t9,t1,t5,t4);}
-
-/* loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13793(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13793,NULL,4,t0,t1,t2,t3);}
-t4=t3;
-t5=(C_word)C_slot(t4,C_fix(1));
-t6=t3;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=t3;
-t9=(C_word)C_slot(t8,C_fix(3));
-t10=(C_word)C_eqp(t5,lf[5]);
-if(C_truep(t10)){
-t11=(C_word)C_i_cdr(t7);
-if(C_truep((C_word)C_i_nullp(t11))){
-t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t7,a[6]=t9,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-t13=(C_word)C_i_car(t7);
-/* optimizer.scm: 604 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t12,((C_word*)t0)[2],t13,lf[115]);}
-else{
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_SCHEME_FALSE);}}
-else{
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
-
-/* k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14130(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14130,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14122,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[5]);
-/* optimizer.scm: 605 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t2,((C_word*)t0)[2],t3,lf[91]);}}
-
-/* k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14122(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14122,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(C_word)C_slot(t2,C_fix(2));
-t4=(C_word)C_slot(t2,C_fix(3));
-t5=(C_word)C_slot(t2,C_fix(1));
-t6=(C_word)C_eqp(t5,lf[21]);
-if(C_truep(t6)){
-t7=(C_word)C_i_car(((C_word*)t0)[5]);
-t8=(C_word)C_a_i_cons(&a,2,t7,((C_word*)t0)[4]);
-t9=(C_word)C_i_cadr(((C_word*)t0)[6]);
-/* optimizer.scm: 610 loop1 */
-t10=((C_word*)((C_word*)t0)[3])[1];
-f_13793(t10,((C_word*)t0)[7],t8,t9);}
-else{
-t7=(C_word)C_eqp(t5,lf[9]);
-if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13899,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[6],a[5]=t4,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 612 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[130]+1)))(3,*((C_word*)lf[130]+1),t8,((C_word*)t0)[4]);}
-else{
-t8=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}}}
-
-/* k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13899,2,t0,t1);}
-if(C_truep((C_word)C_i_pairp(t1))){
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(C_word)C_i_car(t1);
-t4=(C_word)C_eqp(t2,t3);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(((C_word*)t0)[5]);
-t6=(C_word)C_a_i_list(&a,1,t5);
-t7=(C_word)C_i_cdr(t1);
-t8=(C_word)C_i_cadr(((C_word*)t0)[4]);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13928,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
-t12=((C_word*)t10)[1];
-f_13928(t12,((C_word*)t0)[2],t6,t7,t8);}
-else{
-t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13928(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13928,NULL,5,t0,t1,t2,t3,t4);}
-t5=t4;
-t6=(C_word)C_slot(t5,C_fix(1));
-t7=t4;
-t8=(C_word)C_slot(t7,C_fix(2));
-t9=t4;
-t10=(C_word)C_slot(t9,C_fix(3));
-t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13959,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,a[8]=t10,tmp=(C_word)a,a+=9,tmp);
-t12=(C_word)C_eqp(t6,lf[5]);
-if(C_truep(t12)){
-t13=(C_word)C_i_cdr(t8);
-if(C_truep((C_word)C_i_nullp(t13))){
-t14=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14098,a[2]=((C_word*)t0)[2],a[3]=t8,a[4]=t10,a[5]=t3,a[6]=t11,tmp=(C_word)a,a+=7,tmp);
-t15=(C_word)C_i_car(t8);
-/* optimizer.scm: 623 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t14,((C_word*)t0)[2],t15,lf[115]);}
-else{
-t14=t11;
-f_13959(t14,C_SCHEME_FALSE);}}
-else{
-t13=t11;
-f_13959(t13,C_SCHEME_FALSE);}}
-
-/* k14096 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14098,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[6];
-f_13959(t2,C_SCHEME_FALSE);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14090,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
-t3=(C_word)C_i_car(((C_word*)t0)[3]);
-/* optimizer.scm: 624 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t2,((C_word*)t0)[2],t3,lf[91]);}}
-
-/* k14088 in k14096 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14090(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word *a;
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_13959(t2,C_SCHEME_FALSE);}
-else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
-t2=(C_word)C_i_car(((C_word*)t0)[2]);
-t3=(C_word)C_slot(t2,C_fix(1));
-t4=(C_word)C_eqp(lf[9],t3);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(((C_word*)t0)[3]);
-t6=(C_word)C_i_car(((C_word*)t0)[2]);
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=(C_word)C_i_car(t7);
-t9=((C_word*)t0)[4];
-f_13959(t9,(C_word)C_eqp(t5,t8));}
-else{
-t5=((C_word*)t0)[4];
-f_13959(t5,C_SCHEME_FALSE);}}
-else{
-t2=((C_word*)t0)[4];
-f_13959(t2,C_SCHEME_FALSE);}}}
-
-/* k13957 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13959(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13959,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[8]);
-t3=(C_word)C_slot(t2,C_fix(3));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
-t6=(C_word)C_i_cdr(((C_word*)t0)[6]);
-t7=(C_word)C_i_cadr(((C_word*)t0)[8]);
-/* optimizer.scm: 628 loop2 */
-t8=((C_word*)((C_word*)t0)[5])[1];
-f_13928(t8,((C_word*)t0)[4],t5,t6,t7);}
-else{
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[6]))){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14002,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14012,tmp=(C_word)a,a+=2,tmp);
-/* ##sys#call-with-values */
-C_call_with_values(4,0,((C_word*)t0)[4],t2,t3);}
-else{
-t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
-
-/* a14011 in k13957 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14012(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word *a;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14012,4,t0,t1,t2,t3);}
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?t2:C_SCHEME_FALSE));}
-
-/* a14001 in k13957 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14002(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14002,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14010,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 633 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[130]+1)))(3,*((C_word*)lf[130]+1),t2,((C_word*)t0)[2]);}
-
-/* k14008 in a14001 in k13957 in loop2 in k13897 in k14120 in k14128 in loop1 in a13782 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14010(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 633 reorganize-recursive-bindings */
-((C_proc5)C_retrieve_symbol_proc(lf[139]))(5,*((C_word*)lf[139]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14184(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10){
-C_word tmp;
-C_word t11;
-C_word t12;
-C_word ab[10],*a=ab;
-if(c!=11) C_bad_argc_2(c,11,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr11,(void*)f_14184,11,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10);}
-if(C_truep((C_word)C_i_equalp(t4,C_retrieve(lf[260])))){
-t11=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14197,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=t6,a[6]=t10,a[7]=t8,a[8]=t1,a[9]=t9,tmp=(C_word)a,a+=10,tmp);
-/* optimizer.scm: 574 immediate? */
-((C_proc3)C_retrieve_symbol_proc(lf[262]))(3,*((C_word*)lf[262]+1),t11,t6);}
-else{
-t11=t1;
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
-
-/* k14195 in a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14197(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14197,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14239,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 575 get-list */
-((C_proc5)C_retrieve_symbol_proc(lf[133]))(5,*((C_word*)lf[133]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[91]);}
-else{
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k14237 in k14195 in a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14239(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14239,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=(C_word)C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(C_word)C_fixnum_increase(((C_word*)t0)[7]);
-t5=(C_word)C_a_i_list(&a,1,t4);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14219,a[2]=t5,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14223,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 579 varnode */
-((C_proc3)C_retrieve_symbol_proc(lf[65]))(3,*((C_word*)lf[65]+1),t7,((C_word*)t0)[2]);}
-else{
-t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k14221 in k14237 in k14195 in a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14223(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14223,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14227,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 580 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,((C_word*)t0)[2]);}
-
-/* k14225 in k14221 in k14237 in k14195 in a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14227(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 579 cons* */
-((C_proc6)C_retrieve_symbol_proc(lf[170]))(6,*((C_word*)lf[170]+1),((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k14217 in k14237 in k14195 in a14183 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14219(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14219,2,t0,t1);}
-t2=((C_word*)t0)[3];
-t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[20],lf[30],((C_word*)t0)[2],t1));}
-
-/* a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14405(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13){
-C_word tmp;
-C_word t14;
-C_word t15;
-C_word ab[12],*a=ab;
-if(c!=14) C_bad_argc_2(c,14,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr14,(void*)f_14405,14,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13);}
-if(C_truep((C_word)C_i_equalp(t6,C_retrieve(lf[260])))){
-t14=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14418,a[2]=t4,a[3]=t5,a[4]=t2,a[5]=t3,a[6]=t7,a[7]=t8,a[8]=t1,a[9]=t13,a[10]=t10,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 547 immediate? */
-((C_proc3)C_retrieve_symbol_proc(lf[262]))(3,*((C_word*)lf[262]+1),t14,t7);}
-else{
-t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_SCHEME_FALSE);}}
-
-/* k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14418(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14418,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14424,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 548 immediate? */
-((C_proc3)C_retrieve_symbol_proc(lf[262]))(3,*((C_word*)lf[262]+1),t2,((C_word*)t0)[7]);}
-else{
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14424(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14424,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14476,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* optimizer.scm: 549 get-list */
-((C_proc5)C_retrieve_symbol_proc(lf[133]))(5,*((C_word*)lf[133]+1),t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[91]);}
-else{
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* k14474 in k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14476(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14476,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=(C_word)C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14468,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 550 get-list */
-((C_proc5)C_retrieve_symbol_proc(lf[133]))(5,*((C_word*)lf[133]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2],lf[91]);}
-else{
-t4=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k14466 in k14474 in k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14468(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14468,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=(C_word)C_eqp(C_fix(1),t2);
-if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14452,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 554 varnode */
-((C_proc3)C_retrieve_symbol_proc(lf[65]))(3,*((C_word*)lf[65]+1),t4,((C_word*)t0)[2]);}
-else{
-t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
-
-/* k14450 in k14466 in k14474 in k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14452(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14452,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14456,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 555 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,((C_word*)t0)[2]);}
-
-/* k14454 in k14450 in k14466 in k14474 in k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14456(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14456,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14460,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 557 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,((C_word*)t0)[2]);}
-
-/* k14458 in k14454 in k14450 in k14466 in k14474 in k14422 in k14416 in a14404 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_14460(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14460,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,6,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[20],lf[30],lf[261],t2));}
-
-/* k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_6393(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word t35;
-C_word t36;
-C_word t37;
-C_word t38;
-C_word t39;
-C_word t40;
-C_word t41;
-C_word t42;
-C_word t43;
-C_word t44;
-C_word t45;
-C_word t46;
-C_word t47;
-C_word t48;
-C_word t49;
-C_word t50;
-C_word t51;
-C_word t52;
-C_word t53;
-C_word t54;
-C_word t55;
-C_word t56;
-C_word t57;
-C_word ab[166],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6393,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6396,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t3=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[2],t4);
-t6=(C_word)C_a_i_cons(&a,2,lf[243],C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,t5,t6);
-t8=(C_word)C_a_i_cons(&a,2,lf[244],t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[8],t8);
-t10=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
-t12=(C_word)C_a_i_cons(&a,2,lf[2],t11);
-t13=(C_word)C_a_i_cons(&a,2,lf[245],C_SCHEME_END_OF_LIST);
-t14=(C_word)C_a_i_cons(&a,2,t12,t13);
-t15=(C_word)C_a_i_cons(&a,2,lf[246],t14);
-t16=(C_word)C_a_i_cons(&a,2,lf[8],t15);
-t17=(C_word)C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST);
-t18=(C_word)C_a_i_cons(&a,2,t9,t17);
-t19=(C_word)C_a_i_cons(&a,2,lf[13],t18);
-t20=(C_word)C_a_i_cons(&a,2,lf[247],t19);
-t21=(C_word)C_a_i_cons(&a,2,lf[4],t20);
-t22=(C_word)C_a_i_cons(&a,2,lf[24],C_SCHEME_END_OF_LIST);
-t23=(C_word)C_a_i_cons(&a,2,lf[245],t22);
-t24=(C_word)C_a_i_cons(&a,2,lf[243],t23);
-t25=(C_word)C_a_i_cons(&a,2,lf[13],t24);
-t26=(C_word)C_a_i_cons(&a,2,lf[246],t25);
-t27=(C_word)C_a_i_cons(&a,2,lf[244],t26);
-t28=(C_word)C_a_i_cons(&a,2,lf[247],t27);
-t29=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13472,tmp=(C_word)a,a+=2,tmp);
-t30=(C_word)C_a_i_cons(&a,2,t29,C_SCHEME_END_OF_LIST);
-t31=(C_word)C_a_i_cons(&a,2,t28,t30);
-t32=(C_word)C_a_i_cons(&a,2,t21,t31);
-t33=(C_word)C_a_i_cons(&a,2,lf[248],C_SCHEME_END_OF_LIST);
-t34=(C_word)C_a_i_cons(&a,2,lf[249],C_SCHEME_END_OF_LIST);
-t35=(C_word)C_a_i_cons(&a,2,t34,C_SCHEME_END_OF_LIST);
-t36=(C_word)C_a_i_cons(&a,2,lf[45],t35);
-t37=(C_word)C_a_i_cons(&a,2,t36,C_SCHEME_END_OF_LIST);
-t38=(C_word)C_a_i_cons(&a,2,lf[13],t37);
-t39=(C_word)C_a_i_cons(&a,2,t33,t38);
-t40=(C_word)C_a_i_cons(&a,2,lf[154],t39);
-t41=(C_word)C_a_i_cons(&a,2,lf[245],C_SCHEME_END_OF_LIST);
-t42=(C_word)C_a_i_cons(&a,2,lf[243],t41);
-t43=(C_word)C_a_i_cons(&a,2,t40,t42);
-t44=(C_word)C_a_i_cons(&a,2,lf[247],t43);
-t45=(C_word)C_a_i_cons(&a,2,lf[4],t44);
-t46=(C_word)C_a_i_cons(&a,2,lf[245],C_SCHEME_END_OF_LIST);
-t47=(C_word)C_a_i_cons(&a,2,lf[243],t46);
-t48=(C_word)C_a_i_cons(&a,2,lf[249],t47);
-t49=(C_word)C_a_i_cons(&a,2,lf[13],t48);
-t50=(C_word)C_a_i_cons(&a,2,lf[248],t49);
-t51=(C_word)C_a_i_cons(&a,2,lf[247],t50);
-t52=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13276,tmp=(C_word)a,a+=2,tmp);
-t53=(C_word)C_a_i_cons(&a,2,t52,C_SCHEME_END_OF_LIST);
-t54=(C_word)C_a_i_cons(&a,2,t51,t53);
-t55=(C_word)C_a_i_cons(&a,2,t45,t54);
-t56=(C_word)C_a_i_list(&a,2,t32,t55);
-/* optimizer.scm: 506 ##sys#hash-table-set! */
-((C_proc5)C_retrieve_symbol_proc(lf[138]))(5,*((C_word*)lf[138]+1),t2,*((C_word*)lf[41]+1),lf[4],t56);}
-
-/* a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13276(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
-C_word tmp;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[9],*a=ab;
-if(c!=9) C_bad_argc_2(c,9,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr9,(void*)f_13276,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
-t9=(C_word)C_i_assoc(t4,C_retrieve(lf[250]));
-if(C_truep(t9)){
-if(C_truep((C_word)C_i_listp(t6))){
-t10=(C_word)C_i_length(t6);
-t11=C_retrieve(lf[251]);
-if(C_truep((C_word)C_fixnum_lessp(t10,t11))){
-t12=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13298,a[2]=t6,a[3]=t1,a[4]=t5,a[5]=t3,a[6]=t8,a[7]=t7,a[8]=t9,tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 703 gensym */
-((C_proc2)C_retrieve_symbol_proc(lf[99]))(2,*((C_word*)lf[99]+1),t12);}
-else{
-t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_SCHEME_FALSE);}}
-else{
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
-else{
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
-
-/* k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13298(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13298,2,t0,t1);}
-t2=(C_word)C_i_cdr(((C_word*)t0)[8]);
-t3=(C_word)C_a_i_list(&a,1,t2);
-t4=(C_word)C_a_i_list(&a,1,t1);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13334,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13336,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13378,a[2]=((C_word*)t0)[2],a[3]=t6,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 720 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t7,C_SCHEME_FALSE);}
-
-/* k13376 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13378(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 712 fold-right */
-((C_proc5)C_retrieve_symbol_proc(lf[141]))(5,*((C_word*)lf[141]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* a13335 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13336(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_13336,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13370,a[2]=t2,a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 717 varnode */
-((C_proc3)C_retrieve_symbol_proc(lf[65]))(3,*((C_word*)lf[65]+1),t4,((C_word*)t0)[2]);}
-
-/* k13368 in a13335 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13370(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13370,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13374,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 717 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,((C_word*)t0)[2]);}
-
-/* k13372 in k13368 in a13335 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13374(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13374,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[5],t1);
-t3=(C_word)C_a_i_record(&a,4,lf[20],lf[154],((C_word*)t0)[4],t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13362,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 718 qnode */
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t4,C_SCHEME_TRUE);}
-
-/* k13360 in k13372 in k13368 in a13335 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13362(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13362,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],t1,((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[20],lf[29],C_SCHEME_END_OF_LIST,t2));}
-
-/* k13332 in k13296 in a13275 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13334(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13334,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,t1,((C_word*)t0)[7],((C_word*)t0)[6]);
-t3=((C_word*)t0)[5];
-t4=(C_word)C_a_i_record(&a,4,lf[20],lf[4],t3,t2);
-t5=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t4);
-t6=((C_word*)t0)[3];
-t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[20],lf[5],((C_word*)t0)[2],t5));}
-
-/* a13471 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13472(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9){
-C_word tmp;
-C_word t10;
-C_word t11;
-C_word ab[7],*a=ab;
-if(c!=10) C_bad_argc_2(c,10,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr10,(void*)f_13472,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
-if(C_truep(C_retrieve(lf[153]))){
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13492,a[2]=t4,a[3]=t1,a[4]=t8,a[5]=t7,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 688 varnode */
-((C_proc3)C_retrieve_symbol_proc(lf[65]))(3,*((C_word*)lf[65]+1),t10,t9);}
-else{
-t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
-
-/* k13490 in a13471 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13492(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13492,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=(C_word)C_a_i_record(&a,4,lf[20],lf[29],C_SCHEME_END_OF_LIST,t2);
-t4=(C_word)C_a_i_list(&a,2,t1,t3);
-t5=((C_word*)t0)[3];
-t6=((C_word*)t0)[2];
-t7=t5;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[20],lf[8],t6,t4));}
-
-/* k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_6396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6396,2,t0,t1);}
-t2=C_mutate((C_word*)lf[139]+1 /* (set! reorganize-recursive-bindings ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6398,tmp=(C_word)a,a+=2,tmp));
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6885,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* optimizer.scm: 815 make-vector */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[242]+1)))(4,*((C_word*)lf[242]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}
-
-/* k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_6885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6885,2,t0,t1);}
-t2=C_mutate((C_word*)lf[150]+1 /* (set! substitution-table ...) */,t1);
-t3=C_mutate((C_word*)lf[151]+1 /* (set! rewrite ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6887,tmp=(C_word)a,a+=2,tmp));
-t4=C_mutate((C_word*)lf[152]+1 /* (set! simplify-named-call ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6907,tmp=(C_word)a,a+=2,tmp));
-t5=C_mutate((C_word*)lf[191]+1 /* (set! transform-direct-lambdas! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9266,tmp=(C_word)a,a+=2,tmp));
-t6=C_mutate((C_word*)lf[219]+1 /* (set! perform-lambda-lifting! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10651,tmp=(C_word)a,a+=2,tmp));
-t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_UNDEFINED);}
-
-/* ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10651(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[62],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10651,4,t0,t1,t2,t3);}
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_SCHEME_UNDEFINED;
-t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
-t20=C_SCHEME_UNDEFINED;
-t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
-t22=C_SCHEME_UNDEFINED;
-t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10654,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
-t25=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10760,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t26=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11048,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t27=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11181,a[2]=t2,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
-t28=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11462,a[2]=t2,tmp=(C_word)a,a+=3,tmp));
-t29=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11773,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
-t30=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12182,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
-t31=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12710,a[2]=t2,tmp=(C_word)a,a+=3,tmp));
-t32=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12908,a[2]=t2,tmp=(C_word)a,a+=3,tmp));
-t33=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13149,a[2]=t7,a[3]=t9,a[4]=t11,a[5]=t13,a[6]=t15,a[7]=t17,a[8]=t21,a[9]=t23,a[10]=t1,a[11]=t19,tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 1785 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t33,lf[39],lf[241]);}
-
-/* k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13149(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13149,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13152,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* optimizer.scm: 1786 find-lifting-candidates */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_10654(t3,t2);}
-
-/* k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13152(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13152,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13155,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 1787 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[240]);}
-
-/* k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13155(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13155,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13158,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
-/* optimizer.scm: 1788 build-call-graph */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_10760(t3,t2,((C_word*)t0)[3]);}
-
-/* k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13158(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13158,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13161,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 1789 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[239]);}
-
-/* k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13161(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13161,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13164,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 1790 eliminate */
-t3=((C_word*)((C_word*)t0)[4])[1];
-f_11048(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13164(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13164,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13167,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13247,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1791 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t3,lf[231],lf[238]);}
-
-/* k13245 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13247(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* optimizer.scm: 1791 pretty-print */
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_13167(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13167,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13170,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
-/* optimizer.scm: 1792 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[237]);}
-
-/* k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13170(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13170,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13173,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 1793 collect-accessibles */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_11181(t3,t2,((C_word*)t0)[3]);}
-
-/* k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13173(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13173,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13176,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13241,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1794 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t3,lf[231],lf[236]);}
-
-/* k13239 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13241(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* optimizer.scm: 1794 pretty-print */
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_13176(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13176(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13176,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13179,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
-/* optimizer.scm: 1795 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[235]);}
-
-/* k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13179(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13179,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13182,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13238,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* optimizer.scm: 1796 eliminate4 */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11462(t4,t3,((C_word*)t0)[2]);}
-
-/* k13236 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13238(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13238,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11428,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
-t6=((C_word*)t4)[1];
-f_11428(t6,((C_word*)t0)[2],t1,t2);}
-
-/* loop in k13236 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11428(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11428,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11432,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11446,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* optimizer.scm: 1590 filter */
-((C_proc4)C_retrieve_symbol_proc(lf[146]))(4,*((C_word*)lf[146]+1),t4,t5,t2);}
-
-/* a11445 in loop in k13236 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11446(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[3],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11446,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11452,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_i_cddr(t2);
-/* optimizer.scm: 1590 every */
-((C_proc4)C_retrieve_symbol_proc(lf[59]))(4,*((C_word*)lf[59]+1),t1,t3,t4);}
-
-/* a11451 in a11445 in loop in k13236 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11452(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11452,3,t0,t1,t2);}
-t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_assq(t2,((C_word*)t0)[2]));}
-
-/* k11430 in loop in k13236 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11432(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word *a;
-t2=(C_word)C_i_length(t1);
-t3=((C_word*)t0)[4];
-t4=(C_word)C_eqp(t3,t2);
-if(C_truep(t4)){
-t5=t1;
-t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-else{
-/* optimizer.scm: 1594 loop */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_11428(t5,((C_word*)t0)[3],t1,t2);}}
-
-/* k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13182(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13182,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13185,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-if(C_truep((C_word)C_i_pairp(t1))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13228,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13230,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#make-promise */
-t5=*((C_word*)lf[216]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-else{
-t3=t2;
-f_13185(2,t3,C_SCHEME_UNDEFINED);}}
-
-/* a13229 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13230(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13230,2,t0,t1);}
-/* optimizer.scm: 1798 unzip1 */
-((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),t1,((C_word*)t0)[2]);}
-
-/* k13226 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1798 debugging */
-((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),((C_word*)t0)[2],lf[35],lf[234],t1);}
-
-/* k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13185(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13185,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13188,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 1799 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[233]);}
-
-/* k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13188(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13188,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13191,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1800 compute-extra-variables */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_11773(t3,t2,((C_word*)t0)[5]);}
-
-/* k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13191(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13191,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13194,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13215,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1801 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t3,lf[231],lf[232]);}
-
-/* k13213 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13215(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(C_truep(t1)){
-/* optimizer.scm: 1801 pretty-print */
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-else{
-t2=((C_word*)t0)[3];
-f_13194(2,t2,C_SCHEME_UNDEFINED);}}
-
-/* k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13194(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13194,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13197,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-/* optimizer.scm: 1802 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[229]);}
-
-/* k13195 in k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13197(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13197,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13200,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1803 extend-call-sites! */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12710(t3,t2,((C_word*)t0)[4]);}
-
-/* k13198 in k13195 in k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13200(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13200,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13203,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1804 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[228]);}
-
-/* k13201 in k13198 in k13195 in k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13203(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13203,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13206,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1805 remove-local-bindings! */
-t3=((C_word*)((C_word*)t0)[2])[1];
-f_12908(t3,t2,((C_word*)t0)[4]);}
-
-/* k13204 in k13201 in k13198 in k13195 in k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13206(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13206,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13209,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1806 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t2,lf[39],lf[227]);}
-
-/* k13207 in k13204 in k13201 in k13198 in k13195 in k13192 in k13189 in k13186 in k13183 in k13180 in k13177 in k13174 in k13171 in k13168 in k13165 in k13162 in k13159 in k13156 in k13153 in k13150 in k13147 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13209(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1807 reconstruct! */
-t2=((C_word*)((C_word*)t0)[5])[1];
-f_12182(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12908(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12908,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12914,a[2]=t4,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_12914(t6,t1,((C_word*)t0)[2]);}
-
-/* walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12914(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12914,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=t2;
-t6=(C_word)C_slot(t5,C_fix(2));
-t7=t2;
-t8=(C_word)C_slot(t7,C_fix(3));
-t9=(C_word)C_eqp(t4,lf[5]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12948,a[2]=t8,a[3]=t6,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t11=t2;
-t12=(C_word)C_slot(t11,C_fix(3));
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13039,a[2]=((C_word*)t0)[2],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
-t16=((C_word*)t14)[1];
-f_13039(t16,t10,t12);}
-else{
-t10=(C_word)C_eqp(t4,lf[9]);
-if(C_truep(t10)){
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13069,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-t12=t2;
-t13=(C_word)C_slot(t12,C_fix(3));
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13099,a[2]=((C_word*)t0)[2],a[3]=t15,tmp=(C_word)a,a+=4,tmp));
-t17=((C_word*)t15)[1];
-f_13099(t17,t11,t13);}
-else{
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13125,a[2]=((C_word*)t0)[2],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
-t14=((C_word*)t12)[1];
-f_13125(t14,t1,t8);}}}
-
-/* loop3674 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13125(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13125,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13135,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g36813682 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12914(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13133 in loop3674 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13135(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13125(t3,((C_word*)t0)[2],t2);}
-
-/* loop3653 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13099(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13099,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13109,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g36603661 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12914(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13107 in loop3653 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13109(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13099(t3,((C_word*)t0)[2],t2);}
-
-/* k13067 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13069(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13069,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-if(C_truep((C_word)C_i_assq(t2,((C_word*)t0)[4]))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13078,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1780 node-class-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[203]))(4,*((C_word*)lf[203]+1),t3,((C_word*)t0)[2],lf[21]);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13076 in k13067 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13078,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13081,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1781 node-parameters-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* k13079 in k13076 in k13067 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13081(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1782 node-subexpressions-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* loop3616 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_13039(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_13039,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13049,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g36233624 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12914(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k13047 in loop3616 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_13049(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_13039(t3,((C_word*)t0)[2],t2);}
-
-/* k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12948(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12948,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12953,a[2]=t7,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=t3,tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_12953(t9,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* doloop3632 in k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12953(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word *a;
-loop:
-a=C_alloc(10);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12953,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[6])[1]))){
-t4=(C_word)C_i_car(t3);
-/* optimizer.scm: 1770 copy-node! */
-((C_proc4)C_retrieve_symbol_proc(lf[22]))(4,*((C_word*)lf[22]+1),t1,t4,((C_word*)t0)[5]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12976,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12991,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1772 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[130]+1)))(3,*((C_word*)lf[130]+1),t5,((C_word*)((C_word*)t0)[6])[1]);}}
-else{
-t4=(C_word)C_i_car(t2);
-if(C_truep((C_word)C_i_assq(t4,((C_word*)t0)[3]))){
-t5=(C_word)C_i_cdr(t2);
-t6=(C_word)C_i_cdr(t3);
-t19=t1;
-t20=t5;
-t21=t6;
-t1=t19;
-t2=t20;
-t3=t21;
-goto loop;}
-else{
-t5=(C_word)C_i_car(t2);
-t6=(C_word)C_a_i_cons(&a,2,t5,((C_word*)((C_word*)t0)[6])[1]);
-t7=C_mutate(((C_word *)((C_word*)t0)[6])+1,t6);
-t8=(C_word)C_i_car(t3);
-t9=(C_word)C_a_i_cons(&a,2,t8,((C_word*)((C_word*)t0)[4])[1]);
-t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t11=(C_word)C_i_cdr(t2);
-t12=(C_word)C_i_cdr(t3);
-t19=t1;
-t20=t11;
-t21=t12;
-t1=t19;
-t2=t20;
-t3=t21;
-goto loop;}}}
-
-/* k12989 in doloop3632 in k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12991(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1772 node-parameters-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12974 in doloop3632 in k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12976(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12976,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12983,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12987,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1773 reverse */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[130]+1)))(3,*((C_word*)lf[130]+1),t3,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* k12985 in k12974 in doloop3632 in k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12987(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1773 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k12981 in k12974 in doloop3632 in k12946 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12983(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1773 node-subexpressions-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12710(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12710,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12716,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_12716(t6,t1,((C_word*)t0)[2]);}
-
-/* walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12716(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word ab[25],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12716,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=t2;
-t6=(C_word)C_slot(t5,C_fix(2));
-t7=t2;
-t8=(C_word)C_slot(t7,C_fix(3));
-t9=(C_word)C_eqp(t4,lf[8]);
-if(C_truep(t9)){
-t10=(C_word)C_i_car(t8);
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12753,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t12=(C_word)C_slot(t10,C_fix(1));
-t13=(C_word)C_eqp(lf[2],t12);
-if(C_truep(t13)){
-t14=(C_word)C_slot(t10,C_fix(2));
-t15=(C_word)C_i_car(t14);
-t16=(C_word)C_i_assq(t15,((C_word*)t0)[2]);
-if(C_truep(t16)){
-t17=(C_word)C_i_set_car(t6,C_SCHEME_TRUE);
-t18=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12811,a[2]=t2,a[3]=t11,a[4]=t10,tmp=(C_word)a,a+=5,tmp);
-t19=C_SCHEME_END_OF_LIST;
-t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_SCHEME_FALSE;
-t22=(*a=C_VECTOR_TYPE|1,a[1]=t21,tmp=(C_word)a,a+=2,tmp);
-t23=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12815,a[2]=t18,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
-t24=(C_word)C_i_cdr(t16);
-t25=C_SCHEME_UNDEFINED;
-t26=(*a=C_VECTOR_TYPE|1,a[1]=t25,tmp=(C_word)a,a+=2,tmp);
-t27=C_set_block_item(t26,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12825,a[2]=t20,a[3]=t26,a[4]=t22,tmp=(C_word)a,a+=5,tmp));
-t28=((C_word*)t26)[1];
-f_12825(t28,t23,t24);}
-else{
-t17=C_SCHEME_UNDEFINED;
-t18=t11;
-f_12753(2,t18,t17);}}
-else{
-t14=t11;
-f_12753(2,t14,C_SCHEME_UNDEFINED);}}
-else{
-t10=C_SCHEME_UNDEFINED;
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12885,a[2]=((C_word*)t0)[3],a[3]=t11,tmp=(C_word)a,a+=4,tmp));
-t13=((C_word*)t11)[1];
-f_12885(t13,t1,t8);}}
-
-/* loop3582 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12885(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12885,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12895,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g35893590 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12716(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12893 in loop3582 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12895(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12885(t3,((C_word*)t0)[2],t2);}
-
-/* loop3541 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12825(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12825,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[65]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12854,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g35573558 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12852 in loop3541 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12854(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12854,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35413554 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12825(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop35413554 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12825(t6,((C_word*)t0)[3],t5);}}
-
-/* k12813 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12815(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* optimizer.scm: 1752 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),((C_word*)t0)[2],t1,t2);}
-
-/* k12809 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12811(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12811,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
-/* optimizer.scm: 1750 node-subexpressions-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* k12751 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12753(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12753,2,t0,t1);}
-t2=((C_word*)t0)[4];
-t3=(C_word)C_slot(t2,C_fix(3));
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12767,a[2]=((C_word*)t0)[3],a[3]=t5,tmp=(C_word)a,a+=4,tmp));
-t7=((C_word*)t5)[1];
-f_12767(t7,((C_word*)t0)[2],t3);}
-
-/* loop3565 in k12751 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12767(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12767,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12777,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g35723573 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12716(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12775 in loop3565 in k12751 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12777(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12767(t3,((C_word*)t0)[2],t2);}
-
-/* reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12182(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12182,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12194,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12196,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=((C_word*)t0)[3];
-t7=(C_word)C_slot(t6,C_fix(3));
-t8=(C_word)C_i_car(t7);
-/* optimizer.scm: 1686 fold-right */
-((C_proc5)C_retrieve_symbol_proc(lf[141]))(5,*((C_word*)lf[141]+1),t4,t5,t8,t2);}
-
-/* a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12196(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_12196,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12203,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1689 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t5,((C_word*)t0)[2],t4,lf[63]);}
-
-/* k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12203(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12203,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12206,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1690 hide-variable */
-((C_proc3)C_retrieve_symbol_proc(lf[226]))(3,*((C_word*)lf[226]+1),t2,((C_word*)t0)[5]);}
-
-/* k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12206(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12206,2,t0,t1);}
-t2=((C_word*)t0)[6];
-t3=(C_word)C_slot(t2,C_fix(2));
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12215,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1691 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),((C_word*)t0)[2],t4,t5);}
-
-/* a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12215(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[21],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_12215,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]);
-t6=(C_word)C_i_cdr(t5);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_FALSE;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12222,a[2]=t2,a[3]=t4,a[4]=t3,a[5]=t6,a[6]=t1,a[7]=((C_word*)t0)[2],a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12367,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
-t15=((C_word*)t13)[1];
-f_12367(t15,t11,t6);}
-
-/* loop3315 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12367(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12367,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[99]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12396,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g33313332 */
-t6=t3;
-((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12394 in loop3315 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12396(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12396,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33153328 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12367(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop33153328 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12367(t6,((C_word*)t0)[3],t5);}}
-
-/* k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12222(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12222,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12225,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12318,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
-t10=((C_word*)t8)[1];
-f_12318(t10,t6,((C_word*)t0)[5],t1);}
-
-/* loop3339 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12318(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[8],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12318,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_pairp(t2);
-t5=(C_truep(t4)?(C_word)C_i_pairp(t3):C_SCHEME_FALSE);
-if(C_truep(t5)){
-t6=*((C_word*)lf[149]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12351,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
-t8=(C_word)C_slot(t2,C_fix(0));
-t9=(C_word)C_slot(t3,C_fix(0));
-/* g33593360 */
-t10=t6;
-((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
-else{
-t6=((C_word*)((C_word*)t0)[2])[1];
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-
-/* k12349 in loop3339 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12351(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12351,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12331,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
-if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t4=t3;
-f_12331(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
-else{
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t5=t3;
-f_12331(t5,t4);}}
-
-/* k12329 in k12349 in loop3339 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12331(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
-t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* loop33393353 */
-t5=((C_word*)((C_word*)t0)[3])[1];
-f_12318(t5,((C_word*)t0)[2],t3,t4);}
-
-/* k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12225(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12225,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-t3=((C_word*)t0)[9];
-t4=(C_word)C_slot(t3,C_fix(3));
-t5=(C_word)C_i_car(t4);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12431,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-t7=C_SCHEME_UNDEFINED;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12446,a[2]=t6,a[3]=t8,tmp=(C_word)a,a+=4,tmp));
-t10=((C_word*)t8)[1];
-f_12446(t10,t2,t5);}
-
-/* walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12446(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word t33;
-C_word t34;
-C_word ab[21],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12446,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=t2;
-t6=(C_word)C_slot(t5,C_fix(2));
-t7=t2;
-t8=(C_word)C_slot(t7,C_fix(3));
-t9=(C_word)C_eqp(t4,lf[5]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12480,a[2]=t8,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t11=C_SCHEME_END_OF_LIST;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_SCHEME_FALSE;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12510,a[2]=t2,a[3]=t10,tmp=(C_word)a,a+=4,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12512,a[2]=t12,a[3]=t17,a[4]=t14,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t19=((C_word*)t17)[1];
-f_12512(t19,t15,t6);}
-else{
-t10=(C_word)C_eqp(t4,lf[2]);
-if(C_truep(t10)){
-t11=(C_word)C_i_car(t6);
-t12=f_12431(((C_word*)t0)[2],t11);
-t13=(C_word)C_a_i_list(&a,1,t12);
-/* optimizer.scm: 1725 node-parameters-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),t1,t2,t13);}
-else{
-t11=(C_word)C_eqp(t4,lf[9]);
-if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12575,a[2]=t8,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-t13=(C_word)C_i_car(t6);
-t14=f_12431(((C_word*)t0)[2],t13);
-t15=(C_word)C_a_i_list(&a,1,t14);
-/* optimizer.scm: 1727 node-parameters-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),t12,t2,t15);}
-else{
-t12=(C_word)C_eqp(t4,lf[7]);
-if(C_truep(t12)){
-t13=(C_word)C_i_car(t6);
-t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12628,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t8,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1730 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),t1,t13,t14);}
-else{
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12687,a[2]=((C_word*)t0)[3],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
-t16=((C_word*)t14)[1];
-f_12687(t16,t1,t8);}}}}}
-
-/* loop3494 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12687(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12687,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12697,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g35013502 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12446(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12695 in loop3494 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12697(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12687(t3,((C_word*)t0)[2],t2);}
-
-/* a12627 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12628(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[23],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_12628,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12643,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12647,a[2]=t4,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12649,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
-t14=((C_word*)t12)[1];
-f_12649(t14,t10,t2);}
-
-/* loop3470 in a12627 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12649(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12649,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=f_12431(((C_word*)t0)[5],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop34703483 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop34703483 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12645 in a12627 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12647(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1733 build-lambda-list */
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k12641 in a12627 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12643(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_set_car(((C_word*)t0)[5],t1);
-t3=(C_word)C_i_car(((C_word*)t0)[4]);
-/* optimizer.scm: 1734 walk */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_12446(t4,((C_word*)t0)[2],t3);}
-
-/* k12573 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12575(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12575,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12580,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_12580(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3453 in k12573 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12580(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12580,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12590,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g34603461 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12446(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12588 in loop3453 in k12573 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12590(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12580(t3,((C_word*)t0)[2],t2);}
-
-/* loop3416 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12512(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word *a;
-loop:
-a=C_alloc(3);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12512,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=f_12431(((C_word*)t0)[5],t3);
-t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop34163429 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}
-else{
-t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
-t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop34163429 */
-t14=t1;
-t15=t8;
-t1=t14;
-t2=t15;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12508 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12510(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1722 node-parameters-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k12478 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12480(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12480,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12485,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t5=((C_word*)t3)[1];
-f_12485(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3439 in k12478 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12485(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12485,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12495,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g34463447 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_12446(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12493 in loop3439 in k12478 in walk in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12495(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12485(t3,((C_word*)t0)[2],t2);}
-
-/* rename in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static C_word C_fcall f_12431(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_stack_check;
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[2]);
-if(C_truep(t2)){
-return((C_word)C_i_cdr(t2));}
-else{
-t3=t1;
-return(t3);}}
-
-/* k12226 in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12228(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12228,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12303,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
-/* optimizer.scm: 1699 gensym */
-((C_proc3)C_retrieve_symbol_proc(lf[99]))(3,*((C_word*)lf[99]+1),t2,lf[100]);}
-
-/* k12301 in k12226 in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12303(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12303,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
-t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[10]);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12287,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t3,a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12291,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1705 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k12289 in k12301 in k12226 in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12291(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_length(((C_word*)t0)[5]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],t2);
-/* optimizer.scm: 1705 build-lambda-list */
-((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[3],t1,t3,((C_word*)t0)[2]);}
-
-/* k12285 in k12301 in k12226 in k12223 in k12220 in a12214 in k12204 in k12201 in a12195 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12287(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[27],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12287,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
-t3=((C_word*)t0)[6];
-t4=(C_word)C_slot(t3,C_fix(3));
-t5=(C_word)C_a_i_record(&a,4,lf[20],lf[7],t2,t4);
-t6=(C_word)C_a_i_list(&a,1,t5);
-t7=(C_word)C_a_i_record(&a,4,lf[20],lf[9],((C_word*)t0)[5],t6);
-t8=(C_word)C_a_i_list(&a,2,t7,((C_word*)t0)[4]);
-t9=((C_word*)t0)[3];
-t10=t9;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_record(&a,4,lf[20],lf[5],((C_word*)t0)[2],t8));}
-
-/* k12192 in reconstruct! in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12194(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12194,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
-/* optimizer.scm: 1683 node-subexpressions-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-
-/* compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11773(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11773,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11899,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12134,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
-t11=((C_word*)t9)[1];
-f_12134(t11,t7,t2);}
-
-/* loop3170 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12134(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word *a;
-loop:
-a=C_alloc(6);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_12134,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_car(t3);
-t5=(C_word)C_i_cadr(t3);
-t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t8=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop31703183 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}
-else{
-t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t7);
-t9=C_mutate(((C_word *)((C_word*)t0)[4])+1,t7);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* loop31703183 */
-t16=t1;
-t17=t10;
-t1=t16;
-t2=t17;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11899(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[22],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11899,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11901,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp));
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12032,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12111,a[2]=t5,a[3]=t9,tmp=(C_word)a,a+=4,tmp));
-t11=((C_word*)t9)[1];
-f_12111(t11,t7,((C_word*)t0)[4]);}
-
-/* loop3194 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12111(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12111,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12121,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g32573258 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_11901(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12119 in loop3194 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12121(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_12111(t3,((C_word*)t0)[2],t2);}
-
-/* k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12032(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12032,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12037,a[2]=t3,a[3]=t7,a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp));
-t9=((C_word*)t7)[1];
-f_12037(t9,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12037(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12037,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12064,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12105,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g32793280 */
-t6=t3;
-f_12064(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12103 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12105(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12105,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32633276 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12037(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop32633276 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_12037(t6,((C_word*)t0)[3],t5);}}
-
-/* g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_12064(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_12064,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12102,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1672 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t4,((C_word*)t0)[2],t3,lf[63]);}
-
-/* k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12102(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12102,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11780,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11782,a[2]=t6,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_11782(t8,t4,t1);}
-
-/* walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11782(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11782,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=t2;
-t6=(C_word)C_slot(t5,C_fix(2));
-t7=t2;
-t8=(C_word)C_slot(t7,C_fix(3));
-t9=(C_word)C_eqp(t4,lf[5]);
-if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11817,a[2]=t8,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1648 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t10,t6,((C_word*)((C_word*)t0)[3])[1]);}
-else{
-t10=(C_word)C_eqp(t4,lf[7]);
-if(C_truep(t10)){
-t11=(C_word)C_i_car(t6);
-t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11858,a[2]=((C_word*)t0)[2],a[3]=t8,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1651 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),t1,t11,t12);}
-else{
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11875,a[2]=((C_word*)t0)[2],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
-t14=((C_word*)t12)[1];
-f_11875(t14,t1,t8);}}}
-
-/* loop3153 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11875(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11875,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11885,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g31603161 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_11782(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11883 in loop3153 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11885(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11875(t3,((C_word*)t0)[2],t2);}
-
-/* a11857 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11858(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_11858,5,t0,t1,t2,t3,t4);}
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11863,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1654 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t5,t2,((C_word*)((C_word*)t0)[4])[1]);}
-
-/* k11861 in a11857 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11863(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_car(((C_word*)t0)[4]);
-/* optimizer.scm: 1655 walk */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11782(t4,((C_word*)t0)[2],t3);}
-
-/* k11815 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11817(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11817,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11822,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_11822(t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3135 in k11815 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11822(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11822,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11832,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g31423143 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_11782(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11830 in loop3135 in k11815 in walk in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11832(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11822(t3,((C_word*)t0)[2],t2);}
-
-/* k11778 in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11780(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11780,2,t0,t1);}
-t2=((C_word*)((C_word*)t0)[6])[1];
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12078,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12080,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12094,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=(C_word)C_i_cdr(((C_word*)t0)[2]);
-/* optimizer.scm: 1678 delete-duplicates */
-((C_proc4)C_retrieve_symbol_proc(lf[37]))(4,*((C_word*)lf[37]+1),t5,t6,*((C_word*)lf[38]+1));}
-
-/* k12092 in k11778 in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12094(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1674 remove */
-((C_proc4)C_retrieve_symbol_proc(lf[3]))(4,*((C_word*)lf[3]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* a12079 in k11778 in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12080(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12080,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(t2,((C_word*)t0)[3]);
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?t3:(C_word)C_i_memq(t2,((C_word*)t0)[2])));}
-
-/* k12076 in k11778 in k12100 in g3279 in loop3263 in k12030 in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12078(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12078,2,t0,t1);}
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-
-/* walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11901(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11901,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12023,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12025,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-/* optimizer.scm: 1663 count */
-((C_proc4)C_retrieve_symbol_proc(lf[225]))(4,*((C_word*)lf[225]+1),t4,t5,((C_word*)((C_word*)t0)[5])[1]);}
-
-/* a12024 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12025(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12025,3,t0,t1,t2);}
-t3=*((C_word*)lf[38]+1);
-/* g32113212 */
-t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,((C_word*)t0)[2],t2);}
-
-/* k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12023(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12023,2,t0,t1);}
-if(C_truep((C_word)C_fixnum_greaterp(t1,C_fix(1)))){
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)((C_word*)t0)[6])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t4=(C_word)C_i_cddr(((C_word*)t0)[5]);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11921,a[2]=t4,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11989,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
-t9=((C_word*)t7)[1];
-f_11989(t9,t5,t4);}}
-
-/* loop3216 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11989(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11989,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11997,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12008,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g32233224 */
-t6=t3;
-f_11997(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k12006 in loop3216 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_12008(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11989(t3,((C_word*)t0)[2],t2);}
-
-/* g3223 in loop3216 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11997(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11997,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(t2,((C_word*)t0)[3]);
-/* optimizer.scm: 1666 walk */
-t4=((C_word*)((C_word*)t0)[2])[1];
-f_11901(t4,t1,t3);}
-
-/* k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11921(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11921,2,t0,t1);}
-t2=(C_word)C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11931,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cdr(t2);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11939,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_FALSE;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11943,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11945,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp));
-t14=((C_word*)t12)[1];
-f_11945(t14,t10,((C_word*)t0)[2]);}
-
-/* loop3231 in k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11945(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word *a;
-loop:
-a=C_alloc(6);
-if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_11945,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11972,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-t5=f_11972(t3,t4);
-t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop32313244 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}
-else{
-t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
-t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop32313244 */
-t15=t1;
-t16=t9;
-t1=t15;
-t2=t16;
-goto loop;}}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* g3247 in loop3231 in k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static C_word C_fcall f_11972(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_stack_check;
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[2]);
-return((C_word)C_i_cdr(t2));}
-
-/* k11941 in k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11943(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1668 concatenate */
-((C_proc3)C_retrieve_symbol_proc(lf[224]))(3,*((C_word*)lf[224]+1),((C_word*)t0)[2],t1);}
-
-/* k11937 in k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11939(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1668 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11929 in k11919 in k12021 in walk in k11897 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11931(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_set_cdr(((C_word*)t0)[2],t1));}
-
-/* eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11462(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11462,NULL,3,t0,t1,t2);}
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11466,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11468,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
-t8=((C_word*)t6)[1];
-f_11468(t8,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11468(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11468,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=(C_word)C_slot(t4,C_fix(1));
-t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=t2;
-t9=(C_word)C_slot(t8,C_fix(3));
-t10=(C_word)C_eqp(t5,lf[2]);
-t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11502,a[2]=((C_word*)t0)[2],a[3]=t9,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[3],a[7]=t5,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
-if(C_truep(t10)){
-t12=t11;
-f_11502(t12,t10);}
-else{
-t12=(C_word)C_eqp(t5,lf[45]);
-if(C_truep(t12)){
-t13=t11;
-f_11502(t13,t12);}
-else{
-t13=(C_word)C_eqp(t5,lf[21]);
-if(C_truep(t13)){
-t14=t11;
-f_11502(t14,t13);}
-else{
-t14=(C_word)C_eqp(t5,lf[222]);
-t15=t11;
-f_11502(t15,(C_truep(t14)?t14:(C_word)C_eqp(t5,lf[172])));}}}}
-
-/* k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11502(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11502,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[8];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_eqp(((C_word*)t0)[7],lf[5]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11513,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_11513(t6,((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[3]);}
-else{
-t3=(C_word)C_eqp(((C_word*)t0)[7],lf[7]);
-if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[5]);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11564,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1613 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),((C_word*)t0)[8],t4,t5);}
-else{
-t4=(C_word)C_eqp(((C_word*)t0)[7],lf[8]);
-if(C_truep(t4)){
-t5=(C_word)C_i_car(((C_word*)t0)[3]);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11588,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11621,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1619 call-with-current-continuation */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[58]+1)))(3,*((C_word*)lf[58]+1),t6,t7);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11724,a[2]=t6,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp));
-t8=((C_word*)t6)[1];
-f_11724(t8,((C_word*)t0)[8],((C_word*)t0)[3]);}}}}}
-
-/* loop3096 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11724(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11724,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11732,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11739,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g31033104 */
-t6=t3;
-f_11732(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11737 in loop3096 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11739(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11724(t3,((C_word*)t0)[2],t2);}
-
-/* g3103 in loop3096 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11732(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11732,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1634 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11468(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11621(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word ab[11],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11621,3,t0,t1,t2);}
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t4=(C_word)C_eqp(lf[2],t3);
-if(C_truep(t4)){
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(C_word)C_slot(((C_word*)t0)[4],C_fix(2));
-t8=(C_word)C_i_car(t7);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11637,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t10,a[5]=((C_word*)t0)[3],a[6]=t6,tmp=(C_word)a,a+=7,tmp));
-t12=((C_word*)t10)[1];
-f_11637(t12,t1,t8);}
-else{
-t5=C_SCHEME_UNDEFINED;
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-
-/* loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11637(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11637,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_memq(t2,((C_word*)((C_word*)t0)[6])[1]))){
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-else{
-t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[6])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
-t5=(C_word)C_i_assq(t2,((C_word*)((C_word*)t0)[5])[1]);
-if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11657,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11690,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
-t8=(C_word)C_i_cadr(t5);
-/* optimizer.scm: 1628 lset<= */
-((C_proc5)C_retrieve_symbol_proc(lf[144]))(5,*((C_word*)lf[144]+1),t7,*((C_word*)lf[38]+1),t8,((C_word*)t0)[2]);}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}}}
-
-/* k11688 in loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11690(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11690,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[5];
-f_11657(2,t2,C_SCHEME_UNDEFINED);}
-else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11694,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1630 delete! */
-((C_proc5)C_retrieve_symbol_proc(lf[223]))(5,*((C_word*)lf[223]+1),t2,((C_word*)t0)[2],((C_word*)((C_word*)t0)[4])[1],*((C_word*)lf[38]+1));}}
-
-/* k11692 in k11688 in loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11694(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-/* optimizer.scm: 1631 return */
-t3=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k11655 in loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11657(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11657,2,t0,t1);}
-t2=(C_word)C_i_cddr(((C_word*)t0)[4]);
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11666,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
-t6=((C_word*)t4)[1];
-f_11666(t6,((C_word*)t0)[2],t2);}
-
-/* loop3062 in k11655 in loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11666(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11666,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11676,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g30693070 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_11637(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11674 in loop3062 in k11655 in loop in a11620 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11676(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11666(t3,((C_word*)t0)[2],t2);}
-
-/* k11586 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11588(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11588,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11593,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_11593(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop3081 in k11586 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11593(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11593,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11601,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11608,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g30883089 */
-t6=t3;
-f_11601(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11606 in loop3081 in k11586 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11608(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11593(t3,((C_word*)t0)[2],t2);}
-
-/* g3088 in loop3081 in k11586 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11601(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11601,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1633 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11468(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* a11563 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11564(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_11564,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11576,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1616 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t6,t2,((C_word*)t0)[2]);}
-
-/* k11574 in a11563 in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11576(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1616 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11468(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11513(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11513,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11531,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1608 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t5,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11534,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_i_car(t3);
-/* optimizer.scm: 1610 walk */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_11468(t6,t4,t5,((C_word*)t0)[3]);}}
-
-/* k11532 in loop in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11534(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* optimizer.scm: 1611 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11513(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k11529 in loop in k11500 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11531(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1608 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11468(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11464 in eliminate4 in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11466(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11181(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11181,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11185,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11187,a[2]=t4,a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t7,tmp=(C_word)a,a+=6,tmp));
-t9=((C_word*)t7)[1];
-f_11187(t9,t5,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11187(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[12],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11187,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=(C_word)C_slot(t4,C_fix(1));
-t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=t2;
-t9=(C_word)C_slot(t8,C_fix(3));
-t10=(C_word)C_eqp(t5,lf[2]);
-t11=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_11221,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t9,a[7]=t3,a[8]=t7,a[9]=((C_word*)t0)[5],a[10]=t5,a[11]=t1,tmp=(C_word)a,a+=12,tmp);
-if(C_truep(t10)){
-t12=t11;
-f_11221(t12,t10);}
-else{
-t12=(C_word)C_eqp(t5,lf[45]);
-if(C_truep(t12)){
-t13=t11;
-f_11221(t13,t12);}
-else{
-t13=(C_word)C_eqp(t5,lf[21]);
-if(C_truep(t13)){
-t14=t11;
-f_11221(t14,t13);}
-else{
-t14=(C_word)C_eqp(t5,lf[222]);
-t15=t11;
-f_11221(t15,(C_truep(t14)?t14:(C_word)C_eqp(t5,lf[172])));}}}}
-
-/* k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11221(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11221,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[11];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-else{
-t2=(C_word)C_eqp(((C_word*)t0)[10],lf[5]);
-if(C_truep(t2)){
-t3=C_SCHEME_UNDEFINED;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11232,a[2]=t4,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp));
-t6=((C_word*)t4)[1];
-f_11232(t6,((C_word*)t0)[11],((C_word*)t0)[8],((C_word*)t0)[6]);}
-else{
-t3=(C_word)C_eqp(((C_word*)t0)[10],lf[7]);
-if(C_truep(t3)){
-t4=(C_word)C_i_assq(((C_word*)t0)[5],((C_word*)((C_word*)t0)[4])[1]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11280,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
-if(C_truep(t4)){
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_assq(t6,((C_word*)t0)[3]))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11314,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-t8=(C_word)C_i_cdr(t4);
-/* optimizer.scm: 1565 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t7,t8,((C_word*)t0)[7],((C_word*)((C_word*)t0)[2])[1]);}
-else{
-t7=C_SCHEME_UNDEFINED;
-t8=t5;
-f_11280(t8,t7);}}
-else{
-t6=t5;
-f_11280(t6,C_SCHEME_UNDEFINED);}}
-else{
-t4=C_SCHEME_UNDEFINED;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11323,a[2]=t5,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp));
-t7=((C_word*)t5)[1];
-f_11323(t7,((C_word*)t0)[11],((C_word*)t0)[6]);}}}}
-
-/* loop2960 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11323(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11323,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11331,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11338,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g29672968 */
-t6=t3;
-f_11331(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11336 in loop2960 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11338(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11323(t3,((C_word*)t0)[2],t2);}
-
-/* g2967 in loop2960 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11331(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11331,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1571 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11187(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* k11312 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11314(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-f_11280(t3,t2);}
-
-/* k11278 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11280(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11280,NULL,2,t0,t1);}
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11289,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1566 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),((C_word*)t0)[2],t2,t3);}
-
-/* a11288 in k11278 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_11289,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11301,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1569 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t6,t2,((C_word*)t0)[2]);}
-
-/* k11299 in a11288 in k11278 in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11301(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1569 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11187(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11232(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11232,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11250,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1556 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t5,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11253,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t5=(C_word)C_i_car(t3);
-/* optimizer.scm: 1558 walk */
-t6=((C_word*)((C_word*)t0)[5])[1];
-f_11187(t6,t4,t5,((C_word*)t0)[3]);}}
-
-/* k11251 in loop in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11253(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* optimizer.scm: 1559 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_11232(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k11248 in loop in k11219 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11250(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1556 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_11187(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k11183 in collect-accessibles in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11185(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11048(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11048,NULL,4,t0,t1,t2,t3);}
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11054,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1526 remove */
-((C_proc4)C_retrieve_symbol_proc(lf[3]))(4,*((C_word*)lf[3]+1),t1,t4,t3);}
-
-/* a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11054(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11054,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11088,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-t4=(C_word)C_i_car(t2);
-t5=((C_word*)t0)[2];
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11098,a[2]=t4,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1536 unzip1 */
-((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),t6,t5);}
-
-/* k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11098(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11098,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11103,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_11103(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-
-/* count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11103(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11103,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_assq(t2,((C_word*)t0)[4]);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11110,a[2]=t4,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
-t6=(C_word)C_i_cddr(t4);
-/* optimizer.scm: 1539 lset-difference */
-((C_proc6)C_retrieve_symbol_proc(lf[202]))(6,*((C_word*)lf[202]+1),t5,*((C_word*)lf[38]+1),t6,t3,((C_word*)t0)[2]);}
-
-/* k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11110(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11110,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11171,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=(C_word)C_i_cadr(((C_word*)t0)[2]);
-/* optimizer.scm: 1540 delete-duplicates */
-((C_proc4)C_retrieve_symbol_proc(lf[37]))(4,*((C_word*)lf[37]+1),t2,t3,*((C_word*)lf[38]+1));}
-
-/* k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11171(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11171,2,t0,t1);}
-t2=(C_word)C_i_length(t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11167,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1541 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* k11165 in k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11167(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[20],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11167,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_FALSE;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11123,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t8=C_SCHEME_UNDEFINED;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11125,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp));
-t11=((C_word*)t9)[1];
-f_11125(t11,t7,((C_word*)t0)[2]);}
-
-/* loop2878 in k11165 in k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11125(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11125,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11152,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11159,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g28942895 */
-t6=t3;
-f_11152(t6,t4,t5);}
-else{
-t3=((C_word*)((C_word*)t0)[2])[1];
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11157 in loop2878 in k11165 in k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11159(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11159,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
-if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop28782891 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11125(t6,((C_word*)t0)[3],t5);}
-else{
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop28782891 */
-t6=((C_word*)((C_word*)t0)[4])[1];
-f_11125(t6,((C_word*)t0)[3],t5);}}
-
-/* g2894 in loop2878 in k11165 in k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_11152(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11152,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1542 count */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_11103(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* k11121 in k11165 in k11169 in k11108 in count in k11096 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11123(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1542 fold */
-((C_proc5)C_retrieve_symbol_proc(lf[142]))(5,*((C_word*)lf[142]+1),((C_word*)t0)[3],*((C_word*)lf[221]+1),((C_word*)t0)[2],t1);}
-
-/* k11086 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11088(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11088,2,t0,t1);}
-t2=(C_word)C_fixnum_greaterp(t1,C_fix(16));
-if(C_truep(t2)){
-t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11066,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cadr(((C_word*)t0)[2]);
-/* optimizer.scm: 1529 any */
-((C_proc4)C_retrieve_symbol_proc(lf[49]))(4,*((C_word*)lf[49]+1),((C_word*)t0)[5],t3,t4);}}
-
-/* a11065 in k11086 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11066(C_word c,C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word ab[5],*a=ab;
-if(c!=3) C_bad_argc_2(c,3,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_11066,3,t0,t1,t2);}
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11073,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1530 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t3,((C_word*)t0)[2],t2,lf[90]);}
-
-/* k11071 in a11065 in k11086 in a11053 in eliminate in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11073(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-if(C_truep(t1)){
-t2=(C_word)C_i_assq(((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_not(t2));}
-else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-
-/* build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10760(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word ab[28],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10760,NULL,3,t0,t1,t2);}
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
-t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10763,a[2]=((C_word*)t0)[2],a[3]=t6,a[4]=t8,a[5]=t2,a[6]=t10,tmp=(C_word)a,a+=7,tmp));
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10971,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10973,a[2]=t14,a[3]=t10,a[4]=t4,a[5]=t8,a[6]=t6,tmp=(C_word)a,a+=7,tmp));
-t16=((C_word*)t14)[1];
-f_10973(t16,t12,t2);}
-
-/* loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10973(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10973,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10981,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11035,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g28312832 */
-t6=t3;
-f_10981(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k11033 in loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11035(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10973(t3,((C_word*)t0)[2],t2);}
-
-/* g2831 in loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10981(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[11],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10981,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(C_word)C_slot(t4,C_fix(2));
-t6=(C_word)C_i_car(t5);
-t7=C_set_block_item(((C_word*)t0)[5],0,C_SCHEME_END_OF_LIST);
-t8=C_set_block_item(((C_word*)t0)[4],0,C_SCHEME_END_OF_LIST);
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10996,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11006,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1515 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),t9,t6,t10);}
-
-/* a11005 in g2831 in loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11006(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word *a;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_11006,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_slot(((C_word*)t0)[3],C_fix(3));
-t6=(C_word)C_i_car(t5);
-/* optimizer.scm: 1518 walk */
-t7=((C_word*)((C_word*)t0)[2])[1];
-f_10763(t7,t1,t6,t2);}
-
-/* k10994 in g2831 in loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10996(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10996,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11000,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1]);
-/* optimizer.scm: 1519 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t2,((C_word*)t0)[2],t3,((C_word*)((C_word*)t0)[6])[1]);}
-
-/* k10998 in k10994 in g2831 in loop2750 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_11000(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10969 in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10971(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10763(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10763,NULL,4,t0,t1,t2,t3);}
-t4=t2;
-t5=(C_word)C_slot(t4,C_fix(1));
-t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=t2;
-t9=(C_word)C_slot(t8,C_fix(3));
-t10=(C_word)C_eqp(t5,lf[2]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(t5,lf[9]));
-if(C_truep(t11)){
-t12=(C_word)C_i_car(t7);
-t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10803,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t12,a[5]=t9,a[6]=t1,a[7]=t3,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
-t14=(C_word)C_i_memq(t12,t3);
-t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10850,a[2]=((C_word*)t0)[3],a[3]=t12,a[4]=t13,tmp=(C_word)a,a+=5,tmp);
-if(C_truep(t14)){
-t16=t15;
-f_10850(2,t16,t14);}
-else{
-/* optimizer.scm: 1491 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t15,((C_word*)t0)[2],t12,lf[117]);}}
-else{
-t12=(C_word)C_eqp(t5,lf[5]);
-if(C_truep(t12)){
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10868,a[2]=t14,a[3]=t3,a[4]=t7,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp));
-t16=((C_word*)t14)[1];
-f_10868(t16,t1,t7,t9);}
-else{
-t13=(C_word)C_eqp(t5,lf[7]);
-if(C_truep(t13)){
-t14=(C_word)C_i_car(t7);
-t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10922,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=t9,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1503 decompose-lambda-list */
-((C_proc4)C_retrieve_symbol_proc(lf[78]))(4,*((C_word*)lf[78]+1),t1,t14,t15);}
-else{
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10939,a[2]=t15,a[3]=t3,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp));
-t17=((C_word*)t15)[1];
-f_10939(t17,t1,t9);}}}}
-
-/* loop2817 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10939(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10939,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10947,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10954,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g28242825 */
-t6=t3;
-f_10947(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10952 in loop2817 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10954(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10939(t3,((C_word*)t0)[2],t2);}
-
-/* g2824 in loop2817 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10947(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10947,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1506 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10763(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* a10921 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10922(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
-C_word tmp;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[5],*a=ab;
-if(c!=5) C_bad_argc_2(c,5,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_10922,5,t0,t1,t2,t3,t4);}
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10934,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1505 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t6,t2,((C_word*)t0)[2]);}
-
-/* k10932 in a10921 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10934(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1505 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_10763(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10868(C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[6],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10868,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t2))){
-t4=(C_word)C_i_car(t3);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10886,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1498 append */
-((C_proc4)C_retrieve_proc(*((C_word*)lf[6]+1)))(4,*((C_word*)lf[6]+1),t5,((C_word*)t0)[4],((C_word*)t0)[3]);}
-else{
-t4=(C_word)C_i_car(t2);
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10892,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
-t6=(C_word)C_i_car(t3);
-/* optimizer.scm: 1500 walk */
-t7=((C_word*)((C_word*)t0)[5])[1];
-f_10763(t7,t5,t6,((C_word*)t0)[3]);}}
-
-/* k10890 in loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10892(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* optimizer.scm: 1501 loop */
-t4=((C_word*)((C_word*)t0)[3])[1];
-f_10868(t4,((C_word*)t0)[2],t2,t3);}
-
-/* k10884 in loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10886(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1498 walk */
-t2=((C_word*)((C_word*)t0)[4])[1];
-f_10763(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-
-/* k10848 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10850(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[3],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10850,2,t0,t1);}
-if(C_truep(t1)){
-t2=((C_word*)t0)[4];
-f_10803(t2,C_SCHEME_UNDEFINED);}
-else{
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
-t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=((C_word*)t0)[4];
-f_10803(t4,t3);}}
-
-/* k10801 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10803(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10803,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10806,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
-if(C_truep((C_word)C_i_assq(((C_word*)t0)[4],((C_word*)t0)[3]))){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=t2;
-f_10806(t5,t4);}
-else{
-t3=t2;
-f_10806(t3,C_SCHEME_UNDEFINED);}}
-
-/* k10804 in k10801 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10806(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10806,NULL,2,t0,t1);}
-t2=C_SCHEME_UNDEFINED;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10811,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
-t5=((C_word*)t3)[1];
-f_10811(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-
-/* loop2792 in k10804 in k10801 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10811(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word ab[9],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10811,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10819,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10826,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t5=(C_word)C_slot(t2,C_fix(0));
-/* g27992800 */
-t6=t3;
-f_10819(t6,t4,t5);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10824 in loop2792 in k10804 in k10801 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10826(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10811(t3,((C_word*)t0)[2],t2);}
-
-/* g2799 in loop2792 in k10804 in k10801 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10819(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word *a;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10819,NULL,3,t0,t1,t2);}
-/* optimizer.scm: 1494 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10763(t3,t1,t2,((C_word*)t0)[2]);}
-
-/* find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10654(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[10],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10654,NULL,2,t0,t1);}
-t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10658,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10660,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1462 ##sys#hash-table-for-each */
-((C_proc4)C_retrieve_symbol_proc(lf[220]))(4,*((C_word*)lf[220]+1),t4,t5,((C_word*)t0)[2]);}
-
-/* a10659 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10660(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word ab[7],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_10660,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_assq(lf[63],t3);
-if(C_truep(t4)){
-t5=(C_word)C_i_assq(lf[91],t3);
-if(C_truep(t5)){
-t6=(C_word)C_i_assq(lf[135],t3);
-if(C_truep(t6)){
-t7=(C_word)C_i_cdr(t5);
-t8=(C_word)C_i_length(t7);
-if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10691,a[2]=t2,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
-if(C_truep((C_word)C_i_assq(lf[92],t3))){
-t10=t9;
-f_10691(t10,C_SCHEME_FALSE);}
-else{
-t10=(C_word)C_i_cdr(t4);
-t11=(C_word)C_slot(t10,C_fix(1));
-t12=(C_word)C_eqp(lf[7],t11);
-if(C_truep(t12)){
-if(C_truep((C_word)C_i_assq(lf[117],t3))){
-t13=t9;
-f_10691(t13,C_SCHEME_FALSE);}
-else{
-t13=(C_word)C_i_cdr(t6);
-t14=(C_word)C_i_length(t13);
-t15=t9;
-f_10691(t15,(C_word)C_eqp(t8,t14));}}
-else{
-t13=t9;
-f_10691(t13,C_SCHEME_FALSE);}}}
-else{
-t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_SCHEME_FALSE);}}
-else{
-t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}
-else{
-t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-else{
-t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
-
-/* k10689 in a10659 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10691(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[7],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10691,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10695,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
-t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* optimizer.scm: 1473 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t2,t3,((C_word*)t0)[2],((C_word*)((C_word*)t0)[6])[1]);}
-else{
-t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-
-/* k10693 in k10689 in a10659 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10695(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10695,2,t0,t1);}
-t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10699,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* optimizer.scm: 1474 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t3,((C_word*)t0)[2],t4,((C_word*)((C_word*)t0)[5])[1]);}
-
-/* k10697 in k10693 in k10689 in a10659 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10699(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-
-/* k10656 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10658(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9266(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
-C_word tmp;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word ab[39],*a=ab;
-if(c!=4) C_bad_argc_2(c,4,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_9266,4,t0,t1,t2,t3);}
-t4=C_SCHEME_FALSE;
-t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_SCHEME_END_OF_LIST;
-t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_fix(0);
-t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_SCHEME_UNDEFINED;
-t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_SCHEME_UNDEFINED;
-t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_UNDEFINED;
-t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9269,a[2]=t3,a[3]=t15,a[4]=t13,a[5]=t11,a[6]=t9,a[7]=t7,a[8]=t17,tmp=(C_word)a,a+=9,tmp));
-t19=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9468,a[2]=t7,a[3]=t9,a[4]=t3,a[5]=t11,tmp=(C_word)a,a+=6,tmp));
-t20=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9922,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
-t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10646,a[2]=t2,a[3]=t13,a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
-/* optimizer.scm: 1441 debugging */
-((C_proc4)C_retrieve_symbol_proc(lf[12]))(4,*((C_word*)lf[12]+1),t21,lf[39],lf[218]);}
-
-/* k10644 in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10646(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[4],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10646,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10649,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
-/* optimizer.scm: 1442 walk */
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_9269(t3,t2,C_SCHEME_FALSE,((C_word*)t0)[2],C_SCHEME_FALSE);}
-
-/* k10647 in k10644 in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10649(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)((C_word*)t0)[2])[1]);}
-
-/* transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_9922(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
-C_word tmp;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[19],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9922,NULL,8,t0,t1,t2,t3,t4,t5,t6,t7);}
-t8=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9926,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t3,a[5]=t7,a[6]=t1,a[7]=t5,a[8]=t6,a[9]=t2,a[10]=((C_word*)t0)[3],tmp=(C_word)a,a+=11,tmp);
-if(C_truep((C_word)C_i_pairp(t5))){
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10634,a[2]=t7,a[3]=t3,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10636,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
-/* ##sys#make-promise */
-t11=*((C_word*)lf[216]+1);
-((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
-else{
-/* optimizer.scm: 1332 debugging */
-((C_proc6)C_retrieve_symbol_proc(lf[12]))(6,*((C_word*)lf[12]+1),t8,lf[35],lf[217],t3,t7);}}
-
-/* a10635 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10636(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-if(c!=2) C_bad_argc_2(c,2,t0);
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10636,2,t0,t1);}
-/* optimizer.scm: 1331 unzip1 */
-((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),t1,((C_word*)t0)[2]);}
-
-/* k10632 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10634(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word *a;
-/* optimizer.scm: 1331 debugging */
-((C_proc7)C_retrieve_symbol_proc(lf[12]))(7,*((C_word*)lf[12]+1),((C_word*)t0)[4],lf[35],lf[214],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-
-/* k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9926(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word ab[14],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9926,2,t0,t1);}
-t2=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_TRUE);
-t3=((C_word*)t0)[9];
-t4=(C_word)C_slot(t3,C_fix(2));
-t5=(C_word)C_i_caddr(t4);
-t6=(C_word)C_i_length(t5);
-t7=C_SCHEME_END_OF_LIST;
-t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9941,a[2]=((C_word*)t0)[3],a[3]=t8,a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t4,tmp=(C_word)a,a+=12,tmp);
-/* optimizer.scm: 1337 get */
-((C_proc5)C_retrieve_symbol_proc(lf[44]))(5,*((C_word*)lf[44]+1),t9,((C_word*)t0)[2],((C_word*)t0)[4],lf[135]);}
-
-/* k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9941(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9941,2,t0,t1);}
-t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9950,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],tmp=(C_word)a,a+=14,tmp);
-if(C_truep((C_word)C_i_listp(((C_word*)t0)[11]))){
-t6=(C_word)C_i_length(((C_word*)t0)[11]);
-t7=(C_word)C_eqp(t6,C_fix(4));
-if(C_truep(t7)){
-t8=(C_word)C_i_caddr(((C_word*)t0)[11]);
-t9=t5;
-f_9950(t9,(C_word)C_i_listp(t8));}
-else{
-t8=t5;
-f_9950(t8,C_SCHEME_FALSE);}}
-else{
-t6=t5;
-f_9950(t6,C_SCHEME_FALSE);}}
-
-/* k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_9950(C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9950,NULL,2,t0,t1);}
-if(C_truep(t1)){
-t2=(C_word)C_i_car(((C_word*)t0)[13]);
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_9956,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-/* optimizer.scm: 1341 caaddr */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[212]+1)))(3,*((C_word*)lf[212]+1),t3,((C_word*)t0)[13]);}
-else{
-/* optimizer.scm: 1439 bomb */
-((C_proc4)C_retrieve_symbol_proc(lf[189]))(4,*((C_word*)lf[189]+1),((C_word*)t0)[10],lf[213],((C_word*)t0)[13]);}}
-
-/* k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9956(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word ab[16],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9956,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_9959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
-/* optimizer.scm: 1342 cdaddr */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t2,((C_word*)t0)[14]);}
-
-/* k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9959(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[15],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9959,2,t0,t1);}
-t2=(C_word)C_i_cddr(((C_word*)t0)[15]);
-t3=(C_word)C_i_set_car(t2,t1);
-t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_9965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
-/* optimizer.scm: 1346 node-class-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[203]))(4,*((C_word*)lf[203]+1),t4,((C_word*)t0)[5],lf[193]);}
-
-/* k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_9965(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word ab[23],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9965,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9968,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
-t3=((C_word*)t0)[5];
-t4=(C_word)C_slot(t3,C_fix(3));
-t5=(C_word)C_i_car(t4);
-t6=C_SCHEME_UNDEFINED;
-t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10248,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp));
-t9=((C_word*)t7)[1];
-f_10248(t9,t2,t5);}
-
-/* rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10248(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word t13;
-C_word t14;
-C_word t15;
-C_word t16;
-C_word t17;
-C_word t18;
-C_word t19;
-C_word t20;
-C_word t21;
-C_word t22;
-C_word t23;
-C_word t24;
-C_word t25;
-C_word t26;
-C_word t27;
-C_word t28;
-C_word t29;
-C_word t30;
-C_word t31;
-C_word t32;
-C_word ab[13],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10248,NULL,3,t0,t1,t2);}
-t3=t2;
-t4=(C_word)C_slot(t3,C_fix(2));
-t5=t2;
-t6=(C_word)C_slot(t5,C_fix(3));
-t7=t2;
-t8=(C_word)C_slot(t7,C_fix(1));
-t9=(C_word)C_eqp(t8,lf[8]);
-if(C_truep(t9)){
-t10=(C_word)C_i_car(t6);
-t11=(C_word)C_i_cadr(t6);
-t12=(C_word)C_slot(t10,C_fix(2));
-t13=(C_word)C_slot(t11,C_fix(2));
-t14=(C_word)C_slot(t10,C_fix(1));
-t15=(C_word)C_eqp(lf[2],t14);
-if(C_truep(t15)){
-t16=(C_word)C_i_car(t12);
-t17=(C_word)C_eqp(((C_word*)t0)[9],t16);
-if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_10317,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=t1,a[9]=t6,a[10]=((C_word*)t0)[7],a[11]=t13,a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
-/* optimizer.scm: 1360 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t18,C_SCHEME_FALSE,t2,((C_word*)((C_word*)t0)[8])[1]);}
-else{
-t18=(C_word)C_i_car(t12);
-t19=(C_word)C_eqp(((C_word*)t0)[7],t18);
-if(C_truep(t19)){
-t20=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10470,a[2]=t2,a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
-/* optimizer.scm: 1385 node-class-set! */
-((C_proc4)C_retrieve_symbol_proc(lf[203]))(4,*((C_word*)lf[203]+1),t20,t2,lf[209]);}
-else{
-/* optimizer.scm: 1388 bomb */
-((C_proc3)C_retrieve_symbol_proc(lf[189]))(3,*((C_word*)lf[189]+1),t1,lf[210]);}}}
-else{
-t16=t1;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_UNDEFINED);}}
-else{
-t10=(C_word)C_eqp(t8,lf[5]);
-if(C_truep(t10)){
-t11=(C_word)C_i_car(t4);
-t12=(C_word)C_i_car(t6);
-if(C_truep((C_word)C_i_memq(t11,((C_word*)t0)[2]))){
-t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10522,a[2]=t6,a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
-/* optimizer.scm: 1393 alist-cons */
-((C_proc5)C_retrieve_symbol_proc(lf[46]))(5,*((C_word*)lf[46]+1),t13,t11,t12,((C_word*)((C_word*)t0)[4])[1]);}
-else{
-t13=C_SCHEME_UNDEFINED;
-t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10537,a[2]=((C_word*)t0)[3],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
-t16=((C_word*)t14)[1];
-f_10537(t16,t1,t6);}}
-else{
-t11=C_SCHEME_UNDEFINED;
-t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10563,a[2]=((C_word*)t0)[3],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
-t14=((C_word*)t12)[1];
-f_10563(t14,t1,t6);}}}
-
-/* loop2585 in rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10563(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10563,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10573,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g25922593 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_10248(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10571 in loop2585 in rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10573(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10563(t3,((C_word*)t0)[2],t2);}
-
-/* loop2572 in rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_fcall f_10537(C_word t0,C_word t1,C_word t2){
-C_word tmp;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10537,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10547,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-t4=(C_word)C_slot(t2,C_fix(0));
-/* g25792580 */
-t5=((C_word*)((C_word*)t0)[2])[1];
-f_10248(t5,t3,t4);}
-else{
-t3=C_SCHEME_UNDEFINED;
-t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-
-/* k10545 in loop2572 in rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10547(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-t3=((C_word*)((C_word*)t0)[3])[1];
-f_10537(t3,((C_word*)t0)[2],t2);}
-
-/* k10520 in rec in k9963 in k9957 in k9954 in k9948 in k9939 in k9924 in transform in ##compiler#transform-direct-lambdas! in k6883 in k6394 in k6391 in k6388 in k4189 in k3753 in k3750 */
-static void C_ccall f_10522(C_word c,C_word t0,C_word t1){
-C_word tmp;
-C_word t2;
-C_word t3;
-C_word t4;
-C_word t5;
-C_word ab[5],*a=ab;
-if(!C_stack_probe(&